biboumi_adhoc_commands.cpp 31.1 KB
Newer Older
1
#include <xmpp/biboumi_adhoc_commands.hpp>
2
#include <xmpp/biboumi_component.hpp>
3
4
#include <utils/scopeguard.hpp>
#include <bridge/bridge.hpp>
5
#include <config/config.hpp>
6
#include <utils/string.hpp>
7
#include <utils/split.hpp>
8
#include <xmpp/jid.hpp>
louiz’'s avatar
louiz’ committed
9
#include <algorithm>
louiz’'s avatar
louiz’ committed
10
#include <sstream>
11
#include <iomanip>
12
13
14
15
16
17
18

#include <biboumi.h>

#ifdef USE_DATABASE
#include <database/database.hpp>
#endif

19
20
21
22
#ifndef HAS_PUT_TIME
#include <ctime>
#endif

23
using namespace std::string_literals;
24

25
void DisconnectUserStep1(XmppComponent& xmpp_component, AdhocSession&, XmlNode& command_node)
26
{
louiz’'s avatar
louiz’ committed
27
  auto& biboumi_component = dynamic_cast<BiboumiComponent&>(xmpp_component);
28

29
  XmlSubNode x(command_node, "jabber:x:data:x");
30
  x["type"] = "form";
31
  XmlSubNode title(x, "title");
32
  title.set_inner("Disconnect a user from the gateway");
33
  XmlSubNode instructions(x, "instructions");
34
  instructions.set_inner("Choose a user JID and a quit message");
35
  XmlSubNode jids_field(x, "field");
36
37
38
  jids_field["var"] = "jids";
  jids_field["type"] = "list-multi";
  jids_field["label"] = "The JIDs to disconnect";
39
  XmlSubNode required(jids_field, "required");
40
  for (Bridge* bridge: biboumi_component.get_bridges())
41
    {
42
      XmlSubNode option(jids_field, "option");
43
      option["label"] = bridge->get_jid();
44
      XmlSubNode value(option, "value");
45
46
47
      value.set_inner(bridge->get_jid());
    }

48
  XmlSubNode message_field(x, "field");
49
50
51
  message_field["var"] = "quit-message";
  message_field["type"] = "text-single";
  message_field["label"] = "Quit message";
52
  XmlSubNode message_value(message_field, "value");
53
54
55
  message_value.set_inner("Disconnected by admin");
}

56
void DisconnectUserStep2(XmppComponent& xmpp_component, AdhocSession& session, XmlNode& command_node)
57
{
louiz’'s avatar
louiz’ committed
58
  auto& biboumi_component = dynamic_cast<BiboumiComponent&>(xmpp_component);
59

60
61
  // Find out if the jids, and the quit message are provided in the form.
  std::string quit_message;
62
  const XmlNode* x = command_node.get_child("x", "jabber:x:data");
63
64
  if (x)
    {
65
66
67
      const XmlNode* message_field = nullptr;
      const XmlNode* jids_field = nullptr;
      for (const XmlNode* field: x->get_children("field", "jabber:x:data"))
68
69
70
71
72
73
        if (field->get_tag("var") == "jids")
          jids_field = field;
        else if (field->get_tag("var") == "quit-message")
          message_field = field;
      if (message_field)
        {
74
          const XmlNode* value = message_field->get_child("value", "jabber:x:data");
75
76
77
78
79
80
          if (value)
            quit_message = value->get_inner();
        }
      if (jids_field)
        {
          std::size_t num = 0;
81
          for (const XmlNode* value: jids_field->get_children("value", "jabber:x:data"))
82
            {
83
              Bridge* bridge = biboumi_component.find_user_bridge(value->get_inner());
84
85
86
87
88
89
90
91
              if (bridge)
                {
                  bridge->shutdown(quit_message);
                  num++;
                }
            }
          command_node.delete_all_children();

92
          XmlSubNode note(command_node, "note");
93
94
95
96
97
98
99
          note["type"] = "info";
          if (num == 0)
            note.set_inner("No user were disconnected.");
          else if (num == 1)
            note.set_inner("1 user has been disconnected.");
          else
            note.set_inner(std::to_string(num) + " users have been disconnected.");
100
          return;
101
102
        }
    }
103
  XmlSubNode error(command_node, ADHOC_NS":error");
104
  error["type"] = "modify";
105
  XmlSubNode condition(error, STANZA_NS":bad-request");
106
107
  session.terminate();
}
108
109

