biboumi_component.cpp 32.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 <biboumi.h>
20

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

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

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

30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45
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"
    };


46
BiboumiComponent::BiboumiComponent(std::shared_ptr<Poller>& poller, const std::string& hostname, const std::string& secret):
47
  XmppComponent(poller, hostname, secret),
48 49
  irc_server_adhoc_commands_handler(*this),
  irc_channel_adhoc_commands_handler(*this)
50 51 52 53 54 55 56 57
{
  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));

58 59 60
  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});
61
  this->adhoc_commands_handler.add_command("disconnect-from-irc-server", {{&DisconnectUserFromServerStep1, &DisconnectUserFromServerStep2, &DisconnectUserFromServerStep3}, "Disconnect from the selected IRC servers", false});
62
  this->adhoc_commands_handler.add_command("reload", {{&Reload}, "Reload biboumi’s configuration", true});
63

64 65 66 67 68 69
  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);

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

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

79 80
  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});
81
#endif
82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106
}

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)
{
107
  std::string from_str = stanza.get_tag("from");
108 109 110 111 112
  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
113
  if (from_str.empty())
114 115 116 117 118 119
    {
      log_warning("Received an invalid presence stanza: tag 'from' is missing.");
      return;
    }
  if (to_str.empty())
    {
120
      this->send_stanza_error("presence", from_str, this->served_hostname, id,
121 122 123 124
                              "modify", "bad-request", "Missing 'to' tag");
      return;
    }

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

  // 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
138
  utils::ScopeGuard stanza_error([this, &from_str, &to_str, &id, &error_type, &error_name](){
139
      this->send_stanza_error("presence", from_str, to_str, id,
140 141 142
                              error_type, error_name, "");
        });

143
  try {
144
  if (iid.type == Iid::Type::Channel && !iid.get_server().empty())
145 146 147 148 149 150
    { // 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)
151
            bridge->send_irc_nick_change(iid, to.resource, from.resource);
152 153
          const XmlNode* x = stanza.get_child("x", MUC_NS);
          const XmlNode* password = x ? x->get_child("password", MUC_NS): nullptr;
154 155
          bridge->join_irc_channel(iid, to.resource, password ? password->get_inner(): "",
                                   from.resource);
156 157 158
        }
      else if (type == "unavailable")
        {
159
          const XmlNode* status = stanza.get_child("status", COMPONENT_NS);
160
          bridge->leave_irc_channel(std::move(iid), status ? status->get_inner() : "", from.resource);
161 162
        }
    }
louiz’'s avatar
louiz’ committed
163 164 165 166 167 168 169 170 171
  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());
        }

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

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

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

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

  try {                         // catch IRCNotConnected exceptions
215
  if (type == "groupchat" && iid.type == Iid::Type::Channel)
216 217 218 219 220
    {
      if (body && !body->get_inner().empty())
        {
          bridge->send_channel_message(iid, body->get_inner());
        }
221
      const XmlNode* subject = stanza.get_child("subject", COMPONENT_NS);
222 223 224 225 226 227 228
      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
229
      // them, we purge (we disconnect that resource from all the IRC servers)
230 231 232 233 234 235 236 237 238 239
      // 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)
240
        bridge->remove_resource(from.resource, "Error from remote client");
241 242 243 244 245 246
    }
  else if (type == "chat")
    {
      if (body && !body->get_inner().empty())
        {
          // a message for nick!server
247
          if (iid.type == Iid::Type::User && !iid.get_local().empty())
248 249 250 251
            {
              bridge->send_private_message(iid, body->get_inner());
              bridge->remove_preferred_from_jid(iid.get_local());
            }
252
          else if (iid.type != Iid::Type::User && !to.resource.empty())
253 254 255
            { // a message for chan%server@biboumi/Nick or
              // server@biboumi/Nick
              // Convert that into a message to nick!server
256
              Iid user_iid(utils::tolower(to.resource), iid.get_server(), Iid::Type::User);
257 258 259
              bridge->send_private_message(user_iid, body->get_inner());
              bridge->set_preferred_from_jid(user_iid.get_local(), to_str);
            }
260
          else if (iid.type == Iid::Type::Server)
louiz’'s avatar
louiz’ committed
261 262 263 264
            { // 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());
            }
265 266
        }
    }
267 268 269 270 271 272 273 274 275 276 277 278 279
  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);
              }
          }

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

