charset_canonicalize(from1, sizeof(from1), fromcode);
}
- m_strcat(to1, sizeof(to1), "//TRANSLIT");
if ((cd = iconv_open(to1, from1)) != MUTT_ICONV_ERROR)
return cd;
if (rx_list_match2(iconv_hooks, to1, to2, sizeof(to2))
- && rx_list_match2(iconv_hooks, from1, from2, sizeof(from2))) {
- m_strcat(to2, sizeof(to2), "//TRANSLIT");
+ && rx_list_match2(iconv_hooks, from1, from2, sizeof(from2)))
return iconv_open(to2, from2);
- }
return MUTT_ICONV_ERROR;
}
+/* Like iconv, but keeps going even when the input is invalid
+ If you're supplying inrepls, the source charset should be stateless;
+ if you're supplying an outrepl, the target charset should be. */
+/* XXX: MC: I do not understand what it does yet */
+ssize_t mutt_iconv(iconv_t cd,
+ const char **inbuf, ssize_t *inbytesleft,
+ char **outbuf, ssize_t *outbytesleft,
+ const char **inrepls, const char *outrepl)
+{
+ ssize_t ret = 0, ret1;
+ const char *ib = *inbuf;
+ ssize_t ibl = *inbytesleft;
+ char *ob = *outbuf;
+ ssize_t obl = *outbytesleft;
+
+ for (;;) {
+ ret1 = my_iconv(cd, &ib, &ibl, &ob, &obl);
+ if (ret1 != -1)
+ ret += ret1;
+
+ if (ibl && obl && errno == EILSEQ) {
+ if (inrepls) {
+ /* Try replacing the input */
+ const char **t;
+
+ for (t = inrepls; *t; t++) {
+ const char *ib1 = *t;
+ ssize_t ibl1 = m_strlen(*t);
+ char *ob1 = ob;
+ ssize_t obl1 = obl;
+
+ my_iconv(cd, &ib1, &ibl1, &ob1, &obl1);
+ if (!ibl1) {
+ ++ib, --ibl;
+ ob = ob1, obl = obl1;
+ ++ret;
+ break;
+ }
+ }
+ if (*t)
+ continue;
+ }
+ /* Replace the output */
+ if (!outrepl)
+ outrepl = "?";
+ my_iconv(cd, 0, 0, &ob, &obl);
+ if (obl) {
+ ssize_t n = m_strlen(outrepl);
+
+ if (n > obl) {
+ outrepl = "?";
+ n = 1;
+ }
+ memcpy(ob, outrepl, n);
+ ++ib, --ibl;
+ ob += n, obl -= n;
+ ++ret;
+ my_iconv(cd, 0, 0, 0, 0); /* for good measure */
+ continue;
+ }
+ }
+ *inbuf = ib, *inbytesleft = ibl;
+ *outbuf = ob, *outbytesleft = obl;
+ return ret;
+ }
+}
+
/* Convert a string */
int
mutt_convert_string(char **ps, const char *from, const char *to, int flags)
{
iconv_t cd;
+ const char *repls[] = { "\357\277\275", "?", 0 };
+
if (m_strisempty(*ps))
return 0;
cd = mutt_iconv_open(to, from, flags);
if (cd != MUTT_ICONV_ERROR) {
+ const char **inrepls = NULL;
+ const char *outrepl = NULL;
const char *ib;
char *buf, *ob;
ssize_t ibl, obl;
+ if (charset_is_utf8(to))
+ outrepl = "\357\277\275";
+ else
+ if (charset_is_utf8(from))
+ inrepls = repls;
+ else
+ outrepl = "?";
+
ibl = m_strlen(*ps) + 1;
ib = *ps;
obl = MB_LEN_MAX * ibl;
ob = buf = p_new(char, obl + 1);
- mutt_iconv(cd, &ib, &ibl, &ob, &obl);
+ mutt_iconv(cd, &ib, &ibl, &ob, &obl, inrepls, outrepl);
iconv_close(cd);
*ob = '\0';
obl = 4 * flen + 1;
ob = buf = p_new(char, obl);
- n = mutt_iconv(cd, &f, &flen, &ob, &obl);
+ n = my_iconv(cd, &f, &flen, &ob, &obl);
- if (n < 0 || mutt_iconv(cd, 0, 0, &ob, &obl) < 0) {
+ if (n < 0 || my_iconv(cd, 0, 0, &ob, &obl) < 0) {
e = errno;
p_delete(&buf);
iconv_close(cd);
char *ob;
char *ib;
ssize_t ibl;
+ const char **inrepls;
};
fgetconv_t *
fgetconv_open(FILE *file, const char *from, const char *to, int flags)
{
+ static const char *repls[] = { "\357\277\275", "?", 0 };
+
struct fgetconv_t *fc = p_new(struct fgetconv_t, 1);
fc->file = file;
fc->p = fc->ob = fc->bufo;
fc->ib = fc->bufi;
fc->ibl = 0;
+ fc->inrepls = repls + charset_is_utf8(to);
}
return fc;
}
struct fgetconv_t *fc = *fcp;
if (fc->cd != MUTT_ICONV_ERROR)
- iconv_close(fc->cd);
+ iconv_close (fc->cd);
p_delete(fcp);
}
if (fc->ibl) {
ssize_t obl = ssizeof(fc->bufo);
- mutt_iconv(fc->cd, (const char **)&fc->ib, &fc->ibl, &fc->ob, &obl);
+ my_iconv(fc->cd, (const char **)&fc->ib, &fc->ibl, &fc->ob, &obl);
if (fc->p < fc->ob)
return (unsigned char)*(fc->p)++;
}
if (fc->ibl) {
ssize_t obl = ssizeof(fc->bufo);
- mutt_iconv(fc->cd, (const char **)&fc->ib, &fc->ibl, &fc->ob, &obl);
+ mutt_iconv(fc->cd, (const char **)&fc->ib, &fc->ibl, &fc->ob, &obl,
+ fc->inrepls, 0);
if (fc->p < fc->ob) {
return (unsigned char)*(fc->p)++;
}
#include <iconv.h>
-iconv_t mutt_iconv_open(const char *, const char *, int);
static inline ssize_t
-mutt_iconv(iconv_t ict, const char **in, ssize_t *il, char **out, ssize_t *ol) {
+my_iconv(iconv_t ict, const char **in, ssize_t *il, char **out, ssize_t *ol) {
return iconv(ict, (char **)in, (size_t*)il, out, (size_t*)ol);
}
#define M_ICONV_HOOK_FROM 1
#define M_ICONV_HOOK_TO 2
+iconv_t mutt_iconv_open(const char *, const char *, int);
+ssize_t mutt_iconv(iconv_t, const char **, ssize_t *, char **, ssize_t *,
+ const char **, const char *);
+
int mutt_convert_string(char **, const char *, const char *, int);
int mutt_convert_nonmime_string (char **);
obl = 4 * flen + 1;
ob = buf = p_new(char, obl);
- n = mutt_iconv(cd, &f, &flen, &ob, &obl);
+ n = my_iconv(cd, &f, &flen, &ob, &obl);
- if (n < 0 || mutt_iconv(cd, 0, 0, &ob, &obl) < 0) {
+ if (n < 0 || my_iconv(cd, 0, 0, &ob, &obl) < 0) {
int e = errno;
iconv_close(cd);
errno = e;
ob = buf1;
- if (mutt_iconv(cd, &ib, &ibl, &ob, &obl) < 0
- || mutt_iconv(cd, 0, 0, &ob, &obl) < 0)
+ if (my_iconv(cd, &ib, &ibl, &ob, &obl) < 0
+ || my_iconv(cd, 0, 0, &ob, &obl) < 0)
{
assert (errno == E2BIG && ib > d);
iconv_close(cd);
return (ib - d == dlen) ? dlen : ib - d + 1;
}
- iconv_close(cd);
+ iconv_close (cd);
} else {
if (dlen > obl)
return obl + 1;
cd = mutt_iconv_open(tocode, fromcode, 0);
assert (cd != MUTT_ICONV_ERROR);
ib = d, ibl = dlen, ob = buf1, obl = sizeof(buf1) - m_strlen(tocode);
- n1 = mutt_iconv(cd, &ib, &ibl, &ob, &obl);
- n2 = mutt_iconv(cd, 0, 0, &ob, &obl);
+ n1 = my_iconv(cd, &ib, &ibl, &ob, &obl);
+ n2 = my_iconv(cd, 0, 0, &ob, &obl);
assert (n1 >= 0 && n2 >= 0);
- iconv_close(cd);
+ iconv_close (cd);
return (*encoder)(s, buf1, ob - buf1, tocode);
} else {
return (*encoder)(s, d, dlen, tocode);