#ifdef USE_DATABASE
110
111
112
113
114
115
116
117

void ConfigureGlobalStep1(XmppComponent&, AdhocSession& session, XmlNode& command_node)
{
  const Jid owner(session.get_owner_jid());
  const Jid target(session.get_target_jid());

  auto options = Database::get_global_options(owner.bare());

118
  XmlSubNode x(command_node, "jabber:x:data:x");
119
  x["type"] = "form";
120
  XmlSubNode title(x, "title");
121
  title.set_inner("Configure some global default settings.");
122
  XmlSubNode instructions(x, "instructions");
123
124
  instructions.set_inner("Edit the form, to configure your global settings for the component.");

125
  {
126
127
128
129
130
131
132
133
134
    XmlSubNode max_histo_length(x, "field");
    max_histo_length["var"] = "max_history_length";
    max_histo_length["type"] = "text-single";
    max_histo_length["label"] = "Max history length";
    max_histo_length["desc"] = "The maximum number of lines in the history that the server sends when joining a channel";
    {
      XmlSubNode value(max_histo_length, "value");
      value.set_inner(std::to_string(options.col<Database::MaxHistoryLength>()));
    }
135
  }
136

137
  {
138
139
140
141
142
143
144
145
146
147
148
149
150
    XmlSubNode record_history(x, "field");
    record_history["var"] = "record_history";
    record_history["type"] = "boolean";
    record_history["label"] = "Record history";
    record_history["desc"] = "Whether to save the messages into the database, or not";
    {
      XmlSubNode value(record_history, "value");
      value.set_name("value");
      if (options.col<Database::RecordHistory>())
        value.set_inner("true");
      else
        value.set_inner("false");
    }
151
  }
152
153

  {
154
155
156
157
158
159
160
161
    XmlSubNode persistent(x, "field");
    persistent["var"] = "persistent";
    persistent["type"] = "boolean";
    persistent["label"] = "Make all channels persistent";
    persistent["desc"] = "If true, all channels will be persistent";
    {
      XmlSubNode value(persistent, "value");
      value.set_name("value");
162
      if (options.col<Database::GlobalPersistent>())
163
164
165
166
        value.set_inner("true");
      else
        value.set_inner("false");
    }
167
  }
168
169
}

170
void ConfigureGlobalStep2(XmppComponent& xmpp_component, AdhocSession& session, XmlNode& command_node)
171
{
louiz’'s avatar
louiz’ committed
172
  auto& biboumi_component = dynamic_cast<BiboumiComponent&>(xmpp_component);
173

174
175
176
177
178
179
180
181
182
183
184
  const XmlNode* x = command_node.get_child("x", "jabber:x:data");
  if (x)
    {
      const Jid owner(session.get_owner_jid());
      auto options = Database::get_global_options(owner.bare());
      for (const XmlNode* field: x->get_children("field", "jabber:x:data"))
        {
          const XmlNode* value = field->get_child("value", "jabber:x:data");

          if (field->get_tag("var") == "max_history_length" &&
              value && !value->get_inner().empty())
185
            options.col<Database::MaxHistoryLength>() = atoi(value->get_inner().data());
186
187
188
          else if (field->get_tag("var") == "record_history" &&
                   value && !value->get_inner().empty())
            {
189
              options.col<Database::RecordHistory>() = to_bool(value->get_inner());
190
191
              Bridge* bridge = biboumi_component.find_user_bridge(owner.bare());
              if (bridge)
192
                bridge->set_record_history(options.col<Database::RecordHistory>());
193
            }
194
195
          else if (field->get_tag("var") == "persistent" &&
                   value)
196
            options.col<Database::GlobalPersistent>() = to_bool(value->get_inner());
197
198
        }

199
      options.save(Database::db);
200
201

      command_node.delete_all_children();
202
      XmlSubNode note(command_node, "note");
203
204
205
206
      note["type"] = "info";
      note.set_inner("Configuration successfully applied.");
      return;
    }
207
  XmlSubNode error(command_node, ADHOC_NS":error");
208
  error["type"] = "modify";
209
  XmlSubNode condition(error, STANZA_NS":bad-request");
210
211
212
  session.terminate();
}

