Context Navigation

source: storage_text.c @ d3307e2

Last change on this file since d3307e2 was b73ac9c, checked in by Jelmer Vernooij <jelmer@…>, at 2005-12-13T23:05:27Z
Add support for 'primary' and 'migrate' account storages. Fix two bugs in the text storage backend that were introduced by my previous changes.
Property mode set to `100644`
File size: 8.5 KB

Line
1	/********************************************************************\
2	* BitlBee -- An IRC to other IM-networks gateway *
3	* *
4	* Copyright 2002-2004 Wilmer van der Gaast and others *
5	\********************************************************************/
6
7	/* Storage backend that uses the same file format as <=1.0 */
8
9	/*
10	This program is free software; you can redistribute it and/or modify
11	it under the terms of the GNU General Public License as published by
12	the Free Software Foundation; either version 2 of the License, or
13	(at your option) any later version.
14
15	This program is distributed in the hope that it will be useful,
16	but WITHOUT ANY WARRANTY; without even the implied warranty of
17	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18	GNU General Public License for more details.
19
20	You should have received a copy of the GNU General Public License with
21	the Debian GNU/Linux distribution in /usr/share/common-licenses/GPL;
22	if not, write to the Free Software Foundation, Inc., 59 Temple Place,
23	Suite 330, Boston, MA 02111-1307 USA
24	*/
25
26	#define BITLBEE_CORE
27	#include "bitlbee.h"
28	#include "crypting.h"
29
30	static void text_init (void)
31	{
32	if( access( global.conf->configdir, F_OK ) != 0 )
33	log_message( LOGLVL_WARNING, "The configuration directory %s does not exist. Configuration won't be saved.", CONFIG );
34	else if( access( global.conf->configdir, R_OK ) != 0 \|\| access( global.conf->configdir, W_OK ) != 0 )
35	log_message( LOGLVL_WARNING, "Permission problem: Can't read/write from/to %s.", global.conf->configdir );
36	}
37
38	static storage_status_t text_load ( const char my_nick, const char password, irc_t *irc )
39	{
40	char s[512];
41	char *line;
42	int proto;
43	char nick[MAX_NICK_LENGTH+1];
44	FILE *fp;
45	user_t *ru = user_find( irc, ROOT_NICK );
46
47	if( irc->status == USTATUS_IDENTIFIED )
48	return( 1 );
49
50	g_snprintf( s, 511, "%s%s%s", global.conf->configdir, my_nick, ".accounts" );
51	fp = fopen( s, "r" );
52	if( !fp ) return STORAGE_NO_SUCH_USER;
53
54	fscanf( fp, "%32[^\n]s", s );
55
56	if (checkpass (password, s) != 0)
57	{
58	fclose( fp );
59	return STORAGE_INVALID_PASSWORD;
60	}
61
62	/* Do this now. If the user runs with AuthMode = Registered, the
63	account command will not work otherwise. */
64	irc->status = USTATUS_IDENTIFIED;
65
66	while( fscanf( fp, "%511[^\n]s", s ) > 0 )
67	{
68	fgetc( fp );
69	line = deobfucrypt( s, password );
70	if (line == NULL) return STORAGE_OTHER_ERROR;
71	root_command_string( irc, ru, line, 0 );
72	g_free( line );
73	}
74	fclose( fp );
75
76	g_snprintf( s, 511, "%s%s%s", global.conf->configdir, my_nick, ".nicks" );
77	fp = fopen( s, "r" );
78	if( !fp ) return STORAGE_NO_SUCH_USER;
79	while( fscanf( fp, "%s %d %s", s, &proto, nick ) > 0 )
80	{
81	http_decode( s );
82	nick_set( irc, s, proto, nick );
83	}
84	fclose( fp );
85
86	if( set_getint( irc, "auto_connect" ) )
87	{
88	strcpy( s, "account on" ); /* Can't do this directly because r_c_s alters the string */
89	root_command_string( irc, ru, s, 0 );
90	}
91
92	return STORAGE_OK;
93	}
94
95	static storage_status_t text_save( irc_t *irc, int overwrite )
96	{
97	char s[512];
98	char path[512], new_path[512];
99	char *line;
100	nick_t *n;
101	set_t *set;
102	mode_t ou = umask( 0077 );
103	account_t *a;
104	FILE *fp;
105	char *hash;
106
107	if (!overwrite) {
108	g_snprintf( path, 511, "%s%s%s", global.conf->configdir, irc->nick, ".accounts" );
109	if (access( path, F_OK ) != -1)
110	return STORAGE_ALREADY_EXISTS;
111
112	g_snprintf( path, 511, "%s%s%s", global.conf->configdir, irc->nick, ".nicks" );
113	if (access( path, F_OK ) != -1)
114	return STORAGE_ALREADY_EXISTS;
115	}
116
117	/*\
118	* [SH] Nothing should be saved if no password is set, because the
119	* password is not set if it was wrong, or if one is not identified
120	* yet. This means that a malicious user could easily overwrite
121	* files owned by someone else:
122	* a Bad Thing, methinks
123	\*/
124
125	/* [WVG] No? Really? */
126
127	/*\
128	* [SH] Okay, okay, it wasn't really Wilmer who said that, it was
129	* me. I just thought it was funny.
130	\*/
131
132	hash = hashpass( irc->password );
133	if( hash == NULL )
134	{
135	irc_usermsg( irc, "Please register yourself if you want to save your settings." );
136	return STORAGE_OTHER_ERROR;
137	}
138
139	g_snprintf( path, 511, "%s%s%s", global.conf->configdir, irc->nick, ".nicks~" );
140	fp = fopen( path, "w" );
141	if( !fp ) return STORAGE_OTHER_ERROR;
142	for( n = irc->nicks; n; n = n->next )
143	{
144	strcpy( s, n->handle );
145	s[169] = 0; /* Prevent any overflow (169 ~ 512 / 3) */
146	http_encode( s );
147	g_snprintf( s + strlen( s ), 510 - strlen( s ), " %d %s", n->proto, n->nick );
148	if( fprintf( fp, "%s\n", s ) != strlen( s ) + 1 )
149	{
150	irc_usermsg( irc, "fprintf() wrote too little. Disk full?" );
151	fclose( fp );
152	return STORAGE_OTHER_ERROR;
153	}
154	}
155	if( fclose( fp ) != 0 )
156	{
157	irc_usermsg( irc, "fclose() reported an error. Disk full?" );
158	return STORAGE_OTHER_ERROR;
159	}
160
161	g_snprintf( new_path, 512, "%s%s%s", global.conf->configdir, irc->nick, ".nicks" );
162	if( unlink( new_path ) != 0 )
163	{
164	if( errno != ENOENT )
165	{
166	irc_usermsg( irc, "Error while removing old .nicks file" );
167	return STORAGE_OTHER_ERROR;
168	}
169	}
170	if( rename( path, new_path ) != 0 )
171	{
172	irc_usermsg( irc, "Error while renaming new .nicks file" );
173	return STORAGE_OTHER_ERROR;
174	}
175
176	g_snprintf( path, 511, "%s%s%s", global.conf->configdir, irc->nick, ".accounts~" );
177	fp = fopen( path, "w" );
178	if( !fp ) return STORAGE_OTHER_ERROR;
179	if( fprintf( fp, "%s", hash ) != strlen( hash ) )
180	{
181	irc_usermsg( irc, "fprintf() wrote too little. Disk full?" );
182	fclose( fp );
183	return STORAGE_OTHER_ERROR;
184	}
185	g_free( hash );
186
187	for( a = irc->accounts; a; a = a->next )
188	{
189	if( a->protocol == PROTO_OSCAR \|\| a->protocol == PROTO_ICQ \|\| a->protocol == PROTO_TOC )
190	g_snprintf( s, sizeof( s ), "account add oscar \"%s\" \"%s\" %s", a->user, a->pass, a->server );
191	else
192	g_snprintf( s, sizeof( s ), "account add %s \"%s\" \"%s\" \"%s\"",
193	proto_name[a->protocol], a->user, a->pass, a->server ? a->server : "" );
194
195	line = obfucrypt( s, irc->password );
196	if( *line )
197	{
198	if( fprintf( fp, "%s\n", line ) != strlen( line ) + 1 )
199	{
200	irc_usermsg( irc, "fprintf() wrote too little. Disk full?" );
201	fclose( fp );
202	return STORAGE_OTHER_ERROR;
203	}
204	}
205	g_free( line );
206	}
207
208	for( set = irc->set; set; set = set->next )
209	{
210	if( set->value && set->def )
211	{
212	g_snprintf( s, sizeof( s ), "set %s \"%s\"", set->key, set->value );
213	line = obfucrypt( s, irc->password );
214	if( *line )
215	{
216	if( fprintf( fp, "%s\n", line ) != strlen( line ) + 1 )
217	{
218	irc_usermsg( irc, "fprintf() wrote too little. Disk full?" );
219	fclose( fp );
220	return STORAGE_OTHER_ERROR;
221	}
222	}
223	g_free( line );
224	}
225	}
226
227	if( strcmp( irc->mynick, ROOT_NICK ) != 0 )
228	{
229	g_snprintf( s, sizeof( s ), "rename %s %s", ROOT_NICK, irc->mynick );
230	line = obfucrypt( s, irc->password );
231	if( *line )
232	{
233	if( fprintf( fp, "%s\n", line ) != strlen( line ) + 1 )
234	{
235	irc_usermsg( irc, "fprintf() wrote too little. Disk full?" );
236	fclose( fp );
237	return STORAGE_OTHER_ERROR;
238	}
239	}
240	g_free( line );
241	}
242	if( fclose( fp ) != 0 )
243	{
244	irc_usermsg( irc, "fclose() reported an error. Disk full?" );
245	return STORAGE_OTHER_ERROR;
246	}
247
248	g_snprintf( new_path, 512, "%s%s%s", global.conf->configdir, irc->nick, ".accounts" );
249	if( unlink( new_path ) != 0 )
250	{
251	if( errno != ENOENT )
252	{
253	irc_usermsg( irc, "Error while removing old .accounts file" );
254	return STORAGE_OTHER_ERROR;
255	}
256	}
257	if( rename( path, new_path ) != 0 )
258	{
259	irc_usermsg( irc, "Error while renaming new .accounts file" );
260	return STORAGE_OTHER_ERROR;
261	}
262
263	umask( ou );
264
265	return STORAGE_OK;
266	}
267
268	static storage_status_t text_check_pass( const char nick, const char password )
269	{
270	char s[512];
271	FILE *fp;
272
273	g_snprintf( s, 511, "%s%s%s", global.conf->configdir, nick, ".accounts" );
274	fp = fopen( s, "r" );
275	if (!fp)
276	return STORAGE_NO_SUCH_USER;
277
278	fscanf( fp, "%32[^\n]s", s );
279	fclose( fp );
280
281	if (checkpass( password, s) == -1)
282	return STORAGE_INVALID_PASSWORD;
283
284	return STORAGE_OK;
285	}
286
287	static storage_status_t text_remove( const char nick, const char password )
288	{
289	char s[512];
290	storage_status_t status;
291
292	status = text_check_pass( nick, password );
293	if (status != STORAGE_OK)
294	return status;
295
296	g_snprintf( s, 511, "%s%s%s", global.conf->configdir, nick, ".accounts" );
297	if (unlink( s ) == -1)
298	return STORAGE_OTHER_ERROR;
299
300	g_snprintf( s, 511, "%s%s%s", global.conf->configdir, nick, ".nicks" );
301	if (unlink( s ) == -1)
302	return STORAGE_OTHER_ERROR;
303
304	return STORAGE_OK;
305	}
306
307	storage_t storage_text = {
308	.name = "text",
309	.init = text_init,
310	.check_pass = text_check_pass,
311	.remove = text_remove,
312	.load = text_load,
313	.save = text_save
314	};

Note: See TracBrowser for help on using the repository browser.

Download in other formats: