path: root/camel/tests/message/test2.c

#include "camel-test.h"
#include "messages.h"
#include "addresses.h"

/* for stat */
#include <sys/stat.h>
#include <unistd.h>

#include <unicode.h>

#include <camel/camel-internet-address.h>
#include <camel/camel-address.h>

/* a bunch of test strings in different encodings, just taken from gnome-core po files */
/* see data/genline.pl */
struct _l {
    char *type;
    char *line;
} test_lines[] = {
    /* FIXME: for now, remove the types libunicode doesn't know about, this is tricky to fix */
    /* And at best, all we could do is translate it to X-Unknown, or something */
    /*{ "windows-1251", "Åäèí àïëåò íå îòãîâàðÿ íà çàÿâêà çà çàïèñ.\nÄà ãî ïðåìàõíà ëè èëè äà ïî÷àêàì?" },*/
    { "iso-8859-1", "Omple les miniatures de la finestra amb contingut de la pantalla" },
    { "ISO-8859-2", "Správce oken hýbe s okrajem okna (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
    { "ISO-8859-1", "Vindueshåndtering flytter dekorationsvindue istedet (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
    { "ISO-8859-1", "Vorschaubilder der Fenster mit dem Bildschirminhalt ausfüllen" },
    { "iso-8859-7", "ÅìöÜíéóç åñãáóéþí ðïõ äå öáßíïíôáé óôç ëßóôá ðáñáèýñùí (ÐÁÑÁÊÁÌØÇ-ËÉÓÔÁÐÁÑÁÈÕÑÙÍ)" },
    { "iso-8859-1", "You've chosen to disable the startup hint. To re-enable it, choose \"Startup Hint\" in the GNOME Control Centre" },
    { "iso-8859-1", "El aplique de reloj muestra en su panel la fecha y la hora de forma simple y ligero " },
    { "iso-8859-1", "Applet ei vasta salvestuskäsule. Kas peaks ta niisama sulgema, või veel ootama?" },
    { "iso-8859-1", "Lehio kudeatzaileak lehioaren dekorazaioa mugiarazten (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
    { "iso-8859-15", "Näytä sovellukset, joiden ikkunoista on näkyvillä vain otsikkopalkki" },
    { "ISO-8859-1", "Afficher les tâches qui ne sont pas dans la liste des fenêtres" },
    { "iso-8859-1", "Níl applet ag tabhair freagra ar iarratas sábháil. Bain amach an applet nó lean ar fánacht?" },
    { "iso-8859-1", "Amosa-las tarefas agochadas da lista de fiestras (SKIP-WINLIST)" },
    { "iso-8859-2", "Az ablakkezelõ a dekorációt mozgassa az ablak helyett (AfterStep, Enlightenment, FVWM, IceWM, SawMill)" },
    { "iso-8859-1", "Riempi la finestra delle anteprime con il contenuto dello schermo" },
    { "euc-jp", "¥¦¥¤¥ó¥É¥¦¥Þ¥Í¡¼¥¸¥ã¤Ï¾þ¤ê¥¦¥¤¥ó¥É¥¦¤òÆ°¤«¤¹ (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
    { "euc-kr", "â °ü¸®ÀÚ°¡ ²Ù¹Î â ´ë½Å À̵¿ (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
    { "iso-8859-13", "Priedas neatsakinëja á praðymà iðsisaugoti. Paðalinti priedà ar laukti toliau?" },
    { "iso-8859-1", "Window manager verplaatst dekoratie (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
    { "iso-8859-1", "Vindushåndtereren flytter dekorasjonsvinduet i stedet (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
    { "iso-8859-2", "Przemieszczanie dekoracji zamiast okna (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
    { "iso-8859-1", "Este programa é responsável por executar outras aplicações, embeber pequenos applets, a paz no mundo e crashes aleatórios do X." },
    { "iso-8859-1", "Mostrar tarefas que se escondem da lista de janelas (SKIP-WINLIST)" },
    { "koi8-r", "÷ÙÓÏÔÁ ÒÁÂÏÞÅÇÏ ÓÔÏÌÁ × ÐÅÒÅËÌÀÞÁÔÅÌÅ ÓÏ×ÐÁÄÁÅÔ Ó ×ÙÓÏÔÏÊ ÐÁÎÅÌÉ" },
    { "iso-8859-2", "Správca okien presúva okraje okien (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
    { "iso-8859-2", "Ka¾i posle, ki se skrivajo pred upravljalnik oken (SKIP-WINLIST)" },
    { "iso-8859-5", "Window ÜÕÝÐÔ×ÕàØ ßÞÜÕàÐ ÔÕÚÞàÐæØÞÝØ ßàÞ×Þà ãÜÕáâÞ âÞÓa (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
    { "iso-8859-2", "Window menadzeri pomera dekoracioni prozor umesto toga (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
    { "iso-8859-1", "Fönsterhanteraren flyttar dekorationsfönstret istället (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
    /*{ "TSCII", "À½¢ì¸¼î-ºð¼¸ò¾¢ø À¡÷ì¸ ÓÊ¡¾ À½¢ì¸¼í¸¨Ç ¸¡Á¢ (À½¢ì¸¼î-ºð¼¸õ-¾Å¢÷)" },*/
    { "iso-8859-9", "Kaydetme isteðine bir uygulak cevap vermiyor . Uygulaðý sileyim mi , yoksa bekleyeyim mi ?" },
    { "koi8-u", "ðÅÒÅͦÝÅÎÎÑ ÄÅËÏÒÁæ§ ÚÁͦÓÔØ ×¦ËÎÁ (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
    { "iso-8859-1", "Cwand on scriftôr est bodjî foû, li scriftôr èt totes les apliketes å dvins sont pierdowes. Bodjî ci scriftôr chal?" },
    { "gb2312", "ǨÒƵ½×°Êδ°¿Ú¹ÜÀí³ÌÐò(AfterStep, Enlightenment, FVWM, IceWM, SawMill)" },
    { "big5", "µøµ¡ºÞ²zªÌ¥u²¾°Ê¸Ë¹¢µøµ¡ (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
};

static char *convert(const char *in, const char *from, const char *to)
{
    unicode_iconv_t ic = unicode_iconv_open(to, from);
    char *out, *outp;
    const char *inp;
    int inlen, outlen;

    if (ic == (unicode_iconv_t)-1)
        return g_strdup(in);

    inlen = strlen(in);
    outlen = inlen*5 + 16;

    outp = out = g_malloc(outlen);
    inp = in;

    if (unicode_iconv(ic, &inp, &inlen, &outp, &outlen) == -1) {
        test_free(out);
        unicode_iconv_close(ic);
        return g_strdup(in);
    }

    if (unicode_iconv(ic, NULL, 0, &outp, &outlen) == -1) {
        test_free(out);
        unicode_iconv_close(ic);
        return g_strdup(in);
    }

    unicode_iconv_close(ic);

    *outp = 0;

#if 0
    /* lets see if we can convert back again? */
    {
        char *nout, *noutp;
        unicode_iconv_t ic = unicode_iconv_open(from, to);

        inp = out;
        inlen = strlen(out);
        outlen = inlen*5 + 16;
        noutp = nout = g_malloc(outlen);
        if (unicode_iconv(ic, &inp, &inlen, &noutp, &outlen) == -1
            || unicode_iconv(ic, NULL, 0, &noutp, &outlen) == -1) {
            g_warning("Cannot convert '%s' \n from %s to %s: %s\n", in, to, from, strerror(errno));
        }
        unicode_iconv_close(ic);
    }

    /* and lets see what camel thinks out optimal charset is */
    {
        printf("Camel thinks the best encoding of '%s' is %s, although we converted from %s\n",
               in, camel_charset_best(out, strlen(out)), from);
    }
#endif

    return out;
}

#define to_utf8(in, type) convert(in, type, "utf-8")
#define from_utf8(in, type) convert(in, "utf-8", type)

#define ARRAY_LEN(x) (sizeof(x)/sizeof(x[0]))

int main(int argc, char **argv)
{
    int i;
    CamelInternetAddress *addr, *addr2;
    char *name;
    char *charset;
    const char *real, *where;
    char *enc, *enc2, *format, *format2;

    camel_test_init(argc, argv);

    camel_test_start("CamelInternetAddress, basics");

    addr = camel_internet_address_new();

    push("Test blank address");
    check(camel_address_length(CAMEL_ADDRESS(addr)) == 0);
    check(camel_internet_address_get(addr, 0, &real, &where) == FALSE);
    pull();

    push("Test blank clone");
    addr2 = CAMEL_INTERNET_ADDRESS(camel_address_new_clone(CAMEL_ADDRESS(addr)));
    test_address_compare(addr, addr2);
    check_unref(addr2, 1);
    pull();

    push("Test add 1");
    camel_internet_address_add(addr, "Zed", "nowhere@here.com.au");
    check(camel_address_length(CAMEL_ADDRESS(addr)) == 1);
    check(camel_internet_address_get(addr, 0, &real, &where) == TRUE);
    check_msg(string_equal("Zed", real), "real = '%s'", real);
    check(strcmp(where, "nowhere@here.com.au") == 0);
    pull();

    push("Test clone 1");
    addr2 = CAMEL_INTERNET_ADDRESS(camel_address_new_clone(CAMEL_ADDRESS(addr)));
    test_address_compare(addr, addr2);
    check_unref(addr2, 1);
    pull();

    push("Test add many");
    for (i=1;i<10;i++) {
        char name[16], a[32];
        sprintf(name, "Zed %d", i);
        sprintf(a, "nowhere@here-%d.com.au", i);
        camel_internet_address_add(addr, name, a);
        check(camel_address_length(CAMEL_ADDRESS(addr)) == i+1);
        check(camel_internet_address_get(addr, i, &real, &where) == TRUE);
        check_msg(string_equal(name, real), "name = '%s' real = '%s'", name, real);
        check(strcmp(where, a) == 0);
    }
    pull();

    /* put a few of these in to make it look like its doing something impressive ... :) */
    camel_test_end();
    camel_test_start("CamelInternetAddress, search");

    push("Test search");
    camel_test_nonfatal("Address comparisons should ignore whitespace??");
    check(camel_internet_address_find_name(addr, "Zed 1", &where) == 1);
    check(camel_internet_address_find_name(addr, "Zed 9", &where) == 9);
    check(camel_internet_address_find_name(addr, "Zed", &where) == 0);
    check(camel_internet_address_find_name(addr, " Zed", &where) == 0);
    check(camel_internet_address_find_name(addr, "Zed ", &where) == 0);
    check(camel_internet_address_find_name(addr, "  Zed ", &where) == 0);
    check(camel_internet_address_find_name(addr, "Zed 20", &where) == -1);
    check(camel_internet_address_find_name(addr, "", &where) == -1);
    /* interface dont handle nulls :) */
    /*check(camel_internet_address_find_name(addr, NULL, &where) == -1);*/

    check(camel_internet_address_find_address(addr, "nowhere@here-1.com.au", &where) == 1);
    check(camel_internet_address_find_address(addr, "nowhere@here-1 . com.au", &where) == 1);
    check(camel_internet_address_find_address(addr, "nowhere@here-2 .com.au ", &where) == 2);
    check(camel_internet_address_find_address(addr, " nowhere @here-3.com.au", &where) == 3);
    check(camel_internet_address_find_address(addr, "nowhere@here-20.com.au ", &where) == -1);
    check(camel_internet_address_find_address(addr, "", &where) == -1);
    /*check(camel_internet_address_find_address(addr, NULL, &where) == -1);*/
    camel_test_fatal();
    pull();

    camel_test_end();
    camel_test_start("CamelInternetAddress, copy/cat/clone");

    push("Test clone many");
    addr2 = CAMEL_INTERNET_ADDRESS(camel_address_new_clone(CAMEL_ADDRESS(addr)));
    test_address_compare(addr, addr2);
    pull();

    push("Test remove items");
    camel_address_remove(CAMEL_ADDRESS(addr2), 0);
    check(camel_address_length(CAMEL_ADDRESS(addr2)) == 9);
    camel_address_remove(CAMEL_ADDRESS(addr2), 0);
    check(camel_address_length(CAMEL_ADDRESS(addr2)) == 8);
    camel_address_remove(CAMEL_ADDRESS(addr2), 5);
    check(camel_address_length(CAMEL_ADDRESS(addr2)) == 7);
    camel_address_remove(CAMEL_ADDRESS(addr2), 10);
    check(camel_address_length(CAMEL_ADDRESS(addr2)) == 7);
    camel_address_remove(CAMEL_ADDRESS(addr2), -1);
    check(camel_address_length(CAMEL_ADDRESS(addr2)) == 0);
    check_unref(addr2, 1);
    pull();

    push("Testing copy/cat");
    push("clone + cat");
    addr2 = CAMEL_INTERNET_ADDRESS(camel_address_new_clone(CAMEL_ADDRESS(addr)));
    camel_address_cat(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
    check(camel_address_length(CAMEL_ADDRESS(addr)) == 10);
    check(camel_address_length(CAMEL_ADDRESS(addr2)) == 20);
    check_unref(addr2, 1);
    pull();

    push("cat + cat + copy");
    addr2 = camel_internet_address_new();
    camel_address_cat(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
    test_address_compare(addr, addr2);
    camel_address_cat(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
    check(camel_address_length(CAMEL_ADDRESS(addr)) == 10);
    check(camel_address_length(CAMEL_ADDRESS(addr2)) == 20);
    camel_address_copy(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
    test_address_compare(addr, addr2);
    check_unref(addr2, 1);
    pull();

    push("copy");
    addr2 = camel_internet_address_new();
    camel_address_copy(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
    test_address_compare(addr, addr2);
    check_unref(addr2, 1);
    pull();

    pull();

    check_unref(addr, 1);

    camel_test_end();

    camel_test_start("CamelInternetAddress, I18N");

    for (i=0;i<ARRAY_LEN(test_lines);i++) {
        push("Testing text line %d (%s) '%s'", i, test_lines[i].type, test_lines[i].line);

        addr = camel_internet_address_new();

        /* first, convert to api format (utf-8) */
        charset = test_lines[i].type;
        name = to_utf8(test_lines[i].line, charset);

        push("Address setup");
        camel_internet_address_add(addr, name, "nobody@nowhere.com");
        check(camel_internet_address_get(addr, 0, &real, &where) == TRUE);
        check_msg(string_equal(name, real), "name = '%s' real = '%s'", name, real);
        check(strcmp(where, "nobody@nowhere.com") == 0);

        check(camel_internet_address_get(addr, 1, &real, &where) == FALSE);
        check(camel_address_length(CAMEL_ADDRESS(addr)) == 1);
        pull();

        push("Address encode/decode");
        enc = camel_address_encode(CAMEL_ADDRESS(addr));

        addr2 = camel_internet_address_new();
        check(camel_address_decode(CAMEL_ADDRESS(addr2), enc) == 1);
        check(camel_address_length(CAMEL_ADDRESS(addr2)) == 1);

        enc2 = camel_address_encode(CAMEL_ADDRESS(addr2));
        check_msg(string_equal(enc, enc2), "enc = '%s' enc2 = '%s'", enc, enc2);
        test_free(enc2);

        push("Compare addresses");
        test_address_compare(addr, addr2);
        pull();
        test_free(enc);
        pull();

        /* FIXME: format/unformat arne't guaranteed to be reversible, at least at the moment */
        camel_test_nonfatal("format/unformat not (yet) reversible for all cases");

        push("Address format/unformat");
        format = camel_address_format(CAMEL_ADDRESS(addr));

        addr2 = camel_internet_address_new();
        check(camel_address_unformat(CAMEL_ADDRESS(addr2), format) == 1);
        check(camel_address_length(CAMEL_ADDRESS(addr2)) == 1);

        format2 = camel_address_format(CAMEL_ADDRESS(addr2));
        check_msg(string_equal(format, format2), "format = '%s\n\tformat2 = '%s'", format, format2);
        test_free(format2);

        /* currently format/unformat doesn't handle ,'s and other special chars at all */
        if (camel_address_length(CAMEL_ADDRESS(addr2)) == 1) {
            push("Compare addresses");
            test_address_compare(addr, addr2);
            pull();
        }

        test_free(format);
        pull();

        camel_test_fatal();

        check_unref(addr2, 1);

        check_unref(addr, 1);
        pull();

    }

    camel_test_end();

    /* FIXME: Add test of decoding of externally defined addresses */
    /* FIXME: Add test of decoding of broken addresses */

    return 0;
}