213
void ConfigureIrcServerStep1(XmppComponent&, AdhocSession& session, XmlNode& command_node)
214
215
216
{
  const Jid owner(session.get_owner_jid());
  const Jid target(session.get_target_jid());
217
218
219
  std::string server_domain;
  if ((server_domain = Config::get("fixed_irc_server", "")).empty())
    server_domain = target.local;
220
  auto options = Database::get_irc_server_options(owner.local + "@" + owner.domain,
221
                                                  server_domain);
222
  auto commands = Database::get_after_connection_commands(options);
223

224
  XmlSubNode x(command_node, "jabber:x:data:x");
225
  x["type"] = "form";
226
  XmlSubNode title(x, "title");
227
  title.set_inner("Configure the IRC server " + server_domain);
228
  XmlSubNode instructions(x, "instructions");
229
  instructions.set_inner("Edit the form, to configure the settings of the IRC server " + server_domain);
230

231
  {
232
    XmlSubNode field(x, "field");
louiz’'s avatar
louiz’ committed
233
    field["var"] = "address";
234
235
236
237
    field["type"] = "text-single";
    field["label"] = "Address";
    field["desc"] = "The address (hostname or IP) to connect to.";
    XmlSubNode value(field, "value");
238
239
240
241
242
243
    if (options.col<Database::Address>().empty())
      value.set_inner(server_domain);
    else
      value.set_inner(options.col<Database::Address>());
  }

244
245
246
247
248
249
250
251
252
253
254
255
  {
    XmlSubNode ports(x, "field");
    ports["var"] = "ports";
    ports["type"] = "text-multi";
    ports["label"] = "Ports";
    ports["desc"] = "List of ports to try, without TLS. Defaults: 6667.";
    for (const auto& val: utils::split(options.col<Database::Ports>(), ';', false))
      {
        XmlSubNode ports_value(ports, "value");
        ports_value.set_inner(val);
      }
  }
256
257

#ifdef BOTAN_FOUND
258
259
260
261
262
263
264
265
266
267
268
269
  {
    XmlSubNode tls_ports(x, "field");
    tls_ports["var"] = "tls_ports";
    tls_ports["type"] = "text-multi";
    tls_ports["label"] = "TLS ports";
    tls_ports["desc"] = "List of ports to try, with TLS. Defaults: 6697, 6670.";
    for (const auto& val: utils::split(options.col<Database::TlsPorts>(), ';', false))
      {
        XmlSubNode tls_ports_value(tls_ports, "value");
        tls_ports_value.set_inner(val);
      }
  }
270

271
272
273
274
275
276
277
278
279
280
281
282
  {
    XmlSubNode verify_cert(x, "field");
    verify_cert["var"] = "verify_cert";
    verify_cert["type"] = "boolean";
    verify_cert["label"] = "Verify certificate";
    verify_cert["desc"] = "Whether or not to abort the connection if the server’s TLS certificate is invalid";
    XmlSubNode verify_cert_value(verify_cert, "value");
    if (options.col<Database::VerifyCert>())
      verify_cert_value.set_inner("true");
    else
      verify_cert_value.set_inner("false");
  }
283

284
285
286
287
288
289
290
291
292
293
294
  {
    XmlSubNode fingerprint(x, "field");
    fingerprint["var"] = "fingerprint";
    fingerprint["type"] = "text-single";
    fingerprint["label"] = "SHA-1 fingerprint of the TLS certificate to trust.";
    if (!options.col<Database::TrustedFingerprint>().empty())
      {
        XmlSubNode fingerprint_value(fingerprint, "value");
        fingerprint_value.set_inner(options.col<Database::TrustedFingerprint>());
      }
  }
295
#endif
296
297
298
299
300
301
302
303
304
305
306
307
308
309

  {
    XmlSubNode field(x, "field");
    field["var"] = "nick";
    field["type"] = "text-single";
    field["label"] = "Nickname";
    field["desc"] = "If set, will override the nickname provided in the initial presence sent to join the first server channel";
    if (!options.col<Database::Nick>().empty())
      {
        XmlSubNode value(field, "value");
        value.set_inner(options.col<Database::Nick>());
      }
  }

310
311
312
313
314
315
316
317
318
319
320
321
  {
    XmlSubNode pass(x, "field");
    pass["var"] = "pass";
    pass["type"] = "text-private";
    pass["label"] = "Server password";
    pass["desc"] = "Will be used in a PASS command when connecting";
    if (!options.col<Database::Pass>().empty())
      {
        XmlSubNode pass_value(pass, "value");
        pass_value.set_inner(options.col<Database::Pass>());
      }
  }
322

323
324
  {
    XmlSubNode after_cnt_cmd(x, "field");
325
326
327
328
329
    after_cnt_cmd["var"] = "after_connect_commands";
    after_cnt_cmd["type"] = "text-multi";
    after_cnt_cmd["desc"] = "Custom IRC commands sent after the connection is established with the server.";
    after_cnt_cmd["label"] = "After-connection IRC commands";
    for (const auto& command: commands)
330
331
      {
        XmlSubNode after_cnt_cmd_value(after_cnt_cmd, "value");
332
        after_cnt_cmd_value.set_inner(command.col<Database::AfterConnectionCommand>());
333
334
      }
  }
335

336
  if (Config::get("realname_customization", "true") == "true")
337
    {
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
      {
        XmlSubNode username(x, "field");
        username["var"] = "username";
        username["type"] = "text-single";
        username["label"] = "Username";
        if (!options.col<Database::Username>().empty())
          {
            XmlSubNode username_value(username, "value");
            username_value.set_inner(options.col<Database::Username>());
          }
      }

      {
        XmlSubNode realname(x, "field");
        realname["var"] = "realname";
        realname["type"] = "text-single";
        realname["label"] = "Realname";
        if (!options.col<Database::Realname>().empty())
          {
            XmlSubNode realname_value(realname, "value");
            realname_value.set_inner(options.col<Database::Realname>());
          }
      }
361
362
    }

363
  {
364
  XmlSubNode encoding_out(x, "field");
365
366
367
368
  encoding_out["var"] = "encoding_out";
  encoding_out["type"] = "text-single";
  encoding_out["desc"] = "The encoding used when sending messages to the IRC server.";
  encoding_out["label"] = "Out encoding";
369
  if (!options.col<Database::EncodingOut>().empty())
370
    {
371
      XmlSubNode encoding_out_value(encoding_out, "value");
372
      encoding_out_value.set_inner(options.col<Database::EncodingOut>());
373
    }
374
  }
375

376
377
378
379
380
381
382
383
384
385
386
387
  {
    XmlSubNode encoding_in(x, "field");
    encoding_in["var"] = "encoding_in";
    encoding_in["type"] = "text-single";
    encoding_in["desc"] = "The encoding used to decode message received from the IRC server.";
    encoding_in["label"] = "In encoding";
    if (!options.col<Database::EncodingIn>().empty())
      {
        XmlSubNode encoding_in_value(encoding_in, "value");
        encoding_in_value.set_inner(options.col<Database::EncodingIn>());
      }
  }
388
389
}

390
void ConfigureIrcServerStep2(XmppComponent&, AdhocSession& session, XmlNode& command_node)
391
392
393
394
395
396
{
  const XmlNode* x = command_node.get_child("x", "jabber:x:data");
  if (x)
    {
      const Jid owner(session.get_owner_jid());
      const Jid target(session.get_target_jid());
397
398
399
      std::string server_domain;
      if ((server_domain = Config::get("fixed_irc_server", "")).empty())
        server_domain = target.local;
400
      auto options = Database::get_irc_server_options(owner.local + "@" + owner.domain,
401
                                                      server_domain);
402
403
      auto commands = Database::get_after_connection_commands(options);

404
405
406
      for (const XmlNode* field: x->get_children("field", "jabber:x:data"))
        {
          const XmlNode* value = field->get_child("value", "jabber:x:data");
407
          const std::vector<const XmlNode*> values = field->get_children("value", "jabber:x:data");
408

louiz’'s avatar
louiz’ committed
409
410
411
          if (field->get_tag("var") == "address" && value)
            options.col<Database::Address>() = value->get_inner();

412
413
414
415
416
          if (field->get_tag("var") == "ports")
            {
              std::string ports;
              for (const auto& val: values)
                ports += val->get_inner() + ";";
417
              options.col<Database::Ports>() = ports;
418
419
420
421
422
423
424
425
            }

#ifdef BOTAN_FOUND
          else if (field->get_tag("var") == "tls_ports")
            {
              std::string ports;
              for (const auto& val: values)
                ports += val->get_inner() + ";";
426
              options.col<Database::TlsPorts>() = ports;
427
            }
428

429
          else if (field->get_tag("var") == "verify_cert" && value
430
                   && !value->get_inner().empty())
431
432
            {
              auto val = to_bool(value->get_inner());
433
              options.col<Database::VerifyCert>() = val;
434
            }
435

436
          else if (field->get_tag("var") == "fingerprint" && value)
437
            {
438
              options.col<Database::TrustedFingerprint>() = value->get_inner();
439
440
            }

441
#endif // BOTAN_FOUND
442

443
444
          else if (field->get_tag("var") == "nick" && value)
            options.col<Database::Nick>() = value->get_inner();
louiz’'s avatar
louiz’ committed
445

446
          else if (field->get_tag("var") == "pass" && value)
447
            options.col<Database::Pass>() = value->get_inner();
448

449
450
451
452
453
454
455
456
457
458
          else if (field->get_tag("var") == "after_connect_commands")
            {
              commands.clear();
              for (const auto& val: values)
                {
                  auto command = Database::after_connection_commands.row();
                  command.col<Database::AfterConnectionCommand>() = val->get_inner();
                  commands.push_back(std::move(command));
                }
            }
459

460
          else if (field->get_tag("var") == "username" && value)
461
462
463
            {
              auto username = value->get_inner();
              // The username must not contain spaces
464
              std::replace(username.begin(), username.end(), ' ', '_');
465
              options.col<Database::Username>() = username;
466
            }
467

468
          else if (field->get_tag("var") == "realname" && value)
469
            options.col<Database::Realname>() = value->get_inner();
470

471
          else if (field->get_tag("var") == "encoding_out" && value)
472
            options.col<Database::EncodingOut>() = value->get_inner();
473

474
          else if (field->get_tag("var") == "encoding_in" && value)
475
            options.col<Database::EncodingIn>() = value->get_inner();
476

477
        }
478
      Database::invalidate_encoding_in_cache();
479
      options.save(Database::db);
480
      Database::set_after_connection_commands(options, commands);
481
482

      command_node.delete_all_children();
483
      XmlSubNode note(command_node, "note");
484
485
486
487
      note["type"] = "info";
      note.set_inner("Configuration successfully applied.");
      return;
    }
488
  XmlSubNode error(command_node, ADHOC_NS":error");
489
  error["type"] = "modify";
490
  XmlSubNode condition(error, STANZA_NS":bad-request");
491
492
493
494
495
496
497
  session.terminate();
}

