src/vcard.c

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