trivial mimes
1.1.0Tiny library to detect mime types in files.
Table of Contents
About Trivial-Mimes
This is a teensy library that provides some functions to determine the mime-type of a file. As I've had a need for this kind of functionality more than once now and haven't found any suitably lightweight alternative I quickly whipped this up.
How To
(mimes:mime #p"~/something.png")Upon loading, trivial-mimes builds a mime-type database from the local mime.types file or a copy thereof from its own source directory. This database is a simple association of file extension to mime-type (see mime-lookup). If the mime lookup in the database fails, it will instead try to consult the file shell utility on unix systems (see mime-probe). If that too doesn't work, it falls back onto a default.
System Information
Definition Index
-
TRIVIAL-MIMES
- MIMES
- ORG.TYMOONNEXT.TRIVIAL-MIMES
No documentation provided.-
EXTERNAL SPECIAL-VARIABLE *MIME-DB*
An EQUALP hash-table with file-extensions as keys and the mime-types as values.
-
EXTERNAL FUNCTION FIND-MIME.TYPES
Attempts to find a usable MIME.TYPES file. 2 | If none can be found, an error is signalled.
-
EXTERNAL FUNCTION MIME
- PATHNAME
- &OPTIONAL
- DEFAULT
- &REST
Attempts to detect the mime-type of the given pathname. 3 | First uses MIME-LOOKUP, then MIME-PROBE and lastly returns the DEFAULT if both fail.
-
EXTERNAL FUNCTION MIME-ADD
- MIME
- &REST
- FILE-EXTENSIONS
- &REST
Add MIME and FILE-EXTENSIONS associations to *MIME-DB* and *REVERSE-MIME-DB*. 4 | Makes the provided MIME and FILE-EXTENSIONS properly look-up-able with 5 | MIME, MIME-PROBE and other trivial-mimes functions.
-
EXTERNAL FUNCTION MIME-EQUAL
- M1
- M2
- &REST
Checks whether M1 and M2 are matching. 6 | 7 | In particular, checks the match of type and subtype (any of which can 8 | be asterisks), discarding any parameters there might be. 9 | 10 | (mime-equal "text/*" "text/html") 11 | T 12 | 13 | (mime-equal "text/html" "text/html;charset=utf8") 14 | T 15 | 16 | (mime-equal "*/*" "application/octet-stream") 17 | T 18 | 19 | (mime-equal "text/*" "application/octet-stream") 20 | NIL
-
EXTERNAL FUNCTION MIME-FILE-TYPE
- MIME-TYPE
- &REST
Returns a matching file-extension for the given mime-type. 21 | If the given mime-type cannot be found, NIL is returned.
-
EXTERNAL FUNCTION MIME-LOOKUP
- PATHNAME
- &REST
Attempts to get the mime-type by file extension comparison. 22 | If none can be found, NIL is returned.
-
EXTERNAL FUNCTION MIME-PROBE
- PATHNAME
- &REST
Attempts to get the mime-type through a call to the FILE shell utility. 23 | If the file does not exist or the platform is not unix, NIL is returned.
-
EXTERNAL MACRO MIME-CASE
- FILE
- &BODY
- CASES
- &REST
A case-like macro that works with MIME type of FILE. 24 | 25 | Otherwise clause is the last clause that starts with T or OTHERWISE,. 26 | 27 | Example: 28 | (mime-case #p"~/CHANGES.txt" 29 | (("application/json" "application/*") "Something opaque...") 30 | ("text/plain" "That's a plaintext file :D") 31 | (t "I don't know this type!"))