void ConfigureIrcChannelStep1(XmppComponent&, AdhocSession& session, XmlNode& command_node)
{
  const Jid owner(session.get_owner_jid());
  const Jid target(session.get_target_jid());
498
499
500
501
502
503

  insert_irc_channel_configuration_form(command_node, owner, target);
}

void insert_irc_channel_configuration_form(XmlNode& node, const Jid& requester, const Jid& target)
{
504
  const Iid iid(target.local, {});
505
506

  auto options = Database::get_irc_channel_options_with_server_default(requester.local + "@" + requester.domain,
507
                                                                       iid.get_server(), iid.get_local());
508
  XmlSubNode x(node, "jabber:x:data:x");
509
  x["type"] = "form";
510
  XmlSubNode title(x, "title");
511
  title.set_inner("Configure the IRC channel " + iid.get_local() + " on server " + iid.get_server());
512
  XmlSubNode instructions(x, "instructions");
513
  instructions.set_inner("Edit the form, to configure the settings of the IRC channel " + iid.get_local());
514

515
  {
516
517
518
519
520
521
522
523
    XmlSubNode record_history(x, "field");
    record_history["var"] = "record_history";
    record_history["type"] = "list-single";
    record_history["label"] = "Record history for this channel";
    record_history["desc"] = "If unset, the value is the one configured globally";
    {
      // Value selected by default
      XmlSubNode value(record_history, "value");
524
      value.set_inner(options.col<Database::RecordHistoryOptional>().to_string());
525
526
527
528
529
530
531
532
533
    }
    // All three possible values
    for (const auto& val: {"unset", "true", "false"})
      {
        XmlSubNode option(record_history, "option");
        option["label"] = val;
        XmlSubNode value(option, "value");
        value.set_inner(val);
      }
534
  }
535

536
  {
537
538
539
540
541
542
543
544
545
546
    XmlSubNode encoding_out(x, "field");
    encoding_out["var"] = "encoding_out";
    encoding_out["type"] = "text-single";
    encoding_out["desc"] = "The encoding used when sending messages to the IRC server. Defaults to the server's “out encoding” if unset for the channel";
    encoding_out["label"] = "Out encoding";
    if (!options.col<Database::EncodingOut>().empty())
      {
        XmlSubNode encoding_out_value(encoding_out, "value");
        encoding_out_value.set_inner(options.col<Database::EncodingOut>());
      }
547
548
  }

549
550
551
552
553
554
555
556
557
558
559
560
  {
    XmlSubNode encoding_in(x, "field");
    encoding_in["var"] = "encoding_in";
    encoding_in["type"] = "text-single";
    encoding_in["desc"] = "The encoding used to decode message received from the IRC server. Defaults to the server's “in encoding” if unset for the channel";
    encoding_in["label"] = "In encoding";
    if (!options.col<Database::EncodingIn>().empty())
      {
        XmlSubNode encoding_in_value(encoding_in, "value");
        encoding_in_value.set_inner(options.col<Database::EncodingIn>());
      }
  }
561

562
563
564
565
566
567
  {
    XmlSubNode persistent(x, "field");
    persistent["var"] = "persistent";
    persistent["type"] = "boolean";
    persistent["desc"] = "If set to true, when all XMPP clients have left this channel, biboumi will stay idle in it, without sending a PART command.";
    persistent["label"] = "Persistent";
568
    {
569
570
571
572
573
574
      XmlSubNode value(persistent, "value");
      value.set_name("value");
      if (options.col<Database::Persistent>())
        value.set_inner("true");
      else
        value.set_inner("false");
575
    }
louiz’'s avatar
louiz’ committed
576
  }
577
578
}

