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

   1 /*
   2   silc-server.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 "servers-setup.h"
  36
  37 #include "silc-servers.h"
  38 #include "silc-channels.h"
  39 #include "silc-queries.h"
  40 #include "window-item-def.h"
  41
  42 #include "fe-common/core/printtext.h"
  43 #include "fe-common/silc/module-formats.h"
  44
  45 void silc_servers_reconnect_init(void);
  46 void silc_servers_reconnect_deinit(void);
  47
  48 static void silc_send_channel(SILC_SERVER_REC *server,
  49                               char *channel, char *msg)
  50 {
  51   SILC_CHANNEL_REC *rec;
  52
  53   rec = silc_channel_find(server, channel);
  54   if (rec == NULL || rec->entry == NULL)
  55     return;
  56
  57   silc_client_send_channel_message(silc_client, server->conn, rec->entry,
  58                                    NULL, 0, msg, strlen(msg), TRUE);
  59 }
  60
  61 typedef struct {
  62   char *nick;
  63   char *msg;
  64 } PRIVMSG_REC;
  65
  66 /* Callback function that sends the private message if the client was
  67    resolved from the server. */
  68
  69 static void silc_send_msg_clients(SilcClient client,
  70                                   SilcClientConnection conn,
  71                                   SilcClientEntry *clients,
  72                                   uint32 clients_count,
  73                                   void *context)
  74 {
  75   PRIVMSG_REC *rec = context;
  76   SilcClientEntry target;
  77
  78   if (clients_count == 0) {
  79     printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, "Unknown nick: %s", rec->nick);
  80   } else {
  81     target = clients[0]; /* FIXME: not a good idea :) */
  82
  83     silc_client_send_private_message(client, conn, target, 0,
  84                                      rec->msg, strlen(rec->msg),
  85                                      TRUE);
  86   }
  87
  88   g_free(rec->nick);
  89   g_free(rec->msg);
  90   g_free(rec);
  91 }
  92
  93 static void silc_send_msg(SILC_SERVER_REC *server, char *nick, char *msg)
  94 {
  95   PRIVMSG_REC *rec;
  96   SilcClientEntry client_entry;
  97   uint32 num = 0;
  98   char *nickname = NULL, *serv = NULL;
  99
 100   if (!silc_parse_nickname(nick, &nickname, &serv, &num)) {
 101     printformat_module("fe-common/silc", server, NULL,
 102                        MSGLEVEL_CRAP, SILCTXT_BAD_NICK, nick);
 103     return;
 104   }
 105
 106   /* Find client entry */
 107   client_entry = silc_idlist_get_client(silc_client, server->conn,
 108                                         nickname, serv, num, FALSE);
 109   if (!client_entry) {
 110     rec = g_new0(PRIVMSG_REC, 1);
 111     rec->nick = g_strdup(nick);
 112     rec->msg = g_strdup(msg);
 113
 114     /* Could not find client with that nick, resolve it from server. */
 115     silc_client_get_clients(silc_client, server->conn,
 116                             nickname, serv, silc_send_msg_clients, rec);
 117     return;
 118   }
 119
 120   /* Send the private message directly */
 121   silc_client_send_private_message(silc_client, server->conn, client_entry, 0,
 122                                    msg, strlen(msg), TRUE);
 123 }
 124
 125 static int isnickflag_func(char flag)
 126 {
 127   return flag == '@' || flag == '+';
 128 }
 129
 130 static int ischannel_func(const char *data)
 131 {
 132   return *data == '#';
 133 }
 134
 135 const char *get_nick_flags(void)
 136 {
 137   return "@\0\0";
 138 }
 139
 140 static void send_message(SILC_SERVER_REC *server, char *target, char *msg)
 141 {
 142   g_return_if_fail(server != NULL);
 143   g_return_if_fail(target != NULL);
 144   g_return_if_fail(msg != NULL);
 145
 146   if (*target == '#')
 147     silc_send_channel(server, target, msg);
 148   else
 149     silc_send_msg(server, target, msg);
 150 }
 151
 152 static void sig_connected(SILC_SERVER_REC *server)
 153 {
 154   SilcClientConnection conn;
 155   int fd;
 156
 157   if (!IS_SILC_SERVER(server))
 158     return;
 159
 160   conn = silc_client_add_connection(silc_client,
 161                                     server->connrec->address,
 162                                     server->connrec->port,
 163                                     server);
 164   server->conn = conn;
 165
 166   fd = g_io_channel_unix_get_fd(net_sendbuffer_handle(server->handle));
 167   if (!silc_client_start_key_exchange(silc_client, conn, fd)) {
 168     /* some internal error occured */
 169     server_disconnect(SERVER(server));
 170     signal_stop();
 171     return;
 172   }
 173
 174   server->isnickflag = isnickflag_func;
 175   server->ischannel = ischannel_func;
 176   server->get_nick_flags = get_nick_flags;
 177   server->send_message = (void *) send_message;
 178 }
 179
 180 static void sig_disconnected(SILC_SERVER_REC *server)
 181 {
 182   if (!IS_SILC_SERVER(server) || server->conn == NULL)
 183     return;
 184
 185   if (server->conn->sock != NULL) {
 186     silc_client_close_connection(silc_client, NULL, server->conn);
 187
 188     /* SILC closes the handle */
 189     g_io_channel_unref(net_sendbuffer_handle(server->handle));
 190     net_sendbuffer_destroy(server->handle, FALSE);
 191     server->handle = NULL;
 192   }
 193 }
 194
 195 SILC_SERVER_REC *silc_server_connect(SILC_SERVER_CONNECT_REC *conn)
 196 {
 197   SILC_SERVER_REC *server;
 198
 199   g_return_val_if_fail(IS_SILC_SERVER_CONNECT(conn), NULL);
 200   if (conn->address == NULL || *conn->address == '\0')
 201     return NULL;
 202   if (conn->nick == NULL || *conn->nick == '\0') {
 203     printtext(NULL, NULL, MSGLEVEL_CLIENTERROR,
 204               "Cannot connect: nickname is not set");
 205     return NULL;
 206   }
 207
 208   server = g_new0(SILC_SERVER_REC, 1);
 209   server->chat_type = SILC_PROTOCOL;
 210   server->connrec = conn;
 211   if (server->connrec->port <= 0)
 212     server->connrec->port = 706;
 213
 214   if (!server_start_connect((SERVER_REC *) server)) {
 215     server_connect_free(SERVER_CONNECT(conn));
 216     g_free(server);
 217     return NULL;
 218   }
 219
 220   return server;
 221 }
 222
 223 /* Return a string of all channels in server in server->channels_join()
 224    format */
 225
 226 char *silc_server_get_channels(SILC_SERVER_REC *server)
 227 {
 228   GSList *tmp;
 229   GString *chans;
 230   char *ret;
 231
 232   g_return_val_if_fail(server != NULL, FALSE);
 233
 234   chans = g_string_new(NULL);
 235   for (tmp = server->channels; tmp != NULL; tmp = tmp->next) {
 236     CHANNEL_REC *channel = tmp->data;
 237
 238     g_string_sprintfa(chans, "%s,", channel->name);
 239   }
 240
 241   if (chans->len > 0)
 242     g_string_truncate(chans, chans->len-1);
 243
 244   ret = chans->str;
 245   g_string_free(chans, FALSE);
 246
 247   return ret;
 248 }
 249
 250 /* Syntaxes of all SILC commands for HELP files (the help file generation
 251    will snoop these from here). */
 252
 253 /* SYNTAX: BAN <channel> [+|-[<nickname>[@<server>[!<username>[@hostname>]]]]] */
 254 /* SYNTAX: CMODE <channel> +|-<modes> [{ <arguments>}] */
 255 /* SYNTAX: CUMODE <channel> +|-<modes> <nickname>[@<server>] [-pubkey|<passwd>] */
 256 /* SYNTAX: GETKEY <nickname or server name> */
 257 /* SYNTAX: INVITE <channel> [<nickname>[@server>] */
 258 /* SYNTAX: INVITE <channel> [+|-[<nickname>[@<server>[!<username>[@hostname>]]]]] */
 259 /* SYNTAX: KEY MSG <nickname> set|unset|list|agreement|negotiate [<arguments>] */
 260 /* SYNTAX: KEY CHANNEL <channel> set|unset|list|agreement|negotiate [<arguments>] */
 261 /* SYNTAX: KICK <channel> <nickname>[@<server>] [<comment>] */
 262 /* SYNTAX: KILL <channel> <nickname>[@<server>] [<comment>] */
 263 /* SYNTAX: OPER <username> [-pubkey] */
 264 /* SYNTAX: SILCOPER <username> [-pubkey] */
 265 /* SYNTAX: TOPIC <channel> [<topic>] */
 266 /* SYNTAX: UMODE +|-<modes> */
 267 /* SYNTAX: WHOIS <nickname>[@<server>] [<count>] */
 268 /* SYNTAX: WHOWAS <nickname>[@<server>] [<count>] */
 269 /* SYNTAX: CLOSE <server> [<port>] */
 270 /* SYNTAX: SHUTDOWN */
 271 /* SYNTAX: MOTD [<server>] */
 272 /* SYNTAX: LIST [<channel>] */
 273 /* SYNTAX: ME <message> */
 274 /* SYNTAX: ACTION <channel> <message> */
 275 /* SYNTAX: AWAY [<message>] */
 276 /* SYNTAX: INFO [<server>] */
 277 /* SYNTAX: NICK <nickname> */
 278 /* SYNTAX: NOTICE <message> */
 279 /* SYNTAX: PART [<channel>] */
 280 /* SYNTAX: PING */
 281 /* SYNTAX: SCONNECT <server> [<port>] */
 282 /* SYNTAX: USERS <channel> */
 283
 284 void silc_command_exec(SILC_SERVER_REC *server,
 285                        const char *command, const char *args)
 286 {
 287   uint32 argc = 0;
 288   unsigned char **argv;
 289   uint32 *argv_lens, *argv_types;
 290   char *data, *tmpcmd;
 291   SilcClientCommand *cmd;
 292   SilcClientCommandContext ctx;
 293
 294   g_return_if_fail(server != NULL);
 295
 296   tmpcmd = g_strdup(command);
 297   g_strup(tmpcmd);
 298   cmd = silc_client_command_find(tmpcmd);
 299   g_free(tmpcmd);
 300   if (cmd == NULL)
 301     return;
 302
 303   /* Now parse all arguments */
 304   data = g_strconcat(command, " ", args, NULL);
 305   silc_parse_command_line(data, &argv, &argv_lens,
 306                           &argv_types, &argc, cmd->max_args);
 307   g_free(data);
 308
 309   /* Allocate command context. This and its internals must be free'd
 310      by the command routine receiving it. */
 311   ctx = silc_client_command_alloc();
 312   ctx->client = silc_client;
 313   ctx->conn = server->conn;
 314   ctx->command = cmd;
 315   ctx->argc = argc;
 316   ctx->argv = argv;
 317   ctx->argv_lens = argv_lens;
 318   ctx->argv_types = argv_types;
 319
 320   /* Execute command */
 321   (*cmd->cb)(ctx, NULL);
 322 }
 323
 324 /* Generic command function to call any SILC command directly. */
 325
 326 static void command_self(const char *data, SILC_SERVER_REC *server,
 327                          WI_ITEM_REC *item)
 328 {
 329   if (!IS_SILC_SERVER(server) || !server->connected) {
 330     printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, "Not connected to server");
 331     return;
 332   }
 333
 334   if (IS_SILC_CHANNEL(item)) {
 335     SILC_CHANNEL_REC *chanrec;
 336     chanrec = silc_channel_find(server, item->name);
 337     if (chanrec)
 338       server->conn->current_channel = chanrec->entry;
 339   }
 340
 341   silc_command_exec(server, current_command, data);
 342   signal_stop();
 343 }
 344
 345 /* SCONNECT command.  Calls actually SILC's CONNECT command since Irssi
 346    has CONNECT command for other purposes. */
 347
 348 static void command_sconnect(const char *data, SILC_SERVER_REC *server)
 349 {
 350   if (!IS_SILC_SERVER(server) || !server->connected) {
 351     printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, "Not connected to server");
 352     return;
 353   }
 354
 355   silc_command_exec(server, "CONNECT", data);
 356   signal_stop();
 357 }
 358
 359 static void event_text(const char *line, SILC_SERVER_REC *server,
 360                        WI_ITEM_REC *item)
 361 {
 362   char *str;
 363
 364   g_return_if_fail(line != NULL);
 365
 366   if (!IS_SILC_ITEM(item))
 367     return;
 368
 369   str = g_strdup_printf("%s %s", item->name, line);
 370   signal_emit("command msg", 3, str, server, item);
 371   g_free(str);
 372
 373   signal_stop();
 374 }
 375
 376 void silc_server_init(void)
 377 {
 378   silc_servers_reconnect_init();
 379
 380   signal_add_first("server connected", (SIGNAL_FUNC) sig_connected);
 381   signal_add("server disconnected", (SIGNAL_FUNC) sig_disconnected);
 382   signal_add("send text", (SIGNAL_FUNC) event_text);
 383   command_bind("whois", MODULE_NAME, (SIGNAL_FUNC) command_self);
 384   command_bind("whowas", MODULE_NAME, (SIGNAL_FUNC) command_self);
 385   command_bind("nick", MODULE_NAME, (SIGNAL_FUNC) command_self);
 386   command_bind("topic", MODULE_NAME, (SIGNAL_FUNC) command_self);
 387   command_bind("cmode", MODULE_NAME, (SIGNAL_FUNC) command_self);
 388   command_bind("cumode", MODULE_NAME, (SIGNAL_FUNC) command_self);
 389   command_bind("users", MODULE_NAME, (SIGNAL_FUNC) command_self);
 390   command_bind("list", MODULE_NAME, (SIGNAL_FUNC) command_self);
 391   command_bind("ban", MODULE_NAME, (SIGNAL_FUNC) command_self);
 392   command_bind("oper", MODULE_NAME, (SIGNAL_FUNC) command_self);
 393   command_bind("silcoper", MODULE_NAME, (SIGNAL_FUNC) command_self);
 394   command_bind("umode", MODULE_NAME, (SIGNAL_FUNC) command_self);
 395   command_bind("invite", MODULE_NAME, (SIGNAL_FUNC) command_self);
 396   command_bind("kill", MODULE_NAME, (SIGNAL_FUNC) command_self);
 397   command_bind("kick", MODULE_NAME, (SIGNAL_FUNC) command_self);
 398   command_bind("info", MODULE_NAME, (SIGNAL_FUNC) command_self);
 399   command_bind("ping", MODULE_NAME, (SIGNAL_FUNC) command_self);
 400   command_bind("motd", MODULE_NAME, (SIGNAL_FUNC) command_self);
 401   command_bind("close", MODULE_NAME, (SIGNAL_FUNC) command_self);
 402   command_bind("shutdown", MODULE_NAME, (SIGNAL_FUNC) command_self);
 403   command_bind("getkey", MODULE_NAME, (SIGNAL_FUNC) command_self);
 404   command_bind("sconnect", MODULE_NAME, (SIGNAL_FUNC) command_sconnect);
 405
 406   command_set_options("connect", "+silcnet");
 407 }
 408
 409 void silc_server_deinit(void)
 410 {
 411   silc_servers_reconnect_deinit();
 412
 413   signal_remove("server connected", (SIGNAL_FUNC) sig_connected);
 414   signal_remove("server disconnected", (SIGNAL_FUNC) sig_disconnected);
 415   signal_remove("send text", (SIGNAL_FUNC) event_text);
 416   command_unbind("whois", (SIGNAL_FUNC) command_self);
 417   command_unbind("whowas", (SIGNAL_FUNC) command_self);
 418   command_unbind("nick", (SIGNAL_FUNC) command_self);
 419   command_unbind("topic", (SIGNAL_FUNC) command_self);
 420   command_unbind("cmode", (SIGNAL_FUNC) command_self);
 421   command_unbind("cumode", (SIGNAL_FUNC) command_self);
 422   command_unbind("users", (SIGNAL_FUNC) command_self);
 423   command_unbind("list", (SIGNAL_FUNC) command_self);
 424   command_unbind("oper", (SIGNAL_FUNC) command_self);
 425   command_unbind("silcoper", (SIGNAL_FUNC) command_self);
 426   command_unbind("umode", (SIGNAL_FUNC) command_self);
 427   command_unbind("invite", (SIGNAL_FUNC) command_self);
 428   command_unbind("kill", (SIGNAL_FUNC) command_self);
 429   command_unbind("kick", (SIGNAL_FUNC) command_self);
 430   command_unbind("info", (SIGNAL_FUNC) command_self);
 431   command_unbind("ping", (SIGNAL_FUNC) command_self);
 432   command_unbind("motd", (SIGNAL_FUNC) command_self);
 433   command_unbind("ban", (SIGNAL_FUNC) command_self);
 434   command_unbind("close", (SIGNAL_FUNC) command_self);
 435   command_unbind("shutdown", (SIGNAL_FUNC) command_self);
 436   command_unbind("getkey", (SIGNAL_FUNC) command_self);
 437   command_unbind("sconnect", (SIGNAL_FUNC) command_sconnect);
 438 }