// We MUST return an iq, whatever happens, except if the type is
291
// "result" or "error".
292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308
// 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");

309 310
  if (from.empty()) {
    log_warning("Received an iq without a 'from'. Ignoring.");
311
    return;
312
  }
313 314 315 316 317 318 319 320 321 322 323 324 325 326
  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
327
  utils::ScopeGuard stanza_error([this, &from, &to_str, &id, &error_type, &error_name](){
328 329 330
      this->send_stanza_error("iq", from, to_str, id,
                              error_type, error_name, "");
    });
331
  try {
332 333
  if (type == "set")
    {
334
      const XmlNode* query;
335 336 337 338 339 340 341 342 343 344
      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())
                {
345
                  Iid iid(to.local, {});
346 347 348
                  if (role == "none")
                    {               // This is a kick
                      std::string reason;
349
                      const XmlNode* reason_el = child->get_child("reason", MUC_ADMIN_NS);
350 351 352 353 354
                      if (reason_el)
                        reason = reason_el->get_inner();
                      bridge->send_irc_kick(iid, nick, reason, id, from);
                    }
                  else
355
                    bridge->forward_affiliation_role_change(iid, from, nick, affiliation, role, id);
356 357 358 359 360 361 362 363
                  stanza_error.disable();
                }
            }
        }
      else if ((query = stanza.get_child("command", ADHOC_NS)))
        {
          Stanza response("iq");
          response["to"] = from;
364
          response["from"] = to_str;
365
          response["id"] = id;
366 367 368

          // Depending on the 'to' jid in the request, we use one adhoc
          // command handler or an other
369
          Iid iid(to.local, {});
370
          AdhocCommandsHandler* adhoc_handler;
371
          if (to.local.empty())
372
            adhoc_handler = &this->adhoc_commands_handler;
373 374 375 376 377 378 379
          else
          {
            if (iid.type == Iid::Type::Server)
              adhoc_handler = &this->irc_server_adhoc_commands_handler;
            else
              adhoc_handler = &this->irc_channel_adhoc_commands_handler;
          }
380 381 382
          // 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);
383 384 385 386 387 388 389 390
          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();
        }
391 392 393 394 395 396 397
#ifdef USE_DATABASE
      else if ((query = stanza.get_child("query", MAM_NS)))
        {
          if (this->handle_mam_request(stanza))
            stanza_error.disable();
        }
