aboutsummaryrefslogtreecommitdiffstats
path: root/protocols/yahoo/yahoo_util.c
blob: 5375205f53a79d06ce9b13350f5a3d1284fb0962 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
/*
 * libyahoo2: yahoo_util.c
 *
 * Copyright (C) 2002-2004, Philip S Tellis <philip.tellis AT gmx.net>
 *
 * 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
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 */

#if STDC_HEADERS
# include <string.h>
#else
# if !HAVE_STRCHR
#  define strchr index
#  define strrchr rindex
# endif
char *strchr (), *strrchr ();
# if !HAVE_MEMCPY
#  define memcpy(d, s, n) bcopy ((s), (d), (n))
#  define memmove(d, s, n) bcopy ((s), (d), (n))
# endif
#endif

#include "yahoo_util.h"

char * y_string_append(char * string, char * append)
{
	int size = strlen(string) + strlen(append) + 1;
	char * new_string = y_renew(char, string, size);

	if(new_string == NULL) {
		new_string = y_new(char, size);
		strcpy(new_string, string);
		FREE(string);
	}

	strcat(new_string, append);

	return new_string;
}

#if !HAVE_GLIB

void y_strfreev(char ** vector)
{
	char **v;
	for(v = vector; *v; v++) {
		FREE(*v);
	}
	FREE(vector);
}

char ** y_strsplit(char * str, char * sep, int nelem)
{
	char ** vector;
	char *s, *p;
	int i=0;
	int l = strlen(sep);
	if(nelem <= 0) {
		char * s;
		nelem=0;
		if (*str) {
			for(s=strstr(str, sep); s; s=strstr(s+l, sep),nelem++)
				;
			if(strcmp(str+strlen(str)-l, sep))
				nelem++;
		}
	}

	vector = y_new(char *, nelem + 1);

	for(p=str, s=strstr(p,sep); i<nelem && s; p=s+l, s=strstr(p,sep), i++) {
		int len = s-p;
		vector[i] = y_new(char, len+1);
		strncpy(vector[i], p, len);
		vector[i][len] = '\0';
	}

	if(i<nelem && *str) /* str didn't end with sep, and str isn't empty */
		vector[i++] = strdup(p);
			
	vector[i] = NULL;

	return vector;
}

void * y_memdup(const void * addr, int n)
{
	void * new_chunk = malloc(n);
	if(new_chunk)
		memcpy(new_chunk, addr, n);
	return new_chunk;
}

