static char *owl_zephyr_dotfile(const char *name, const char *input)
{
if (input != NULL)
return g_strdup(input);
else
return g_strdup_printf("%s/%s", owl_global_get_homedir(&g), name);
}
static CALLER_OWN char *owl_zephyr_dotfile(const char *name, const char *input)
{
if (input != NULL)
return g_strdup(input);
else
return g_build_filename(owl_global_get_homedir(&g), name, NULL);
}
int owl_zephyr_loadloginsubs(char *filename)
{
#ifdef HAVE_LIBZEPHYR
FILE *file;
ZSubscription_t *subs;
int numSubs = 100;
char subsfile[1024], buffer[1024];
int count, ret;
struct stat statbuff;
subs = owl_malloc(numSubs * sizeof(ZSubscription_t));
if (filename==NULL) {
sprintf(subsfile, "%s/%s", owl_global_get_homedir(&g), ".anyone");
} else {
strcpy(subsfile, filename);
}
ret=stat(subsfile, &statbuff);
if (ret) return(0);
ret=0;
ZResetAuthentication();
count=0;
file=fopen(subsfile, "r");
if (file) {
while ( fgets(buffer, 1024, file)!=NULL ) {
if (buffer[0]=='#' || buffer[0]=='\n' || buffer[0]=='\n') continue;
if (count == numSubs) {
numSubs *= 2;
subs = owl_realloc(subs, numSubs * sizeof(ZSubscription_t));
}
buffer[strlen(buffer)-1]='\0';
subs[count].zsub_class=owl_strdup("login");
subs[count].zsub_recipient=owl_strdup("*");
if (strchr(buffer, '@')) {
subs[count].zsub_classinst=owl_strdup(buffer);
} else {
subs[count].zsub_classinst=owl_sprintf("%s@%s", buffer, ZGetRealm());
}
count++;
}
fclose(file);
} else {
count=0;
ret=-1;
}
ret = owl_zephyr_loadsubs_helper(subs, count);
return(ret);
#else
return(0);
#endif
}
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);
}
/* Load zephyr subscriptions from 'filename'. If 'filename' is NULL,
* the default file $HOME/.zephyr.subs will be used.
*
* Returns 0 on success. If the file does not exist, return -1 if
* 'error_on_nofile' is 1, otherwise return 0. Return -1 if the file
* exists but can not be read. Return -2 if there is a failure from
* zephyr to load the subscriptions.
*/
int owl_zephyr_loadsubs(char *filename, int error_on_nofile)
{
#ifdef HAVE_LIBZEPHYR
FILE *file;
char *tmp, *start;
char buffer[1024], subsfile[1024];
ZSubscription_t *subs;
int subSize = 1024;
int count, ret;
struct stat statbuff;
subs = owl_malloc(sizeof(ZSubscription_t) * subSize);
if (filename==NULL) {
sprintf(subsfile, "%s/%s", owl_global_get_homedir(&g), ".zephyr.subs");
} else {
strcpy(subsfile, filename);
}
ret=stat(subsfile, &statbuff);
if (ret) {
if (error_on_nofile==1) return(-1);
return(0);
}
ZResetAuthentication();
count=0;
file=fopen(subsfile, "r");
if (!file) return(-1);
while ( fgets(buffer, 1024, file)!=NULL ) {
if (buffer[0]=='#' || buffer[0]=='\n' || buffer[0]=='\n') continue;
if (buffer[0]=='-') {
start=buffer+1;
} else {
start=buffer;
}
if (count >= subSize) {
subSize *= 2;
subs = owl_realloc(subs, sizeof(ZSubscription_t) * subSize);
}
/* add it to the list of subs */
if ((tmp=(char *) strtok(start, ",\n\r"))==NULL) continue;
subs[count].zsub_class=owl_strdup(tmp);
if ((tmp=(char *) strtok(NULL, ",\n\r"))==NULL) continue;
subs[count].zsub_classinst=owl_strdup(tmp);
if ((tmp=(char *) strtok(NULL, " \t\n\r"))==NULL) continue;
subs[count].zsub_recipient=owl_strdup(tmp);
/* if it started with '-' then add it to the global punt list, and
* remove it from the list of subs. */
if (buffer[0]=='-') {
owl_function_zpunt(subs[count].zsub_class, subs[count].zsub_classinst, subs[count].zsub_recipient, 0);
owl_free(subs[count].zsub_class);
owl_free(subs[count].zsub_classinst);
owl_free(subs[count].zsub_recipient);
}
else {
count++;
}
}
fclose(file);
ret = owl_zephyr_loadsubs_helper(subs, count);
return(ret);
#else
return(0);
#endif
}
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);
}