579
void ConfigureIrcChannelStep2(XmppComponent& xmpp_component, AdhocSession& session, XmlNode& command_node)
580
{
581
582
583
  const Jid owner(session.get_owner_jid());
  const Jid target(session.get_target_jid());

584
  if (handle_irc_channel_configuration_form(xmpp_component, command_node, owner, target))
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
    {
      command_node.delete_all_children();
      XmlSubNode note(command_node, "note");
      note["type"] = "info";
      note.set_inner("Configuration successfully applied.");
    }
  else
    {
      XmlSubNode error(command_node, ADHOC_NS":error");
      error["type"] = "modify";
      XmlSubNode condition(error, STANZA_NS":bad-request");
      session.terminate();
    }
}

600
bool handle_irc_channel_configuration_form(XmppComponent& xmpp_component, const XmlNode& node, const Jid& requester, const Jid& target)
601
602
{
  const XmlNode* x = node.get_child("x", "jabber:x:data");
603
604
  if (x)
    {
605
      if (x->get_tag("type") == "submit")
606
        {
607
          const Iid iid(target.local, {});
608
          auto options = Database::get_irc_channel_options(requester.bare(),
609
610
611
612
                                                           iid.get_server(), iid.get_local());
          for (const XmlNode *field: x->get_children("field", "jabber:x:data"))
            {
              const XmlNode *value = field->get_child("value", "jabber:x:data");
613

614
              if (field->get_tag("var") == "encoding_out" && value)
615
                options.col<Database::EncodingOut>() = value->get_inner();
louiz’'s avatar
louiz’ committed
616

617
              else if (field->get_tag("var") == "encoding_in" && value)
618
                options.col<Database::EncodingIn>() = value->get_inner();
619

620
              else if (field->get_tag("var") == "persistent" && value)
621
                options.col<Database::Persistent>() = to_bool(value->get_inner());
622
623
624
              else if (field->get_tag("var") == "record_history" &&
                       value && !value->get_inner().empty())
                {
625
                  OptionalBool& database_value = options.col<Database::RecordHistoryOptional>();
626
                  if (value->get_inner() == "true")
627
                    database_value.set_value(true);
628
                  else if (value->get_inner() == "false")
629
                    database_value.set_value(false);
630
                  else
631
                    database_value.unset();
632
633
634
635
                  auto& biboumi_component = dynamic_cast<BiboumiComponent&>(xmpp_component);
                  Bridge* bridge = biboumi_component.find_user_bridge(requester.bare());
                  if (bridge)
                    {
636
637
                      if (database_value.is_set)
                        bridge->set_record_history(database_value.value);
638
639
640
641
642
643
644
645
646
                      else
                        { // It is unset, we need to fetch the Global option, to
                          // know if it’s enabled or not
                          auto g_options = Database::get_global_options(requester.bare());
                          bridge->set_record_history(g_options.col<Database::RecordHistory>());
                        }
                    }
                }

647
            }
648
          Database::invalidate_encoding_in_cache(requester.bare(), iid.get_server(), iid.get_local());
649
          options.save(Database::db);
650
651
        }
      return true;
652
    }
653
  return false;
654
655
}
#endif  // USE_DATABASE
656

