Statistics
| Revision:

root / src / vcard.c @ 3060

History | View | Annotate | Download (20.4 kB)

1
/*
2
 * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3
 * Copyright (C) 2001 Match Grun
4
 *
5
 * This program is free software; you can redistribute it and/or modify
6
 * it under the terms of the GNU General Public License as published by
7
 * the Free Software Foundation; either version 2 of the License, or
8
 * (at your option) any later version.
9
 *
10
 * This program is distributed in the hope that it will be useful,
11
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
 * GNU General Public License for more details.
14
 *
15
 * You should have received a copy of the GNU General Public License
16
 * along with this program; if not, write to the Free Software
17
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18
 */
19
20
/*
21
 * Functions necessary to access vCard files. vCard files are used
22
 * by GnomeCard for addressbook, and Netscape for sending business
23
 * card information. Refer to RFC2426 for more information.
24
 */
25
26
#include <glib.h>
27
#include <sys/stat.h>
28
#include <string.h>
29
30
#include "mgutils.h"
31
#include "vcard.h"
32
#include "addritem.h"
33
#include "addrcache.h"
34
#include "utils.h"
35
36
#define GNOMECARD_DIR     ".gnome"
37
#define GNOMECARD_FILE    "GnomeCard"
38
#define GNOMECARD_SECTION "[file]"
39
#define GNOMECARD_PARAM   "open"
40
41
#define VCARD_TEST_LINES  200
42
43
/*
44
* Create new cardfile object.
45
*/
46
VCardFile *vcard_create() {
47
        VCardFile *cardFile;
48
        cardFile = g_new0( VCardFile, 1 );
49
        cardFile->name = NULL;
50
        cardFile->path = NULL;
51
        cardFile->file = NULL;
52
        cardFile->bufptr = cardFile->buffer;
53
        cardFile->addressCache = addrcache_create();
54
        cardFile->retVal = MGU_SUCCESS;
55
        cardFile->accessFlag = FALSE;
56
        return cardFile;
57
}
58
59
/*
60
* Properties...
61
*/
62
void vcard_set_name( VCardFile* cardFile, const gchar *value ) {
63
        g_return_if_fail( cardFile != NULL );
64
        cardFile->name = mgu_replace_string( cardFile->name, value );
65
        g_strstrip( cardFile->name );
66
}
67
void vcard_set_file( VCardFile* cardFile, const gchar *value ) {
68
        g_return_if_fail( cardFile != NULL );
69
        addrcache_refresh( cardFile->addressCache );
70
        cardFile->path = mgu_replace_string( cardFile->path, value );
71
        g_strstrip( cardFile->path );
72
}
73
void vcard_set_accessed( VCardFile *cardFile, const gboolean value ) {
74
        g_return_if_fail( cardFile != NULL );
75
        cardFile->accessFlag = value;
76
}
77
78
/*
79
* Test whether file was modified since last access.
80
* Return: TRUE if file was modified.
81
*/
82
gboolean vcard_get_modified( VCardFile *vcardFile ) {
83
        g_return_val_if_fail( vcardFile != NULL, FALSE );
84
        return addrcache_check_file( vcardFile->addressCache, vcardFile->path );
85
}
86
gboolean vcard_get_accessed( VCardFile *vcardFile ) {
87
        g_return_val_if_fail( vcardFile != NULL, FALSE );
88
        return addrcache_check_file( vcardFile->addressCache, vcardFile->path );
89
}
90
91
/*
92
* Test whether file was read.
93
* Return: TRUE if file was read.
94
*/
95
gboolean vcard_get_read_flag( VCardFile *vcardFile ) {
96
        g_return_val_if_fail( vcardFile != NULL, FALSE );
97
        return vcardFile->addressCache->dataRead;
98
}
99
100
/*
101
* Return status code from last file operation.
102
* Return: Status code.
103
*/
104
gint vcard_get_status( VCardFile *cardFile ) {
105
        g_return_val_if_fail( cardFile != NULL, -1 );
106
        return cardFile->retVal;
107
}
108
109
ItemFolder *vcard_get_root_folder( VCardFile *cardFile ) {
110
        g_return_val_if_fail( cardFile != NULL, NULL );
111
        return addrcache_get_root_folder( cardFile->addressCache );
112
}
113
gchar *vcard_get_name( VCardFile *cardFile ) {
114
        g_return_val_if_fail( cardFile != NULL, NULL );
115
        return cardFile->name;
116
}
117
118
/*
119
* Refresh internal variables to force a file read.
120
*/
121
void vcard_force_refresh( VCardFile *cardFile ) {
122
        addrcache_refresh( cardFile->addressCache );
123
}
124
125
/*
126
* Create new cardfile object for specified file.
127
*/
128
VCardFile *vcard_create_path( const gchar *path ) {
129
        VCardFile *cardFile;
130
        cardFile = vcard_create();
131
        vcard_set_file(cardFile, path);
132
        return cardFile;
133
}
134
135
/*
136
* Free up cardfile object by releasing internal memory.
137
*/
138
void vcard_free( VCardFile *cardFile ) {
139
        g_return_if_fail( cardFile != NULL );
140
141
        /* Close file */
142
        if( cardFile->file ) fclose( cardFile->file );
143
144
        /* Free internal stuff */
145
        g_free( cardFile->name );
146
        g_free( cardFile->path );
147
148
        /* Clear cache */
149
        addrcache_clear( cardFile->addressCache );
150
        addrcache_free( cardFile->addressCache );
151
152
        /* Clear pointers */
153
        cardFile->file = NULL;
154
        cardFile->name = NULL;
155
        cardFile->path = NULL;
156
        cardFile->addressCache = NULL;
157
        cardFile->retVal = MGU_SUCCESS;
158
        cardFile->accessFlag = FALSE;
159
160
        /* Now release file object */
161
        g_free( cardFile );
162
163
}
164
165
/*
166
* Display object to specified stream.
167
*/
168
void vcard_print_file( VCardFile *cardFile, FILE *stream ) {
169
        g_return_if_fail( cardFile != NULL );
170
171
        fprintf( stream, "VCardFile:\n" );
172
        fprintf( stream, "     name: '%s'\n", cardFile->name );
173
        fprintf( stream, "file spec: '%s'\n", cardFile->path );
174
        fprintf( stream, "  ret val: %d\n",   cardFile->retVal );
175
        addrcache_print( cardFile->addressCache, stream );
176
        addritem_print_item_folder( cardFile->addressCache->rootFolder, stream );
177
}
178
179
/*
180
* Open file for read.
181
* return: TRUE if file opened successfully.
182
*/
183
static gint vcard_open_file( VCardFile* cardFile ) {
184
        g_return_val_if_fail( cardFile != NULL, -1 );
185
186
        /* fprintf( stdout, "Opening file\n" ); */
187
        cardFile->addressCache->dataRead = FALSE;
188
        if( cardFile->path ) {
189
                cardFile->file = g_fopen( cardFile->path, "rb" );
190
                if( ! cardFile->file ) {
191
                        /* fprintf( stderr, "can't open %s\n", cardFile->path ); */
192
                        cardFile->retVal = MGU_OPEN_FILE;
193
                        return cardFile->retVal;
194
                }
195
        }
196
        else {
197
                /* fprintf( stderr, "file not specified\n" ); */
198
                cardFile->retVal = MGU_NO_FILE;
199
                return cardFile->retVal;
200
        }
201
202
        /* Setup a buffer area */
203
        cardFile->buffer[0] = '\0';
204
        cardFile->bufptr = cardFile->buffer;
205
        cardFile->retVal = MGU_SUCCESS;
206
        return cardFile->retVal;
207
}
208
209
/*
210
* Close file.
211
*/
212
static void vcard_close_file( VCardFile *cardFile ) {
213
        g_return_if_fail( cardFile != NULL );
214
        if( cardFile->file ) fclose( cardFile->file );
215
        cardFile->file = NULL;
216
}
217
218
/*
219
* Read line of text from file.
220
* Return: ptr to buffer where line starts.
221
*/
222
static gchar *vcard_read_line( VCardFile *cardFile ) {
223
        while( *cardFile->bufptr == '\n' || *cardFile->bufptr == '\0' ) {
224
                if( fgets( cardFile->buffer, VCARDBUFSIZE, cardFile->file ) == NULL )
225
                        return NULL;
226
                g_strstrip( cardFile->buffer );
227
                cardFile->bufptr = cardFile->buffer;
228
        }
229
        return cardFile->bufptr;
230
}
231
232
/*
233
* Read line of text from file.
234
* Return: ptr to buffer where line starts.
235
*/
236
static gchar *vcard_get_line( VCardFile *cardFile ) {
237
        gchar buf[ VCARDBUFSIZE ];
238
        gchar *start, *end;
239
        gint len;
240
241
        if (vcard_read_line( cardFile ) == NULL ) {
242
                buf[0] = '\0';
243
                return NULL;
244
        }
245
246
        /* Copy into private buffer */
247
        start = cardFile->bufptr;
248
        len = strlen( start );
249
        end = start + len;
250
        strncpy( buf, start, len );
251
        buf[ len ] = '\0';
252
        g_strstrip(buf);
253
        cardFile->bufptr = end + 1;
254
255
        /* Return a copy of buffer */        
256
        return g_strdup( buf );
257
}
258
259
/*
260
* Free linked lists of character strings.
261
*/
262
static void vcard_free_lists( GSList *listName, GSList *listAddr, GSList *listRem, GSList* listID ) {
263
        mgu_free_list( listName );
264
        mgu_free_list( listAddr );
265
        mgu_free_list( listRem );
266
        mgu_free_list( listID );
267
}
268
269
/*
270
* Read quoted-printable text, which may span several lines into one long string.
271
* Param: cardFile - object.
272
* Param: tagvalue - will be placed into the linked list.
273
*/
274
static gchar *vcard_read_qp( VCardFile *cardFile, gchar *tagvalue ) {
275
        GSList *listQP = NULL;
276
        gint len = 0;
277
        gchar *line = tagvalue;
278
279
        while( line ) {
280
                listQP = g_slist_append( listQP, line );
281
                len = strlen( line ) - 1;
282
                if( len > 0 ) {
283
                        if( line[ len ] != '=' ) break;
284
                        line[ len ] = '\0';
285
                }
286
                line = vcard_get_line( cardFile );
287
        }
288
289
        /* Coalesce linked list into one long buffer. */
290
        line = mgu_list_coalesce( listQP );
291
292
        /* Clean up */
293
        mgu_free_list( listQP );
294
        listQP = NULL;
295
        return line;
296
}
297
298
/*
299
* Parse tag name from line buffer.
300
* Return: Buffer containing the tag name, or NULL if no delimiter char found.
301
*/
302
static gchar *vcard_get_tagname( gchar* line, gchar dlm ) {
303
        gint len = 0;
304
        gchar *tag = NULL;
305
        gchar *lptr = line;
306
307
        while( *lptr++ ) {
308
                if( *lptr == dlm ) {
309
                        len = lptr - line;
310
                        tag = g_strndup( line, len+1 );
311
                        tag[ len ] = '\0';
312
                        g_strdown( tag );
313
                        return tag;
314
                }
315
        }
316
        return tag;
317
}
318
319
/*
320
* Parse tag value from line buffer.
321
* Return: Buffer containing the tag value. Empty string is returned if
322
* no delimiter char found.
323
*/
324
static gchar *vcard_get_tagvalue( gchar* line, gchar dlm ) {
325
        gchar *value = NULL;
326
        gchar *start = NULL;
327
        gchar *lptr;
328
        gint len = 0;
329
330
        for( lptr = line; *lptr; lptr++ ) {
331
                if( *lptr == dlm ) {
332
                        if( ! start )
333
                                start = lptr + 1;
334
                }
335
        }
336
        if( start ) {
337
                len = lptr - start;
338
                value = g_strndup( start, len+1 );
339
        }
340
        else {
341
                /* Ensure that we get an empty string */
342
                value = g_strndup( "", 1 );
343
        }
344
        value[ len ] = '\0';
345
        return value;
346
}
347
348
#if 0
349
/*
350
* Dump linked lists of character strings (for debug).
351
*/
352
static void vcard_dump_lists( GSList *listName, GSList *listAddr, GSList *listRem, GSList *listID, FILE *stream ) {
353
        fprintf( stream, "dump name\n" );
354
        fprintf( stream, "------------\n" );
355
        mgu_print_list( listName, stdout );
356
        fprintf( stream, "dump address\n" );
357
        fprintf( stream, "------------\n" );
358
        mgu_print_list( listAddr, stdout );
359
        fprintf( stream, "dump remarks\n" );
360
        fprintf( stdout, "------------\n" );
361
        mgu_print_list( listRem, stdout );
362
        fprintf( stream, "dump id\n" );
363
        fprintf( stdout, "------------\n" );
364
        mgu_print_list( listID, stdout );
365
}
366
#endif
367
368
/*
369
* Build an address list entry and append to list of address items.
370
*/
371
static void vcard_build_items( VCardFile *cardFile, GSList *listName, GSList *listAddr, GSList *listRem,
372
                                GSList *listID )
373
{
374
        GSList *nodeName = listName;
375
        GSList *nodeID = listID;
376
        gchar *str;
377
        while( nodeName ) {
378
                GSList *nodeAddress = listAddr;
379
                GSList *nodeRemarks = listRem;
380
                ItemPerson *person = addritem_create_item_person();
381
                addritem_person_set_common_name( person, nodeName->data );
382
                while( nodeAddress ) {
383
                        str = nodeAddress->data;
384
                        if( *str != '\0' ) {
385
                                ItemEMail *email = addritem_create_item_email();
386
                                addritem_email_set_address( email, str );
387
                                str = nodeRemarks->data;
388
                                if( nodeRemarks ) {
389
                                        if( str ) {
390
                                                if( g_ascii_strcasecmp( str, "internet" ) != 0 ) {
391
                                                        if( *str != '\0' ) addritem_email_set_remarks( email, str );
392
                                                }
393
                                        }
394
                                }
395
                                addrcache_id_email( cardFile->addressCache, email );
396
                                addrcache_person_add_email( cardFile->addressCache, person, email );
397
                        }
398
                        nodeAddress = g_slist_next( nodeAddress );
399
                        nodeRemarks = g_slist_next( nodeRemarks );
400
                }
401
                if( person->listEMail ) {
402
                        addrcache_id_person( cardFile->addressCache, person );
403
                        addrcache_add_person( cardFile->addressCache, person );
404
                }
405
                else {
406
                        addritem_free_item_person( person );
407
                }
408
                if( nodeID ) {
409
                        str = nodeID->data;
410
                        addritem_person_set_external_id( person, str );
411
                }
412
                nodeName = g_slist_next( nodeName );
413
                nodeID = g_slist_next( nodeID );
414
        }
415
}
416
417
/* Unescape characters in quoted-printable string. */
418
static void vcard_unescape_qp( gchar *value ) {
419
        gchar *ptr, *src, *dest;
420
        gint d, v = 0;
421
        gchar ch;
422
        gboolean gotch;
423
        ptr = value;
424
        while( *ptr ) {
425
                gotch = FALSE;
426
                if( *ptr == '=' ) {
427
                        v = 0;
428
                        ch = *(ptr + 1);
429
                        if( ch ) {
430
                                if( ch > '0' && ch < '8' ) v = ch - '0';
431
                        }
432
                        d = -1;
433
                        ch = *(ptr + 2);
434
                        if( ch ) {
435
                                if( ch > '\x60' ) ch -= '\x20';
436
                                if( ch > '0' && ch < ' ' ) d = ch - '0';
437
                                d = ch - '0';
438
                                if( d > 9 ) d -= 7;
439
                                if( d > -1 && d < 16 ) {
440
                                        v = ( 16 * v ) + d;
441
                                        gotch = TRUE;
442
                                }
443
                        }
444
                }
445
                if( gotch ) {
446
                        /* Replace = with char and move down in buffer */
447
                        *ptr = v;
448
                        src = ptr + 3;
449
                        dest = ptr + 1;
450
                        while( *src ) {
451
                                *dest++ = *src++;
452
                        }
453
                        *dest = '\0';
454
                }
455
                ptr++;
456
        }
457
}
458
459
/*
460
* Read file data into root folder.
461
* Note that one vCard can have multiple E-Mail addresses (MAIL tags);
462
* these are broken out into separate address items. An address item
463
* is generated for the person identified by FN tag and each EMAIL tag.
464
* If a sub-type is included in the EMAIL entry, this will be used as
465
* the Remarks member. Also note that it is possible for one vCard
466
* entry to have multiple FN tags; this might not make sense. However,
467
* it will generate duplicate address entries for each person listed.
468
*/
469
static void vcard_read_file( VCardFile *cardFile ) {
470
        gchar *tagtemp = NULL, *tagname = NULL, *tagvalue = NULL, *tagtype = NULL;
471
        GSList *listName = NULL, *listAddress = NULL, *listRemarks = NULL, *listID = NULL;
472
        /* GSList *listQP = NULL; */
473
474
        for( ;; ) {
475
                gchar *line;
476
477
                line = vcard_get_line( cardFile );
478
                if( line == NULL ) break;
479
480
                /* fprintf( stdout, "%s\n", line ); */
481
482
                /* Parse line */
483
                tagtemp = vcard_get_tagname( line, VCARD_SEP_TAG );
484
                if( tagtemp == NULL ) {
485
                        g_free( line );
486
                        continue;
487
                }
488
489
                /* fprintf( stdout, "\ttemp:  %s\n", tagtemp ); */
490
491
                tagvalue = vcard_get_tagvalue( line, VCARD_SEP_TAG );
492
                if( tagvalue == NULL ) {
493
                        g_free( tagtemp );
494
                        g_free( line );
495
                        continue;
496
                }
497
498
                tagname = vcard_get_tagname( tagtemp, VCARD_SEP_TYPE );
499
                tagtype = vcard_get_tagvalue( tagtemp, VCARD_SEP_TYPE );
500
                if( tagname == NULL ) {
501
                        tagname = tagtemp;
502
                        tagtemp = NULL;
503
                }
504
505
                /* fprintf( stdout, "\tname:  %s\n", tagname ); */
506
                /* fprintf( stdout, "\ttype:  %s\n", tagtype ); */
507
                /* fprintf( stdout, "\tvalue: %s\n", tagvalue ); */
508
509
                if( g_ascii_strcasecmp( tagtype, VCARD_TYPE_QP ) == 0 ) {
510
                        /* Quoted-Printable: could span multiple lines */
511
                        tagvalue = vcard_read_qp( cardFile, tagvalue );
512
                        vcard_unescape_qp( tagvalue );
513
                        /* fprintf( stdout, "QUOTED-PRINTABLE !!! final\n>%s<\n", tagvalue ); */
514
                }
515
516
                if( g_ascii_strcasecmp( tagname, VCARD_TAG_START ) == 0 &&
517
                        g_ascii_strcasecmp( tagvalue, VCARD_NAME ) == 0 ) {
518
                        /* fprintf( stdout, "start card\n" ); */
519
                        vcard_free_lists( listName, listAddress, listRemarks, listID );
520
                        listName = listAddress = listRemarks = listID = NULL;
521
                }
522
                if( g_ascii_strcasecmp( tagname, VCARD_TAG_FULLNAME ) == 0 ) {
523
                        /* fprintf( stdout, "- full name: %s\n", tagvalue ); */
524
                        listName = g_slist_append( listName, g_strdup( tagvalue ) );
525
                }
526
                if( g_ascii_strcasecmp( tagname, VCARD_TAG_EMAIL ) == 0 ) {
527
                        /* fprintf( stdout, "- address: %s\n", tagvalue ); */
528
                        listAddress = g_slist_append( listAddress, g_strdup( tagvalue ) );
529
                        listRemarks = g_slist_append( listRemarks, g_strdup( tagtype ) );
530
                }
531
                if( g_ascii_strcasecmp( tagname, VCARD_TAG_UID ) == 0 ) {
532
                        /* fprintf( stdout, "- id: %s\n", tagvalue ); */
533
                        listID = g_slist_append( listID, g_strdup( tagvalue ) );
534
                }
535
                if( g_ascii_strcasecmp( tagname, VCARD_TAG_END ) == 0 &&
536
                        g_ascii_strcasecmp( tagvalue, VCARD_NAME ) == 0 ) {
537
                        /* vCard is complete */
538
                        /* fprintf( stdout, "end card\n--\n" ); */
539
                        /* vcard_dump_lists( listName, listAddress, listRemarks, listID, stdout ); */
540
                        vcard_build_items( cardFile, listName, listAddress, listRemarks, listID );
541
                        vcard_free_lists( listName, listAddress, listRemarks, listID );
542
                        listName = listAddress = listRemarks = listID = NULL;
543
                }
544
545
                g_free( tagname );
546
                g_free( tagtype );
547
                g_free( tagvalue );
548
                g_free( tagtemp );
549
                g_free( line );
550
        }
551
552
        /* Free lists */
553
        vcard_free_lists( listName, listAddress, listRemarks, listID );
554
        listName = listAddress = listRemarks = listID = NULL;
555
}
556
557
/* ============================================================================================ */
558
/*
559
* Read file into list. Main entry point
560
* Return: TRUE if file read successfully.
561
*/
562
/* ============================================================================================ */
563
gint vcard_read_data( VCardFile *cardFile ) {
564
        g_return_val_if_fail( cardFile != NULL, -1 );
565
566
        cardFile->retVal = MGU_SUCCESS;
567
        cardFile->accessFlag = FALSE;
568
        if( addrcache_check_file( cardFile->addressCache, cardFile->path ) ) {
569
                addrcache_clear( cardFile->addressCache );
570
                vcard_open_file( cardFile );
571
                if( cardFile->retVal == MGU_SUCCESS ) {
572
                        /* Read data into the list */
573
                        vcard_read_file( cardFile );
574
                        vcard_close_file( cardFile );
575
576
                        /* Mark cache */
577
                        addrcache_mark_file( cardFile->addressCache, cardFile->path );
578
                        cardFile->addressCache->modified = FALSE;
579
                        cardFile->addressCache->dataRead = TRUE;
580
                }
581
        }
582
        return cardFile->retVal;
583
}
584
585
/*
586
* Return link list of persons.
587
*/
588
GList *vcard_get_list_person( VCardFile *cardFile ) {
589
        g_return_val_if_fail( cardFile != NULL, NULL );
590
        return addrcache_get_list_person( cardFile->addressCache );
591
}
592
593
/*
594
* Return link list of folders. This is always NULL since there are
595
* no folders in GnomeCard.
596
* Return: NULL.
597
*/
598
GList *vcard_get_list_folder( VCardFile *cardFile ) {
599
        g_return_val_if_fail( cardFile != NULL, NULL );
600
        return NULL;
601
}
602
603
/*
604
* Return link list of all persons. Note that the list contains references
605
* to items. Do *NOT* attempt to use the addrbook_free_xxx() functions...
606
* this will destroy the addressbook data!
607
* Return: List of items, or NULL if none.
608
*/
609
GList *vcard_get_all_persons( VCardFile *cardFile ) {
610
        g_return_val_if_fail( cardFile != NULL, NULL );
611
        return addrcache_get_all_persons( cardFile->addressCache );
612
}
613
614
/*
615
* Validate that all parameters specified.
616
* Return: TRUE if data is good.
617
*/
618
gboolean vcard_validate( const VCardFile *cardFile ) {
619
        gboolean retVal;
620
621
        g_return_val_if_fail( cardFile != NULL, FALSE );
622
623
        retVal = TRUE;
624
        if( cardFile->path ) {
625
                if( strlen( cardFile->path ) < 1 ) retVal = FALSE;
626
        }
627
        else {
628
                retVal = FALSE;
629
        }
630
        if( cardFile->name ) {
631
                if( strlen( cardFile->name ) < 1 ) retVal = FALSE;
632
        }
633
        else {
634
                retVal = FALSE;
635
        }
636
        return retVal;
637
}
638
639
#define WORK_BUFLEN 1024
640
641
/*
642
* Attempt to find a valid GnomeCard file.
643
* Return: Filename, or home directory if not found. Filename should
644
*        be g_free() when done.
645
*/
646
gchar *vcard_find_gnomecard( void ) {
647
        const gchar *homedir;
648
        gchar buf[ WORK_BUFLEN ];
649
        gchar str[ WORK_BUFLEN ];
650
        gchar *fileSpec;
651
        gint len, lenlbl, i;
652
        FILE *fp;
653
654
        homedir = get_home_dir();
655
        if( ! homedir ) return NULL;
656
657
        strcpy( str, homedir );
658
        len = strlen( str );
659
        if( len > 0 ) {
660
                if( str[ len-1 ] != G_DIR_SEPARATOR ) {
661
                        str[ len ] = G_DIR_SEPARATOR;
662
                        str[ ++len ] = '\0';
663
                }
664
        }
665
        strcat( str, GNOMECARD_DIR );
666
        strcat( str, G_DIR_SEPARATOR_S );
667
        strcat( str, GNOMECARD_FILE );
668
669
        fileSpec = NULL;
670
        if( ( fp = g_fopen( str, "rb" ) ) != NULL ) {
671
                /* Read configuration file */
672
                lenlbl = strlen( GNOMECARD_SECTION );
673
                while( fgets( buf, sizeof( buf ), fp ) != NULL ) {
674
                        if( 0 == g_ascii_strncasecmp( buf, GNOMECARD_SECTION, lenlbl ) ) {
675
                                break;
676
                        }
677
                }
678
679
                while( fgets( buf, sizeof( buf ), fp ) != NULL ) {
680
                        g_strchomp( buf );
681
                        if( buf[0] == '[' ) break;
682
                        for( i = 0; i < lenlbl; i++ ) {
683
                                if( buf[i] == '=' ) {
684
                                        if( 0 == g_ascii_strncasecmp( buf, GNOMECARD_PARAM, i ) ) {
685
                                                fileSpec = g_strdup( buf + i + 1 );
686
                                                g_strstrip( fileSpec );
687
                                        }
688
                                }
689
                        }
690
                }
691
                fclose( fp );
692
        }
693
694
        if( fileSpec == NULL ) {
695
                /* Use the home directory */
696
                str[ len ] = '\0';
697
                fileSpec = g_strdup( str );
698
        }
699
700
        return fileSpec;
701
}
702
703
/*
704
* Attempt to read file, testing for valid vCard format.
705
* Return: TRUE if file appears to be valid format.
706
*/
707
gint vcard_test_read_file( const gchar *fileSpec ) {
708
        gboolean haveStart;
709
        gchar *tagtemp = NULL, *tagname = NULL, *tagvalue = NULL, *tagtype = NULL, *line;
710
        VCardFile *cardFile;
711
        gint retVal, lines;
712
713
        if( ! fileSpec ) return MGU_NO_FILE;
714
715
        cardFile = vcard_create_path( fileSpec );
716
        cardFile->retVal = MGU_SUCCESS;
717
        vcard_open_file( cardFile );
718
        if( cardFile->retVal == MGU_SUCCESS ) {
719
                cardFile->retVal = MGU_BAD_FORMAT;
720
                haveStart = FALSE;
721
                lines = VCARD_TEST_LINES;
722
                while( lines > 0 ) {
723
                        lines--;
724
                        if( ( line =  vcard_get_line( cardFile ) ) == NULL ) break;
725
726
                        /* Parse line */
727
                        tagtemp = vcard_get_tagname( line, VCARD_SEP_TAG );
728
                        if( tagtemp == NULL ) {
729
                                g_free( line );
730
                                continue;
731
                        }
732
733
                        tagvalue = vcard_get_tagvalue( line, VCARD_SEP_TAG );
734
                        if( tagvalue == NULL ) {
735
                                g_free( tagtemp );
736
                                g_free( line );
737
                                continue;
738
                        }
739
740
                        tagname = vcard_get_tagname( tagtemp, VCARD_SEP_TYPE );
741
                        tagtype = vcard_get_tagvalue( tagtemp, VCARD_SEP_TYPE );
742
                        if( tagname == NULL ) {
743
                                tagname = tagtemp;
744
                                tagtemp = NULL;
745
                        }
746
747
                        if( g_ascii_strcasecmp( tagtype, VCARD_TYPE_QP ) == 0 ) {
748
                                /* Quoted-Printable: could span multiple lines */
749
                                tagvalue = vcard_read_qp( cardFile, tagvalue );
750
                                vcard_unescape_qp( tagvalue );
751
                        }
752
                        if( g_ascii_strcasecmp( tagname, VCARD_TAG_START ) == 0 &&
753
                                g_ascii_strcasecmp( tagvalue, VCARD_NAME ) == 0 ) {
754
                                haveStart = TRUE;
755
                        }
756
                        if( g_ascii_strcasecmp( tagname, VCARD_TAG_END ) == 0 &&
757
                                g_ascii_strcasecmp( tagvalue, VCARD_NAME ) == 0 ) {
758
                                /* vCard is complete */
759
                                if( haveStart ) cardFile->retVal = MGU_SUCCESS;
760
                        }
761
762
                        g_free( tagname );
763
                        g_free( tagtype );
764
                        g_free( tagvalue );
765
                        g_free( tagtemp );
766
                        g_free( line );
767
                }
768
                vcard_close_file( cardFile );
769
        }
770
        retVal = cardFile->retVal;
771
        vcard_free( cardFile );
772
        cardFile = NULL;
773
        return retVal;
774
}
775
776
/*
777
* End of Source.
778
*/