biboumi_component.cpp 31.2 KB
Newer Older
1 2 3 4 5 6 7
#include <xmpp/biboumi_component.hpp>

#include <utils/timed_events.hpp>
#include <utils/scopeguard.hpp>
#include <utils/tolower.hpp>
#include <logger/logger.hpp>
#include <xmpp/adhoc_command.hpp>
8
#include <xmpp/biboumi_adhoc_commands.hpp>
9 10
#include <bridge/list_element.hpp>
#include <config/config.hpp>
11 12
#include <utils/time.hpp>
#include <xmpp/jid.hpp>
13 14 15 16

#include <stdexcept>
#include <iostream>

17
#include <cstdlib>
18 19

#include <louloulibs.h>
20
#include <biboumi.h>
21

22
#include <uuid/uuid.h>
23 24 25 26 27

#ifdef SYSTEMD_FOUND
# include <systemd/sd-daemon.h>
#endif

28
#include <database/database.hpp>
29
#include <bridge/result_set_management.hpp>
30

31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47
using namespace std::string_literals;

static std::set<std::string> kickable_errors{
    "gone",
    "internal-server-error",
    "item-not-found",
    "jid-malformed",
    "recipient-unavailable",
    "redirect",
    "remote-server-not-found",
    "remote-server-timeout",
    "service-unavailable",
    "malformed-error"
    };


BiboumiComponent::BiboumiComponent(std::shared_ptr<Poller> poller, const std::string& hostname, const std::string& secret):
48
  XmppComponent(poller, hostname, secret),
49 50
  irc_server_adhoc_commands_handler(*this),
  irc_channel_adhoc_commands_handler(*this)
51 52 53 54 55 56 57 58
{
  this->stanza_handlers.emplace("presence",
                                std::bind(&BiboumiComponent::handle_presence, this,std::placeholders::_1));
  this->stanza_handlers.emplace("message",
                                std::bind(&BiboumiComponent::handle_message, this,std::placeholders::_1));
  this->stanza_handlers.emplace("iq",
                                std::bind(&BiboumiComponent::handle_iq, this,std::placeholders::_1));

59 60 61
  this->adhoc_commands_handler.add_command("ping", {{&PingStep1}, "Do a ping", false});
  this->adhoc_commands_handler.add_command("hello", {{&HelloStep1, &HelloStep2}, "Receive a custom greeting", false});
  this->adhoc_commands_handler.add_command("disconnect-user", {{&DisconnectUserStep1, &DisconnectUserStep2}, "Disconnect selected users from the gateway", true});
62
  this->adhoc_commands_handler.add_command("disconnect-from-irc-server", {{&DisconnectUserFromServerStep1, &DisconnectUserFromServerStep2, &DisconnectUserFromServerStep3}, "Disconnect from the selected IRC servers", false});
63
  this->adhoc_commands_handler.add_command("reload", {{&Reload}, "Reload biboumi’s configuration", true});
64

65 66 67 68 69 70
  AdhocCommand get_irc_connection_info{{&GetIrcConnectionInfoStep1}, "Returns various information about your connection to this IRC server.", false};
  if (!Config::get("fixed_irc_server", "").empty())
    this->adhoc_commands_handler.add_command("get-irc-connection-info", get_irc_connection_info);
  else
    this->irc_server_adhoc_commands_handler.add_command("get-irc-connection-info", get_irc_connection_info);

71 72
#ifdef USE_DATABASE
  AdhocCommand configure_server_command({&ConfigureIrcServerStep1, &ConfigureIrcServerStep2}, "Configure a few settings for that IRC server", false);
73
  AdhocCommand configure_global_command({&ConfigureGlobalStep1, &ConfigureGlobalStep2}, "Configure a few settings", false);
74

75
  if (!Config::get("fixed_irc_server", "").empty())
76
    this->adhoc_commands_handler.add_command("configure", configure_server_command);
77
  else
78
    this->adhoc_commands_handler.add_command("configure", configure_global_command);
79

80 81
  this->irc_server_adhoc_commands_handler.add_command("configure", configure_server_command);
  this->irc_channel_adhoc_commands_handler.add_command("configure", {{&ConfigureIrcChannelStep1, &ConfigureIrcChannelStep2}, "Configure a few settings for that IRC channel", false});
82
#endif
83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107
}