657
void DisconnectUserFromServerStep1(XmppComponent& xmpp_component, AdhocSession& session, XmlNode& command_node)
658
659
660
661
662
663
664
665
666
667
{
  const Jid owner(session.get_owner_jid());
  if (owner.bare() != Config::get("admin", ""))
    { // A non-admin is not allowed to disconnect other users, only
      // him/herself, so we just skip this step
      auto next_step = session.get_next_step();
      next_step(xmpp_component, session, command_node);
    }
  else
    { // Send a form to select the user to disconnect
louiz’'s avatar
louiz’ committed
668
      auto& biboumi_component = dynamic_cast<BiboumiComponent&>(xmpp_component);
669

670
      XmlSubNode x(command_node, "jabber:x:data:x");
671
      x["type"] = "form";
672
      XmlSubNode title(x, "title");
673
      title.set_inner("Disconnect a user from selected IRC servers");
674
      XmlSubNode instructions(x, "instructions");
675
      instructions.set_inner("Choose a user JID");
676
      XmlSubNode jids_field(x, "field");
677
678
679
      jids_field["var"] = "jid";
      jids_field["type"] = "list-single";
      jids_field["label"] = "The JID to disconnect";
680
      XmlSubNode required(jids_field, "required");
681
      for (Bridge* bridge: biboumi_component.get_bridges())
682
        {
683
          XmlSubNode option(jids_field, "option");
684
          option["label"] = bridge->get_jid();
685
          XmlSubNode value(option, "value");
686
687
688
689
690
          value.set_inner(bridge->get_jid());
        }
    }
}

691
void DisconnectUserFromServerStep2(XmppComponent& xmpp_component, AdhocSession& session, XmlNode& command_node)
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
{
  // If no JID is contained in the command node, it means we skipped the
  // previous stage, and the jid to disconnect is the executor's jid
  std::string jid_to_disconnect = session.get_owner_jid();

  if (const XmlNode* x = command_node.get_child("x", "jabber:x:data"))
    {
      for (const XmlNode* field: x->get_children("field", "jabber:x:data"))
        if (field->get_tag("var") == "jid")
          {
            if (const XmlNode* value = field->get_child("value", "jabber:x:data"))
              jid_to_disconnect = value->get_inner();
          }
    }

  // Save that JID for the last step
  session.vars["jid"] = jid_to_disconnect;

  // Send a data form to let the user choose which server to disconnect the
  // user from
  command_node.delete_all_children();
louiz’'s avatar
louiz’ committed
713
  auto& biboumi_component = dynamic_cast<BiboumiComponent&>(xmpp_component);
714

715
  XmlSubNode x(command_node, "jabber:x:data:x");
716
  x["type"] = "form";
717
  XmlSubNode title(x, "title");
718
  title.set_inner("Disconnect a user from selected IRC servers");
719
  XmlSubNode instructions(x, "instructions");
720
  instructions.set_inner("Choose one or more servers to disconnect this JID from");
721
  XmlSubNode jids_field(x, "field");
722
723
724
  jids_field["var"] = "irc-servers";
  jids_field["type"] = "list-multi";
  jids_field["label"] = "The servers to disconnect from";
725
  XmlSubNode required(jids_field, "required");
726
  Bridge* bridge = biboumi_component.find_user_bridge(jid_to_disconnect);
727
728
729

  if (!bridge || bridge->get_irc_clients().empty())
    {
730
      XmlSubNode note(command_node, "note");
731
      note["type"] = "info";
732
      note.set_inner("User " + jid_to_disconnect + " is not connected to any IRC server.");
733
734
735
736
737
738
      session.terminate();
      return ;
    }

  for (const auto& pair: bridge->get_irc_clients())
    {
739
      XmlSubNode option(jids_field, "option");
740
      option["label"] = pair.first;
741
      XmlSubNode value(option, "value");
742
743
744
      value.set_inner(pair.first);
    }

745
  XmlSubNode message_field(x, "field");
746
747
748
  message_field["var"] = "quit-message";
  message_field["type"] = "text-single";
  message_field["label"] = "Quit message";
749
  XmlSubNode message_value(message_field, "value");
750
751
752
  message_value.set_inner("Killed by admin");
}

