]> gitweb @ CieloNegro.org - Lucu.git/blobdiff - Network/HTTP/Lucu/MIMEType/DefaultExtensionMap.hs
DefaultExtensionMap is now generated with TH.
[Lucu.git] / Network / HTTP / Lucu / MIMEType / DefaultExtensionMap.hs
similarity index 68%
rename from data/mime.types
rename to Network/HTTP/Lucu/MIMEType/DefaultExtensionMap.hs
index 7b7601b3af1af1c52dd8fa2c82e8945843cde2dc..c471da3b3e8abd7ad39142c7c2ead488b495c546 100644 (file)
@@ -1,3 +1,19 @@
+{-# LANGUAGE
+    QuasiQuotes
+  , UnicodeSyntax
+  #-}
+-- |The default extension map.
+module Network.HTTP.Lucu.MIMEType.DefaultExtensionMap
+    ( defaultExtensionMap
+    )
+    where
+import Network.HTTP.Lucu.MIMEType.Guess
+
+-- |'defaultExtensionMap' contains contains every possible pairs of an
+-- extension and a MIME Type.
+defaultExtensionMap :: ExtMap
+{-# NOINLINE defaultExtensionMap #-}
+defaultExtensionMap = [extMap|
 # MIME type                    Extensions
 application/andrew-inset       ez
 application/atom+xml           atom
@@ -23,33 +39,33 @@ application/vnd.wap.wbxml   wbxml
 application/vnd.wap.wmlc       wmlc
 application/vnd.wap.wmlscriptc wmlsc
 application/voicexml+xml       vxml
-application/x-3gp           3gp
-application/x-ape           ape
-application/x-ar            a
+application/x-3gp              3gp
+application/x-ape              ape
+application/x-ar               a
 application/x-bcpio            bcpio
-application/x-bzip      bz2 tbz
+application/x-bzip             bz2 tbz
 application/x-cdlink           vcd
 application/x-chess-pgn                pgn
-application/x-compress      Z
+application/x-compress         Z
 application/x-cpio             cpio
 application/x-csh              csh
 application/x-director         dcr dir dxr
 application/x-dvi              dvi
 application/x-futuresplash     spl
 application/x-gtar             gtar
-application/x-gzip      gz tgz
+application/x-gzip             gz tgz
 application/x-hdf              hdf
 application/x-javascript       js
 application/x-java-jnlp-file   jnlp
 application/x-koan             skp skd skt skm
 application/x-latex            latex
-application/x-nar       nar
+application/x-nar              nar
 application/x-netcdf           nc cdf
-application/x-rar           rar
+application/x-rar              rar
 application/x-sh               sh
 application/x-shar             shar
 application/x-shockwave-flash  swf swfl
-application/x-spc               spc
+application/x-spc              spc
 application/x-stuffit          sit
 application/x-sv4cpio          sv4cpio
 application/x-sv4crc           sv4crc
@@ -69,30 +85,30 @@ application/xml                     xml xsl
 application/xml-dtd            dtd
 application/zip                        zip
 audio/basic                    au snd
-audio/iLBC-sh       ilbc
+audio/iLBC-sh                  ilbc
 audio/midi                     mid midi kar
 audio/mp4a-latm                        m4a m4p
 audio/mpeg                     mpga mp2 mp3
-audio/x-ac3         ac3
+audio/x-ac3                    ac3
 audio/x-aiff                   aif aiff aifc
-audio/x-ircam           sf
-audio/x-flac            flac
-audio/x-mod             669 amf dsm gdm far imf it med mod mtm okt sam s3m stm stx ult xm
+audio/x-ircam                  sf
+audio/x-flac                   flac
+audio/x-mod                    669 amf dsm gdm far imf it med mod mtm okt sam s3m stm stx ult xm
 audio/x-mpegurl                        m3u
-audio/x-musepack        mpc
-audio/x-nist            nist
-audio/x-paris           paf
+audio/x-musepack               mpc
+audio/x-nist                   nist
+audio/x-paris                  paf
 audio/x-pn-realaudio           ram ra
-audio/x-sds                 sds
-audio/x-shorten             shn
-audio/x-sid                 sid
-audio/x-svx                 iff svx
-audio/x-ttafile             tta
-audio/x-voc                 voc
-audio/x-w64                 w64
+audio/x-sds                    sds
+audio/x-shorten                        shn
+audio/x-sid                    sid
+audio/x-svx                    iff svx
+audio/x-ttafile                        tta
+audio/x-voc                    voc
+audio/x-w64                    w64
 audio/x-wav                    wav
-audio/x-wavpack   wv wvp
-audio/x-wavpack-correction        wvc
+audio/x-wavpack                        wv wvp
+audio/x-wavpack-correction     wvc
 chemical/x-pdb                 pdb
 chemical/x-xyz                 xyz
 image/bmp                      bmp
@@ -110,7 +126,7 @@ image/vnd.wap.wbmp          wbmp
 image/x-sun-raster             ras
 image/x-macpaint               pntg pnt mac
 image/x-icon                   ico
-image/x-jng             jng
+image/x-jng                    jng
 image/x-portable-anymap                pnm
 image/x-portable-bitmap                pbm
 image/x-portable-graymap       pgm
@@ -118,7 +134,7 @@ image/x-portable-pixmap             ppm
 image/x-quicktime              qtif qti qif
 image/x-rgb                    rgb
 image/x-xbitmap                        xbm
-image/x-xcf             xcf
+image/x-xcf                    xcf
 image/x-xpixmap                        xpm
 image/x-xwindowdump            xwd
 model/iges                     igs iges
@@ -132,28 +148,29 @@ text/richtext                     rtx
 text/rtf                       rtf
 text/sgml                      sgml sgm
 text/tab-separated-values      tsv
-text/uri-list               uni unis uri uris
+text/uri-list                  uni unis uri uris
 text/vnd.wap.wml               wml
 text/vnd.wap.wmlscript         wmls
-text/x-c                    c h
-text/x-c++                  cc cpp cxx hpp hxx
-text/x-cabal                cabal
-text/x-haskell          hs hsc lhs
+text/x-c                       c h
+text/x-c++                     cc cpp cxx hpp hxx
+text/x-cabal                   cabal
+text/x-haskell                 hs hsc lhs
 text/x-setext                  etx
 video/mp4                      mp4
 video/mpeg                     mpeg mpg mpe
-video/mpeg4         m4v
-video/mpegts        ts
+video/mpeg4                    m4v
+video/mpegts                   ts
 video/quicktime                        qt mov
 video/vnd.mpegurl              mxu m4u
 video/x-dv                     dv dif
-video/x-fli         flc fli
-video/x-flv         flv
-video/x-matroska    mkv  mka
-video/x-ms-asf      asf wm wma wmv
+video/x-fli                    flc fli
+video/x-flv                    flv
+video/x-matroska               mkv  mka
+video/x-ms-asf                 asf wm wma wmv
 video/x-msvideo                        avi
-video/x-mng             mng
-video/x-mve             mve
-video/x-nuv             nuv
+video/x-mng                    mng
+video/x-mve                    mve
+video/x-nuv                    nuv
 video/x-sgi-movie              movie
 x-conference/x-cooltalk                ice
+|]