void BiboumiComponent::shutdown()
{
  for (auto it = this->bridges.begin(); it != this->bridges.end(); ++it)
  {
    it->second->shutdown("Gateway shutdown");
  }
}

void BiboumiComponent::clean()
{
  auto it = this->bridges.begin();
  while (it != this->bridges.end())
  {
    it->second->clean();
    if (it->second->active_clients() == 0)
      it = this->bridges.erase(it);
    else
      ++it;
  }
}

void BiboumiComponent::handle_presence(const Stanza& stanza)
{
108
  std::string from_str = stanza.get_tag("from");
109 110 111 112 113
  std::string id = stanza.get_tag("id");
  std::string to_str = stanza.get_tag("to");
  std::string type = stanza.get_tag("type");

  // Check for mandatory tags
114
  if (from_str.empty())
115 116 117 118 119 120
    {
      log_warning("Received an invalid presence stanza: tag 'from' is missing.");
      return;
    }
  if (to_str.empty())
    {
121
      this->send_stanza_error("presence", from_str, this->served_hostname, id,
122 123 124 125
                              "modify", "bad-request", "Missing 'to' tag");
      return;
    }

126
  Bridge* bridge = this->get_user_bridge(from_str);
127
  Jid to(to_str);
128
  Jid from(from_str);
129
  Iid iid(to.local, bridge);
130 131 132 133 134 135 136 137 138

  // An error stanza is sent whenever we exit this function without
  // disabling this scopeguard.  If error_type and error_name are not
  // changed, the error signaled is internal-server-error. Change their
  // value to signal an other kind of error. For example
  // feature-not-implemented, etc.  Any non-error process should reach the
  // stanza_error.disable() call at the end of the function.
  std::string error_type("cancel");
  std::string error_name("internal-server-error");
louiz’'s avatar
louiz’ committed
139
  utils::ScopeGuard stanza_error([this, &from_str, &to_str, &id, &error_type, &error_name](){
140
      this->send_stanza_error("presence", from_str, to_str, id,
141 142 143
                              error_type, error_name, "");
        });

144
  try {
145
  if (iid.type == Iid::Type::Channel && !iid.get_server().empty())
146 147 148 149 150 151
    { // presence toward a MUC that corresponds to an irc channel, or a
      // dummy channel if iid.chan is empty
      if (type.empty())
        {
          const std::string own_nick = bridge->get_own_nick(iid);
          if (!own_nick.empty() && own_nick != to.resource)
152
            bridge->send_irc_nick_change(iid, to.resource, from.resource);
153 154
          const XmlNode* x = stanza.get_child("x", MUC_NS);
          const XmlNode* password = x ? x->get_child("password", MUC_NS): nullptr;
155 156
          bridge->join_irc_channel(iid, to.resource, password ? password->get_inner(): "",
                                   from.resource);
157 158 159
        }
      else if (type == "unavailable")
        {
160
          const XmlNode* status = stanza.get_child("status", COMPONENT_NS);
161
          bridge->leave_irc_channel(std::move(iid), status ? status->get_inner() : "", from.resource);
162 163
        }
    }
louiz’'s avatar
louiz’ committed
164 165 166 167 168 169 170 171 172
  else if (iid.type == Iid::Type::Server || iid.type == Iid::Type::None)
    {
      if (type == "subscribe")
        { // Auto-accept any subscription request for an IRC server
          this->accept_subscription(to_str, from.bare());
          this->ask_subscription(to_str, from.bare());
        }

    }
173 174
  else
    {
louiz’'s avatar
louiz’ committed
175
      // A user wants to join an invalid IRC channel, return a presence error to him/her
176
      if (type.empty())
177
        this->send_invalid_room_error(to.local, to.resource, from_str);
178
    }
179 180 181
  }
  catch (const IRCNotConnected& ex)
    {
182 183 184 185 186
      if (type == "unavailable")
        this->send_stanza_error("presence", from_str, to_str, id,
                                "cancel", "remote-server-not-found",
                                "Not connected to IRC server "s + ex.hostname,
                                true);
187
    }
188 189 190 191 192
  stanza_error.disable();
}

