]> code.citadel.org Git - citadel.git/blobdiff - citadel/modules/xmpp/xmpp_presence.c
* Ok, it's not an async bug. When I changed everything over to xmpp_is_visible(...
[citadel.git] / citadel / modules / xmpp / xmpp_presence.c
index ca33d1e57336aab409cb401ab7778b2cc74f4bdd..557361169af18a751b9d7bdf96bd50ffb6e79724 100644 (file)
@@ -73,6 +73,27 @@ void xmpp_indicate_presence(char *presence_jid)
 }
 
 
+
+/*
+ * Convenience function to determine whether any given session is 'visible' to any other given session,
+ * and is capable of receiving instant messages from that session.
+ */
+int xmpp_is_visible(struct CitContext *cptr, struct CitContext *to_whom) {
+       int aide = (to_whom->user.axlevel >= AxAideU);
+
+       if (    (cptr->logged_in)
+               &&      (((cptr->cs_flags&CS_STEALTH)==0) || (aide))    /* aides see everyone */
+               &&      (cptr->user.usernum != to_whom->user.usernum)   /* don't show myself */
+               &&      (cptr->can_receive_im)                          /* IM-capable session */
+       ) {
+               return(1);
+       }
+       else {
+               return(0);
+       }
+}
+
+
 /* 
  * Initial dump of the entire wholist
  */
@@ -81,22 +102,14 @@ void xmpp_wholist_presence_dump(void)
        struct CitContext *cptr = NULL;
        int nContexts, i;
        
