/*
- * Copyright (C) 2000 Thomas Roessler <roessler@does-not-exist.org>
+ * Copyright (C) 2000-2,2004 Thomas Roessler <roessler@does-not-exist.org>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
{ NULL, U_UNKNOWN }
};
-
-static void url_pct_decode (char *s)
+static int url_pct_decode (char *s)
{
char *d;
if (!s)
- return;
-
+ return -1;
+
for (d = s; *s; s++)
{
- if (*s == '%' && s[1] && s[2] &&
- isxdigit ((unsigned char) s[1]) &&
- isxdigit ((unsigned char) s[2]) &&
- hexval (s[1]) >= 0 && hexval (s[2]) >= 0)
+ if (*s == '%')
{
- *d++ = (hexval (s[1]) << 4) | (hexval (s[2]));
- s += 2;
- }
- else
+ if (s[1] && s[2] &&
+ isxdigit ((unsigned char) s[1]) &&
+ isxdigit ((unsigned char) s[2]) &&
+ hexval (s[1]) >= 0 && hexval (s[2]) >= 0)
+ {
+ *d++ = (hexval (s[1]) << 4) | (hexval (s[2]));
+ s += 2;
+ }
+ else
+ return -1;
+ } else
*d++ = *s;
}
*d ='\0';
+ return 0;
}
url_scheme_t url_check_scheme (const char *s)
char sbuf[STRING];
char *t;
int i;
-
+
if (!s || !(t = strchr (s, ':')))
return U_UNKNOWN;
- if ((t - s) + 1 >= sizeof (sbuf))
+ if ((size_t)(t - s) >= sizeof (sbuf) - 1)
return U_UNKNOWN;
-
+
strfcpy (sbuf, s, t - s + 1);
for (t = sbuf; *t; t++)
*t = ascii_tolower (*t);
return -1;
else
strfcpy (d, src + 5, dl);
-
- url_pct_decode (d);
- return 0;
+
+ return url_pct_decode (d);
}
/* ciss_parse_userhost: fill in components of ciss with info from src. Note
* these are pointers into src, which is altered with '\0's. Port of 0
* means no port given. */
-static char *ciss_parse_userhost (ciss_url_t *ciss, char *src)
+static int ciss_parse_userhost (ciss_url_t *ciss, char *src)
{
- char *t;
- char *p;
- char *path;
+ char *t, *p;
ciss->user = NULL;
ciss->pass = NULL;
ciss->host = NULL;
ciss->port = 0;
- if (strncmp (src, "//", 2))
- return src;
-
+ if (strncmp (src, "//", 2) != 0)
+ {
+ ciss->path = src;
+ return url_pct_decode (ciss->path);
+ }
+
src += 2;
- if ((path = strchr (src, '/')))
- *path++ = '\0';
-
+ if ((ciss->path = strchr (src, '/')))
+ *ciss->path++ = '\0';
+
if ((t = strrchr (src, '@')))
{
*t = '\0';
{
*p = '\0';
ciss->pass = p + 1;
- url_pct_decode (ciss->pass);
+ if (url_pct_decode (ciss->pass) < 0)
+ return -1;
}
ciss->user = src;
- url_pct_decode (ciss->user);
+ if (url_pct_decode (ciss->user) < 0)
+ return -1;
t++;
}
else
t = src;
-
+
if ((p = strchr (t, ':')))
{
+ int t;
*p++ = '\0';
- ciss->port = atoi (p);
+ if (mutt_atoi (p, &t) < 0 || t < 0 || t > 0xffff)
+ return -1;
+ ciss->port = (unsigned short)t;
}
else
ciss->port = 0;
-
+
ciss->host = t;
- url_pct_decode (ciss->host);
- return path;
+ return url_pct_decode (ciss->host) >= 0 &&
+ (!ciss->path || url_pct_decode (ciss->path) >= 0) ? 0 : -1;
}
/* url_parse_ciss: Fill in ciss_url_t. char* elements are pointers into src,
tmp = strchr (src, ':') + 1;
- ciss->path = ciss_parse_userhost (ciss, tmp);
- url_pct_decode (ciss->path);
-
- return 0;
+ return ciss_parse_userhost (ciss, tmp);
}
-/* url_ciss_tostring: output the URL string for a given CISS object. */
+static void url_pct_encode (char *dst, size_t l, const char *src)
+{
+ static const char *alph = "0123456789ABCDEF";
+ *dst = 0;
+ l--;
+ while (src && *src && l)
+ {
+ if (strchr ("/:%", *src) && l > 3)
+ {
+ *dst++ = '%';
+ *dst++ = alph[(*src >> 4) & 0xf];
+ *dst++ = alph[*src & 0xf];
+ src++;
+ continue;
+ }
+ *dst++ = *src++;
+ }
+ *dst = 0;
+}
+
+/* url_ciss_tostring: output the URL string for a given CISS object. */
int url_ciss_tostring (ciss_url_t* ciss, char* dest, size_t len, int flags)
{
long l;
if (!(flags & U_PATH))
safe_strcat (dest, len, "//");
len -= (l = strlen (dest)); dest += l;
-
- if (ciss->user) {
+
+ if (ciss->user)
+ {
+ char u[STRING];
+ url_pct_encode (u, sizeof (u), ciss->user);
+
if (flags & U_DECODE_PASSWD && ciss->pass)
- snprintf (dest, len, "%s:%s@", ciss->user, ciss->pass);
+ {
+ char p[STRING];
+ url_pct_encode (p, sizeof (p), ciss->pass);
+ snprintf (dest, len, "%s:%s@", u, p);
+ }
else
- snprintf (dest, len, "%s@", ciss->user);
+ snprintf (dest, len, "%s@", u);
len -= (l = strlen (dest)); dest += l;
}
char *tmp;
char *headers;
char *tag, *value;
- char scratch[HUGE_STRING];
- int taglen, rc = 0;
+ int rc = -1;
LIST *last = NULL;
-
+
if (!(t = strchr (src, ':')))
return -1;
-
+
+ /* copy string for safe use of strtok() */
if ((tmp = safe_strdup (t + 1)) == NULL)
return -1;
if ((headers = strchr (tmp, '?')))
*headers++ = '\0';
- url_pct_decode (tmp);
+ if (url_pct_decode (tmp) < 0)
+ goto out;
+
e->to = rfc822_parse_adrlist (e->to, tmp);
tag = headers ? strtok_r (headers, "&", &p) : NULL;
-
+
for (; tag; tag = strtok_r (NULL, "&", &p))
{
if ((value = strchr (tag, '=')))
if (!value || !*value)
continue;
- url_pct_decode (tag);
- url_pct_decode (value);
+ if (url_pct_decode (tag) < 0)
+ goto out;
+ if (url_pct_decode (value) < 0)
+ goto out;
if (!ascii_strcasecmp (tag, "body"))
{
if (body)
mutt_str_replace (body, value);
}
- else if ((taglen = mutt_strlen (tag)) <= sizeof (scratch) - 2)
+ else
{
- /* only try to parse if we can format it as header for
- * mutt_parse_rfc822_line (tag fits in scratch) */
- snprintf (scratch, sizeof (scratch), "%s: %s", tag, value);
- scratch[taglen] = '\0';
- value = &scratch[taglen+1];
+ char *scratch;
+ size_t taglen = mutt_strlen (tag);
+
+ safe_asprintf (&scratch, "%s: %s", tag, value);
+ scratch[taglen] = 0; /* overwrite the colon as mutt_parse_rfc822_line expects */
+ value = &scratch[taglen + 1];
SKIPWS (value);
mutt_parse_rfc822_line (e, NULL, scratch, value, 1, 0, 0, &last);
- }
- else
- {
- rc = -1;
- goto out;
+ FREE (&scratch);
}
}
+ rc = 0;
+
out:
FREE (&tmp);
return rc;
projects / software / mutt-debian.git / blobdiff