void BiboumiComponent::handle_message(const Stanza& stanza)
{
193
  std::string from_str = stanza.get_tag("from");
194 195 196 197
  std::string id = stanza.get_tag("id");
  std::string to_str = stanza.get_tag("to");
  std::string type = stanza.get_tag("type");

198
  if (from_str.empty())
199 200 201
    return;
  if (type.empty())
    type = "normal";
202 203
  Bridge* bridge = this->get_user_bridge(from_str);
  Jid from(from_str);
204
  Jid to(to_str);
205
  Iid iid(to.local, bridge);
206 207 208

  std::string error_type("cancel");
  std::string error_name("internal-server-error");
louiz’'s avatar
louiz’ committed
209
  utils::ScopeGuard stanza_error([this, &from_str, &to_str, &id, &error_type, &error_name](){
210
      this->send_stanza_error("message", from_str, to_str, id,
211 212
                              error_type, error_name, "");
    });
213
  const XmlNode* body = stanza.get_child("body", COMPONENT_NS);
214 215

  try {                         // catch IRCNotConnected exceptions
216
  if (type == "groupchat" && iid.type == Iid::Type::Channel)
217 218 219 220 221
    {
      if (body && !body->get_inner().empty())
        {
          bridge->send_channel_message(iid, body->get_inner());
        }
222
      const XmlNode* subject = stanza.get_child("subject", COMPONENT_NS);
223 224 225 226 227 228 229
      if (subject)
        bridge->set_channel_topic(iid, subject->get_inner());
    }
  else if (type == "error")
    {
      const XmlNode* error = stanza.get_child("error", COMPONENT_NS);
      // Only a set of errors are considered “fatal”. If we encounter one of
230
      // them, we purge (we disconnect that resource from all the IRC servers)
231 232 233 234 235 236 237 238 239 240
      // We consider this to be true, unless the error condition is
      // specified and is not in the kickable_errors set
      bool kickable_error = true;
      if (error && error->has_children())
        {
          const XmlNode* condition = error->get_last_child();
          if (kickable_errors.find(condition->get_name()) == kickable_errors.end())
            kickable_error = false;
        }
      if (kickable_error)
241
        bridge->remove_resource(from.resource, "Error from remote client");
242 243 244 245 246 247
    }
  else if (type == "chat")
    {
      if (body && !body->get_inner().empty())
        {
          // a message for nick!server
248
          if (iid.type == Iid::Type::User && !iid.get_local().empty())
249 250 251 252
            {
              bridge->send_private_message(iid, body->get_inner());
              bridge->remove_preferred_from_jid(iid.get_local());
            }
253
          else if (iid.type != Iid::Type::User && !to.resource.empty())
254 255 256
            { // a message for chan%server@biboumi/Nick or
              // server@biboumi/Nick
              // Convert that into a message to nick!server
257
              Iid user_iid(utils::tolower(to.resource), iid.get_server(), Iid::Type::User);
258 259 260
              bridge->send_private_message(user_iid, body->get_inner());
              bridge->set_preferred_from_jid(user_iid.get_local(), to_str);
            }
261
          else if (iid.type == Iid::Type::Server)
louiz’'s avatar
louiz’ committed
262 263 264 265
            { // Message sent to the server JID
              // Convert the message body into a raw IRC message
              bridge->send_raw_message(iid.get_server(), body->get_inner());
            }
266 267
        }
    }
268 269 270 271 272 273 274 275 276 277 278 279 280
  else if (type == "normal" && iid.type == Iid::Type::Channel)
    {
      if (const XmlNode* x = stanza.get_child("x", MUC_USER_NS))
        if (const XmlNode* invite = x->get_child("invite", MUC_USER_NS))
          {
            const auto invite_to = invite->get_tag("to");
            if (!invite_to.empty())
              {
                bridge->send_irc_invitation(iid, invite_to);
              }
          }

    }
281 282
  } catch (const IRCNotConnected& ex)
    {
283
      this->send_stanza_error("message", from_str, to_str, id,
284 285 286 287
                              "cancel", "remote-server-not-found",
                              "Not connected to IRC server "s + ex.hostname,
                              true);
    }
288 289 290 291
  stanza_error.disable();
}

