1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
|
[comment {-*- tcl -*- doctools manpage}]
[manpage_begin mime n 1.6]
[see_also ftp]
[see_also http]
[see_also pop3]
[see_also smtp]
[keywords email]
[keywords internet]
[keywords mail]
[keywords mime]
[keywords net]
[keywords {rfc 821}]
[keywords {rfc 822}]
[keywords {rfc 2045}]
[keywords {rfc 2046}]
[keywords {rfc 2049}]
[keywords smtp]
[copyright {1999-2000 Marshall T. Rose}]
[moddesc {Mime}]
[titledesc {Manipulation of MIME body parts}]
[category {Text processing}]
[require Tcl 8.5]
[require mime [opt 1.6]]
[description]
[para]
The [package mime] library package provides the commands to create and
manipulate MIME body parts.
[list_begin definitions]
[call [cmd ::mime::initialize] [opt "[option -canonical] [arg type/subtype] [opt "[option -param] \{[arg {key value}]\}..."] [opt "[option -encoding] [arg value]"] [opt "[option -header] \{[arg {key value}]\}..."]"] "([option -file] [arg name] | [option -string] [arg value] | [option -parts] \{[arg token1] ... [arg tokenN]\})"]
This command creates a MIME part and returns a token representing it.
[list_begin itemized]
[item]
If the [option -canonical] option is present, then the body is in
canonical (raw) form and is found by consulting either the
[option -file], [option -string], or [option -parts] option.
[para]
In addition, both the [option -param] and [option -header] options may
occur zero or more times to specify [const Content-Type] parameters
(e.g., [const charset]) and header keyword/values (e.g.,
[const Content-Disposition]), respectively.
[para]
Also, [option -encoding], if present, specifies the
[const Content-Transfer-Encoding] when copying the body.
[item]
If the [option -canonical] option is not present, then the MIME part
contained in either the [option -file] or the [option -string] option
is parsed, dynamically generating subordinates as appropriate.
[list_end]
[call [cmd ::mime::finalize] [arg token] [opt "[option -subordinates] [const all] | [const dynamic] | [const none]"]]
This command destroys the MIME part represented by [arg token]. It
returns an empty string.
[para]
If the [option -subordinates] option is present, it specifies which
subordinates should also be destroyed. The default value is
[const dynamic], destroying all subordinates which were created by
[cmd ::mime::initialize] together with the containing body part.
[call [cmd ::mime::getproperty] [arg token] [opt "[arg property] | [option -names]"]]
This command 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 [option -names] is specified, a list of all properties is
returned; otherwise, a serialized array of properties and values is
returned.
[para]
The possible properties are:
[list_begin definitions]
[def [const content]]
The type/subtype describing the content
[def [const encoding]]
The "Content-Transfer-Encoding"
[def [const params]]
A list of "Content-Type" parameters
[def [const parts]]
A list of tokens for the part's subordinates. This property is
present only if the MIME part has subordinates.
[def [const size]]
The approximate size of the content (unencoded)
[list_end]
[call [cmd ::mime::getheader] [arg token] [opt "[arg key] | [option -names]"]]
This command returns the header of a MIME part, as a list of strings.
[para]
A header consists of zero or more key/value pairs. Each value is a
list containing one or more strings.
[para]
If this command is invoked with the name of a specific [arg key], then
a list containing the corresponding value(s) is returned; instead, if
-names is specified, a list of all keys is returned; otherwise, a
serialized array of keys and values is returned. Note that when a key
is specified (e.g., "Subject"), the list returned usually contains
exactly one string; however, some keys (e.g., "Received") often occur
more than once in the header, accordingly the list returned usually
contains more than one string.
[call [cmd ::mime::setheader] [arg token] [arg {key value}] [opt "[option -mode] [const write] | [const append] | [const delete]"]]
This command writes, appends to, or deletes the [arg value] associated
with a [arg key] in the header. It returns a list of strings
containing the previous value associated with the key.
[para]
The value for [option -mode] is one of:
[list_begin definitions]
[def [const write]]
The [arg key]/[arg value] is either created or overwritten (the default).
[def [const append]]
A new [arg value] is appended for the [arg key] (creating it as necessary).
[def [const delete]]
All values associated with the key are removed (the [arg value]
parameter is ignored).
[list_end]
[call [cmd ::mime::getbody] [arg token] [opt [option -decode]] [opt "[option -command] [arg callback] [opt "[option -blocksize] [arg octets]"]"]]
This command returns a string containing the body of the leaf MIME
part represented by [arg token] in canonical form.
[para]
If the [option -command] option is present, then it is repeatedly
invoked with a fragment of the body as this:
[example {
uplevel #0 $callback [list "data" $fragment]
}]
[para]
(The [option -blocksize] option, if present, specifies the maximum
size of each fragment passed to the callback.)
[para]
When the end of the body is reached, the callback is invoked as:
[example {
uplevel #0 $callback "end"
}]
[para]
Alternatively, if an error occurs, the callback is invoked as:
[example {
uplevel #0 $callback [list "error" reason]
}]
[para]
Regardless, the return value of the final invocation of the callback
is propagated upwards by [cmd ::mime::getbody].
[para]
If the [option -command] option is absent, then the return value of
[cmd ::mime::getbody] is a string containing the MIME part's entire
body.
[para]
If the option [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 [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.
[call [cmd ::mime::copymessage] [arg token] [arg channel]]
This command copies the MIME represented by [arg token] part to the
specified [arg channel]. The command operates synchronously, and uses
fileevent to allow asynchronous operations to proceed
independently. It returns an empty string.
[call [cmd ::mime::buildmessage] [arg token]]
This command returns the MIME part represented by [arg token] as a
string. It is similar to [cmd ::mime::copymessage], only it returns
the data as a return string instead of writing to a channel.
[call [cmd ::mime::parseaddress] [arg string]]
This command 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.
[para]
Each serialized array contains the properties below. Note that one or
more of these properties may be empty.
[list_begin definitions]
[def [const address]]
local@domain
[def [const comment]]
822-style comment
[def [const domain]]
the domain part (rhs)
[def [const error]]
non-empty on a parse error
[def [const group]]
this address begins a group
[def [const friendly]]
user-friendly rendering
[def [const local]]
the local part (lhs)
[def [const memberP]]
this address belongs to a group
[def [const phrase]]
the phrase part
[def [const proper]]
822-style address specification
[def [const route]]
822-style route specification (obsolete)
[list_end]
[call [cmd ::mime::parsedatetime] ([arg string] | [option -now]) [arg property]]
This command takes a string containing an 822-style date-time
specification and returns the specified property as a serialized
array.
[para]
The list of properties and their ranges are:
[list_begin definitions]
[def [const hour]]
0 .. 23
[def [const lmonth]]
January, February, ..., December
[def [const lweekday]]
Sunday, Monday, ... Saturday
[def [const mday]]
1 .. 31
[def [const min]]
0 .. 59
[def [const mon]]
1 .. 12
[def [const month]]
Jan, Feb, ..., Dec
[def [const proper]]
822-style date-time specification
[def [const rclock]]
elapsed seconds between then and now
[def [const sec]]
0 .. 59
[def [const wday]]
0 .. 6 (Sun .. Mon)
[def [const weekday]]
Sun, Mon, ..., Sat
[def [const yday]]
1 .. 366
[def [const year]]
1900 ...
[def [const zone]]
-720 .. 720 (minutes east of GMT)
[list_end]
[call [cmd ::mime::mapencoding] [arg encoding_name]]
This commansd 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.
[call [cmd ::mime::reversemapencoding] [arg charset_type]]
This command maps MIME charset types onto tcl encoding names. Those
that are unknown return "".
[list_end]
[section {KNOWN BUGS}]
[list_begin definitions]
[def {Tcllib Bug #447037}]
This problem affects only people which are using Tcl and Mime on a
64-bit system. The currently recommended fix for this problem is to
upgrade to Tcl version 8.4. This version has extended 64 bit support
and the bug does not appear anymore.
[para]
The problem could have been generally solved by requiring the use of
Tcl 8.4 for this package. We decided against this solution as it would
force a large number of unaffected users to upgrade their Tcl
interpreter for no reason.
[para]
See [uri {/tktview?name=447037} {Ticket 447037}] for additional information.
[list_end]
[vset CATEGORY mime]
[include ../doctools2base/include/feedback.inc]
[manpage_end]
|