#endif
s="p">; conf->configdir = g_strdup( CONFIG ); conf->plugindir = g_strdup( PLUGINDIR ); conf->pidfile = g_strdup( PIDFILE ); conf->motdfile = g_strdup( ETCDIR "/motd.txt" ); conf->ping_interval = 180; conf->ping_timeout = 300; conf->user = NULL; conf->ft_max_size = SIZE_MAX; conf->ft_max_kbps = G_MAXUINT; conf->ft_listen = NULL; conf->protocols = NULL; proxytype = 0; i = conf_loadini( conf, global.conf_file ); if( i == 0 ) { fprintf( stderr, "Error: Syntax error in configuration file `%s'.\n", global.conf_file ); return NULL; } else if( i == -1 ) { config_missing ++; /* Whine after parsing the options if there was no -c pointing at a *valid* configuration file. */ } while( argc > 0 && ( opt = getopt( argc, argv, "i:p:P:nvIDFc:d:hu:V" ) ) >= 0 ) /* ^^^^ Just to make sure we skip this step from the REHASH handler. */ { if( opt == 'i' ) { conf->iface_in = g_strdup( optarg ); } else if( opt == 'p' ) { g_free( conf->port ); conf->port = g_strdup( optarg ); } else if( opt == 'P' ) { g_free( conf->pidfile ); conf->pidfile = g_strdup( optarg ); } else if( opt == 'n' ) conf->nofork = 1; else if( opt == 'v' ) conf->verbose = 1; else if( opt == 'I' ) conf->runmode = RUNMODE_INETD; else if( opt == 'D' ) conf->runmode = RUNMODE_DAEMON; else if( opt == 'F' ) conf->runmode = RUNMODE_FORKDAEMON; else if( opt == 'c' ) { if( strcmp( global.conf_file, optarg ) != 0 ) { g_free( global.conf_file ); global.conf_file = g_strdup( optarg ); g_free( conf ); /* Re-evaluate arguments. Don't use this option twice, you'll end up in an infinite loop! Hope this trick works with all libcs BTW.. */ optind = 1; return conf_load( argc, argv ); } } else if( opt == 'd' ) { g_free( conf->configdir ); conf->configdir = g_strdup( optarg ); } else if( opt == 'h' ) { printf( "Usage: bitlbee [-D/-F [-i <interface>] [-p <port>] [-n] [-v]] [-I]\n" " [-c <file>] [-d <dir>] [-x] [-h]\n" "\n" "An IRC-to-other-chat-networks gateway\n" "\n" " -I Classic/InetD mode. (Default)\n" " -D Daemon mode. (one process serves all)\n" " -F Forking daemon. (one process per client)\n" " -u Run daemon as specified user.\n" " -P Specify PID-file (not for inetd mode)\n" " -i Specify the interface (by IP address) to listen on.\n" " (Default: 0.0.0.0 (any interface))\n" " -p Port number to listen on. (Default: 6667)\n" " -n Don't fork.\n" " -v Be verbose (only works in combination with -n)\n" " -c Load alternative configuration file\n" " -d Specify alternative user configuration directory\n" " -x Command-line interface to password encryption/hashing\n" " -h Show this help page.\n" " -V Show version info.\n" ); return NULL; } else if( opt == 'V' ) { printf( "BitlBee %s\nAPI version %06x\n", BITLBEE_VERSION, BITLBEE_VERSION_CODE ); return NULL; } else if( opt == 'u' ) { g_free( conf->user ); conf->user = g_strdup( optarg ); } } if( conf->configdir[strlen(conf->configdir)-1] != '/' ) { char *s = g_new( char, strlen( conf->configdir ) + 2 ); sprintf( s, "%s/", conf->configdir ); g_free( conf->configdir ); conf->configdir = s; } if( config_missing ) fprintf( stderr, "Warning: Unable to read configuration file `%s'.\n", global.conf_file ); return conf; } static int conf_loadini( conf_t *conf, char *file ) { ini_t *ini; int i; ini = ini_open( file ); if( ini == NULL ) return -1; while( ini_read( ini ) ) { if( g_strcasecmp( ini->section, "settings" ) == 0 ) { if( g_strcasecmp( ini->key, "runmode" ) == 0 ) { if( g_strcasecmp( ini->value, "daemon" ) == 0 ) conf->runmode = RUNMODE_DAEMON; else if( g_strcasecmp( ini->value, "forkdaemon" ) == 0 ) conf->runmode = RUNMODE_FORKDAEMON; else conf->runmode = RUNMODE_INETD; } else if( g_strcasecmp( ini->key, "pidfile" ) == 0 ) { g_free( conf->pidfile ); conf->pidfile = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "daemoninterface" ) == 0 ) { g_free( conf->iface_in ); conf->iface_in = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "daemonport" ) == 0 ) { g_free( conf->port ); conf->port = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "clientinterface" ) == 0 ) { g_free( conf->iface_out ); conf->iface_out = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "authmode" ) == 0 ) { if( g_strcasecmp( ini->value, "registered" ) == 0 ) conf->authmode = AUTHMODE_REGISTERED; else if( g_strcasecmp( ini->value, "closed" ) == 0 ) conf->authmode = AUTHMODE_CLOSED; else conf->authmode = AUTHMODE_OPEN; } else if( g_strcasecmp( ini->key, "authpassword" ) == 0 ) { g_free( conf->auth_pass ); conf->auth_pass = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "operpassword" ) == 0 ) { g_free( conf->oper_pass ); conf->oper_pass = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "hostname" ) == 0 ) { g_free( conf->hostname ); conf->hostname = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "configdir" ) == 0 ) { g_free( conf->configdir ); conf->configdir = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "motdfile" ) == 0 ) { g_free( conf->motdfile ); conf->motdfile = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "account_storage" ) == 0 ) { g_free( conf->primary_storage ); conf->primary_storage = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "account_storage_migrate" ) == 0 ) { g_strfreev( conf->migrate_storage ); conf->migrate_storage = g_strsplit_set( ini->value, " \t,;", -1 ); } else if( g_strcasecmp( ini->key, "pinginterval" ) == 0 ) { if( sscanf( ini->value, "%d", &i ) != 1 ) { fprintf( stderr, "Invalid %s value: %s\n", ini->key, ini->value ); return 0; } conf->ping_interval = i; } else if( g_strcasecmp( ini->key, "pingtimeout" ) == 0 ) { if( sscanf( ini->value, "%d", &i ) != 1 ) { fprintf( stderr, "Invalid %s value: %s\n", ini->key, ini->value ); return 0; } conf->ping_timeout = i; } else if( g_strcasecmp( ini->key, "proxy" ) == 0 ) { url_t *url = g_new0( url_t, 1 ); if( !url_set( url, ini->value ) ) { fprintf( stderr, "Invalid %s value: %s\n", ini->key, ini->value ); g_free( url ); return 0; } strncpy( proxyhost, url->host, sizeof( proxyhost ) ); strncpy( proxyuser, url->user, sizeof( proxyuser ) ); strncpy( proxypass, url->pass, sizeof( proxypass ) ); proxyport = url->port; if( url->proto == PROTO_HTTP ) proxytype = PROXY_HTTP; else if( url->proto == PROTO_SOCKS4 ) proxytype = PROXY_SOCKS4; else if( url->proto == PROTO_SOCKS5 ) proxytype = PROXY_SOCKS5; g_free( url ); } else if( g_strcasecmp( ini->key, "user" ) == 0 ) { g_free( conf->user ); conf->user = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "ft_max_size" ) == 0 ) { size_t ft_max_size; if( sscanf( ini->value, "%zu", &ft_max_size ) != 1 ) { fprintf( stderr, "Invalid %s value: %s\n", ini->key, ini->value ); return 0; } conf->ft_max_size = ft_max_size; } else if( g_strcasecmp( ini->key, "ft_max_kbps" ) == 0 ) { if( sscanf( ini->value, "%d", &i ) != 1 ) { fprintf( stderr, "Invalid %s value: %s\n", ini->key, ini->value ); return 0; } conf->ft_max_kbps = i; } else if( g_strcasecmp( ini->key, "ft_listen" ) == 0 ) { g_free( conf->ft_listen ); conf->ft_listen = g_strdup( ini->value ); } else if( g_strcasecmp( ini->key, "protocols" ) == 0 ) { g_strfreev( conf->protocols ); conf->protocols = g_strsplit_set( ini->value, " \t,;", -1 ); } else { fprintf( stderr, "Error: Unknown setting `%s` in configuration file (line %d).\n", ini->key, ini->line ); return 0; /* For now just ignore unknown keys... */ } } else if( g_strcasecmp( ini->section, "defaults" ) != 0 ) { fprintf( stderr, "Error: Unknown section [%s] in configuration file (line %d). " "BitlBee configuration must be put in a [settings] section!\n", ini->section, ini->line ); return 0; } } ini_close( ini ); return 1; } void conf_loaddefaults( irc_t *irc ) { ini_t *ini; ini = ini_open( global.conf_file ); if( ini == NULL ) return; while( ini_read( ini ) ) { if( g_strcasecmp( ini->section, "defaults" ) == 0 ) { set_t *s = set_find( &irc->b->set, ini->key ); if( s ) { if( s->def ) g_free( s->def ); s->def = g_strdup( ini->value ); } } } ini_close( ini ); }