// We MUST return an iq, whatever happens, except if the type is
292
// "result" or "error".
293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309
// To do this, we use a scopeguard. If an exception is raised somewhere, an
// iq of type error "internal-server-error" is sent. If we handle the
// request properly (by calling a function that registers an iq to be sent
// later, or that directly sends an iq), we disable the ScopeGuard. If we
// reach the end of the function without having disabled the scopeguard, we
// send a "feature-not-implemented" iq as a result.  If an other kind of
// error is found (for example the feature is implemented in biboumi, but
// the request is missing some attribute) we can just change the values of
// error_type and error_name and return from the function (without disabling
// the scopeguard); an iq error will be sent
void BiboumiComponent::handle_iq(const Stanza& stanza)
{
  std::string id = stanza.get_tag("id");
  std::string from = stanza.get_tag("from");
  std::string to_str = stanza.get_tag("to");
  std::string type = stanza.get_tag("type");

310 311
  if (from.empty()) {
    log_warning("Received an iq without a 'from'. Ignoring.");
312
    return;
313
  }
314 315 316 317 318 319 320 321 322 323 324 325 326 327
  if (id.empty() || to_str.empty() || type.empty())
    {
      this->send_stanza_error("iq", from, this->served_hostname, id,
                              "modify", "bad-request", "");
      return;
    }

  Bridge* bridge = this->get_user_bridge(from);
  Jid to(to_str);

  // These two values will be used in the error iq sent if we don't disable
  // the scopeguard.
  std::string error_type("cancel");
  std::string error_name("internal-server-error");
louiz’'s avatar
louiz’ committed
328
  utils::ScopeGuard stanza_error([this, &from, &to_str, &id, &error_type, &error_name](){
329 330 331
      this->send_stanza_error("iq", from, to_str, id,
                              error_type, error_name, "");
    });
332
  try {
333 334
  if (type == "set")
    {
335
      const XmlNode* query;
336 337 338 339 340 341 342 343 344 345
      if ((query = stanza.get_child("query", MUC_ADMIN_NS)))
        {
          const XmlNode* child = query->get_child("item", MUC_ADMIN_NS);
          if (child)
            {
              std::string nick = child->get_tag("nick");
              std::string role = child->get_tag("role");
              std::string affiliation = child->get_tag("affiliation");
              if (!nick.empty())
                {
346
                  Iid iid(to.local, {});
347 348 349
                  if (role == "none")
                    {               // This is a kick
                      std::string reason;
350
                      const XmlNode* reason_el = child->get_child("reason", MUC_ADMIN_NS);
351 352 353 354 355
                      if (reason_el)
                        reason = reason_el->get_inner();
                      bridge->send_irc_kick(iid, nick, reason, id, from);
                    }
                  else
356
                    bridge->forward_affiliation_role_change(iid, from, nick, affiliation, role, id);
357 358 359 360 361 362 363 364
                  stanza_error.disable();
                }
            }
        }
      else if ((query = stanza.get_child("command", ADHOC_NS)))
        {
          Stanza response("iq");
          response["to"] = from;
365
          response["from"] = to_str;
366
          response["id"] = id;
367 368 369

          // Depending on the 'to' jid in the request, we use one adhoc
          // command handler or an other
370
          Iid iid(to.local, {});
371
          AdhocCommandsHandler* adhoc_handler;
372
          if (to.local.empty())
373
            adhoc_handler = &this->adhoc_commands_handler;
374 375 376 377 378 379 380
          else
          {
            if (iid.type == Iid::Type::Server)
              adhoc_handler = &this->irc_server_adhoc_commands_handler;
            else
              adhoc_handler = &this->irc_channel_adhoc_commands_handler;
          }
381 382 383
          // Execute the command, if any, and get a result XmlNode that we
          // insert in our response
          XmlNode inner_node = adhoc_handler->handle_request(from, to_str, *query);
384 385 386 387 388 389 390 391
          if (inner_node.get_child("error", ADHOC_NS))
            response["type"] = "error";
          else
            response["type"] = "result";
          response.add_child(std::move(inner_node));
          this->send_stanza(response);
          stanza_error.disable();
        }
392 393 394 395 396 397 398
#ifdef USE_DATABASE
      else if ((query = stanza.get_child("query", MAM_NS)))
        {
          if (this->handle_mam_request(stanza))
            stanza_error.disable();
        }
#endif
399 400 401
    }
  else if (type == "get")
    {
402
      const XmlNode* query;
403 404
      if ((query = stanza.get_child("query", DISCO_INFO_NS)))
        { // Disco info
louiz’'s avatar
louiz’ committed
405
          Iid iid(to.local, {'#', '&'});
406
          const std::string node = query->get_tag("node");
407 408 409 410 411 412 413 414 415
          if (to_str == this->served_hostname)
            {
              if (node.empty())
                {
                  // On the gateway itself
                  this->send_self_disco_info(id, from);
                  stanza_error.disable();
                }
            }
416 417 418 419 420 421 422 423
          else if (iid.type == Iid::Type::Server)
            {
                if (node.empty())
                {
                    this->send_irc_server_disco_info(id, from, to_str);
                    stanza_error.disable();
                }
            }
louiz’'s avatar
louiz’ committed
424 425 426 427 428
          else if (iid.type == Iid::Type::Channel)
            {
              if (node == MUC_TRAFFIC_NS)
                {
                  this->send_irc_channel_muc_traffic_info(id, from, to_str);
louiz’'s avatar
louiz’ committed
429
                  stanza_error.disable();
louiz’'s avatar
louiz’ committed
430 431
                }
            }
432 433 434
        }
      else if ((query = stanza.get_child("query", VERSION_NS)))
        {
435
          Iid iid(to.local, bridge);
436 437
          if ((iid.type == Iid::Type::Channel && !to.resource.empty()) ||
              (iid.type == Iid::Type::User))
438 439 440
            {
              // Get the IRC user version
              std::string target;
441
              if (iid.type == Iid::Type::User)
442 443 444 445 446 447 448 449 450 451 452 453 454 455 456
                target = iid.get_local();
              else
                target = to.resource;
              bridge->send_irc_version_request(iid.get_server(), target, id,
                                               from, to_str);
            }
          else
            {
              // On the gateway itself or on a channel
              this->send_version(id, from, to_str);
            }
          stanza_error.disable();
        }
      else if ((query = stanza.get_child("query", DISCO_ITEMS_NS)))
        {
457
          Iid iid(to.local, bridge);
458 459 460
          const std::string node = query->get_tag("node");
          if (node == ADHOC_NS)
            {
461
              Jid from_jid(from);
462 463 464 465
              if (to.local.empty())
                {               // Get biboumi's adhoc commands
                  this->send_adhoc_commands_list(id, from, this->served_hostname,
                                                 (Config::get("admin", "") ==
466
                                                  from_jid.bare()),
467 468 469
                                                 this->adhoc_commands_handler);
                  stanza_error.disable();
                }
470
              else if (iid.type == Iid::Type::Server)
471 472 473
                {               // Get the server's adhoc commands
                  this->send_adhoc_commands_list(id, from, to_str,
                                                 (Config::get("admin", "") ==
474
                                                  from_jid.bare()),
475 476 477
                                                 this->irc_server_adhoc_commands_handler);
                  stanza_error.disable();
                }
478
              else if (iid.type == Iid::Type::Channel)
479 480 481 482 483 484 485
                {               // Get the channel's adhoc commands
                  this->send_adhoc_commands_list(id, from, to_str,
                                                 (Config::get("admin", "") ==
                                                  from_jid.bare()),
                                                 this->irc_channel_adhoc_commands_handler);
                  stanza_error.disable();
                }
486
            }
487
          else if (node.empty() && iid.type == Iid::Type::Server)
488
            { // Disco on an IRC server: get the list of channels
489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504
              ResultSetInfo rs_info;
              const XmlNode* set_node = query->get_child("set", RSM_NS);
              if (set_node)
                {
                  const XmlNode* after = set_node->get_child("after", RSM_NS);
                  if (after)
                    rs_info.after = after->get_inner();
                  const XmlNode* before = set_node->get_child("before", RSM_NS);
                  if (before)
                    rs_info.before = before->get_inner();
                  const XmlNode* max = set_node->get_child("max", RSM_NS);
                  if (max)
                    rs_info.max = std::atoi(max->get_inner().data());

                }
              bridge->send_irc_channel_list_request(iid, id, from, std::move(rs_info));
505 506 507 508 509
              stanza_error.disable();
            }
        }
      else if ((query = stanza.get_child("ping", PING_NS)))
        {
510 511
          Iid iid(to.local, bridge);
          if (iid.type == Iid::Type::User)
512 513 514 515
            { // Ping any user (no check on the nick done ourself)
              bridge->send_irc_user_ping_request(iid.get_server(),
                                                 iid.get_local(), id, from, to_str);
            }
516
          else if (iid.type == Iid::Type::Channel && !to.resource.empty())
517 518 519 520 521 522 523 524 525 526 527 528 529 530 531
            { // Ping a room participant (we check if the nick is in the room)
              bridge->send_irc_participant_ping_request(iid,
                                                        to.resource, id, from, to_str);
            }
          else
            { // Ping a channel, a server or the gateway itself
              bridge->on_gateway_ping(iid.get_server(),
                                     id, from, to_str);
            }
          stanza_error.disable();
        }
    }
  else if (type == "result")
    {
      stanza_error.disable();
532
      const XmlNode* query;
533 534
      if ((query = stanza.get_child("query", VERSION_NS)))
        {
535 536 537
          const XmlNode* name_node = query->get_child("name", VERSION_NS);
          const XmlNode* version_node = query->get_child("version", VERSION_NS);
          const XmlNode* os_node = query->get_child("os", VERSION_NS);
538 539 540 541 542 543 544 545 546
          std::string name;
          std::string version;
          std::string os;
          if (name_node)
            name = name_node->get_inner() + " (through the biboumi gateway)";
          if (version_node)
            version = version_node->get_inner();
          if (os_node)
            os = os_node->get_inner();
547
          const Iid iid(to.local, bridge);
548 549 550 551 552 553 554 555 556 557 558 559
          bridge->send_xmpp_version_to_irc(iid, name, version, os);
        }
      else
        {
          const auto it = this->waiting_iq.find(id);
          if (it != this->waiting_iq.end())
            {
              it->second(bridge, stanza);
              this->waiting_iq.erase(it);
            }
        }
    }
560 561 562 563
  else if (type == "error")
    {
      stanza_error.disable();
    }
564 565 566 567 568 569 570 571 572 573
  }
  catch (const IRCNotConnected& ex)
    {
      this->send_stanza_error("iq", from, to_str, id,
                              "cancel", "remote-server-not-found",
                              "Not connected to IRC server "s + ex.hostname,
                              true);
      stanza_error.disable();
      return;
    }
574 575 576 577
  error_type = "cancel";
  error_name = "feature-not-implemented";
}

