The mime library package provides the commands to create and manipulate MIME body parts.
::mime::initialize ?-canonicaltype/subtype ?-param {keyvalue}...? ?-encodingvalue? ?-header {keyvalue}...?? (-filename | -stringvalue | -parts {token1 ... tokenN})
Creates a MIME part and returns a token representing it.
• If the -canonical option is present, then the body is in canonical (raw) form and is found
by consulting either the -file, -string, or -parts option.
In addition, both the -param and -header options may occur zero or more times to specify
Content-Type parameters (e.g., charset) and header keyword/values (e.g., Content-Disposition), respectively.
Also, -encoding, if present, specifies the Content-Transfer-Encoding when copying the body.
• If the -canonical option is not present, then the MIME part contained in either the -file
or the -string option is parsed, dynamically generating subordinates as appropriate.
::mime::finalizetoken ?-subordinatesall | dynamic | none?
Destroys the MIME part represented by token. It returns an empty string.
If the -subordinates option is present, it specifies which subordinates should also be destroyed.
The default value is dynamic, destroying all subordinates which were created by ::mime::initialize
together with the containing body part.
::mime::getpropertytoken ?property | -names?
Returns a string or a list of strings containing the properties of a MIME part. If the command is
invoked with the name of a specific property, then the corresponding value is returned; instead,
if -names is specified, a list of all properties is returned; otherwise, a serialized array of
properties and values is returned.
The possible properties are:
content
The type/subtype describing the content
encoding
The "Content-Transfer-Encoding"
params A list of "Content-Type" parameters
parts A list of tokens for the part's subordinates. This property is present only if the MIME
part has subordinates.
size The approximate size of the content (unencoded)
::mime::getheadertoken ?key | -names?
Returns the header of a MIME part as a dictionary with possibly-redundant keys.
If key is provided, then a list of values of matching names, without regard to case, is returned.
If -names is provided, a list of all keys is returned.
::mime::setheadertokenkeyvalue ?-modewrite | append | delete?
If append is provided, creates a new header named key with the value of value is added. If write
is provided, deletes any existing headers whose names match key and then creates a new header
named key with the value of value. If delete is provided any existing header having a name that
matches key is deleted. Returns a list of strings containing the previous value associated with
the key.
The value for -mode is one of:
write The key/value is either created or overwritten (the default).
append A new value is appended for the key (creating it as necessary).
delete All values associated with the key are removed (the value parameter is ignored).
::mime::getbodytoken ?-decode? ?-commandcallback ?-blocksizeoctets??
Returns a string containing the body of the leaf MIME part represented by token in canonical form.
If the -command option is present, then it is repeatedly invoked with a fragment of the body as
this:
uplevel #0 $callback [list "data" $fragment]
(The -blocksize option, if present, specifies the maximum size of each fragment passed to the callback.)
When the end of the body is reached, the callback is invoked as:
uplevel #0 $callback "end"
Alternatively, if an error occurs, the callback is invoked as:
uplevel #0 $callback [list "error" reason]
Regardless, the return value of the final invocation of the callback is propagated upwards by
::mime::getbody.
If the -command option is absent, then the return value of ::mime::getbody is a string containing the
MIME part's entire body.
If the option -decode is absent the return value computed above is returned as is. This means that it
will be in the charset specified for the token and not the usual utf-8. If the option -decode is present
however the command will use the charset information associated with the token to convert the string from
its encoding into utf-8 before returning it.
::mime::copymessagetokenchannel
Copies the MIME represented by token part to the specified channel. The command operates
synchronously, and uses fileevent to allow asynchronous operations to proceed independently. It
returns an empty string.
::mime::buildmessagetoken
Returns the MIME part represented by token as a string. It is similar to ::mime::copymessage,
only it returns the data as a return string instead of writing to a channel.
::mime::parseaddressstring
Takes a string containing one or more 822-style address specifications and returns a list of
serialized arrays, one element for each address specified in the argument. If the string contains
more than one address they will be separated by commas.
Each serialized array contains the properties below. Note that one or more of these properties may
be empty.
address
local@domain
comment
822-style comment
domain the domain part (rhs)
error non-empty on a parse error
group this address begins a group
friendly
user-friendly rendering
local the local part (lhs)
memberP
this address belongs to a group
phrase the phrase part
proper 822-style address specification
route 822-style route specification (obsolete)
::mime::parsedatetime (string | -now) property
Takes a string containing an 822-style date-time specification and returns the specified property
as a serialized array.
The list of properties and their ranges are:
hour 0 .. 23
lmonth January, February, ..., December
lweekday
Sunday, Monday, ... Saturday
mday 1 .. 31
min 0 .. 59
mon 1 .. 12
month Jan, Feb, ..., Dec
proper 822-style date-time specification
rclock elapsed seconds between then and now
sec 0 .. 59
wday 0 .. 6 (Sun .. Mon)
weekday
Sun, Mon, ..., Sat
yday 1 .. 366
year 1900 ...
zone -720 .. 720 (minutes east of GMT)
::mime::mapencodingencoding_name
Maps tcl encodings onto the proper names for their MIME charset type. This is only done for
encodings whose charset types were known. The remaining encodings return "" for now.
::mime::reversemapencodingcharset_type
Maps MIME charset types onto tcl encoding names. Those that are unknown return "".