]> code.citadel.org Git - citadel.git/blobdiff - citadel/serv_vcard.c
* Buffered output needs to be flushed in several places. Added calls to
[citadel.git] / citadel / serv_vcard.c
index 3db7f3d028f00a892ee9e4c5ea58a80bdc1bed5d..af22b3fda2f44a4997dd47c76d42bb37cfaa54d6 100644 (file)
@@ -113,14 +113,14 @@ void vcard_extract_internet_addresses(struct CtdlMessage *msg,
        do {
                s = vcard_get_prop(v, "email;internet", 0, instance++, 0);
                if (s != NULL) {
-                       addr = strdoop(s);
+                       addr = strdup(s);
                        striplt(addr);
                        if (strlen(addr) > 0) {
                                if (callback != NULL) {
                                        callback(addr, citadel_address);
                                }
                        }
-                       phree(addr);
+                       free(addr);
                        found_something = 1;
                }
                else {
@@ -169,7 +169,7 @@ void vcard_directory_add_user(char *internet_addr, char *citadel_addr) {
 void vcard_add_to_directory(long msgnum, void *data) {
        struct CtdlMessage *msg;
 
-       msg = CtdlFetchMessage(msgnum);
+       msg = CtdlFetchMessage(msgnum, 1);
        if (msg != NULL) {
                vcard_extract_internet_addresses(msg, vcard_directory_add_user);
        }
@@ -229,7 +229,7 @@ void vcard_populate_cs_inet_email(struct vCard *v) {
                s = vcard_get_prop(v, "email;internet", 0, instance++, 0);
                if (s != NULL) {
                        continue_searching = 1;
-                       addr = strdoop(s);
+                       addr = strdup(s);
                        striplt(addr);
                        if (strlen(addr) > 0) {
                                if (IsDirectory(addr)) {
@@ -240,7 +240,7 @@ void vcard_populate_cs_inet_email(struct vCard *v) {
                                        );
                                }
                        }
-                       phree(addr);
+                       free(addr);
                }
                else {
                        continue_searching = 0;
@@ -262,6 +262,9 @@ int vcard_upload_beforesave(struct CtdlMessage *msg) {
        char buf[SIZ];
        struct ctdluser usbuf;
        long what_user;
+       struct vCard *v = NULL;
+       char *ser = NULL;
+       int i = 0;
 
        if (!CC->logged_in) return(0);  /* Only do this if logged in. */
 
@@ -320,16 +323,44 @@ int vcard_upload_beforesave(struct CtdlMessage *msg) {
                         * replication always works correctly
                         */
                         if (msg->cm_fields['E'] != NULL)
-                                phree(msg->cm_fields['E']);
+                                free(msg->cm_fields['E']);
 
                         if (msg->cm_fields['A'] != NULL)
-                                phree(msg->cm_fields['A']);
+                                free(msg->cm_fields['A']);
 
-                       msg->cm_fields['A'] = strdoop(usbuf.fullname);
+                       msg->cm_fields['A'] = strdup(usbuf.fullname);
 
                         snprintf(buf, sizeof buf, VCARD_EXT_FORMAT,
                                 msg->cm_fields['A'], NODENAME);
-                        msg->cm_fields['E'] = strdoop(buf);
+                        msg->cm_fields['E'] = strdup(buf);
+
+                       /* Insert or replace RFC2739-compliant free/busy URL */
+                       v = vcard_load(msg->cm_fields['M']);
+                       if (v != NULL) {
+
+                               /* Manipulate the vCard data structure */
+                               sprintf(buf, "http://%s/%s.vfb",
+                                       config.c_fqdn,
+                                       usbuf.fullname);
+                               for (i=0; i<strlen(buf); ++i) {
+                                       if (buf[i] == ' ') buf[i] = '_';
+                               }
+                               vcard_set_prop(v, "FBURL;PREF", buf, 0);
+
+                               /* Re-serialize it back into the msg body */
+                               ser = vcard_serialize(v);
+                               if (ser != NULL) {
+                                       msg->cm_fields['M'] = realloc(
+                                               msg->cm_fields['M'],
+                                               strlen(ser) + 1024
+                                       );
+                                       sprintf(msg->cm_fields['M'],
+                                               "Content-type: text/x-vcard"
+                                               "\r\n\r\n%s\r\n", ser);
+                                       free(ser);
+                               }
+                               vcard_free(v);
+                       }
 
                        /* Now allow the save to complete. */
                        return(0);
@@ -380,6 +411,11 @@ int vcard_upload_aftersave(struct CtdlMessage *msg) {
                        I = atol(msg->cm_fields['I']);
                        if (I < 0L) return(0);
 
+                       /* Store our Internet return address in memory */
+                       v = vcard_load(msg->cm_fields['M']);
+                       vcard_populate_cs_inet_email(v);
+                       vcard_free(v);
+
                        /* Put it in the Global Address Book room... */
                        CtdlSaveMsgPointerInRoom(ADDRESS_BOOK_ROOM, I,
                                (SM_VERIFY_GOODNESS | SM_DO_REPL_CHECK) );
@@ -387,11 +423,6 @@ int vcard_upload_aftersave(struct CtdlMessage *msg) {
                        /* ...and also in the directory database. */
                        vcard_add_to_directory(I, NULL);
 
-                       /* Store our Internet return address in memory */
-                       v = vcard_load(msg->cm_fields['M']);
-                       vcard_populate_cs_inet_email(v);
-                       vcard_free(v);
-
                        /* Some sites want an Aide to be notified when a
                         * user registers or re-registers...
                         */
@@ -448,7 +479,7 @@ struct vCard *vcard_get_user(struct ctdluser *u) {
 
        if (VC->msgnum < 0L) return vcard_new();
 
-       msg = CtdlFetchMessage(VC->msgnum);
+       msg = CtdlFetchMessage(VC->msgnum, 1);
        if (msg == NULL) return vcard_new();
 
        v = vcard_load(msg->cm_fields['M']);
@@ -477,7 +508,7 @@ void vcard_write_user(struct ctdluser *u, struct vCard *v) {
                fprintf(fp, "begin:vcard\r\nend:vcard\r\n");
        } else {
                fwrite(ser, strlen(ser), 1, fp);
-               phree(ser);
+               free(ser);
        }
         fclose(fp);
 
@@ -530,6 +561,7 @@ void cmd_regi(char *argbuf) {
        strcpy(tmpcountry, "USA");
 
        cprintf("%d Send registration...\n", SEND_LISTING);
+       flush_output();
        a=0;
        while (client_gets(buf), strcmp(buf,"000")) {
                if (a==0) vcard_set_prop(my_vcard, "n", buf, 0);
@@ -639,16 +671,59 @@ void cmd_greg(char *argbuf)
 void vcard_newuser(struct ctdluser *usbuf) {
        char buf[SIZ];
        char vname[SIZ];
+
+       char lastname[SIZ];
+       char firstname[SIZ];
+       char middlename[SIZ];
+       char honorific_prefixes[SIZ];
+       char honorific_suffixes[SIZ];
+
        struct vCard *v;
        int i;
-       int vnum;
 
        /* Try to intelligently convert the screen name to a
         * fully expanded vCard name based on the number of
         * words in the name
         */
-       vnum = num_tokens(usbuf->fullname, ' ');
-       strcpy(vname, usbuf->fullname); /* FIXME */
+       strcpy(lastname, "");
+       strcpy(firstname, "");
+       strcpy(middlename, "");
+       strcpy(honorific_prefixes, "");
+       strcpy(honorific_suffixes, "");
+
+       strcpy(buf, usbuf->fullname);
+
+       /* Honorific suffixes */
+       if (num_tokens(buf, ',') > 1) {
+               extract_token(honorific_suffixes, buf, (num_tokens(buf, ' ') - 1), ',');
+               remove_token(buf, (num_tokens(buf, ',') - 1), ',');
+       }
+
+       /* Find a last name */
+       extract_token(lastname, buf, (num_tokens(buf, ' ') - 1), ' ');
+       remove_token(buf, (num_tokens(buf, ' ') - 1), ' ');
+
+       /* Find honorific prefixes */
+       if (num_tokens(buf, ' ') > 2) {
+               extract_token(honorific_prefixes, buf, 0, ' ');
+               remove_token(buf, 0, ' ');
+       }
+
+       /* Find a middle name */
+       if (num_tokens(buf, ' ') > 1) {
+               extract_token(middlename, buf, (num_tokens(buf, ' ') - 1), ' ');
+               remove_token(buf, (num_tokens(buf, ' ') - 1), ' ');
+       }
+
+       /* Anything left is probably the first name */
+       strcpy(firstname, buf);
+       striplt(firstname);
+
+       /* Compose the structured name */
+       sprintf(vname, "%s;%s;%s;%s;%s", lastname, firstname, middlename,
+               honorific_prefixes, honorific_suffixes);
+
+       lprintf(CTDL_DEBUG, "Converted <%s> to <%s>\n", usbuf->fullname, vname);
 
        /* Create and save the vCard */
         v = vcard_new();
@@ -657,7 +732,9 @@ void vcard_newuser(struct ctdluser *usbuf) {
        for (i=0; i<strlen(buf); ++i) {
                if (buf[i] == ' ') buf[i] = '_';
        }
+       vcard_add_prop(v, "fn", usbuf->fullname);
        vcard_add_prop(v, "n", vname);
+       vcard_add_prop(v, "adr", "adr:;;_;_;_;00000;__");
        vcard_add_prop(v, "email;internet", buf);
        vcard_write_user(usbuf, v);
        vcard_free(v);
@@ -673,23 +750,23 @@ void vcard_purge(struct ctdluser *usbuf) {
        struct CtdlMessage *msg;
        char buf[SIZ];
 
-       msg = (struct CtdlMessage *) mallok(sizeof(struct CtdlMessage));
+       msg = (struct CtdlMessage *) malloc(sizeof(struct CtdlMessage));
        if (msg == NULL) return;
        memset(msg, 0, sizeof(struct CtdlMessage));
 
         msg->cm_magic = CTDLMESSAGE_MAGIC;
         msg->cm_anon_type = MES_NORMAL;
         msg->cm_format_type = 0;
-        msg->cm_fields['A'] = strdoop(usbuf->fullname);
-        msg->cm_fields['O'] = strdoop(ADDRESS_BOOK_ROOM);
-        msg->cm_fields['N'] = strdoop(NODENAME);
-        msg->cm_fields['M'] = strdoop("Purge this vCard\n");
+        msg->cm_fields['A'] = strdup(usbuf->fullname);
+        msg->cm_fields['O'] = strdup(ADDRESS_BOOK_ROOM);
+        msg->cm_fields['N'] = strdup(NODENAME);
+        msg->cm_fields['M'] = strdup("Purge this vCard\n");
 
         snprintf(buf, sizeof buf, VCARD_EXT_FORMAT,
                        msg->cm_fields['A'], NODENAME);
-        msg->cm_fields['E'] = strdoop(buf);
+        msg->cm_fields['E'] = strdup(buf);
 
-       msg->cm_fields['S'] = strdoop("CANCEL");
+       msg->cm_fields['S'] = strdup("CANCEL");
 
         CtdlSubmitMsg(msg, NULL, ADDRESS_BOOK_ROOM);
         CtdlFreeMessage(msg);
@@ -749,7 +826,7 @@ void vcard_delete_remove(char *room, long msgnum) {
                return;
        }
 
-       msg = CtdlFetchMessage(msgnum);
+       msg = CtdlFetchMessage(msgnum, 1);
        if (msg == NULL) return;
 
        ptr = msg->cm_fields['M'];