2 * Handle <iq> <get> <query> type situations (namespace queries)
4 * Copyright (c) 2007-2015 by Art Cancro and citadel.org
6 * This program is open source software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 3.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
23 #include <sys/types.h>
25 #if TIME_WITH_SYS_TIME
26 # include <sys/time.h>
30 # include <sys/time.h>
41 #include <libcitadel.h>
44 #include "citserver.h"
47 #include "internet_addressing.h"
49 #include "ctdl_module.h"
50 #include "serv_xmpp.h"
54 * Output a single roster item, for roster queries or pushes
56 void xmpp_roster_item(struct CitContext *cptr) {
60 cprintf("<item jid=\"%s\" name=\"%s\" subscription=\"both\">",
61 xmlesc(xmlbuf1, cptr->cs_inet_email, sizeof xmlbuf1),
62 xmlesc(xmlbuf2, cptr->user.fullname, sizeof xmlbuf2)
64 cprintf("<group>%s</group>", xmlesc(xmlbuf1, CtdlGetConfigStr("c_humannode"), sizeof xmlbuf1));
70 * Return the results for a "jabber:iq:roster:query"
72 * Since we are not yet managing a roster, we simply return the entire wholist
73 * (minus any entries for this user -- don't tell me about myself)
76 void xmpp_iq_roster_query(void)
78 struct CitContext *cptr;
81 syslog(LOG_DEBUG, "xmpp: roster push!");
82 cprintf("<query xmlns=\"jabber:iq:roster\">");
83 cptr = CtdlGetContextArray(&nContexts);
85 for (i=0; i<nContexts; i++) {
86 if (xmpp_is_visible(&cptr[i], CC)) {
87 syslog(LOG_DEBUG, "xmpp: rosterizing %s", cptr[i].user.fullname);
88 xmpp_roster_item(&cptr[i]);
99 * Client is doing a namespace query. These are all handled differently.
101 void xmpp_query_namespace(char *iq_id, char *iq_from, char *iq_to, char *query_xmlns)
103 int supported_namespace = 0;
104 int roster_query = 0;
106 int reply_must_be_from_my_jid = 0;
108 /* We need to know before we begin the response whether this is a supported namespace, so
109 * unfortunately all supported namespaces need to be defined here *and* down below where
113 (!strcasecmp(query_xmlns, "jabber:iq:roster:query"))
114 || (!strcasecmp(query_xmlns, "jabber:iq:auth:query"))
115 || (!strcasecmp(query_xmlns, "http://jabber.org/protocol/disco#items:query"))
116 || (!strcasecmp(query_xmlns, "http://jabber.org/protocol/disco#info:query"))
118 supported_namespace = 1;
121 syslog(LOG_DEBUG, "xmpp: xmpp_query_namespace(id=%s, from=%s, to=%s, xmlns=%s)", iq_id, iq_from, iq_to, query_xmlns);
124 * Beginning of query result.
127 if (!strcasecmp(query_xmlns, "jabber:iq:roster:query")) {
128 reply_must_be_from_my_jid = 1;
131 char dom[1024]; // client is expecting to see the reply
132 if (reply_must_be_from_my_jid) { // coming "from" the user's jid
133 safestrncpy(dom, XMPP->client_jid, sizeof(dom));
134 char *slash = strchr(dom, '/');
140 safestrncpy(dom, XMPP->client_jid, sizeof(dom)); // client is expecting to see the reply
141 if (IsEmptyStr(dom)) { // coming "from" the domain of the user's jid
142 safestrncpy(dom, XMPP->server_name, sizeof(dom));
144 char *at = strrchr(dom, '@');
148 char *slash = strchr(dom, '/');
154 if (supported_namespace) {
155 cprintf("<iq type=\"result\" from=\"%s\" ", xmlesc(xmlbuf, dom, sizeof xmlbuf) );
158 cprintf("<iq type=\"error\" from=\"%s\" ", xmlesc(xmlbuf, dom, sizeof xmlbuf) );
160 if (!IsEmptyStr(iq_from)) {
161 cprintf("to=\"%s\" ", xmlesc(xmlbuf, iq_from, sizeof xmlbuf));
163 cprintf("id=\"%s\">", xmlesc(xmlbuf, iq_id, sizeof xmlbuf));
166 * Is this a query we know how to handle?
169 if (!strcasecmp(query_xmlns, "jabber:iq:roster:query")) {
171 xmpp_iq_roster_query();
174 else if (!strcasecmp(query_xmlns, "jabber:iq:auth:query")) {
175 cprintf("<query xmlns=\"jabber:iq:auth\">"
176 "<username/><password/><resource/>"
181 // Extension "xep-0030" (http://xmpp.org/extensions/xep-0030.html) (return an empty set of results)
182 else if (!strcasecmp(query_xmlns, "http://jabber.org/protocol/disco#items:query")) {
183 cprintf("<query xmlns=\"%s\"/>", xmlesc(xmlbuf, query_xmlns, sizeof xmlbuf));
186 // Extension "xep-0030" (http://xmpp.org/extensions/xep-0030.html) (return an empty set of results)
187 else if (!strcasecmp(query_xmlns, "http://jabber.org/protocol/disco#info:query")) {
188 cprintf("<query xmlns=\"%s\"/>", xmlesc(xmlbuf, query_xmlns, sizeof xmlbuf));
192 * If we didn't hit any known query namespaces then we should deliver a
193 * "service unavailable" error (see RFC3921 section 2.4 and 11.1.5.4)
197 syslog(LOG_DEBUG, "xmpp: unknown query namespace '%s' - returning <service-unavailable/>", query_xmlns);
198 cprintf("<error code=\"503\" type=\"cancel\">"
199 "<service-unavailable xmlns=\"urn:ietf:params:xml:ns:xmpp-stanzas\"/>"
206 /* If we told the client who is on the roster, we also need to tell the client
207 * who is *not* on the roster. (It's down here because we can't do it in the same
208 * stanza; this will be an unsolicited push.)
211 xmpp_delete_old_buddies_who_no_longer_exist_from_the_client_roster();