578 579 580 581 582 583 584 585 586 587
#ifdef USE_DATABASE
bool BiboumiComponent::handle_mam_request(const Stanza& stanza)
{
    std::string id = stanza.get_tag("id");
    Jid from(stanza.get_tag("from"));
    Jid to(stanza.get_tag("to"));

    const XmlNode* query = stanza.get_child("query", MAM_NS);

    Iid iid(to.local, {'#', '&'});
588
    if (query && iid.type == Iid::Type::Channel && to.resource.empty())
589
      {
590
        const std::string query_id = query->get_tag("queryid");
591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617
        std::string start;
        std::string end;
        const XmlNode* x = query->get_child("x", DATAFORM_NS);
        if (x)
          {
            const XmlNode* value;
            const auto fields = x->get_children("field", DATAFORM_NS);
            for (const auto& field: fields)
              {
                if (field->get_tag("var") == "start")
                  {
                    value = field->get_child("value", DATAFORM_NS);
                    if (value)
                      start = value->get_inner();
                  }
                else if (field->get_tag("var") == "end")
                  {
                    value = field->get_child("value", DATAFORM_NS);
                    if (value)
                      end = value->get_inner();
                  }
              }
          }
        const auto lines = Database::get_muc_logs(from.bare(), iid.get_local(), iid.get_server(), -1, start, end);
        for (const db::MucLogLine& line: lines)
        {
          if (!line.nick.value().empty())
618
            this->send_archived_message(line, to.full(), from.full(), query_id);
619
        }
620 621 622 623 624 625 626 627 628
        this->send_iq_result_full_jid(id, from.full(), to.full());
        return true;
      }
  return false;
}