-       int aide = (CC->user.axlevel >= AxAideU);
-
        cptr = CtdlGetContextArray(&nContexts);
        if (!cptr) {
                return;
        }
 
        for (i=0; i<nContexts; i++) {
-               if (cptr[i].logged_in) {
-                       if (
-                               (((cptr[i].cs_flags&CS_STEALTH)==0) || (aide))  /* aides see everyone */
-                               && (cptr[i].user.usernum != CC->user.usernum)   /* don't show myself */
-                               && (cptr[i].can_receive_im)                     /* IM-capable session */
-                       ) {
-                               xmpp_indicate_presence(cptr[i].cs_inet_email);
-                       }
+               if (xmpp_is_visible(&cptr[i], CC)) {
+                       xmpp_indicate_presence(cptr[i].cs_inet_email);
                }
        }
        free(cptr);
@@ -110,6 +123,11 @@ void xmpp_wholist_presence_dump(void)
 void xmpp_destroy_buddy(char *presence_jid) {
        static int unsolicited_id = 1;
 
+       if (!presence_jid) return;
+       if (!XMPP) return;
+       if (!XMPP->client_jid) return;
+
+       CtdlLogPrintf(CTDL_DEBUG, "\033[31mdestroy_buddy(%s)\033[0m\n", presence_jid);
        /* Transmit non-presence information */
        cprintf("<presence type=\"unavailable\" from=\"%s\" to=\"%s\"></presence>",
                presence_jid, XMPP->client_jid
@@ -137,13 +155,13 @@ void xmpp_destroy_buddy(char *presence_jid) {
 
 /*
  * When a user logs in or out of the local Citadel system, notify all XMPP sessions about it.
+ * THIS FUNCTION HAS A BUG IN IT THAT ENUMERATES THE SESSIONS WRONG.
  */
 void xmpp_presence_notify(char *presence_jid, int event_type) {
        struct CitContext *cptr;
        static int unsolicited_id;
        int visible_sessions = 0;
        int nContexts, i;
-       int aide = (CC->user.axlevel >= AxAideU);
 
        if (IsEmptyStr(presence_jid)) return;
        if (CC->kill_me) return;
@@ -152,17 +170,11 @@ void xmpp_presence_notify(char *presence_jid, int event_type) {
        if (!cptr) {
                return;
        }
-               
+
        /* Count the visible sessions for this user */
        for (i=0; i<nContexts; i++) {
-               if (cptr[i].logged_in) {
-                       if (
-                               (!strcasecmp(cptr[i].cs_inet_email, presence_jid)) 
-                               && (((cptr[i].cs_flags&CS_STEALTH)==0) || (aide))
-                               && (cptr[i].can_receive_im)
-                       ) {
-                               ++visible_sessions;
-                       }
+               if (xmpp_is_visible(CC, &cptr[i])) {
+                       ++visible_sessions;
                }
        }
 
@@ -175,7 +187,7 @@ void xmpp_presence_notify(char *presence_jid, int event_type) {
 
                /* Do an unsolicited roster update that adds a new contact. */
                for (i=0; i<nContexts; i++) {
-                       if (cptr[i].logged_in) {
+                       if (xmpp_is_visible(CC, &cptr[i])) {
                                if (!strcasecmp(cptr[i].cs_inet_email, presence_jid)) {
                                        cprintf("<iq id=\"unsolicited_%x\" type=\"result\">",
                                                ++unsolicited_id);
@@ -204,11 +216,8 @@ void xmpp_presence_notify(char *presence_jid, int event_type) {
 void xmpp_fetch_mortuary_backend(long msgnum, void *userdata) {
        HashList *mortuary = (HashList *) userdata;
        struct CtdlMessage *msg;
-       const char *ptr = NULL;
-       const char *endptr = NULL;
-       int in_body = 0;
-       int len;
-       char buf[256];
+       char *ptr = NULL;
+       char *lasts = NULL;
 
        msg = CtdlFetchMessage(msgnum, 1);
        if (msg == NULL) {
@@ -217,17 +226,26 @@ void xmpp_fetch_mortuary_backend(long msgnum, void *userdata) {
 
        /* now add anyone we find into the hashlist */
 
-       ptr = msg->cm_fields['M'];
-       endptr = ptr + strlen(ptr);     // only do strlen once :)
-       CtdlLogPrintf(CTDL_DEBUG, "\033[33m%s\033[0m\n", ptr);
-       while (ptr = memreadlinelen(ptr, buf, (sizeof buf - 2), &len), ((ptr < endptr) && (*ptr != 0)) ) {
-               if (in_body) {
-                       char *pch; 
-                       pch = malloc(len + 1);
-                       memcpy(pch, buf, len + 1);
-                       Put(mortuary, pch, len, pch, NULL);
+       /* skip past the headers */
+       ptr = strstr(msg->cm_fields['M'], "\n\n");
+       if (ptr != NULL) {
+               ptr += 2;
+       }
+       else {
+               ptr = strstr(msg->cm_fields['M'], "\n\r\n");
+               if (ptr != NULL) {
+                       ptr += 3;
+               }
+       }
+
+       /* the remaining lines are addresses */
+       if (ptr != NULL) {
+               ptr = strtok_r(ptr, "\n", &lasts);
+               while (ptr != NULL) {
+                       char *pch = strdup(ptr);
+                       Put(mortuary, pch, strlen(pch), pch, NULL);
+                       ptr = strtok_r(NULL, "\n", &lasts);
                }
-               if (IsEmptyStr(buf)) in_body = 1;
        }
 
        CtdlFreeMessage(msg);
@@ -303,22 +321,15 @@ void xmpp_massacre_roster(void)
 {
        struct CitContext *cptr;
        int nContexts, i;
-       int aide = (CC->user.axlevel >= AxAideU);
        HashList *mortuary = xmpp_fetch_mortuary();
 
        cptr = CtdlGetContextArray(&nContexts);
        if (cptr) {
                for (i=0; i<nContexts; i++) {
-                       if (cptr[i].logged_in) {
-                               if (
-                                       (((cptr[i].cs_flags&CS_STEALTH)==0) || (aide))
-                                       && (cptr[i].user.usernum != CC->user.usernum)
-                               ) {
-                                       xmpp_destroy_buddy(cptr[i].cs_inet_email);
-                                       if (mortuary) {
-                                               char *buddy = strdup(cptr[i].cs_inet_email);
-                                               Put(mortuary, buddy, strlen(buddy), buddy, NULL);
-                                       }
+                       if (xmpp_is_visible(&cptr[i], CC)) {
+                               if (mortuary) {
+                                       char *buddy = strdup(cptr[i].cs_inet_email);
+                                       Put(mortuary, buddy, strlen(buddy), buddy, NULL);
                                }
                        }
                }
@@ -337,21 +348,46 @@ void xmpp_massacre_roster(void)
  * Stupidly, XMPP does not specify a way to tell the client to flush its client-side roster
  * and prepare to receive a new one.  So instead we remember every buddy we've ever told the
  * client about, and push delete operations out at the beginning of a session.
+ * 
+ * We omit any users who happen to be online right now, but we still keep them in the mortuary,
+ * which needs to be maintained as a list of every buddy the user has ever seen.  We don't know
+ * when they're connecting from the same client and when they're connecting from a different client,
+ * so we have no guarantee of what is in the client side roster at connect time.
  */
 void xmpp_delete_old_buddies_who_no_longer_exist_from_the_client_roster(void)
 {
        long len;
        void *Value;
        const char *Key;
+       struct CitContext *cptr;
+       int nContexts, i;
+       int online_now = 0;
        HashList *mortuary = xmpp_fetch_mortuary();
        HashPos *HashPos = GetNewHashPos(mortuary, 0);
 
-       CtdlLogPrintf(CTDL_DEBUG, "\033[32mHAHA\033[0m\n");
+       /* we need to omit anyone who is currently online */
+       cptr = CtdlGetContextArray(&nContexts);
+
+       /* go through the list of users in the mortuary... */
        while (GetNextHashPos(mortuary, HashPos, &len, &Key, &Value) != 0)
        {
-               CtdlLogPrintf(CTDL_DEBUG, "\033[31mDELETE: %s\033[0m\n", (char *)Value);
+
+               online_now = 0;
+               if (cptr) for (i=0; i<nContexts; i++) {
+                       if (xmpp_is_visible(&cptr[i], CC)) {
+                               if (!strcasecmp(cptr[i].cs_inet_email, (char *)Value)) {
+                                       online_now = 1;
+                               }
+                       }
+               }
+
+               if (!online_now) {
+                       xmpp_destroy_buddy((char *)Value);
+               }
+
        }
-       CtdlLogPrintf(CTDL_DEBUG, "\033[32mHOHO\033[0m\n");
        DeleteHashPos(&HashPos);
        DeleteHash(&mortuary);
+       free(cptr);
 }
+