| 1 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|---|
| 2 |
;;;; package.lisp: Package definition |
|---|
| 3 |
;;;; Copyright (C) 2004 Robert Marlow <bobstopper@bobturf.org> |
|---|
| 4 |
;;;; |
|---|
| 5 |
;;;; This library is free software; you can redistribute it and/or |
|---|
| 6 |
;;;; modify it under the terms of the GNU Library General Public |
|---|
| 7 |
;;;; License as published by the Free Software Foundation; either |
|---|
| 8 |
;;;; version 2 of the License, or (at your option) any later version. |
|---|
| 9 |
;;;; |
|---|
| 10 |
;;;; This library is distributed in the hope that it will be useful, |
|---|
| 11 |
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of |
|---|
| 12 |
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
|---|
| 13 |
;;;; Library General Public License for more details. |
|---|
| 14 |
;;;; |
|---|
| 15 |
;;;; You should have received a copy of the GNU Library General Public |
|---|
| 16 |
;;;; License along with this library; if not, write to the |
|---|
| 17 |
;;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
|---|
| 18 |
;;;; Boston, MA 02111-1307, USA. |
|---|
| 19 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|---|
| 20 |
|
|---|
| 21 |
|
|---|
| 22 |
|
|---|
| 23 |
(defpackage :cl-mime |
|---|
| 24 |
(:documentation "A package for constructing MIME objects for printing and |
|---|
| 25 |
parsing MIME formatted strings or streams.") |
|---|
| 26 |
(:nicknames :mime) |
|---|
| 27 |
(:use :cl :cl-ppcre :cl-base64) |
|---|
| 28 |
(:export :text-mime |
|---|
| 29 |
:multipart-mime |
|---|
| 30 |
:mime |
|---|
| 31 |
:lookup-mime |
|---|
| 32 |
:make-content-id |
|---|
| 33 |
:content-type |
|---|
| 34 |
:content-subtype |
|---|
| 35 |
:content-type-parameters |
|---|
| 36 |
:content-id |
|---|
| 37 |
:content-description |
|---|
| 38 |
:content-transfer-encoding |
|---|
| 39 |
:content-disposition |
|---|
| 40 |
:content-disposition-parameters |
|---|
| 41 |
:mime-version |
|---|
| 42 |
:charset |
|---|
| 43 |
:boundary |
|---|
| 44 |
:prologue |
|---|
| 45 |
:epilogue |
|---|
| 46 |
:content |
|---|
| 47 |
:get-header |
|---|
| 48 |
:get-mime-headers |
|---|
| 49 |
:get-content-type-parameter |
|---|
| 50 |
:get-content-disposition-parameter |
|---|
| 51 |
:header-value |
|---|
| 52 |
:header-parms |
|---|
| 53 |
:header-comments |
|---|
| 54 |
:print-mime |
|---|
| 55 |
:print-headers |
|---|
| 56 |
:parse-mime |
|---|
| 57 |
:parse-body |
|---|
| 58 |
:parse-headers |
|---|
| 59 |
:decode-content |
|---|
| 60 |
:encode-content)) |
|---|
| 61 |
|
|---|
| 62 |
(in-package :mime) |
|---|