void BiboumiComponent::send_archived_message(const db::MucLogLine& log_line, const std::string& from, const std::string& to,
                                             const std::string& queryid)
{
629 630
  Stanza message("message");
  {
631 632 633
    message["from"] = from;
    message["to"] = to;

634
    XmlSubNode result(message, "result");
635
    result["xmlns"] = MAM_NS;
636 637
    if (!queryid.empty())
      result["queryid"] = queryid;
638 639
    result["id"] = log_line.uuid.value();

640
    XmlSubNode forwarded(result, "forwarded");
641 642
    forwarded["xmlns"] = FORWARD_NS;

643
    XmlSubNode delay(forwarded, "delay");
644 645 646
    delay["xmlns"] = DELAY_NS;
    delay["stamp"] = utils::to_string(log_line.date.value().timeStamp());

647
    XmlSubNode submessage(forwarded, "message");
648 649 650 651
    submessage["xmlns"] = CLIENT_NS;
    submessage["from"] = from + "/" + log_line.nick.value();
    submessage["type"] = "groupchat";

652
    XmlSubNode body(submessage, "body");
653
    body.set_inner(log_line.body.value());
654 655
  }
  this->send_stanza(message);
656 657 658 659
}

#endif

660 661
Bridge* BiboumiComponent::get_user_bridge(const std::string& user_jid)
{
662
  auto bare_jid = Jid{user_jid}.bare();
663 664
  try
    {
665
      return this->bridges.at(bare_jid).get();
666 667 668
    }
  catch (const std::out_of_range& exception)
    {
669
      return this->bridges.emplace(bare_jid, std::make_unique<Bridge>(bare_jid, *this, this->poller)).first->second.get();
670 671 672
    }
}