753
void DisconnectUserFromServerStep3(XmppComponent& xmpp_component, AdhocSession& session, XmlNode& command_node)
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
{
  const auto it = session.vars.find("jid");
  if (it == session.vars.end())
    return ;
  const auto jid_to_disconnect = it->second;

  std::vector<std::string> servers;
  std::string quit_message;

  if (const XmlNode* x = command_node.get_child("x", "jabber:x:data"))
    {
      for (const XmlNode* field: x->get_children("field", "jabber:x:data"))
        {
          if (field->get_tag("var") == "irc-servers")
            {
              for (const XmlNode* value: field->get_children("value", "jabber:x:data"))
                servers.push_back(value->get_inner());
            }
          else if (field->get_tag("var") == "quit-message")
            if (const XmlNode* value = field->get_child("value", "jabber:x:data"))
              quit_message = value->get_inner();
        }
    }

louiz’'s avatar
louiz’ committed
778
  auto& biboumi_component = dynamic_cast<BiboumiComponent&>(xmpp_component);
779
  Bridge* bridge = biboumi_component.find_user_bridge(jid_to_disconnect);
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
  auto& clients = bridge->get_irc_clients();

  std::size_t number = 0;

  for (const auto& hostname: servers)
    {
      auto it = clients.find(hostname);
      if (it != clients.end())
        {
          it->second->on_error({"ERROR", {quit_message}});
          clients.erase(it);
          number++;
        }
    }
  command_node.delete_all_children();
795
  XmlSubNode note(command_node, "note");
796
797
798
799
800
801
802
  note["type"] = "info";
  std::string msg = jid_to_disconnect + " was disconnected from " + std::to_string(number) + " IRC server";
  if (number > 1)
    msg += "s";
  msg += ".";
  note.set_inner(msg);
}
803
804
805

void GetIrcConnectionInfoStep1(XmppComponent& component, AdhocSession& session, XmlNode& command_node)
{
louiz’'s avatar
louiz’ committed
806
  auto& biboumi_component = dynamic_cast<BiboumiComponent&>(component);
807
808
809
810
811
812
813
814
815
816

  const Jid owner(session.get_owner_jid());
  const Jid target(session.get_target_jid());

  std::string message{};

  // As the function is exited, set the message in the response.
  utils::ScopeGuard sg([&message, &command_node]()
                       {
                         command_node.delete_all_children();
817
                         XmlSubNode note(command_node, "note");
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
                         note["type"] = "info";
                         note.set_inner(message);
                       });

  Bridge* bridge = biboumi_component.get_user_bridge(owner.bare());
  if (!bridge)
    {
      message = "You are not connected to anything.";
      return;
    }

  std::string hostname;
  if ((hostname = Config::get("fixed_irc_server", "")).empty())
    hostname = target.local;

  IrcClient* irc = bridge->find_irc_client(hostname);
  if (!irc || !irc->is_connected())
    {
836
      message = "You are not connected to the IRC server " + hostname;
837
838
839
840
841
842
843
844
      return;
    }

  std::ostringstream ss;
  ss << "Connected to IRC server " << irc->get_hostname() << " on port " << irc->get_port();
  if (irc->is_using_tls())
    ss << " (using TLS)";
  const std::time_t now_c = std::chrono::system_clock::to_time_t(irc->connection_date);
845
#ifdef HAS_PUT_TIME
846
  ss << " since " << std::put_time(std::localtime(&now_c), "%F %T");
847
848
849
850
851
852
853
#else
  constexpr std::size_t timestamp_size{10 + 1 + 8 + 1};
  char buf[timestamp_size] = {};
  const auto res = std::strftime(buf, timestamp_size, "%F %T", std::localtime(&now_c));
  if (res > 0)
    ss << " since " << buf;
#endif
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
  ss << " (" << std::chrono::duration_cast<std::chrono::seconds>(std::chrono::system_clock::now() - irc->connection_date).count() << " seconds ago).";

  for (const auto& it: bridge->resources_in_chan)
    {
      const auto& channel_key = it.first;
      const auto& irc_hostname = std::get<1>(channel_key);
      const auto& resources = it.second;

      if (irc_hostname == irc->get_hostname() && !resources.empty())
        {
          const auto& channel_name = std::get<0>(channel_key);
          ss << "\n" << channel_name << " from " << resources.size() << " resource" << (resources.size() > 1 ? "s": "") << ": ";
          for (const auto& resource: resources)
            ss << resource << " ";
        }
    }

  message = ss.str();
}