git.sur5r.net Git - glabels/blob - src/merge-vcard.c

   1 /*
   2  *  merge-vcard.c
   3  *  Copyright (C) 2001-2009  Jim Evins <evins@snaught.com>.
   4  *  and
   5  *  Copyright (C) 2005  Austin Henry <ahenry@users.sourceforge.net>
   6  *
   7  *  This file is part of gLabels.
   8  *
   9  *  gLabels is free software: you can redistribute it and/or modify
  10  *  it under the terms of the GNU General Public License as published by
  11  *  the Free Software Foundation, either version 3 of the License, or
  12  *  (at your option) any later version.
  13  *
  14  *  gLabels is distributed in the hope that it will be useful,
  15  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *  GNU General Public License for more details.
  18  *
  19  *  You should have received a copy of the GNU General Public License
  20  *  along with gLabels.  If not, see <http://www.gnu.org/licenses/>.
  21  */
  22
  23 #include <config.h>
  24
  25 #ifdef HAVE_LIBEBOOK
  26
  27
  28 #include "merge-vcard.h"
  29
  30 #include <libebook/e-contact.h>
  31 #include <stdio.h>
  32 #include <string.h>
  33 #include <errno.h>
  34
  35 #include "debug.h"
  36
  37
  38 /*===========================================*/
  39 /* Private types                             */
  40 /*===========================================*/
  41
  42 struct _glMergeVCardPrivate {
  43         FILE        *fp;
  44 };
  45
  46 enum {
  47         LAST_SIGNAL
  48 };
  49
  50 enum {
  51         ARG_0,
  52 };
  53
  54
  55 /*===========================================*/
  56 /* Private globals                           */
  57 /*===========================================*/
  58
  59
  60 /*===========================================*/
  61 /* Local function prototypes                 */
  62 /*===========================================*/
  63
  64 static void           gl_merge_vcard_finalize        (GObject          *object);
  65
  66 static void           gl_merge_vcard_set_property    (GObject          *object,
  67                                                       guint             param_id,
  68                                                       const GValue     *value,
  69                                                       GParamSpec       *pspec);
  70
  71 static void           gl_merge_vcard_get_property    (GObject          *object,
  72                                                       guint             param_id,
  73                                                       GValue           *value,
  74                                                       GParamSpec       *pspec);
  75
  76 static GList         *gl_merge_vcard_get_key_list    (const glMerge    *merge);
  77 static gchar         *gl_merge_vcard_get_primary_key (const glMerge    *merge);
  78 static void           gl_merge_vcard_open            (glMerge          *merge);
  79 static void           gl_merge_vcard_close           (glMerge          *merge);
  80 static glMergeRecord *gl_merge_vcard_get_record      (glMerge          *merge);
  81 static void           gl_merge_vcard_copy            (glMerge          *dst_merge,
  82                                                       const glMerge    *src_merge);
  83 static char *         parse_next_vcard               (FILE             *fp);
  84
  85
  86 /*****************************************************************************/
  87 /* Boilerplate object stuff.                                                 */
  88 /*****************************************************************************/
  89 G_DEFINE_TYPE (glMergeVCard, gl_merge_vcard, GL_TYPE_MERGE);
  90
  91
  92 static void
  93 gl_merge_vcard_class_init (glMergeVCardClass *class)
  94 {
  95         GObjectClass *object_class = G_OBJECT_CLASS (class);
  96         glMergeClass *merge_class  = GL_MERGE_CLASS (class);
  97
  98         gl_debug (DEBUG_MERGE, "START");
  99
 100         gl_merge_vcard_parent_class = g_type_class_peek_parent (class);
 101
 102         object_class->set_property = gl_merge_vcard_set_property;
 103         object_class->get_property = gl_merge_vcard_get_property;
 104
 105         object_class->finalize = gl_merge_vcard_finalize;
 106
 107         merge_class->get_key_list    = gl_merge_vcard_get_key_list;
 108         merge_class->get_primary_key = gl_merge_vcard_get_primary_key;
 109         merge_class->open            = gl_merge_vcard_open;
 110         merge_class->close           = gl_merge_vcard_close;
 111         merge_class->get_record      = gl_merge_vcard_get_record;
 112         merge_class->copy            = gl_merge_vcard_copy;
 113
 114         gl_debug (DEBUG_MERGE, "END");
 115 }
 116
 117
 118 static void
 119 gl_merge_vcard_init (glMergeVCard *merge_vcard)
 120 {
 121         gl_debug (DEBUG_MERGE, "START");
 122
 123         merge_vcard->priv = g_new0 (glMergeVCardPrivate, 1);
 124
 125         gl_debug (DEBUG_MERGE, "END");
 126 }
 127
 128
 129 static void
 130 gl_merge_vcard_finalize (GObject *object)
 131 {
 132         glMergeVCard *merge_vcard = GL_MERGE_VCARD (object);
 133
 134         gl_debug (DEBUG_MERGE, "START");
 135
 136         g_return_if_fail (object && GL_IS_MERGE_VCARD (object));
 137
 138         g_free (merge_vcard->priv);
 139
 140         G_OBJECT_CLASS (gl_merge_vcard_parent_class)->finalize (object);
 141
 142         gl_debug (DEBUG_MERGE, "END");
 143 }
 144
 145
 146 /*--------------------------------------------------------------------------*/
 147 /* Set argument.                                                            */
 148 /*--------------------------------------------------------------------------*/
 149 static void
 150 gl_merge_vcard_set_property (GObject      *object,
 151                              guint         param_id,
 152                              const GValue *value,
 153                              GParamSpec   *pspec)
 154 {
 155         glMergeVCard *merge_vcard;
 156
 157         merge_vcard = GL_MERGE_VCARD (object);
 158
 159         switch (param_id) {
 160         default:
 161                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
 162                 break;
 163         }
 164 }
 165
 166
 167 /*--------------------------------------------------------------------------*/
 168 /* Get argument.                                                            */
 169 /*--------------------------------------------------------------------------*/
 170 static void
 171 gl_merge_vcard_get_property (GObject     *object,
 172                              guint        param_id,
 173                              GValue      *value,
 174                              GParamSpec  *pspec)
 175 {
 176         glMergeVCard *merge_vcard;
 177
 178         merge_vcard = GL_MERGE_VCARD (object);
 179
 180         switch (param_id) {
 181         default:
 182                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
 183                 break;
 184         }
 185
 186 }
 187
 188
 189 /*--------------------------------------------------------------------------*/
 190 /* Get key list.                                                            */
 191 /*--------------------------------------------------------------------------*/
 192 static GList *
 193 gl_merge_vcard_get_key_list (const glMerge *merge)
 194 {
 195         glMergeVCard   *merge_vcard;
 196         GList          *key_list = NULL;
 197         EContactField   field_id;
 198
 199         gl_debug (DEBUG_MERGE, "BEGIN");
 200
 201         merge_vcard = GL_MERGE_VCARD (merge);
 202
 203         for ( field_id = E_CONTACT_FIELD_FIRST; field_id <= E_CONTACT_LAST_SIMPLE_STRING; field_id++ )
 204         {
 205                 key_list = g_list_append (key_list, g_strdup (e_contact_pretty_name (field_id)));
 206         }
 207
 208         gl_debug (DEBUG_MERGE, "END");
 209
 210         return key_list;
 211 }
 212
 213
 214 /*--------------------------------------------------------------------------*/
 215 /* Get "primary" key.                                                       */
 216 /*--------------------------------------------------------------------------*/
 217 static gchar *
 218 gl_merge_vcard_get_primary_key (const glMerge *merge)
 219 {
 220         return g_strdup (e_contact_pretty_name(E_CONTACT_FILE_AS));
 221 }
 222
 223
 224 /*--------------------------------------------------------------------------*/
 225 /* Open merge source.                                                       */
 226 /*--------------------------------------------------------------------------*/
 227 static void
 228 gl_merge_vcard_open (glMerge *merge)
 229 {
 230         glMergeVCard *merge_vcard;
 231         gchar        *src;
 232
 233         merge_vcard = GL_MERGE_VCARD (merge);
 234
 235         src = gl_merge_get_src (merge);
 236
 237         if (src != NULL) {
 238                 merge_vcard->priv->fp = fopen (src, "r");
 239         }
 240
 241         g_free (src);
 242
 243         return;
 244 }
 245
 246
 247 /*--------------------------------------------------------------------------*/
 248 /* Close merge source.                                                      */
 249 /*--------------------------------------------------------------------------*/
 250 static void
 251 gl_merge_vcard_close (glMerge *merge)
 252 {
 253         glMergeVCard *merge_vcard;
 254
 255         merge_vcard = GL_MERGE_VCARD (merge);
 256
 257         if (merge_vcard->priv->fp != NULL) {
 258                 fclose (merge_vcard->priv->fp);
 259                 merge_vcard->priv->fp = NULL;
 260         }
 261 }
 262
 263
 264 /*--------------------------------------------------------------------------*/
 265 /* Get next record from merge source, NULL if no records left (i.e EOF)     */
 266 /*--------------------------------------------------------------------------*/
 267 static glMergeRecord *
 268 gl_merge_vcard_get_record (glMerge *merge)
 269 {
 270         glMergeVCard  *merge_vcard;
 271         glMergeRecord *record;
 272         EContactField  field_id;
 273         glMergeField  *field;
 274
 275         char *vcard;
 276         EContact *contact;
 277
 278         merge_vcard = GL_MERGE_VCARD (merge);
 279
 280         vcard = parse_next_vcard(merge_vcard->priv->fp);
 281         if (vcard == NULL || vcard[0] == '\0') {
 282                 return NULL; /* EOF */
 283         }
 284         contact = e_contact_new_from_vcard(vcard);
 285         if (contact == NULL) {
 286                 return NULL; /* invalid vcard */
 287         }
 288
 289         record = g_new0 (glMergeRecord, 1);
 290         record->select_flag = TRUE;
 291
 292         /* Take the interesting fields one by one from the contact, and put them
 293          * into the glMergeRecord structure. When done, free up the resources for
 294          * that contact */
 295
 296         for ( field_id = E_CONTACT_FIELD_FIRST; field_id <= E_CONTACT_LAST_SIMPLE_STRING; field_id++ )
 297         {
 298                 gchar *value;
 299                 value = g_strdup (e_contact_get_const (contact, field_id));
 300
 301                 if (value) {
 302                         field = g_new0 (glMergeField, 1);
 303                         field->key = g_strdup (e_contact_pretty_name (field_id));
 304                         field->value = value;
 305                         record->field_list = g_list_prepend (record->field_list, field);
 306                 }
 307         }
 308
 309         record->field_list = g_list_reverse (record->field_list);
 310
 311
 312         /* free the contact */
 313         g_object_unref (contact);
 314         g_free(vcard);
 315
 316         return record;
 317 }
 318
 319
 320 /*---------------------------------------------------------------------------*/
 321 /* Copy merge_vcard specific fields.                                         */
 322 /*---------------------------------------------------------------------------*/
 323 static void
 324 gl_merge_vcard_copy (glMerge       *dst_merge,
 325                      const glMerge *src_merge)
 326 {
 327         glMergeVCard *dst_merge_vcard;
 328         glMergeVCard *src_merge_vcard;
 329
 330         dst_merge_vcard = GL_MERGE_VCARD (dst_merge);
 331         src_merge_vcard = GL_MERGE_VCARD (src_merge);
 332 }
 333
 334
 335 /*---------------------------------------------------------------------------*/
 336 /* PRIVATE: pull out a full VCard from the open file                         */
 337 /* Arguments:                                                                */
 338 /*  fp - an open stream to parse in put from                                 */
 339 /* Returns:                                                                  */
 340 /*  a pointer to the buffer containing the vcard, the empty string on        */
 341 /*  end-of-file or error, this buffer needs to be free by the caller         */
 342 /*---------------------------------------------------------------------------*/
 343 static char *
 344 parse_next_vcard (FILE *fp)
 345 {
 346         gboolean  found_begin = FALSE;
 347         gboolean  found_end = FALSE;
 348         char     *vcard;
 349         char      line[512];
 350         int       size = 2048;
 351         int       cursize = 0;
 352
 353         /* if no source has been set up, don't try to read from the file */
 354         if (!fp) {
 355                 return NULL;
 356         }
 357
 358         vcard = g_malloc0(size);
 359
 360         while (fgets(line, sizeof(line), fp) && found_end == FALSE)
 361         {
 362                 if (found_begin == TRUE)
 363                 {
 364                         if (g_ascii_strncasecmp(line, "END:VCARD", strlen("END:VCARD")) == 0)
 365                         {
 366                                 found_end = TRUE;
 367                         }
 368                 }
 369                 else
 370                 {
 371                         if (g_ascii_strncasecmp(line, "BEGIN:VCARD", strlen("BEGIN:VCARD")) == 0)
 372                         {
 373                                 found_begin = TRUE;
 374                         }
 375                         else
 376                         {
 377                                 continue; /* skip lines not in a vcard */
 378                         }
 379                 }
 380
 381                 /* if the buffer passed us isn't big enough, reallocate it */
 382                 cursize += strlen(line);
 383                 if (cursize >= size)
 384                 {
 385                         size *= 2;
 386                         vcard = (char *)g_realloc(vcard, size); /* aborts program on error */
 387                 }
 388
 389                 /* add the line (or portion thereof) to the vcard */
 390                 strncat(vcard, line, size);
 391         }
 392
 393         return vcard;
 394 }
 395
 396
 397
 398 #endif /* HAVE_LIBEBOOK */
 399
 400
 401
 402 /*
 403  * Local Variables:       -- emacs
 404  * mode: C                -- emacs
 405  * c-basic-offset: 8      -- emacs
 406  * tab-width: 8           -- emacs
 407  * indent-tabs-mode: nil  -- emacs
 408  * End:                   -- emacs
 409  */