* Renamed the 'jabber' module to 'xmpp' module. Also renamed functions starting...
[citadel.git] / citadel / modules / xmpp / xmpp_messages.c
diff --git a/citadel/modules/xmpp/xmpp_messages.c b/citadel/modules/xmpp/xmpp_messages.c
new file mode 100644 (file)
index 0000000..5ea435d
--- /dev/null
@@ -0,0 +1,122 @@
+/*
+ * $Id$ 
+ *
+ * Handle messages sent and received using XMPP (Jabber) protocol
+ *
+ * Copyright (c) 2007-2009 by Art Cancro
+ *
+ *  This program is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 3 of the License, or
+ *  (at your option) any later version.
+ *
+ *  This program is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License
+ *  along with this program; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ *
+ */
+
+#include "sysdep.h"
+#include <stdlib.h>
+#include <unistd.h>
+#include <stdio.h>
+#include <fcntl.h>
+#include <signal.h>
+#include <pwd.h>
+#include <errno.h>
+#include <sys/types.h>
+
+#if TIME_WITH_SYS_TIME
+# include <sys/time.h>
+# include <time.h>
+#else
+# if HAVE_SYS_TIME_H
+#  include <sys/time.h>
+# else
+#  include <time.h>
+# endif
+#endif
+
+#include <sys/wait.h>
+#include <string.h>
+#include <limits.h>
+#include <ctype.h>
+#include <expat.h>
+#include <libcitadel.h>
+#include "citadel.h"
+#include "server.h"
+#include "citserver.h"
+#include "support.h"
+#include "config.h"
+#include "internet_addressing.h"
+#include "md5.h"
+#include "ctdl_module.h"
+#include "serv_xmpp.h"
+
+
+/*
+ * This function is called by the XMPP service's async loop.
+ * If the client session has instant messages waiting, it outputs
+ * unsolicited XML stanzas containing them.
+ */
+void xmpp_output_incoming_messages(void) {
+
+       struct ExpressMessage *ptr;
+
+       while (CC->FirstExpressMessage != NULL) {
+
+               begin_critical_section(S_SESSION_TABLE);
+               ptr = CC->FirstExpressMessage;
+               CC->FirstExpressMessage = CC->FirstExpressMessage->next;
+               end_critical_section(S_SESSION_TABLE);
+
+               cprintf("<message to=\"%s\" from=\"%s\" type=\"chat\">",
+                       XMPP->client_jid,
+                       ptr->sender_email);
+               if (ptr->text != NULL) {
+                       striplt(ptr->text);
+                       cprintf("<body>%s</body>", ptr->text);
+                       free(ptr->text);
+               }
+               cprintf("</message>");
+               free(ptr);
+       }
+}
+
+/*
+ * Client is sending a message.
+ */
+void xmpp_send_message(char *message_to, char *message_body) {
+       char *recp = NULL;
+       int message_sent = 0;
+       struct CitContext *cptr;
+
+       if (message_body == NULL) return;
+       if (message_to == NULL) return;
+       if (IsEmptyStr(message_to)) return;
+       if (!CC->logged_in) return;
+
+       for (cptr = ContextList; cptr != NULL; cptr = cptr->next) {
+               if (    (cptr->logged_in)
+                       && (cptr->can_receive_im)
+                       && (!strcasecmp(cptr->cs_inet_email, message_to))
+               ) {
+                       recp = cptr->user.fullname;
+               }
+       }
+
+       if (recp) {
+               message_sent = PerformXmsgHooks(CC->user.fullname, CC->cs_inet_email, recp, message_body);
+       }
+
+       free(XMPP->message_body);
+       XMPP->message_body = NULL;
+       XMPP->message_to[0] = 0;
+       time(&CC->lastidle);
+}
+