pjs/lib/libmime/mimetext.c

307 строки
9.9 KiB
C

/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
*
* The contents of this file are subject to the Netscape Public License
* Version 1.0 (the "NPL"); you may not use this file except in
* compliance with the NPL. You may obtain a copy of the NPL at
* http://www.mozilla.org/NPL/
*
* Software distributed under the NPL is distributed on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
* for the specific language governing rights and limitations under the
* NPL.
*
* The Initial Developer of this code under the NPL is Netscape
* Communications Corporation. Portions created by Netscape are
* Copyright (C) 1998 Netscape Communications Corporation. All Rights
* Reserved.
*/
/* mimetext.c --- definition of the MimeInlineText class (see mimei.h)
Created: Jamie Zawinski <jwz@netscape.com>, 15-May-96.
*/
#include "rosetta.h"
#include "mimetext.h"
#include "libi18n.h"
#define MIME_SUPERCLASS mimeLeafClass
MimeDefClass(MimeInlineText, MimeInlineTextClass, mimeInlineTextClass,
&MIME_SUPERCLASS);
static int MimeInlineText_initialize (MimeObject *);
static void MimeInlineText_finalize (MimeObject *);
static int MimeInlineText_rot13_line (MimeObject *, char *line, int32 length);
static int MimeInlineText_parse_eof (MimeObject *obj, XP_Bool abort_p);
static int MimeInlineText_parse_end (MimeObject *, XP_Bool);
static int MimeInlineText_parse_decoded_buffer (char *, int32, MimeObject *);
static int MimeInlineText_rotate_convert_and_parse_line(char *, int32,
MimeObject *);
static int
MimeInlineTextClassInitialize(MimeInlineTextClass *class)
{
MimeObjectClass *oclass = (MimeObjectClass *) class;
MimeLeafClass *lclass = (MimeLeafClass *) class;
XP_ASSERT(!oclass->class_initialized);
oclass->initialize = MimeInlineText_initialize;
oclass->finalize = MimeInlineText_finalize;
oclass->parse_eof = MimeInlineText_parse_eof;
oclass->parse_end = MimeInlineText_parse_end;
class->rot13_line = MimeInlineText_rot13_line;
lclass->parse_decoded_buffer = MimeInlineText_parse_decoded_buffer;
return 0;
}
static int
MimeInlineText_initialize (MimeObject *obj)
{
MimeInlineText *text = (MimeInlineText *) obj;
/* This is an abstract class; it shouldn't be directly instanciated. */
XP_ASSERT(obj->class != (MimeObjectClass *) &mimeInlineTextClass);
/* Figure out an appropriate charset for this object.
*/
if (!text->charset && obj->headers)
{
if (obj->options && obj->options->override_charset)
{
text->charset = XP_STRDUP(obj->options->override_charset);
}
else
{
char *ct = MimeHeaders_get (obj->headers, HEADER_CONTENT_TYPE,
FALSE, FALSE);
if (ct)
{
text->charset = MimeHeaders_get_parameter (ct, "charset", NULL, NULL);
XP_FREE(ct);
}
if (!text->charset)
{
/* If we didn't find "Content-Type: ...; charset=XX" then look
for "X-Sun-Charset: XX" instead. (Maybe this should be done
in MimeSunAttachmentClass, but it's harder there than here.)
*/
text->charset = MimeHeaders_get (obj->headers,
HEADER_X_SUN_CHARSET,
FALSE, FALSE);
}
if (!text->charset)
{
if (obj->options && obj->options->default_charset)
text->charset = XP_STRDUP(obj->options->default_charset);
/* Do not label US-ASCII if the app default charset is multibyte.
Perhaps US-ASCII label should be removed for all cases.
*/
else if (MULTIBYTE & INTL_DefaultDocCharSetID(0))
;
else
text->charset = XP_STRDUP("US-ASCII");
}
}
}
return ((MimeObjectClass*)&MIME_SUPERCLASS)->initialize(obj);
}
static void
MimeInlineText_finalize (MimeObject *obj)
{
MimeInlineText *text = (MimeInlineText *) obj;
obj->class->parse_eof (obj, FALSE);
obj->class->parse_end (obj, FALSE);
FREEIF(text->charset);
/* Should have been freed by parse_eof, but just in case... */
XP_ASSERT(!text->cbuffer);
FREEIF (text->cbuffer);
((MimeObjectClass*)&MIME_SUPERCLASS)->finalize (obj);
}
static int
MimeInlineText_parse_eof (MimeObject *obj, XP_Bool abort_p)
{
if (obj->closed_p) return 0;
XP_ASSERT(!obj->parsed_p);
/* If there is still data in the ibuffer, that means that the last line of
this part didn't end in a newline; so push it out anyway (this means that
the parse_line method will be called with a string with no trailing
newline, which isn't the usual case.) We do this here, rather than in
MimeObject_parse_eof, because MimeObject likes to shove things through
parse_line, and we have to shove it through the magic rotating-and-converting
code. So, we do that and digest the buffer before MimeObject has a chance
to do the wrong thing. See bug #26276 for more painful details.
*/
if (!abort_p &&
obj->ibuffer_fp > 0)
{
int status = MimeInlineText_rotate_convert_and_parse_line (obj->ibuffer,
obj->ibuffer_fp,
obj);
obj->ibuffer_fp = 0;
if (status < 0)
{
obj->closed_p = TRUE;
return status;
}
}
return ((MimeObjectClass*)&MIME_SUPERCLASS)->parse_eof (obj, abort_p);
}
static int
MimeInlineText_parse_end (MimeObject *obj, XP_Bool abort_p)
{
MimeInlineText *text = (MimeInlineText *) obj;
if (obj->parsed_p)
{
XP_ASSERT(obj->closed_p);
return 0;
}
/* We won't be needing this buffer any more; nuke it. */
FREEIF(text->cbuffer);
text->cbuffer_size = 0;
return ((MimeObjectClass*)&MIME_SUPERCLASS)->parse_end (obj, abort_p);
}
/* This maps A-M to N-Z and N-Z to A-M. All other characters are left alone.
(Comments in GNUS imply that for Japanese, one should rotate by 47?)
*/
static const unsigned char MimeInlineText_rot13_table[256] = {
0, 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, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90,
65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 91, 92, 93, 94, 95, 96,
110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 97, 98,
99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 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 };
static int
MimeInlineText_rot13_line (MimeObject *obj, char *line, int32 length)
{
unsigned char *s, *end;
XP_ASSERT(line);
if (!line) return -1;
s = (unsigned char *) line;
end = s + length;
while (s < end)
{
*s = MimeInlineText_rot13_table[*s];
s++;
}
return 0;
}
static int
MimeInlineText_parse_decoded_buffer (char *buf, int32 size, MimeObject *obj)
{
XP_ASSERT(!obj->closed_p);
if (obj->closed_p) return -1;
/* MimeLeaf takes care of this. */
XP_ASSERT(obj->output_p && obj->options && obj->options->output_fn);
if (!obj->options) return -1;
/* If we're supposed to write this object, but aren't supposed to convert
it to HTML, simply pass it through unaltered. */
if (!obj->options->write_html_p)
return MimeObject_write(obj, buf, size, TRUE);
/* This is just like the parse_decoded_buffer method we inherit from the
MimeLeaf class, except that we line-buffer to our own wrapper on the
`parse_line' method instead of calling the `parse_line' method directly.
*/
return XP_LineBuffer (buf, size,
&obj->ibuffer, &obj->ibuffer_size, &obj->ibuffer_fp,
TRUE,
((int32 (*) (char *, uint32, void *))
/* This cast is to turn void into MimeObject */
MimeInlineText_rotate_convert_and_parse_line),
obj);
}
#define MimeInlineText_grow_cbuffer(text, desired_size) \
(((desired_size) >= (text)->cbuffer_size) ? \
XP_GrowBuffer ((desired_size), sizeof(char), 100, \
&(text)->cbuffer, &(text)->cbuffer_size) \
: 0)
static int
MimeInlineText_rotate_convert_and_parse_line(char *line, int32 length,
MimeObject *obj)
{
int status;
MimeInlineText *text = (MimeInlineText *) obj;
MimeInlineTextClass *textc = (MimeInlineTextClass *) obj->class;
char *converted = 0;
XP_ASSERT(!obj->closed_p);
if (obj->closed_p) return -1;
/* Rotate the line, if desired (this happens on the raw data, before any
charset conversion.) */
if (obj->options && obj->options->rot13_p)
{
status = textc->rot13_line(obj, line, length);
if (status < 0) return status;
}
/* Now convert to the canonical charset, if desired.
*/
if (obj->options && obj->options->charset_conversion_fn)
{
int32 converted_len = 0;
const char *output_charset = (obj->options->override_charset
? obj->options->override_charset
: obj->options->default_charset);
status = obj->options->charset_conversion_fn(line, length,
text->charset,
output_charset,
&converted,
&converted_len,
obj->options->stream_closure);
if (status < 0)
{
FREEIF(converted);
return status;
}
if (converted)
{
line = converted;
length = converted_len;
}
}
/* Now that the line has been converted, call the subclass's parse_line
method with the decoded data. */
status = obj->class->parse_line(line, length, obj);
FREEIF(converted);
return status;
}