int owl_util_regtest(void)
{
int numfailed=0;
printf("# BEGIN testing owl_util\n");
FAIL_UNLESS("owl_util_substitute 1",
!strcmp("foo", owl_text_substitute("foo", "", "Y")));
FAIL_UNLESS("owl_text_substitute 2",
!strcmp("fYZYZ", owl_text_substitute("foo", "o", "YZ")));
FAIL_UNLESS("owl_text_substitute 3",
!strcmp("foo", owl_text_substitute("fYZYZ", "YZ", "o")));
FAIL_UNLESS("owl_text_substitute 4",
!strcmp("/u/foo/meep", owl_text_substitute("~/meep", "~", "/u/foo")));
FAIL_UNLESS("skiptokens 1",
!strcmp("bar quux", skiptokens("foo bar quux", 1)));
FAIL_UNLESS("skiptokens 2",
!strcmp("meep", skiptokens("foo 'bar quux' meep", 2)));
FAIL_UNLESS("expand_tabs 1",
!strcmp(" hi", owl_text_expand_tabs("\thi")));
FAIL_UNLESS("expand_tabs 2",
!strcmp(" hi\nword tab", owl_text_expand_tabs("\thi\nword\ttab")));
FAIL_UNLESS("expand_tabs 3",
!strcmp(" 2 tabs", owl_text_expand_tabs("\t\t2 tabs")));
FAIL_UNLESS("expand_tabs 4",
!strcmp("α ααααααα! ", owl_text_expand_tabs("α\tααααααα!\t")));
FAIL_UNLESS("expand_tabs 5",
!strcmp("Ａ ＡＡＡ!! ", owl_text_expand_tabs("Ａ\tＡＡＡ!!\t")));
FAIL_UNLESS("skiptokens 1",
!strcmp("world", skiptokens("hello world", 1)));
FAIL_UNLESS("skiptokens 2",
!strcmp("c d e", skiptokens("a b c d e", 2)));
FAIL_UNLESS("skiptokens 3",
!strcmp("\"b\" c d e", skiptokens("a \"b\" c d e", 1)));
FAIL_UNLESS("skiptokens 4",
!strcmp("c d e", skiptokens("a \"b\" c d e", 2)));
FAIL_UNLESS("skiptokens 5",
!strcmp("c d e", skiptokens("a \"'\" c d e", 2)));
/* if (numfailed) printf("*** WARNING: failures encountered with owl_util\n"); */
printf("# END testing owl_util (%d failures)\n", numfailed);
return(numfailed);
}
void owl_log_outgoing_zephyr_error(const owl_zwrite *zw, const char *text)
{
FILE *file;
char filename[MAXPATHLEN], *logpath;
char *tobuff;
owl_message *m;
/* create a present message so we can pass it to
* owl_log_shouldlog_message(void)
*/
m = g_new(owl_message, 1);
owl_message_create_from_zwrite(m, zw, text);
if (!owl_log_shouldlog_message(m)) {
owl_message_delete(m);
return;
}
owl_message_delete(m);
/* chop off a local realm */
tobuff = short_zuser(owl_list_get_element(&(zw->recips), 0));
/* expand ~ in path names */
logpath = owl_text_substitute(owl_global_get_logpath(&g), "~", owl_global_get_homedir(&g));
snprintf(filename, MAXPATHLEN, "%s/%s", logpath, tobuff);
file=fopen(filename, "a");
if (!file) {
owl_function_error("Unable to open file for outgoing logging");
g_free(logpath);
g_free(tobuff);
return;
}
fprintf(file, "ERROR (owl): %s\n%s\n", tobuff, text);
if (text[strlen(text)-1]!='\n') {
fprintf(file, "\n");
}
fclose(file);
snprintf(filename, MAXPATHLEN, "%s/all", logpath);
g_free(logpath);
file=fopen(filename, "a");
if (!file) {
owl_function_error("Unable to open file for outgoing logging");
g_free(tobuff);
return;
}
fprintf(file, "ERROR (owl): %s\n%s\n", tobuff, text);
if (text[strlen(text)-1]!='\n') {
fprintf(file, "\n");
}
fclose(file);
g_free(tobuff);
}
void owl_log_outgoing(const owl_message *m)
{
char filename[MAXPATHLEN], *logpath;
char *to, *temp;
GList *cc;
/* expand ~ in path names */
logpath = owl_text_substitute(owl_global_get_logpath(&g), "~", owl_global_get_homedir(&g));
/* Figure out what path to log to */
if (owl_message_is_type_zephyr(m)) {
/* If this has CC's, do all but the "recipient" which we'll do below */
cc = owl_message_get_cc_without_recipient(m);
while (cc != NULL) {
temp = short_zuser(cc->data);
snprintf(filename, MAXPATHLEN, "%s/%s", logpath, temp);
owl_log_append(m, filename);
g_free(temp);
g_free(cc->data);
cc = g_list_delete_link(cc, cc);
}
to = short_zuser(owl_message_get_recipient(m));
} else if (owl_message_is_type_jabber(m)) {
to = g_strdup_printf("jabber:%s", owl_message_get_recipient(m));
owl_text_tr(to, '/', '_');
} else if (owl_message_is_type_aim(m)) {
char *temp2;
temp = owl_aim_normalize_screenname(owl_message_get_recipient(m));
temp2 = g_utf8_strdown(temp,-1);
to = g_strdup_printf("aim:%s", temp2);
g_free(temp2);
g_free(temp);
} else {
to = g_strdup("loopback");
}
snprintf(filename, MAXPATHLEN, "%s/%s", logpath, to);
owl_log_append(m, filename);
g_free(to);
snprintf(filename, MAXPATHLEN, "%s/all", logpath);
owl_log_append(m, filename);
g_free(logpath);
}
void owl_log_incoming(const owl_message *m)
{
char filename[MAXPATHLEN], allfilename[MAXPATHLEN], *logpath;
const char *from=NULL;
char *frombuff=NULL;
int len, ch, i, personal;
/* figure out if it's a "personal" message or not */
if (owl_message_is_type_zephyr(m)) {
if (owl_message_is_personal(m)) {
personal = 1;
} else {
personal = 0;
}
} else if (owl_message_is_type_jabber(m)) {
/* This needs to be fixed to handle groupchat */
const char* msgtype = owl_message_get_attribute_value(m,"jtype");
if (msgtype && !strcmp(msgtype,"groupchat")) {
personal = 0;
} else {
personal = 1;
}
} else {
if (owl_message_is_private(m) || owl_message_is_loginout(m)) {
personal = 1;
} else {
personal = 0;
}
}
if (owl_message_is_type_zephyr(m)) {
if (personal) {
from=frombuff=short_zuser(owl_message_get_sender(m));
} else {
from=frombuff=g_strdup(owl_message_get_class(m));
}
} else if (owl_message_is_type_aim(m)) {
/* we do not yet handle chat rooms */
char *normalto, *temp;
temp = owl_aim_normalize_screenname(owl_message_get_sender(m));
normalto = g_utf8_strdown(temp, -1);
from=frombuff=g_strdup_printf("aim:%s", normalto);
g_free(normalto);
g_free(temp);
} else if (owl_message_is_type_loopback(m)) {
from=frombuff=g_strdup("loopback");
} else if (owl_message_is_type_jabber(m)) {
if (personal) {
from=frombuff=g_strdup_printf("jabber:%s",owl_message_get_sender(m));
} else {
from=frombuff=g_strdup_printf("jabber:%s",owl_message_get_recipient(m));
}
} else {
from=frombuff=g_strdup("unknown");
}
/* check for malicious sender formats */
len=strlen(frombuff);
if (len<1 || len>35) from="weird";
if (strchr(frombuff, '/')) from="weird";
ch=frombuff[0];
if (!g_ascii_isalnum(ch)) from="weird";
for (i=0; i<len; i++) {
if (frombuff[i]<'!' || frombuff[i]>='~') from="weird";
}
if (!strcmp(frombuff, ".") || !strcasecmp(frombuff, "..")) from="weird";
if (!personal) {
if (strcmp(from, "weird")) {
char* temp = g_utf8_strdown(frombuff, -1);
if (temp) {
g_free(frombuff);
from = frombuff = temp;
}
}
}
/* create the filename (expanding ~ in path names) */
if (personal) {
logpath = owl_text_substitute(owl_global_get_logpath(&g), "~", owl_global_get_homedir(&g));
snprintf(filename, MAXPATHLEN, "%s/%s", logpath, from);
snprintf(allfilename, MAXPATHLEN, "%s/all", logpath);
owl_log_append(m, allfilename);
} else {
logpath = owl_text_substitute(owl_global_get_classlogpath(&g), "~", owl_global_get_homedir(&g));
snprintf(filename, MAXPATHLEN, "%s/%s", logpath, from);
}
owl_log_append(m, filename);
if (personal && owl_message_is_type_zephyr(m)) {
/* We want to log to all of the CC'd people who were not us, or
* the sender, as well.
*/
char *temp;
GList *cc;
cc = owl_message_get_cc_without_recipient(m);
while (cc != NULL) {
temp = short_zuser(cc->data);
if (strcasecmp(temp, frombuff) != 0) {
snprintf(filename, MAXPATHLEN, "%s/%s", logpath, temp);
owl_log_append(m, filename);
}
g_free(temp);
g_free(cc->data);
cc = g_list_delete_link(cc, cc);
}
}
g_free(frombuff);
g_free(logpath);
}