#endif
398 399 400
    }
  else if (type == "get")
    {
401
      const XmlNode* query;
402 403
      if ((query = stanza.get_child("query", DISCO_INFO_NS)))
        { // Disco info
louiz’'s avatar
louiz’ committed
404
          Iid iid(to.local, {'#', '&'});
405
          const std::string node = query->get_tag("node");
406 407 408 409 410 411 412 413 414
          if (to_str == this->served_hostname)
            {
              if (node.empty())
                {
                  // On the gateway itself
                  this->send_self_disco_info(id, from);
                  stanza_error.disable();
                }
            }
415 416 417 418 419 420 421 422
          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
423 424
          else if (iid.type == Iid::Type::Channel)
            {
louiz’'s avatar
louiz’ committed
425 426 427 428 429 430 431
              log_debug("type_channel");
              if (node.empty())
                {
                  this->send_irc_channel_disco_info(id, from, to_str);
                  stanza_error.disable();
                }
              else if (node == MUC_TRAFFIC_NS)
louiz’'s avatar
louiz’ committed
432 433
                {
                  this->send_irc_channel_muc_traffic_info(id, from, to_str);
louiz’'s avatar
louiz’ committed
434
                  stanza_error.disable();
louiz’'s avatar
louiz’ committed
435 436
                }
            }
437 438 439
        }
      else if ((query = stanza.get_child("query", VERSION_NS)))
        {
440
          Iid iid(to.local, bridge);
441 442
          if ((iid.type == Iid::Type::Channel && !to.resource.empty()) ||
              (iid.type == Iid::Type::User))
443 444 445
            {
              // Get the IRC user version
              std::string target;
446
              if (iid.type == Iid::Type::User)
447 448 449 450 451 452 453 454 455 456 457 458 459 460 461
                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)))
        {
462
          Iid iid(to.local, bridge);
463 464 465
          const std::string node = query->get_tag("node");
          if (node == ADHOC_NS)
            {
466
              Jid from_jid(from);
467 468 469 470
              if (to.local.empty())
                {               // Get biboumi's adhoc commands
                  this->send_adhoc_commands_list(id, from, this->served_hostname,
                                                 (Config::get("admin", "") ==
471
                                                  from_jid.bare()),
472 473 474
                                                 this->adhoc_commands_handler);
                  stanza_error.disable();
                }
475
              else if (iid.type == Iid::Type::Server)
476 477 478
                {               // Get the server's adhoc commands
                  this->send_adhoc_commands_list(id, from, to_str,
                                                 (Config::get("admin", "") ==
479
                                                  from_jid.bare()),
480 481 482
                                                 this->irc_server_adhoc_commands_handler);
                  stanza_error.disable();
                }
483
              else if (iid.type == Iid::Type::Channel)
484 485 486 487 488 489 490
                {               // 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();
                }
491
            }
492
          else if (node.empty() && iid.type == Iid::Type::Server)
493
            { // Disco on an IRC server: get the list of channels
494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509
              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));
510 511 512 513 514
              stanza_error.disable();
            }
        }
      else if ((query = stanza.get_child("ping", PING_NS)))
        {
515 516
          Iid iid(to.local, bridge);
          if (iid.type == Iid::Type::User)
517 518 519 520
            { // 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);
            }
521
          else if (iid.type == Iid::Type::Channel && !to.resource.empty())
522 523 524 525 526 527 528 529 530 531 532 533 534 535 536
            { // 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();
537
      const XmlNode* query;
538 539
      if ((query = stanza.get_child("query", VERSION_NS)))
        {
540 541 542
          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);
543 544 545 546 547 548 549 550 551
          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();
552
          const Iid iid(to.local, bridge);
553 554 555 556 557 558 559 560 561 562 563 564
          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);
            }
        }
    }
565 566 567 568
  else if (type == "error")
    {
      stanza_error.disable();
    }
569 570 571 572 573 574 575 576 577 578
  }
  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;
    }
579 580 581 582
  error_type = "cancel";
  error_name = "feature-not-implemented";
}

583 584 585 586 587 588 589 590 591 592
#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, {'#', '&'});
593
    if (query && iid.type == Iid::Type::Channel && to.resource.empty())
594
      {
595
        const std::string query_id = query->get_tag("queryid");
596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622
        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())
623
            this->send_archived_message(line, to.full(), from.full(), query_id);
624
        }
625 626 627 628 629 630 631 632 633
        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)
{
634 635
  Stanza message("message");
  {
636 637 638
    message["from"] = from;
    message["to"] = to;

639
    XmlSubNode result(message, "result");
640
    result["xmlns"] = MAM_NS;
641 642
    if (!queryid.empty())
      result["queryid"] = queryid;
643 644
    result["id"] = log_line.uuid.value();

645
    XmlSubNode forwarded(result, "forwarded");
646 647
    forwarded["xmlns"] = FORWARD_NS;

648
    XmlSubNode delay(forwarded, "delay");
649 650 651
    delay["xmlns"] = DELAY_NS;
    delay["stamp"] = utils::to_string(log_line.date.value().timeStamp());

652
    XmlSubNode submessage(forwarded, "message");
653 654 655 656
    submessage["xmlns"] = CLIENT_NS;
    submessage["from"] = from + "/" + log_line.nick.value();
    submessage["type"] = "groupchat";

657
    XmlSubNode body(submessage, "body");
658
    body.set_inner(log_line.body.value());
659 660
  }
  this->send_stanza(message);
661 662 663 664
}

