X-Git-Url: http://git.marmaro.de/?a=blobdiff_plain;f=uip%2Fmhbuildsbr.c;h=2c101b94189ddec68ad9028c40ef1e00c2888e4a;hb=7edb0cbc236244d996d1e2ae1d58d0e9f7d98062;hp=25924e9663123c4036a7241d65d21baf7cffa6af;hpb=1513f7668c494c4583141d6115669b7198c14556;p=mmh diff --git a/uip/mhbuildsbr.c b/uip/mhbuildsbr.c index 25924e9..2c101b9 100644 --- a/uip/mhbuildsbr.c +++ b/uip/mhbuildsbr.c @@ -152,8 +152,8 @@ int pidcheck (int); */ static CT get_content (FILE *, char *, int); static int add_header (CT, char *, char *); -static int get_ctinfo (char *, CT, int); -static int get_comment (CT, char **, int); +static int get_ctinfo (unsigned char *, CT, int); +static int get_comment (CT, unsigned char **, int); static int InitGeneric (CT); static int InitText (CT); static int InitMultiPart (CT); @@ -186,7 +186,7 @@ static int scan_content (CT); static int build_headers (CT); static char *calculate_digest (CT, int); static int readDigest (CT, char *); -static char *incl_name_value (char *, char *, char *); +static char *incl_name_value (unsigned char *, char *, char *); static char *extract_name_value (char *, char *); /* @@ -300,15 +300,15 @@ build_mime (char *infile) compnum++; /* abort if draft has Mime-Version header field */ - if (!strcasecmp (name, VRSN_FIELD)) + if (!mh_strcasecmp (name, VRSN_FIELD)) adios (NULL, "draft shouldn't contain %s: field", VRSN_FIELD); /* abort if draft has Content-Transfer-Encoding header field */ - if (!strcasecmp (name, ENCODING_FIELD)) + if (!mh_strcasecmp (name, ENCODING_FIELD)) adios (NULL, "draft shouldn't contain %s: field", ENCODING_FIELD); /* ignore any Content-Type fields in the header */ - if (!strcasecmp (name, TYPE_FIELD)) { + if (!mh_strcasecmp (name, TYPE_FIELD)) { while (state == FLDPLUS) state = m_getfld (state, name, buf, sizeof(buf), in); goto finish_field; @@ -497,9 +497,10 @@ get_content (FILE *in, char *file, int toplevel) compnum++; /* Get MIME-Version field */ - if (!strcasecmp (name, VRSN_FIELD)) { + if (!mh_strcasecmp (name, VRSN_FIELD)) { int ucmp; - char c, *cp, *dp; + char c; + unsigned char *cp, *dp; cp = add (buf, NULL); while (state == FLDPLUS) { @@ -533,7 +534,7 @@ get_content (FILE *in, char *file, int toplevel) for (dp = cp; istoken (*dp); dp++) continue; c = *dp, *dp = '\0'; - ucmp = !strcasecmp (cp, VRSN_VALUE); + ucmp = !mh_strcasecmp (cp, VRSN_VALUE); *dp = c; if (!ucmp) admonish (NULL, @@ -543,7 +544,7 @@ get_content (FILE *in, char *file, int toplevel) } /* Get Content-Type field */ - if (!strcasecmp (name, TYPE_FIELD)) { + if (!mh_strcasecmp (name, TYPE_FIELD)) { char *cp; struct str2init *s2i; CI ci = &ct->c_ctinfo; @@ -574,7 +575,7 @@ get_content (FILE *in, char *file, int toplevel) * flag for this content type. */ for (s2i = str2cts; s2i->si_key; s2i++) - if (!strcasecmp (ci->ci_type, s2i->si_key)) + if (!mh_strcasecmp (ci->ci_type, s2i->si_key)) break; if (!s2i->si_key && !uprf (ci->ci_type, "X-")) s2i++; @@ -584,8 +585,8 @@ get_content (FILE *in, char *file, int toplevel) } /* Get Content-Transfer-Encoding field */ - if (!strcasecmp (name, ENCODING_FIELD)) { - char *cp, *dp; + if (!mh_strcasecmp (name, ENCODING_FIELD)) { + unsigned char *cp, *dp; char c; struct str2init *s2i; @@ -620,7 +621,7 @@ get_content (FILE *in, char *file, int toplevel) * for this transfer encoding. */ for (s2i = str2ces; s2i->si_key; s2i++) - if (!strcasecmp (cp, s2i->si_key)) + if (!mh_strcasecmp (cp, s2i->si_key)) break; if (!s2i->si_key && !uprf (cp, "X-")) s2i++; @@ -634,7 +635,7 @@ get_content (FILE *in, char *file, int toplevel) } /* Get Content-ID field */ - if (!strcasecmp (name, ID_FIELD)) { + if (!mh_strcasecmp (name, ID_FIELD)) { ct->c_id = add (buf, ct->c_id); while (state == FLDPLUS) { state = m_getfld (state, name, buf, sizeof(buf), in); @@ -644,7 +645,7 @@ get_content (FILE *in, char *file, int toplevel) } /* Get Content-Description field */ - if (!strcasecmp (name, DESCR_FIELD)) { + if (!mh_strcasecmp (name, DESCR_FIELD)) { ct->c_descr = add (buf, ct->c_descr); while (state == FLDPLUS) { state = m_getfld (state, name, buf, sizeof(buf), in); @@ -654,7 +655,7 @@ get_content (FILE *in, char *file, int toplevel) } /* Get Content-Disposition field */ - if (!strcasecmp (name, DISPO_FIELD)) { + if (!mh_strcasecmp (name, DISPO_FIELD)) { ct->c_dispo = add (buf, ct->c_dispo); while (state == FLDPLUS) { state = m_getfld (state, name, buf, sizeof(buf), in); @@ -664,8 +665,9 @@ get_content (FILE *in, char *file, int toplevel) } /* Get Content-MD5 field */ - if (!strcasecmp (name, MD5_FIELD)) { - char *cp, *dp, *ep; + if (!mh_strcasecmp (name, MD5_FIELD)) { + unsigned char *cp, *dp; + char *ep; cp = add (buf, NULL); while (state == FLDPLUS) { @@ -828,10 +830,11 @@ add_header (CT ct, char *name, char *value) */ static int -get_ctinfo (char *cp, CT ct, int magic) +get_ctinfo (unsigned char *cp, CT ct, int magic) { int i; - char *dp, **ap, **ep; + unsigned char *dp; + char **ap, **ep; char c; CI ci; @@ -926,7 +929,8 @@ magic_skip: */ ep = (ap = ci->ci_attrs) + NPARMS; while (*cp == ';') { - char *vp, *up; + char *vp; + unsigned char *up; if (ap >= ep) { advise (NULL, @@ -1108,17 +1112,18 @@ bad_quote: The r1bindex call skips any leading directory components. */ if (ct->c_dispo) - ct->c_dispo = - incl_name_value (ct->c_dispo, - "filename", - r1bindex (extract_name_value ("name", - ci->ci_magic), - '/')); + ct->c_dispo = + incl_name_value (ct->c_dispo, + "filename", + r1bindex (extract_name_value ("name", + ci-> + ci_magic), + '/')); } else advise (NULL, "extraneous information in message %s's %s: field\n%*.*s(%s)", - ct->c_file, TYPE_FIELD, i, i, "", cp); + ct->c_file, TYPE_FIELD, i, i, "", cp); } return OK; @@ -1126,10 +1131,11 @@ bad_quote: static int -get_comment (CT ct, char **ap, int istype) +get_comment (CT ct, unsigned char **ap, int istype) { int i; - char *bp, *cp; + char *bp; + unsigned char *cp; char c, buffer[BUFSIZ], *dp; CI ci; @@ -1219,7 +1225,7 @@ InitText (CT ct) /* match subtype */ for (kv = SubText; kv->kv_key; kv++) - if (!strcasecmp (ci->ci_subtype, kv->kv_key)) + if (!mh_strcasecmp (ci->ci_subtype, kv->kv_key)) break; ct->c_subtype = kv->kv_value; @@ -1233,14 +1239,14 @@ InitText (CT ct) /* scan for charset parameter */ for (ap = ci->ci_attrs, ep = ci->ci_values; *ap; ap++, ep++) - if (!strcasecmp (*ap, "charset")) + if (!mh_strcasecmp (*ap, "charset")) break; /* check if content specified a character set */ if (*ap) { /* match character set or set to CHARSET_UNKNOWN */ for (kv = Charset; kv->kv_key; kv++) - if (!strcasecmp (*ep, kv->kv_key)) + if (!mh_strcasecmp (*ep, kv->kv_key)) break; t->tx_charset = kv->kv_value; } @@ -1258,7 +1264,8 @@ InitMultiPart (CT ct) { int inout; long last, pos; - char *cp, *dp, **ap, **ep; + unsigned char *cp, *dp; + char **ap, **ep; char *bp, buffer[BUFSIZ]; struct multipart *m; struct k2v *kv; @@ -1281,7 +1288,7 @@ InitMultiPart (CT ct) /* match subtype */ for (kv = SubMultiPart; kv->kv_key; kv++) - if (!strcasecmp (ci->ci_subtype, kv->kv_key)) + if (!mh_strcasecmp (ci->ci_subtype, kv->kv_key)) break; ct->c_subtype = kv->kv_value; @@ -1290,7 +1297,7 @@ InitMultiPart (CT ct) * required for multipart messages. */ for (ap = ci->ci_attrs, ep = ci->ci_values; *ap; ap++, ep++) { - if (!strcasecmp (*ap, "boundary")) { + if (!mh_strcasecmp (*ap, "boundary")) { bp = *ep; break; } @@ -1511,7 +1518,7 @@ InitMessage (CT ct) /* match subtype */ for (kv = SubMessage; kv->kv_key; kv++) - if (!strcasecmp (ci->ci_subtype, kv->kv_key)) + if (!mh_strcasecmp (ci->ci_subtype, kv->kv_key)) break; ct->c_subtype = kv->kv_value; @@ -1530,11 +1537,11 @@ InitMessage (CT ct) /* scan for parameters "id", "number", and "total" */ for (ap = ci->ci_attrs, ep = ci->ci_values; *ap; ap++, ep++) { - if (!strcasecmp (*ap, "id")) { + if (!mh_strcasecmp (*ap, "id")) { p->pm_partid = add (*ep, NULL); continue; } - if (!strcasecmp (*ap, "number")) { + if (!mh_strcasecmp (*ap, "number")) { if (sscanf (*ep, "%d", &p->pm_partno) != 1 || p->pm_partno < 1) { invalid_param: @@ -1546,7 +1553,7 @@ invalid_param: } continue; } - if (!strcasecmp (*ap, "total")) { + if (!mh_strcasecmp (*ap, "total")) { if (sscanf (*ep, "%d", &p->pm_maxno) != 1 || p->pm_maxno < 1) goto invalid_param; @@ -1667,12 +1674,12 @@ params_external (CT ct, int composing) CI ci = &ct->c_ctinfo; for (ap = ci->ci_attrs, ep = ci->ci_values; *ap; ap++, ep++) { - if (!strcasecmp (*ap, "access-type")) { + if (!mh_strcasecmp (*ap, "access-type")) { struct str2init *s2i; CT p = e->eb_content; for (s2i = str2methods; s2i->si_key; s2i++) - if (!strcasecmp (*ep, s2i->si_key)) + if (!mh_strcasecmp (*ep, s2i->si_key)) break; if (!s2i->si_key) { @@ -1690,39 +1697,39 @@ params_external (CT ct, int composing) return NOTOK; continue; } - if (!strcasecmp (*ap, "name")) { + if (!mh_strcasecmp (*ap, "name")) { e->eb_name = *ep; continue; } - if (!strcasecmp (*ap, "permission")) { + if (!mh_strcasecmp (*ap, "permission")) { e->eb_permission = *ep; continue; } - if (!strcasecmp (*ap, "site")) { + if (!mh_strcasecmp (*ap, "site")) { e->eb_site = *ep; continue; } - if (!strcasecmp (*ap, "directory")) { + if (!mh_strcasecmp (*ap, "directory")) { e->eb_dir = *ep; continue; } - if (!strcasecmp (*ap, "mode")) { + if (!mh_strcasecmp (*ap, "mode")) { e->eb_mode = *ep; continue; } - if (!strcasecmp (*ap, "size")) { + if (!mh_strcasecmp (*ap, "size")) { sscanf (*ep, "%lu", &e->eb_size); continue; } - if (!strcasecmp (*ap, "server")) { + if (!mh_strcasecmp (*ap, "server")) { e->eb_server = *ep; continue; } - if (!strcasecmp (*ap, "subject")) { + if (!mh_strcasecmp (*ap, "subject")) { e->eb_subject = *ep; continue; } - if (composing && !strcasecmp (*ap, "body")) { + if (composing && !mh_strcasecmp (*ap, "body")) { e->eb_body = getcpy (*ep); continue; } @@ -1751,7 +1758,7 @@ InitApplication (CT ct) /* match subtype */ for (kv = SubApplication; kv->kv_key; kv++) - if (!strcasecmp (ci->ci_subtype, kv->kv_key)) + if (!mh_strcasecmp (ci->ci_subtype, kv->kv_key)) break; ct->c_subtype = kv->kv_value; @@ -1894,7 +1901,8 @@ openBase64 (CT ct, char **file) int fd, len, skip; unsigned long bits; unsigned char value, *b, *b1, *b2, *b3; - char *cp, *ep, buffer[BUFSIZ]; + unsigned char *cp, *ep; + char buffer[BUFSIZ]; CE ce; MD5_CTX mdContext; @@ -2090,7 +2098,7 @@ static int openQuoted (CT ct, char **file) { int cc, digested, len, quoted; - char *cp, *ep; + unsigned char *cp, *ep; char buffer[BUFSIZ]; unsigned char mask; CE ce; @@ -2502,7 +2510,7 @@ openFile (CT ct, char **file) return NOTOK; } - if ((!e->eb_permission || strcasecmp (e->eb_permission, "read-write")) + if ((!e->eb_permission || mh_strcasecmp (e->eb_permission, "read-write")) && find_cache (NULL, wcachesw, &cachetype, e->eb_content->c_id, cachefile, sizeof(cachefile)) != NOTOK) { int mask; @@ -2650,7 +2658,7 @@ openFTP (CT ct, char **file) ce->ce_unlink = (*file == NULL); caching = 0; cachefile[0] = '\0'; - if ((!e->eb_permission || strcasecmp (e->eb_permission, "read-write")) + if ((!e->eb_permission || mh_strcasecmp (e->eb_permission, "read-write")) && find_cache (NULL, wcachesw, &cachetype, e->eb_content->c_id, cachefile, sizeof(cachefile)) != NOTOK) { if (*file == NULL) { @@ -2686,7 +2694,7 @@ openFTP (CT ct, char **file) vec[vecp++] = e->eb_dir; vec[vecp++] = e->eb_name; vec[vecp++] = ce->ce_file, - vec[vecp++] = e->eb_mode && !strcasecmp (e->eb_mode, "ascii") + vec[vecp++] = e->eb_mode && !mh_strcasecmp (e->eb_mode, "ascii") ? "ascii" : "binary"; vec[vecp] = NULL; @@ -2723,7 +2731,7 @@ losing_ftp: else if (ftp_get (e->eb_site, user, pass, e->eb_dir, e->eb_name, ce->ce_file, - e->eb_mode && !strcasecmp (e->eb_mode, "ascii"), 0) + e->eb_mode && !mh_strcasecmp (e->eb_mode, "ascii"), 0) == NOTOK) goto losing_ftp; #endif @@ -2917,7 +2925,8 @@ static int user_content (FILE *in, char *file, char *buf, CT *ctp) { int extrnal, vrsn; - char *cp, **ap; + unsigned char *cp; + char **ap; char buffer[BUFSIZ]; struct multipart *m; struct part **pp; @@ -3055,7 +3064,7 @@ rock_and_roll: done (1); for (s2i = str2cts; s2i->si_key; s2i++) - if (!strcasecmp (ci->ci_type, s2i->si_key)) + if (!mh_strcasecmp (ci->ci_type, s2i->si_key)) break; if (!s2i->si_key && !uprf (ci->ci_type, "X-")) s2i++; @@ -3065,7 +3074,7 @@ rock_and_roll: */ switch (ct->c_type = s2i->si_val) { case CT_MESSAGE: - if (!strcasecmp (ci->ci_subtype, "rfc822")) { + if (!mh_strcasecmp (ci->ci_subtype, "rfc822")) { ct->c_encoding = CE_7BIT; goto call_init; } @@ -3101,7 +3110,7 @@ call_init: /* check directive against the list of MIME types */ for (s2i = str2cts; s2i->si_key; s2i++) - if (!strcasecmp (ci->ci_type, s2i->si_key)) + if (!mh_strcasecmp (ci->ci_type, s2i->si_key)) break; /* @@ -3122,10 +3131,10 @@ call_init: /* NOTREACHED */ case CT_MESSAGE: - if (!strcasecmp (ci->ci_subtype, "partial")) + if (!mh_strcasecmp (ci->ci_subtype, "partial")) adios (NULL, "sorry, \"#%s/%s\" isn't supported", ci->ci_type, ci->ci_subtype); - if (!strcasecmp (ci->ci_subtype, "external-body")) + if (!mh_strcasecmp (ci->ci_subtype, "external-body")) adios (NULL, "use \"#@type/subtype ... [] ...\" instead of \"#%s/%s\"", ci->ci_type, ci->ci_subtype); use_forw: @@ -3232,7 +3241,7 @@ use_forw: * Message directive * #forw [+folder] [msgs] */ - if (!strcasecmp (ci->ci_type, "forw")) { + if (!mh_strcasecmp (ci->ci_type, "forw")) { int msgnum; char *folder, *arguments[MAXARGS]; struct msgs *mp; @@ -3253,7 +3262,7 @@ use_forw: if (folder) adios (NULL, "only one folder per #forw directive"); else - folder = path (cp + 1, *cp == '+' ? TFOLDER : TSUBCWF); + folder = pluspath (cp); } } @@ -3338,7 +3347,7 @@ use_forw: /* * #end */ - if (!strcasecmp (ci->ci_type, "end")) { + if (!mh_strcasecmp (ci->ci_type, "end")) { free_content (ct); *ctp = NULL; return DONE; @@ -3347,14 +3356,14 @@ use_forw: /* * #begin [ alternative | parallel ] */ - if (!strcasecmp (ci->ci_type, "begin")) { + if (!mh_strcasecmp (ci->ci_type, "begin")) { if (!ci->ci_magic) { vrsn = MULTI_MIXED; cp = SubMultiPart[vrsn - 1].kv_key; - } else if (!strcasecmp (ci->ci_magic, "alternative")) { + } else if (!mh_strcasecmp (ci->ci_magic, "alternative")) { vrsn = MULTI_ALTERNATE; cp = SubMultiPart[vrsn - 1].kv_key; - } else if (!strcasecmp (ci->ci_magic, "parallel")) { + } else if (!mh_strcasecmp (ci->ci_magic, "parallel")) { vrsn = MULTI_PARALLEL; cp = SubMultiPart[vrsn - 1].kv_key; } else if (uprf (ci->ci_magic, "digest")) { @@ -3701,7 +3710,7 @@ scan_content (CT ct) int checkboundary, boundaryclash = 0; /* check if clashes with multipart boundary */ int checklinespace, linespace = 0; /* check if any line ends with space */ int checkebcdic, ebcdicunsafe = 0; /* check if contains ebcdic unsafe characters */ - char *cp, buffer[BUFSIZ]; + unsigned char *cp, buffer[BUFSIZ]; struct text *t; FILE *in; CE ce = ct->c_cefile; @@ -3972,7 +3981,7 @@ build_headers (CT ct) * the end of the Content-Type line. */ for (ap = ci->ci_attrs, ep = ci->ci_values; *ap; ap++, ep++) { - if (mailbody && !strcasecmp (*ap, "body")) + if (mailbody && !mh_strcasecmp (*ap, "body")) continue; vp = add (";", vp); @@ -4317,64 +4326,85 @@ invalid_digest: /* Make sure that buf contains at least one appearance of name, - followed by =. If not, append both name and value. Note that name - should not contain a trailing =. And quotes will be added around - the value. Typical usage: make sure that a Content-Disposition - header contains filename="foo". If it doesn't and value does, use - value from that. */ + followed by =. If not, insert both name and value, just after + first semicolon, if any. Note that name should not contain a + trailing =. And quotes will be added around the value. Typical + usage: make sure that a Content-Disposition header contains + filename="foo". If it doesn't and value does, use value from + that. */ static char * -incl_name_value (char *buf, char *name, char *value) { - char *newbuf = buf; +incl_name_value (unsigned char *buf, char *name, char *value) { + char *newbuf = buf; + + /* Assume that name is non-null. */ + if (buf && value) { + char *name_plus_equal = concat (name, "=", NULL); + + if (! strstr (buf, name_plus_equal)) { + char *insertion; + unsigned char *cp; + char *prefix, *suffix; + + /* Trim trailing space, esp. newline. */ + for (cp = &buf[strlen (buf) - 1]; + cp >= buf && isspace (*cp); + --cp) { + *cp = '\0'; + } - /* Assume that name is non-null. */ - if (buf && value) { - char *name_plus_equal = concat (name, "=", NULL); + insertion = concat ("; ", name, "=", "\"", value, "\"", NULL); - if (! strstr (buf, name_plus_equal)) { - char *appendage; - char *cp; + /* Insert at first semicolon, if any. If none, append to + end. */ + prefix = add (buf, NULL); + if ((cp = strchr (prefix, ';'))) { + suffix = concat (cp, NULL); + *cp = '\0'; + newbuf = concat (prefix, insertion, suffix, "\n", NULL); + free (suffix); + } else { + /* Append to end. */ + newbuf = concat (buf, insertion, "\n", NULL); + } - /* Trim trailing space, esp. newline. */ - for (cp = &buf[strlen (buf) - 1]; cp >= buf && isspace (*cp); --cp) { - *cp = '\0'; - } + free (prefix); + free (insertion); + free (buf); + } - appendage = concat ("; ", name, "=", "\"", value, "\"\n", NULL); - newbuf = add (appendage, buf); - free (appendage); + free (name_plus_equal); } - free (name_plus_equal); - } - - return newbuf; + return newbuf; } -/* Extract just name_suffix="foo", if any, from value. If there isn't +/* Extract just name_suffix="foo", if any, from value. If there isn't one, return the entire value. Note that, for example, a name_suffix of name will match filename="foo", and return foo. */ static char * extract_name_value (char *name_suffix, char *value) { - char *extracted_name_value = value; - char *name_suffix_plus_quote = concat (name_suffix, "=\"", NULL); - char *name_suffix_equals = strstr (value, name_suffix_plus_quote); - char *cp; - - free (name_suffix_plus_quote); - if (name_suffix_equals) { - char *name_suffix_begin; - - /* Find first \". */ - for (cp = name_suffix_equals; *cp != '"'; ++cp) /* empty */; - name_suffix_begin = ++cp; - /* Find second \". */ - for (; *cp != '"'; ++cp) /* empty */; - - extracted_name_value = mh_xmalloc (cp - name_suffix_begin + 1); - memcpy (extracted_name_value, name_suffix_begin, cp - name_suffix_begin); - extracted_name_value[cp - name_suffix_begin] = '\0'; - } - - return extracted_name_value; + char *extracted_name_value = value; + char *name_suffix_plus_quote = concat (name_suffix, "=\"", NULL); + char *name_suffix_equals = strstr (value, name_suffix_plus_quote); + char *cp; + + free (name_suffix_plus_quote); + if (name_suffix_equals) { + char *name_suffix_begin; + + /* Find first \". */ + for (cp = name_suffix_equals; *cp != '"'; ++cp) /* empty */; + name_suffix_begin = ++cp; + /* Find second \". */ + for (; *cp != '"'; ++cp) /* empty */; + + extracted_name_value = mh_xmalloc (cp - name_suffix_begin + 1); + memcpy (extracted_name_value, + name_suffix_begin, + cp - name_suffix_begin); + extracted_name_value[cp - name_suffix_begin] = '\0'; + } + + return extracted_name_value; }