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"
48 #include "ctdl_module.h"
49 #include "serv_xmpp.h"
53 * Output a single roster item, for roster queries or pushes
55 void xmpp_roster_item(struct CitContext *cptr) {
59 cprintf("<item jid=\"%s\" name=\"%s\" subscription=\"both\">",
60 xmlesc(xmlbuf1, cptr->cs_principal_id, sizeof xmlbuf1),
61 xmlesc(xmlbuf2, cptr->user.fullname, sizeof xmlbuf2)
63 cprintf("<group>%s</group>", xmlesc(xmlbuf1, CtdlGetConfigStr("c_humannode"), sizeof xmlbuf1));
69 * Return the results for a "jabber:iq:roster:query"
71 * Since we are not yet managing a roster, we simply return the entire wholist
72 * (minus any entries for this user -- don't tell me about myself)
75 void xmpp_iq_roster_query(void)
77 struct CitContext *cptr;
80 syslog(LOG_DEBUG, "xmpp: roster push!");
81 cprintf("<query xmlns=\"jabber:iq:roster\">");
82 cptr = CtdlGetContextArray(&nContexts);
84 for (i=0; i<nContexts; i++) {
85 if (xmpp_is_visible(&cptr[i], CC)) {
86 syslog(LOG_DEBUG, "xmpp: rosterizing %s", cptr[i].user.fullname);
87 xmpp_roster_item(&cptr[i]);
97 * Client is doing a namespace query. These are all handled differently.
99 void xmpp_query_namespace(char *iq_id, char *iq_from, char *iq_to, char *query_xmlns)
101 int supported_namespace = 0;
102 int roster_query = 0;
104 int reply_must_be_from_my_jid = 0;
106 /* We need to know before we begin the response whether this is a supported namespace, so
107 * unfortunately all supported namespaces need to be defined here *and* down below where
111 (!strcasecmp(query_xmlns, "jabber:iq:roster:query"))
112 || (!strcasecmp(query_xmlns, "jabber:iq:auth:query"))
113 || (!strcasecmp(query_xmlns, "http://jabber.org/protocol/disco#items:query"))
114 || (!strcasecmp(query_xmlns, "http://jabber.org/protocol/disco#info:query"))
116 supported_namespace = 1;
119 syslog(LOG_DEBUG, "xmpp: xmpp_query_namespace(id=%s, from=%s, to=%s, xmlns=%s)", iq_id, iq_from, iq_to, query_xmlns);
122 * Beginning of query result.
125 if (!strcasecmp(query_xmlns, "jabber:iq:roster:query")) {
126 reply_must_be_from_my_jid = 1;
129 char dom[1024]; // client is expecting to see the reply
130 if (reply_must_be_from_my_jid) { // coming "from" the user's jid
131 safestrncpy(dom, XMPP->client_jid, sizeof(dom));
132 char *slash = strchr(dom, '/');
138 safestrncpy(dom, XMPP->client_jid, sizeof(dom)); // client is expecting to see the reply
139 if (IsEmptyStr(dom)) { // coming "from" the domain of the user's jid
140 safestrncpy(dom, XMPP->server_name, sizeof(dom));
142 char *at = strrchr(dom, '@');
146 char *slash = strchr(dom, '/');
152 if (supported_namespace) {
153 cprintf("<iq type=\"result\" from=\"%s\" ", xmlesc(xmlbuf, dom, sizeof xmlbuf) );
156 cprintf("<iq type=\"error\" from=\"%s\" ", xmlesc(xmlbuf, dom, sizeof xmlbuf) );
158 if (!IsEmptyStr(iq_from)) {
159 cprintf("to=\"%s\" ", xmlesc(xmlbuf, iq_from, sizeof xmlbuf));
161 cprintf("id=\"%s\">", xmlesc(xmlbuf, iq_id, sizeof xmlbuf));
164 * Is this a query we know how to handle?
167 if (!strcasecmp(query_xmlns, "jabber:iq:roster:query")) {
169 xmpp_iq_roster_query();
172 else if (!strcasecmp(query_xmlns, "jabber:iq:auth:query")) {
173 cprintf("<query xmlns=\"jabber:iq:auth\">"
174 "<username/><password/><resource/>"
179 // Extension "xep-0030" (http://xmpp.org/extensions/xep-0030.html) (return an empty set of results)
180 else if (!strcasecmp(query_xmlns, "http://jabber.org/protocol/disco#items:query")) {
181 cprintf("<query xmlns=\"%s\"/>", xmlesc(xmlbuf, query_xmlns, sizeof xmlbuf));
184 // Extension "xep-0030" (http://xmpp.org/extensions/xep-0030.html) (return an empty set of results)
185 else if (!strcasecmp(query_xmlns, "http://jabber.org/protocol/disco#info:query")) {
186 cprintf("<query xmlns=\"%s\"/>", xmlesc(xmlbuf, query_xmlns, sizeof xmlbuf));
190 * If we didn't hit any known query namespaces then we should deliver a
191 * "service unavailable" error (see RFC3921 section 2.4 and 11.1.5.4)
195 syslog(LOG_DEBUG, "xmpp: unknown query namespace '%s' - returning <service-unavailable/>", query_xmlns);
196 cprintf("<error code=\"503\" type=\"cancel\">"
197 "<service-unavailable xmlns=\"urn:ietf:params:xml:ns:xmpp-stanzas\"/>"
204 /* If we told the client who is on the roster, we also need to tell the client
205 * who is *not* on the roster. (It's down here because we can't do it in the same
206 * stanza; this will be an unsolicited push.)
209 xmpp_delete_old_buddies_who_no_longer_exist_from_the_client_roster();