673
Bridge* BiboumiComponent::find_user_bridge(const std::string& full_jid)
674
{
675
  auto bare_jid = Jid{full_jid}.bare();
676 677
  try
    {
678
      return this->bridges.at(bare_jid).get();
679 680 681 682 683 684 685
    }
  catch (const std::out_of_range& exception)
    {
      return nullptr;
    }
}

louiz’'s avatar
louiz’ committed
686
std::vector<Bridge*> BiboumiComponent::get_bridges() const
687
{
louiz’'s avatar
louiz’ committed
688
  std::vector<Bridge*> res;
689 690 691 692 693 694 695 696
  for (auto it = this->bridges.begin(); it != this->bridges.end(); ++it)
    res.push_back(it->second.get());
  return res;
}

void BiboumiComponent::send_self_disco_info(const std::string& id, const std::string& jid_to)
{
  Stanza iq("iq");
697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713
  {
    iq["type"] = "result";
    iq["id"] = id;
    iq["to"] = jid_to;
    iq["from"] = this->served_hostname;
    XmlSubNode query(iq, "query");
    query["xmlns"] = DISCO_INFO_NS;
    XmlSubNode identity(query, "identity");
    identity["category"] = "conference";
    identity["type"] = "irc";
    identity["name"] = "Biboumi XMPP-IRC gateway";
    for (const char *ns: {DISCO_INFO_NS, MUC_NS, ADHOC_NS, PING_NS, MAM_NS, VERSION_NS})
      {
        XmlSubNode feature(query, "feature");
        feature["var"] = ns;
      }
  }
714 715 716
  this->send_stanza(iq);
}

717 718 719 720
void BiboumiComponent::send_irc_server_disco_info(const std::string& id, const std::string& jid_to, const std::string& jid_from)
{
  Jid from(jid_from);
  Stanza iq("iq");
721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737
  {
    iq["type"] = "result";
    iq["id"] = id;
    iq["to"] = jid_to;
    iq["from"] = jid_from;
    XmlSubNode query(iq, "query");
    query["xmlns"] = DISCO_INFO_NS;
    XmlSubNode identity(query, "identity");
    identity["category"] = "conference";
    identity["type"] = "irc";
    identity["name"] = "IRC server "s + from.local + " over Biboumi";
    for (const char *ns: {DISCO_INFO_NS, ADHOC_NS, PING_NS, VERSION_NS})
      {
        XmlSubNode feature(query, "feature");
        feature["var"] = ns;
      }
  }
738 739 740
  this->send_stanza(iq);
}

louiz’'s avatar
louiz’ committed
741 742 743
void BiboumiComponent::send_irc_channel_muc_traffic_info(const std::string id, const std::string& jid_from, const std::string& jid_to)
{
  Stanza iq("iq");
744 745 746 747 748 749 750 751 752 753 754 755
  {
    iq["type"] = "result";
    iq["id"] = id;
    iq["from"] = jid_from;
    iq["to"] = jid_to;

    XmlSubNode query(iq, "query");
    query["xmlns"] = DISCO_INFO_NS;
    query["node"] = MUC_TRAFFIC_NS;
    // We drop all “special” traffic (like xhtml-im, chatstates, etc), so
    // don’t include any <feature/>
  }
louiz’'s avatar
louiz’ committed
756 757 758
  this->send_stanza(iq);
}

759
void BiboumiComponent::send_ping_request(const std::string& from,
760 761
                                         const std::string& jid_to,
                                         const std::string& id)