#endif

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

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

louiz’'s avatar
louiz’ committed
691
std::vector<Bridge*> BiboumiComponent::get_bridges() const
692
{
louiz’'s avatar
louiz’ committed
693
  std::vector<Bridge*> res;
694 695 696 697 698 699 700 701
  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");
702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718
  {
    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;
      }
  }
719 720 721
  this->send_stanza(iq);
}

722 723 724 725
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");
726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742
  {
    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;
      }
  }
743 744 745
  this->send_stanza(iq);
}

746
void BiboumiComponent::send_irc_channel_muc_traffic_info(const std::string& id, const std::string& jid_to, const std::string& jid_from)
louiz’'s avatar
louiz’ committed
747 748
{
  Stanza iq("iq");
749 750 751 752 753 754 755 756 757 758 759 760
  {
    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
761 762 763
  this->send_stanza(iq);
}

louiz’'s avatar
louiz’ committed
764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789
void BiboumiComponent::send_irc_channel_disco_info(const std::string& id, const std::string& jid_to, const std::string& jid_from)
{
  log_debug("jid_from: ", jid_from);
  Jid from(jid_from);
  Iid iid(from.local, {});
  Stanza iq("iq");
  {
    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 channel "s + iid.get_local() + " from server " + iid.get_server() + " over biboumi";
    for (const char *ns: {DISCO_INFO_NS, MUC_NS, ADHOC_NS, PING_NS, MAM_NS, VERSION_NS})
      {
        XmlSubNode feature(query, "feature");
        feature["var"] = ns;
      }
  }
  this->send_stanza(iq);
}

790
void BiboumiComponent::send_ping_request(const std::string& from,
791 792
                                         const std::string& jid_to,
                                         const std::string& id)
793 794
{
  Stanza iq("iq");
795 796 797 798 799 800 801 802
  {
    iq["type"] = "get";
    iq["id"] = id;
    iq["from"] = from + "@" + this->served_hostname;
    iq["to"] = jid_to;
    XmlSubNode ping(iq, "ping");
    ping["xmlns"] = PING_NS;
  }
803 804 805 806 807 808 809 810 811 812 813
  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
814
        bridge->send_irc_ping_result({from, bridge}, id);
815 816 817 818
    };
  this->waiting_iq[id] = result_cb;
}

819 820 821 822 823
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)
824 825
{
  Stanza iq("iq");
826 827 828 829 830 831 832
  {
    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;
833 834

    for (auto it = begin; it != end; ++it)
835 836
      {
        XmlSubNode item(query, "item");
837
        item["jid"] = it->channel + "@" + this->served_hostname;
838
      }
839

840 841 842 843
    if ((rs_info.max >= 0 || !rs_info.after.empty() || !rs_info.before.empty()))
      {
        XmlSubNode set_node(query, "set");
        set_node["xmlns"] = RSM_NS;
844

845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862
        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()));
          }
      }
  }
863 864
  this->send_stanza(iq);
}
louiz’'s avatar
louiz’ committed
865 866 867 868 869 870

void BiboumiComponent::send_invitation(const std::string& room_target,
                                       const std::string& jid_to,
                                       const std::string& author_nick)
{
  Stanza message("message");
871 872 873 874 875 876 877 878 879 880 881
  {
    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
882 883
  this->send_stanza(message);
}
louiz’'s avatar
louiz’ committed
884 885 886 887 888 889 890 891 892 893 894 895 896

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)
{
897
  Stanza presence("presence");
louiz’'s avatar
louiz’ committed
898 899 900 901 902 903
  presence["from"] = from;
  presence["to"] = to;
  presence["id"] = this->next_id();
  presence["type"] = "subscribe";
  this->send_stanza(presence);
}