apps/irssi/src/silc/core/silc-channels.c

   1 /*
   2   silc-channels.c : irssi
   3
   4   Copyright (C) 2000 - 2001 Timo Sirainen
   5                             Pekka Riikonen <priikone@poseidon.pspt.fi>
   6
   7   This program is free software; you can redistribute it and/or modify
   8   it under the terms of the GNU General Public License as published by
   9   the Free Software Foundation; either version 2 of the License, or
  10   (at your option) any later version.
  11
  12   This program is distributed in the hope that it will be useful,
  13   but WITHOUT ANY WARRANTY; without even the implied warranty of
  14   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15   GNU General Public License for more details.
  16
  17   You should have received a copy of the GNU General Public License
  18   along with this program; if not, write to the Free Software
  19   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20 */
  21
  22 #include "module.h"
  23
  24 #include "net-nonblock.h"
  25 #include "net-sendbuffer.h"
  26 #include "signals.h"
  27 #include "servers.h"
  28 #include "commands.h"
  29 #include "levels.h"
  30 #include "modules.h"
  31 #include "rawlog.h"
  32 #include "misc.h"
  33 #include "settings.h"
  34
  35 #include "channels-setup.h"
  36
  37 #include "silc-servers.h"
  38 #include "silc-channels.h"
  39 #include "silc-queries.h"
  40 #include "silc-nicklist.h"
  41 #include "window-item-def.h"
  42
  43 #include "fe-common/core/printtext.h"
  44
  45 SILC_CHANNEL_REC *silc_channel_create(SILC_SERVER_REC *server,
  46                                       const char *name, int automatic)
  47 {
  48   SILC_CHANNEL_REC *rec;
  49
  50   g_return_val_if_fail(server == NULL || IS_SILC_SERVER(server), NULL);
  51   g_return_val_if_fail(name != NULL, NULL);
  52
  53   rec = g_new0(SILC_CHANNEL_REC, 1);
  54   rec->chat_type = SILC_PROTOCOL;
  55   rec->name = g_strdup(name);
  56   rec->server = server;
  57
  58   channel_init((CHANNEL_REC *) rec, automatic);
  59   return rec;
  60 }
  61
  62 static void sig_channel_destroyed(SILC_CHANNEL_REC *channel)
  63 {
  64   if (!IS_SILC_CHANNEL(channel))
  65     return;
  66
  67   if (channel->server != NULL && !channel->left && !channel->kicked) {
  68     /* destroying channel record without actually
  69        having left the channel yet */
  70     silc_command_exec(channel->server, "PART", channel->name);
  71   }
  72 }
  73
  74 static void silc_channels_join(SILC_SERVER_REC *server,
  75                                const char *channels, int automatic)
  76 {
  77   char **list, **tmp, *channel;
  78
  79   list = g_strsplit(channels, ",", -1);
  80   for (tmp = list; *tmp != NULL; tmp++) {
  81     channel = **tmp == '#' ? g_strdup(*tmp) :
  82       g_strconcat("#", *tmp, NULL);
  83     silc_channel_create(server, channel, FALSE);
  84     silc_command_exec(server, "JOIN", channel);
  85     g_free(channel);
  86   }
  87   g_strfreev(list);
  88 }
  89
  90 static void sig_connected(SILC_SERVER_REC *server)
  91 {
  92   if (IS_SILC_SERVER(server))
  93     server->channels_join = (void *) silc_channels_join;
  94 }
  95
  96 /*
  97  * "event join". Joined to a channel.
  98  */
  99
 100 SILC_CHANNEL_REC *silc_channel_find_entry(SILC_SERVER_REC *server,
 101                                           SilcChannelEntry entry)
 102 {
 103   GSList *tmp;
 104
 105   g_return_val_if_fail(IS_SILC_SERVER(server), NULL);
 106
 107   for (tmp = server->channels; tmp != NULL; tmp = tmp->next) {
 108     SILC_CHANNEL_REC *rec = tmp->data;
 109
 110     if (rec->entry == entry)
 111       return rec;
 112   }
 113
 114   return NULL;
 115 }
 116
 117 static void event_join(SILC_SERVER_REC *server, va_list va)
 118 {
 119   SILC_CHANNEL_REC *chanrec;
 120   SILC_NICK_REC *nickrec;
 121   SilcClientEntry client;
 122   SilcChannelEntry channel;
 123
 124   client = va_arg(va, SilcClientEntry);
 125   channel = va_arg(va, SilcChannelEntry);
 126
 127   if (client == server->conn->local_entry) {
 128     /* You joined to channel */
 129     chanrec = silc_channel_find(server, channel->channel_name);
 130     if (chanrec != NULL && !chanrec->joined)
 131       chanrec->entry = channel;
 132   } else {
 133     chanrec = silc_channel_find_entry(server, channel);
 134     if (chanrec != NULL) {
 135       SilcChannelUser user;
 136
 137       silc_list_start(chanrec->entry->clients);
 138       while ((user = silc_list_get(chanrec->entry->clients)) != NULL)
 139         if (user->client == client) {
 140           nickrec = silc_nicklist_insert(chanrec, user, TRUE);
 141           break;
 142         }
 143     }
 144   }
 145
 146   signal_emit("message join", 4, server, channel->channel_name,
 147               client->nickname,
 148               client->username == NULL ? "" : client->username);
 149 }
 150
 151 /*
 152  * "event leave". Left a channel.
 153  */
 154
 155 static void event_leave(SILC_SERVER_REC *server, va_list va)
 156 {
 157   SILC_CHANNEL_REC *chanrec;
 158   SILC_NICK_REC *nickrec;
 159   SilcClientEntry client;
 160   SilcChannelEntry channel;
 161
 162   client = va_arg(va, SilcClientEntry);
 163   channel = va_arg(va, SilcChannelEntry);
 164
 165   signal_emit("message part", 5, server, channel->channel_name,
 166               client->nickname,  client->username ?  client->username : "",
 167               client->nickname);
 168
 169   chanrec = silc_channel_find_entry(server, channel);
 170   if (chanrec != NULL) {
 171     nickrec = silc_nicklist_find(chanrec, client);
 172     if (nickrec != NULL)
 173       nicklist_remove(CHANNEL(chanrec), NICK(nickrec));
 174   }
 175 }
 176
 177 /*
 178  * "event signoff". Left the network.
 179  */
 180
 181 static void event_signoff(SILC_SERVER_REC *server, va_list va)
 182 {
 183   SilcClientEntry client;
 184   GSList *nicks, *tmp;
 185   char *message;
 186
 187   client = va_arg(va, SilcClientEntry);
 188   message = va_arg(va, char *);
 189
 190   signal_emit("message quit", 4, server, client->nickname,
 191               client->username ? client->username : "",
 192               message ? message : "");
 193
 194   nicks = nicklist_get_same_unique(SERVER(server), client);
 195   for (tmp = nicks; tmp != NULL; tmp = tmp->next->next) {
 196     CHANNEL_REC *channel = tmp->data;
 197     NICK_REC *nickrec = tmp->next->data;
 198
 199     nicklist_remove(channel, nickrec);
 200   }
 201 }
 202
 203 /*
 204  * "event topic". Changed topic.
 205  */
 206
 207 static void event_topic(SILC_SERVER_REC *server, va_list va)
 208 {
 209   SILC_CHANNEL_REC *chanrec;
 210   SilcClientEntry client;
 211   SilcChannelEntry channel;
 212   char *topic;
 213
 214   client = va_arg(va, SilcClientEntry);
 215   topic = va_arg(va, char *);
 216   channel = va_arg(va, SilcChannelEntry);
 217
 218   chanrec = silc_channel_find_entry(server, channel);
 219   if (chanrec != NULL) {
 220     g_free_not_null(chanrec->topic);
 221     chanrec->topic = *topic == '\0' ? NULL : g_strdup(topic);
 222     signal_emit("channel topic changed", 1, chanrec);
 223   }
 224
 225   signal_emit("message topic", 5, server, channel->channel_name,
 226               topic, client->nickname, client->username);
 227 }
 228
 229 /*
 230  * "event invite". Invited or modified invite list.
 231  */
 232
 233 static void event_invite(SILC_SERVER_REC *server, va_list va)
 234 {
 235   SilcClientEntry client;
 236   SilcChannelEntry channel;
 237
 238   client = va_arg(va, SilcClientEntry);
 239   channel = va_arg(va, SilcChannelEntry);
 240
 241   signal_emit("message invite", 4, server, channel->channel_name,
 242               client->nickname, client->username);
 243 }
 244
 245 /*
 246  * "event nick". Changed nickname.
 247  */
 248
 249 static void event_nick(SILC_SERVER_REC *server, va_list va)
 250 {
 251   SilcClientEntry oldclient, newclient;
 252
 253   oldclient = va_arg(va, SilcClientEntry);
 254   newclient = va_arg(va, SilcClientEntry);
 255
 256   nicklist_rename_unique(SERVER(server),
 257                          oldclient, oldclient->nickname,
 258                          newclient, newclient->nickname);
 259
 260   signal_emit("message nick", 4, server, newclient->nickname,
 261               oldclient->nickname, newclient->username);
 262 }
 263
 264 /*
 265  * "event cmode". Changed channel mode.
 266  */
 267
 268 static void event_cmode(SILC_SERVER_REC *server, va_list va)
 269 {
 270   SILC_CHANNEL_REC *chanrec;
 271   SilcClientEntry client;
 272   SilcChannelEntry channel;
 273   char *mode;
 274   uint32 modei;
 275
 276   client = va_arg(va, SilcClientEntry);
 277   modei = va_arg(va, uint32);
 278   channel = va_arg(va, SilcChannelEntry);
 279   mode = silc_client_chmode(modei, channel);
 280
 281   chanrec = silc_channel_find_entry(server, channel);
 282   if (chanrec != NULL) {
 283     g_free_not_null(chanrec->mode);
 284     chanrec->mode = g_strdup(mode == NULL ? "" : mode);
 285     signal_emit("channel mode changed", 1, chanrec);
 286   }
 287
 288   /*signal_emit("message mode", 5, server, chanrec->name,
 289     client->nickname, client->username, mode);*/
 290   printtext(server, channel->channel_name, MSGLEVEL_MODES,
 291             "mode/%s [%s] by %s", channel->channel_name, mode,
 292             client->nickname);
 293
 294   g_free(mode);
 295 }
 296
 297 /*
 298  * "event cumode". Changed user's mode on channel.
 299  */
 300
 301 static void event_cumode(SILC_SERVER_REC *server, va_list va)
 302 {
 303   SILC_CHANNEL_REC *chanrec;
 304   SilcClientEntry client, destclient;
 305   SilcChannelEntry channel;
 306   int mode;
 307   char *modestr;
 308
 309   client = va_arg(va, SilcClientEntry);
 310   mode = va_arg(va, uint32);
 311   destclient = va_arg(va, SilcClientEntry);
 312   channel = va_arg(va, SilcChannelEntry);
 313
 314   modestr = silc_client_chumode(mode);
 315   chanrec = silc_channel_find_entry(server, channel);
 316   if (chanrec != NULL) {
 317     SILC_NICK_REC *nick;
 318
 319     if (destclient == server->conn->local_entry) {
 320       chanrec->chanop =
 321         (mode & SILC_CHANNEL_UMODE_CHANOP) != 0;
 322     }
 323
 324     nick = silc_nicklist_find(chanrec, client);
 325     if (nick != NULL) {
 326       nick->op = (mode & SILC_CHANNEL_UMODE_CHANOP) != 0;
 327       signal_emit("nick mode changed", 2, chanrec, nick);
 328     }
 329   }
 330
 331   /*signal_emit("message mode", 5, server, chanrec->name,
 332     client->nickname, client->username, modestr);*/
 333   printtext(server, channel->channel_name, MSGLEVEL_MODES,
 334             "mode/%s [%s] by %s", channel->channel_name, modestr,
 335             client->nickname);
 336
 337   g_free(modestr);
 338 }
 339
 340 /*
 341  * "event motd". Received MOTD.
 342  */
 343
 344 static void event_motd(SILC_SERVER_REC *server, va_list va)
 345 {
 346   char *text = va_arg(va, char *);
 347
 348   if (!settings_get_bool("skip_motd"))
 349     printtext_multiline(server, NULL, MSGLEVEL_CRAP, "%s", text);
 350 }
 351
 352 /*
 353  * "event channel_change". Channel ID has changed.
 354  */
 355
 356 static void event_channel_change(SILC_SERVER_REC *server, va_list va)
 357 {
 358
 359 }
 360
 361 /*
 362  * "event server_signoff". Server has quit the network.
 363  */
 364
 365 static void event_server_signoff(SILC_SERVER_REC *server, va_list va)
 366 {
 367
 368 }
 369
 370 /*
 371  * "event kick". Someone was kicked from channel.
 372  */
 373
 374 static void event_kick(SILC_SERVER_REC *server, va_list va)
 375 {
 376
 377 }
 378
 379 /*
 380  * "event kill". Someone was killed from the network.
 381  */
 382
 383 static void event_kill(SILC_SERVER_REC *server, va_list va)
 384 {
 385
 386 }
 387
 388 /*
 389  * "event ban". Someone was banned or ban list was modified.
 390  */
 391
 392 static void event_ban(SILC_SERVER_REC *server, va_list va)
 393 {
 394
 395 }
 396
 397 /* PART (LEAVE) command. */
 398
 399 static void command_part(const char *data, SILC_SERVER_REC *server,
 400                          WI_ITEM_REC *item)
 401 {
 402   SILC_CHANNEL_REC *chanrec;
 403
 404   if (!IS_SILC_SERVER(server) || !server->connected)
 405     cmd_return_error(CMDERR_NOT_CONNECTED);
 406
 407   if (*data == '\0') {
 408     if (!IS_SILC_CHANNEL(item))
 409       cmd_return_error(CMDERR_NOT_JOINED);
 410     data = item->name;
 411   }
 412
 413   chanrec = silc_channel_find(server, data);
 414   if (chanrec == NULL)
 415     cmd_return_error(CMDERR_CHAN_NOT_FOUND);
 416
 417   signal_emit("message part", 5, server, chanrec->name,
 418               server->nick, server->conn->local_entry->username, "");
 419
 420   silc_command_exec(server, "LEAVE", chanrec->name);
 421   signal_stop();
 422
 423   channel_destroy(CHANNEL(chanrec));
 424 }
 425
 426 /* ME local command. */
 427
 428 static void command_me(const char *data, SILC_SERVER_REC *server,
 429                        WI_ITEM_REC *item)
 430 {
 431   SILC_CHANNEL_REC *chanrec;
 432   char *tmpcmd = "ME", *tmp;
 433   uint32 argc = 0;
 434   unsigned char **argv;
 435   uint32 *argv_lens, *argv_types;
 436   int i;
 437
 438   if (!IS_SILC_SERVER(server) || !server->connected)
 439     cmd_return_error(CMDERR_NOT_CONNECTED);
 440
 441   if (!IS_SILC_CHANNEL(item))
 442     cmd_return_error(CMDERR_NOT_JOINED);
 443
 444   /* Now parse all arguments */
 445   tmp = g_strconcat(tmpcmd, " ", data, NULL);
 446   silc_parse_command_line(tmp, &argv, &argv_lens,
 447                           &argv_types, &argc, 2);
 448   g_free(tmp);
 449
 450   if (argc < 2)
 451     cmd_return_error(CMDERR_NOT_ENOUGH_PARAMS);
 452
 453   chanrec = silc_channel_find(server, item->name);
 454   if (chanrec == NULL)
 455     cmd_return_error(CMDERR_CHAN_NOT_FOUND);
 456
 457   /* Send the action message */
 458   silc_client_send_channel_message(silc_client, server->conn,
 459                                    chanrec->entry, NULL,
 460                                    SILC_MESSAGE_FLAG_ACTION,
 461                                    argv[1], argv_lens[1], TRUE);
 462
 463   for (i = 0; i < argc; i++)
 464     silc_free(argv[i]);
 465   silc_free(argv_lens);
 466   silc_free(argv_types);
 467 }
 468
 469 /* NOTICE local command. */
 470
 471 static void command_notice(const char *data, SILC_SERVER_REC *server,
 472                            WI_ITEM_REC *item)
 473 {
 474   SILC_CHANNEL_REC *chanrec;
 475   char *tmpcmd = "ME", *tmp;
 476   uint32 argc = 0;
 477   unsigned char **argv;
 478   uint32 *argv_lens, *argv_types;
 479   int i;
 480
 481   if (!IS_SILC_SERVER(server) || !server->connected)
 482     cmd_return_error(CMDERR_NOT_CONNECTED);
 483
 484   if (!IS_SILC_CHANNEL(item))
 485     cmd_return_error(CMDERR_NOT_JOINED);
 486
 487   /* Now parse all arguments */
 488   tmp = g_strconcat(tmpcmd, " ", data, NULL);
 489   silc_parse_command_line(tmp, &argv, &argv_lens,
 490                           &argv_types, &argc, 2);
 491   g_free(tmp);
 492
 493   if (argc < 2)
 494     cmd_return_error(CMDERR_NOT_ENOUGH_PARAMS);
 495
 496   chanrec = silc_channel_find(server, item->name);
 497   if (chanrec == NULL)
 498     cmd_return_error(CMDERR_CHAN_NOT_FOUND);
 499
 500   /* Send the action message */
 501   silc_client_send_channel_message(silc_client, server->conn,
 502                                    chanrec->entry, NULL,
 503                                    SILC_MESSAGE_FLAG_NOTICE,
 504                                    argv[1], argv_lens[1], TRUE);
 505
 506   for (i = 0; i < argc; i++)
 507     silc_free(argv[i]);
 508   silc_free(argv_lens);
 509   silc_free(argv_types);
 510 }
 511
 512 void silc_channels_init(void)
 513 {
 514   signal_add("channel destroyed", (SIGNAL_FUNC) sig_channel_destroyed);
 515   signal_add("server connected", (SIGNAL_FUNC) sig_connected);
 516
 517   signal_add("silc event join", (SIGNAL_FUNC) event_join);
 518   signal_add("silc event leave", (SIGNAL_FUNC) event_leave);
 519   signal_add("silc event signoff", (SIGNAL_FUNC) event_signoff);
 520   signal_add("silc event topic", (SIGNAL_FUNC) event_topic);
 521   signal_add("silc event invite", (SIGNAL_FUNC) event_invite);
 522   signal_add("silc event nick", (SIGNAL_FUNC) event_nick);
 523   signal_add("silc event cmode", (SIGNAL_FUNC) event_cmode);
 524   signal_add("silc event cumode", (SIGNAL_FUNC) event_cumode);
 525   signal_add("silc event motd", (SIGNAL_FUNC) event_motd);
 526   signal_add("silc event channel_change", (SIGNAL_FUNC) event_channel_change);
 527   signal_add("silc event server_signoff", (SIGNAL_FUNC) event_server_signoff);
 528   signal_add("silc event kick", (SIGNAL_FUNC) event_kick);
 529   signal_add("silc event kill", (SIGNAL_FUNC) event_kill);
 530   signal_add("silc event ban", (SIGNAL_FUNC) event_ban);
 531
 532   command_bind("part", MODULE_NAME, (SIGNAL_FUNC) command_part);
 533   command_bind("me", MODULE_NAME, (SIGNAL_FUNC) command_me);
 534   command_bind("notice", MODULE_NAME, (SIGNAL_FUNC) command_notice);
 535
 536   silc_nicklist_init();
 537 }
 538
 539 void silc_channels_deinit(void)
 540 {
 541   signal_remove("channel destroyed", (SIGNAL_FUNC) sig_channel_destroyed);
 542   signal_remove("server connected", (SIGNAL_FUNC) sig_connected);
 543
 544   signal_remove("silc event join", (SIGNAL_FUNC) event_join);
 545   signal_remove("silc event leave", (SIGNAL_FUNC) event_leave);
 546   signal_remove("silc event signoff", (SIGNAL_FUNC) event_signoff);
 547   signal_remove("silc event topic", (SIGNAL_FUNC) event_topic);
 548   signal_remove("silc event invite", (SIGNAL_FUNC) event_invite);
 549   signal_remove("silc event nick", (SIGNAL_FUNC) event_nick);
 550   signal_remove("silc event cmode", (SIGNAL_FUNC) event_cmode);
 551   signal_remove("silc event cumode", (SIGNAL_FUNC) event_cumode);
 552   signal_remove("silc event motd", (SIGNAL_FUNC) event_motd);
 553   signal_remove("silc event channel_change",
 554                 (SIGNAL_FUNC) event_channel_change);
 555   signal_remove("silc event server_signoff",
 556                 (SIGNAL_FUNC) event_server_signoff);
 557   signal_remove("silc event kick", (SIGNAL_FUNC) event_kick);
 558   signal_remove("silc event kill", (SIGNAL_FUNC) event_kill);
 559   signal_remove("silc event ban", (SIGNAL_FUNC) event_ban);
 560
 561   command_unbind("part", (SIGNAL_FUNC) command_part);
 562   command_unbind("me", (SIGNAL_FUNC) command_me);
 563   command_unbind("notice", (SIGNAL_FUNC) command_notice);
 564
 565   silc_nicklist_deinit();
 566 }