762 763
{
  Stanza iq("iq");
764 765 766 767 768 769 770 771
  {
    iq["type"] = "get";
    iq["id"] = id;
    iq["from"] = from + "@" + this->served_hostname;
    iq["to"] = jid_to;
    XmlSubNode ping(iq, "ping");
    ping["xmlns"] = PING_NS;
  }
772 773 774 775 776 777 778 779 780 781 782
  this->send_stanza(iq);

  auto result_cb = [from, id](Bridge* bridge, const Stanza& stanza)
    {
      Jid to(stanza.get_tag("to"));
      if (to.local != from)
        {
          log_error("Received a corresponding ping result, but the 'to' from "
                    "the response mismatches the 'from' of the request");
        }
      else
783
        bridge->send_irc_ping_result({from, bridge}, id);
784 785 786 787
    };
  this->waiting_iq[id] = result_cb;
}

788 789 790 791 792
void BiboumiComponent::send_iq_room_list_result(const std::string& id, const std::string& to_jid,
                                                const std::string& from, const ChannelList& channel_list,
                                                std::vector<ListElement>::const_iterator begin,
                                                std::vector<ListElement>::const_iterator end,
                                                const ResultSetInfo& rs_info)
793 794
{
  Stanza iq("iq");
795 796 797 798 799 800 801
  {
    iq["from"] = from + "@" + this->served_hostname;
    iq["to"] = to_jid;
    iq["id"] = id;
    iq["type"] = "result";
    XmlSubNode query(iq, "query");
    query["xmlns"] = DISCO_ITEMS_NS;
802 803

    for (auto it = begin; it != end; ++it)
804 805
      {
        XmlSubNode item(query, "item");
806
        item["jid"] = it->channel + "@" + this->served_hostname;
807
      }
808

809 810 811 812
    if ((rs_info.max >= 0 || !rs_info.after.empty() || !rs_info.before.empty()))
      {
        XmlSubNode set_node(query, "set");
        set_node["xmlns"] = RSM_NS;
813

814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831
        if (begin != channel_list.channels.cend())
          {
            XmlSubNode first_node(set_node, "first");
            first_node["index"] = std::to_string(std::distance(channel_list.channels.cbegin(), begin));
            first_node.set_inner(begin->channel + "@" + this->served_hostname);
          }
        if (end != channel_list.channels.cbegin())
          {
            XmlSubNode last_node(set_node, "last");
            last_node.set_inner(std::prev(end)->channel + "@" + this->served_hostname);
          }
        if (channel_list.complete)
          {
            XmlSubNode count_node(set_node, "count");
            count_node.set_inner(std::to_string(channel_list.channels.size()));
          }
      }
  }
832 833
  this->send_stanza(iq);
}
louiz’'s avatar
louiz’ committed
834 835 836 837 838 839

void BiboumiComponent::send_invitation(const std::string& room_target,
                                       const std::string& jid_to,
                                       const std::string& author_nick)
{
  Stanza message("message");
840 841 842 843 844 845 846 847 848 849 850
  {
    message["from"] = room_target + "@" + this->served_hostname;
    message["to"] = jid_to;
    XmlSubNode x(message, "x");
    x["xmlns"] = MUC_USER_NS;
    XmlSubNode invite(x, "invite");
    if (author_nick.empty())
      invite["from"] = room_target + "@" + this->served_hostname;
    else
      invite["from"] = room_target + "@" + this->served_hostname + "/" + author_nick;
  }
louiz’'s avatar
louiz’ committed
851 852
  this->send_stanza(message);
}
louiz’'s avatar
louiz’ committed
853 854 855 856 857 858 859 860 861 862 863 864 865

void BiboumiComponent::accept_subscription(const std::string& from, const std::string& to)
{
  Stanza presence("presence");
  presence["from"] = from;
  presence["to"] = to;
  presence["id"] = this->next_id();
  presence["type"] = "subscribed";
  this->send_stanza(presence);
}

void BiboumiComponent::ask_subscription(const std::string& from, const std::string& to)
{
866
  Stanza presence("presence");
louiz’'s avatar
louiz’ committed
867 868 869 870 871 872
  presence["from"] = from;
  presence["to"] = to;
  presence["id"] = this->next_id();
  presence["type"] = "subscribe";
  this->send_stanza(presence);
}