X-Git-Url: http://git.silcnet.org/gitweb/?a=blobdiff_plain;f=apps%2Firssi%2Fsrc%2Fsilc%2Fcore%2Fsilc-servers.c;h=03ccd79f7426e2c27bc9a24706e65bac7b7556c1;hb=a818c5b5411bbc4436d1c5f011236985c96bb787;hp=b2abf157471dbc1ec8e267aa3f826c6080a52e7e;hpb=0c3ce04695c7df2a07612529c4e91924de9fb497;p=silc.git

diff --git a/apps/irssi/src/silc/core/silc-servers.c b/apps/irssi/src/silc/core/silc-servers.c
index b2abf157..03ccd79f 100644
--- a/apps/irssi/src/silc/core/silc-servers.c
+++ b/apps/irssi/src/silc/core/silc-servers.c
@@ -1,21 +1,22 @@
 /*
- silc-server.c : irssi
+  silc-server.c : irssi
 
-    Copyright (C) 2000 Timo Sirainen
+  Copyright (C) 2000 - 2001 Timo Sirainen
+                            Pekka Riikonen <priikone@poseidon.pspt.fi>
 
-    This program is free software; you can redistribute it and/or modify
-    it under the terms of the GNU General Public License as published by
-    the Free Software Foundation; either version 2 of the License, or
-    (at your option) any later version.
-
-    This program is distributed in the hope that it will be useful,
-    but WITHOUT ANY WARRANTY; without even the implied warranty of
-    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-    GNU General Public License for more details.
-
-    You should have received a copy of the GNU General Public License
-    along with this program; if not, write to the Free Software
-    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+  This program is free software; you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+  
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program; if not, write to the Free Software
+  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */
 
 #include "module.h"
@@ -36,9 +37,11 @@
 #include "silc-servers.h"
 #include "silc-channels.h"
 #include "silc-queries.h"
+#include "silc-nicklist.h"
 #include "window-item-def.h"
 
 #include "fe-common/core/printtext.h"
+#include "fe-common/silc/module-formats.h"
 
 void silc_servers_reconnect_init(void);
 void silc_servers_reconnect_deinit(void);
@@ -49,7 +52,7 @@ static void silc_send_channel(SILC_SERVER_REC *server,
   SILC_CHANNEL_REC *rec;
   
   rec = silc_channel_find(server, channel);
-  if (rec == NULL)
+  if (rec == NULL || rec->entry == NULL)
     return;
   
   silc_client_send_channel_message(silc_client, server->conn, rec->entry, 
@@ -57,30 +60,65 @@ static void silc_send_channel(SILC_SERVER_REC *server,
 }
 
 typedef struct {
-	char *nick;
-        char *msg;
+  char *nick;
+  char *msg;
+  SILC_SERVER_REC *server;
 } PRIVMSG_REC;
 
+/* Callback function that sends the private message if the client was
+   resolved from the server. */
+
 static void silc_send_msg_clients(SilcClient client,
 				  SilcClientConnection conn,
 				  SilcClientEntry *clients,
-				  uint32 clients_count,
+				  SilcUInt32 clients_count,
 				  void *context)
 {
   PRIVMSG_REC *rec = context;
+  SILC_SERVER_REC *server = rec->server;
   SilcClientEntry target;
-  
-  if (clients_count == 0) {
-    printtext(NULL, NULL, MSGLEVEL_CLIENTERROR,
-	      "Unknown nick: %s", rec->nick);
+  char *nickname = NULL;
+
+  if (!clients_count) {
+    printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, 
+	      "%s: There is no such client", rec->nick);
   } else {
-    target = clients[0]; /* FIXME: not a good idea :) */
-    
+    if (clients_count > 1) {
+      silc_parse_userfqdn(rec->nick, &nickname, NULL);
+
+      /* Find the correct one. The rec->nick might be a formatted nick
+	 so this will find the correct one. */
+      clients = silc_client_get_clients_local(silc_client, server->conn, 
+					      nickname, rec->nick, 
+					      &clients_count);
+      if (!clients) {
+	printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, 
+		  "%s: There is no such client", rec->nick);
+	silc_free(nickname);
+	goto out;
+      }
+      silc_free(nickname);
+    }
+
+    target = clients[0];
+
+    /* Still check for exact math for nickname, this compares the
+       real (formatted) nickname and the nick (maybe formatted) that
+       use gave. This is to assure that `nick' does not match 
+       `nick@host'. */
+    if (strcasecmp(rec->nick, clients[0]->nickname)) {
+      printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, 
+		"%s: There is no such client", rec->nick);
+      goto out;
+    }
+
+    /* Send the private message */
     silc_client_send_private_message(client, conn, target, 0,
 				     rec->msg, strlen(rec->msg),
 				     TRUE);
   }
   
+ out:
   g_free(rec->nick);
   g_free(rec->msg);
   g_free(rec);
@@ -89,76 +127,98 @@ static void silc_send_msg_clients(SilcClient client,
 static void silc_send_msg(SILC_SERVER_REC *server, char *nick, char *msg)
 {
   PRIVMSG_REC *rec;
-  
-  rec = g_new0(PRIVMSG_REC, 1);
-  rec->nick = g_strdup(nick);
-  rec->msg = g_strdup(msg);
-  
-  silc_client_get_clients(silc_client, server->conn,
-			  nick, "", silc_send_msg_clients, rec);
+  SilcClientEntry *clients;
+  SilcUInt32 clients_count;
+  char *nickname = NULL;
+
+  if (!silc_parse_userfqdn(nick, &nickname, NULL)) {
+    printformat_module("fe-common/silc", server, NULL,
+		       MSGLEVEL_CRAP, SILCTXT_BAD_NICK, nick);
+    return;
+  }
+
+  /* Find client entry */
+  clients = silc_client_get_clients_local(silc_client, server->conn, 
+					  nickname, nick, &clients_count);
+  if (!clients) {
+    rec = g_new0(PRIVMSG_REC, 1);
+    rec->nick = g_strdup(nick);
+    rec->msg = g_strdup(msg);
+    rec->server = server;
+
+    /* Could not find client with that nick, resolve it from server. */
+    silc_client_get_clients(silc_client, server->conn,
+			    nickname, NULL, silc_send_msg_clients, rec);
+    silc_free(nickname);
+    return;
+  }
+
+  /* Send the private message directly */
+  silc_free(nickname);
+  silc_client_send_private_message(silc_client, server->conn, 
+				   clients[0], 0, msg, strlen(msg), TRUE);
 }
 
 static int isnickflag_func(char flag)
 {
-	return flag == '@' || flag == '+';
+  return flag == '@' || flag == '+';
 }
 
-static int ischannel_func(const char *data)
+static int ischannel_func(SERVER_REC *server, const char *data)
 {
-	return *data == '#';
+  return FALSE;
 }
 
 const char *get_nick_flags(void)
 {
-        return "@\0\0";
+  return "@\0\0";
 }
 
-static void send_message(SILC_SERVER_REC *server, char *target, char *msg)
+static void send_message(SILC_SERVER_REC *server, char *target,
+			 char *msg, int target_type)
 {
-	g_return_if_fail(server != NULL);
-	g_return_if_fail(target != NULL);
-	g_return_if_fail(msg != NULL);
-
-	if (*target == '#')
-		silc_send_channel(server, target, msg);
-	else
-		silc_send_msg(server, target, msg);
+  g_return_if_fail(server != NULL);
+  g_return_if_fail(target != NULL);
+  g_return_if_fail(msg != NULL);
+
+  if (target_type == SEND_TARGET_CHANNEL)
+    silc_send_channel(server, target, msg);
+  else
+    silc_send_msg(server, target, msg);
 }
 
 static void sig_connected(SILC_SERVER_REC *server)
 {
-	SilcClientConnection conn;
-	int fd;
-
-	if (!IS_SILC_SERVER(server))
-		return;
-
-	conn = silc_client_add_connection(silc_client,
-					  server->connrec->address,
-					  server->connrec->port,
-					  server);
-	server->conn = conn;
-
-	fd = g_io_channel_unix_get_fd(net_sendbuffer_handle(server->handle));
-	if (!silc_client_start_key_exchange(silc_client, conn, fd)) {
-                /* some internal error occured */
-		server_disconnect(SERVER(server));
-		signal_stop();
-		return;
-	}
+  SilcClientConnection conn;
+  int fd;
+
+  if (!IS_SILC_SERVER(server))
+    return;
 
-	server->isnickflag = isnickflag_func;
-	server->ischannel = ischannel_func;
-        server->get_nick_flags = get_nick_flags;
-	server->send_message = (void *) send_message;
+  conn = silc_client_add_connection(silc_client,
+				    server->connrec->address,
+				    server->connrec->port,
+				    server);
+  server->conn = conn;
+	
+  fd = g_io_channel_unix_get_fd(net_sendbuffer_handle(server->handle));
+  silc_client_start_key_exchange(silc_client, conn, fd);
+
+  server->ftp_sessions = silc_dlist_init();
+  server->isnickflag = isnickflag_func;
+  server->ischannel = ischannel_func;
+  server->get_nick_flags = get_nick_flags;
+  server->send_message = (void *) send_message;
 }
 
 static void sig_disconnected(SILC_SERVER_REC *server)
 {
-  if (!IS_SILC_SERVER(server) || server->conn == NULL)
+  if (!IS_SILC_SERVER(server))
     return;
-  
-  if (server->conn->sock != NULL) {
+
+  silc_dlist_uninit(server->ftp_sessions);
+
+  if (server->conn && server->conn->sock != NULL) {
     silc_client_close_connection(silc_client, NULL, server->conn);
     
     /* SILC closes the handle */
@@ -170,160 +230,690 @@ static void sig_disconnected(SILC_SERVER_REC *server)
 
 SILC_SERVER_REC *silc_server_connect(SILC_SERVER_CONNECT_REC *conn)
 {
-	SILC_SERVER_REC *server;
+  SILC_SERVER_REC *server;
+
+  g_return_val_if_fail(IS_SILC_SERVER_CONNECT(conn), NULL);
+  if (conn->address == NULL || *conn->address == '\0') 
+    return NULL;
+  if (conn->nick == NULL || *conn->nick == '\0') {
+    printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, 
+	      "Cannot connect: nickname is not set");
+    return NULL;
+  }
 
-	g_return_val_if_fail(IS_SILC_SERVER_CONNECT(conn), NULL);
-	if (conn->address == NULL || *conn->address == '\0') return NULL;
-	if (conn->nick == NULL || *conn->nick == '\0') return NULL;
+  server = g_new0(SILC_SERVER_REC, 1);
+  server->chat_type = SILC_PROTOCOL;
+  server->connrec = conn;
+  if (server->connrec->port <= 0) 
+    server->connrec->port = 706;
 
-	server = g_new0(SILC_SERVER_REC, 1);
-	server->chat_type = SILC_PROTOCOL;
-	server->connrec = conn;
-	if (server->connrec->port <= 0) server->connrec->port = 706;
+  server_connect_ref(SERVER_CONNECT(conn));
 
-	if (!server_start_connect((SERVER_REC *) server)) {
-                server_connect_free(SERVER_CONNECT(conn));
-		g_free(server);
-		return NULL;
-	}
+  if (!server_start_connect((SERVER_REC *) server)) {
+    server_connect_unref(SERVER_CONNECT(conn));
+    g_free(server);
+    return NULL;
+  }
 
-	return server;
+  return server;
 }
 
-/* Return a string of all channels in server in
-   server->channels_join() format */
+/* Return a string of all channels in server in server->channels_join() 
+   format */
+
 char *silc_server_get_channels(SILC_SERVER_REC *server)
 {
-	GSList *tmp;
-	GString *chans;
-	char *ret;
-
-	g_return_val_if_fail(server != NULL, FALSE);
+  GSList *tmp;
+  GString *chans;
+  char *ret;
 
-	chans = g_string_new(NULL);
-	for (tmp = server->channels; tmp != NULL; tmp = tmp->next) {
-		CHANNEL_REC *channel = tmp->data;
-
-		g_string_sprintfa(chans, "%s,", channel->name);
-	}
+  g_return_val_if_fail(server != NULL, FALSE);
 
-	if (chans->len > 0)
-		g_string_truncate(chans, chans->len-1);
+  chans = g_string_new(NULL);
+  for (tmp = server->channels; tmp != NULL; tmp = tmp->next) {
+    CHANNEL_REC *channel = tmp->data;
+    
+    g_string_sprintfa(chans, "%s,", channel->name);
+  }
 
-	ret = chans->str;
-	g_string_free(chans, FALSE);
+  if (chans->len > 0)
+    g_string_truncate(chans, chans->len-1);
 
-	return ret;
+  ret = chans->str;
+  g_string_free(chans, FALSE);
+  
+  return ret;
 }
 
+/* Syntaxes of all SILC commands for HELP files (the help file generation
+   will snoop these from here). */
+
+/* SYNTAX: BAN <channel> [+|-[<nickname>[@<server>[!<username>[@hostname>]]]]] */
+/* SYNTAX: CMODE <channel> +|-<modes> [{ <arguments>}] */
+/* SYNTAX: CUMODE <channel> +|-<modes> <nickname>[@<hostname>] [-pubkey|<passwd>] */
+/* SYNTAX: GETKEY <nickname or server name> */
+/* SYNTAX: INVITE <channel> [<nickname>[@hostname>] */
+/* SYNTAX: INVITE <channel> [+|-[<nickname>[@<server>[!<username>[@hostname>]]]]] */
+/* SYNTAX: KEY MSG <nickname> set|unset|list|agreement|negotiate [<arguments>] */
+/* SYNTAX: KEY CHANNEL <channel> set|unset|list [<arguments>] */
+/* SYNTAX: KICK <channel> <nickname>[@<hostname>] [<comment>] */
+/* SYNTAX: KILL <nickname>[@<hostname>] [<comment>] */
+/* SYNTAX: OPER <username> [-pubkey] */
+/* SYNTAX: SILCOPER <username> [-pubkey] */
+/* SYNTAX: TOPIC <channel> [<topic>] */
+/* SYNTAX: UMODE +|-<modes> */
+/* SYNTAX: WHOIS <nickname>[@<hostname>] [<count>] */
+/* SYNTAX: WHOWAS <nickname>[@<hostname>] [<count>] */
+/* SYNTAX: CLOSE <server> [<port>] */
+/* SYNTAX: SHUTDOWN */
+/* SYNTAX: MOTD [<server>] */
+/* SYNTAX: LIST [<channel>] */
+/* SYNTAX: ME <message> */
+/* SYNTAX: ACTION <channel> <message> */
+/* SYNTAX: AWAY [<message>] */
+/* SYNTAX: INFO [<server>] */
+/* SYNTAX: NICK <nickname> */
+/* SYNTAX: NOTICE <message> */
+/* SYNTAX: PART [<channel>] */
+/* SYNTAX: PING */
+/* SYNTAX: SCONNECT <server> [<port>] */
+/* SYNTAX: USERS <channel> */
+/* SYNTAX: FILE SEND <filepath> <nickname> [<local IP> [<local port>]] */
+/* SYNTAX: FILE RECEIVE [<nickname>] */
+/* SYNTAX: FILE CLOSE [<nickname>] */
+/* SYNTAX: FILE */
+/* SYNTAX: JOIN <channel> [<passphrase>] [-cipher <cipher>] [-hmac <hmac>] [-founder <-pubkey|passwd>] */
+
 void silc_command_exec(SILC_SERVER_REC *server,
 		       const char *command, const char *args)
 {
-	uint32 argc = 0;
-	unsigned char **argv;
-	uint32 *argv_lens, *argv_types;
-	char *data, *tmpcmd;
-	SilcClientCommand *cmd;
-	SilcClientCommandContext ctx;
-
-	g_return_if_fail(server != NULL);
-
-	tmpcmd = g_strdup(command); g_strup(tmpcmd);
-	cmd = silc_client_command_find(tmpcmd);
-	g_free(tmpcmd);
-	if (cmd == NULL) return;
-
-	/* Now parse all arguments */
-	data = g_strconcat(command, " ", args, NULL);
-	silc_parse_command_line(data, &argv, &argv_lens,
-				&argv_types, &argc, cmd->max_args);
-	g_free(data);
-
-	/* Allocate command context. This and its internals must be free'd
-	   by the command routine receiving it. */
-	ctx = silc_client_command_alloc();
-	ctx->client = silc_client;
-	ctx->conn = server->conn;
-	ctx->command = cmd;
-	ctx->argc = argc;
-	ctx->argv = argv;
-	ctx->argv_lens = argv_lens;
-	ctx->argv_types = argv_types;
-
-	/* Execute command */
-	(*cmd->cb)(ctx);
+  SilcUInt32 argc = 0;
+  unsigned char **argv;
+  SilcUInt32 *argv_lens, *argv_types;
+  char *data, *tmpcmd;
+  SilcClientCommand cmd;
+  SilcClientCommandContext ctx;
+
+  g_return_if_fail(server != NULL);
+
+  tmpcmd = g_strdup(command); 
+  g_strup(tmpcmd);
+  cmd = silc_client_command_find(silc_client, tmpcmd);
+  g_free(tmpcmd);
+  if (cmd == NULL)
+    return;
+  
+  /* Now parse all arguments */
+  data = g_strconcat(command, " ", args, NULL);
+  silc_parse_command_line(data, &argv, &argv_lens,
+			  &argv_types, &argc, cmd->max_args);
+  g_free(data);
+
+  /* Allocate command context. This and its internals must be free'd
+     by the command routine receiving it. */
+  ctx = silc_client_command_alloc();
+  ctx->client = silc_client;
+  ctx->conn = server->conn;
+  ctx->command = cmd;
+  ctx->argc = argc;
+  ctx->argv = argv;
+  ctx->argv_lens = argv_lens;
+  ctx->argv_types = argv_types;
+  
+  /* Execute command */
+  silc_client_command_call(cmd, ctx);
+}
+
+/* Generic command function to call any SILC command directly. */
+
+static void command_self(const char *data, SILC_SERVER_REC *server,
+			 WI_ITEM_REC *item)
+{
+  if (!IS_SILC_SERVER(server) || !server->connected) {
+    printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, "Not connected to server");
+    return;
+  }
+
+  if (IS_SILC_CHANNEL(item)) {
+    SILC_CHANNEL_REC *chanrec;
+    chanrec = silc_channel_find(server, item->name);
+    if (chanrec)
+      server->conn->current_channel = chanrec->entry;
+  }
+
+  silc_command_exec(server, current_command, data);
+  signal_stop();
 }
 
-static void command_users(const char *data, SILC_SERVER_REC *server,
-			  WI_ITEM_REC *item)
+/* SCONNECT command.  Calls actually SILC's CONNECT command since Irssi
+   has CONNECT command for other purposes. */
+
+static void command_sconnect(const char *data, SILC_SERVER_REC *server)
 {
-        signal_emit("command names", 3, data, server, item);
+  if (!IS_SILC_SERVER(server) || !server->connected) {
+    printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, "Not connected to server");
+    return;
+  }
+
+  silc_command_exec(server, "CONNECT", data);
+  signal_stop();
 }
 
-static void command_self(const char *data, SILC_SERVER_REC *server)
+/* FILE command */
+
+SILC_TASK_CALLBACK(silc_client_file_close_later)
 {
-	if (!IS_SILC_SERVER(server) || !server->connected)
-		return;
+  FtpSession ftp = (FtpSession)context;
 
-	silc_command_exec(server, current_command, data);
-	signal_stop();
+  SILC_LOG_DEBUG(("Start"));
+
+  silc_client_file_close(silc_client, ftp->conn, ftp->session_id);
+  silc_free(ftp->filepath);
+  silc_free(ftp);
 }
 
-static void event_motd(SILC_SERVER_REC *server, va_list va)
+static void silc_client_file_monitor(SilcClient client,
+				     SilcClientConnection conn,
+				     SilcClientMonitorStatus status,
+				     SilcClientFileError error,
+				     SilcUInt64 offset,
+				     SilcUInt64 filesize,
+				     SilcClientEntry client_entry,
+				     SilcUInt32 session_id,
+				     const char *filepath,
+				     void *context)
 {
-	char *text = va_arg(va, char *);
+  SILC_SERVER_REC *server = (SILC_SERVER_REC *)context;
+  FtpSession ftp;
+  char fsize[32];
+
+  snprintf(fsize, sizeof(fsize) - 1, "%llu", ((filesize + 1023) / 1024));
+
+  silc_dlist_start(server->ftp_sessions);
+  while ((ftp = silc_dlist_get(server->ftp_sessions)) != SILC_LIST_END) {
+    if (ftp->session_id == session_id) {
+      if (!ftp->filepath && filepath)
+	ftp->filepath = strdup(filepath);
+      break;
+    }
+  }
+
+  if (ftp == SILC_LIST_END)
+    return;
+
+  if (status == SILC_CLIENT_FILE_MONITOR_ERROR) {
+    if (error == SILC_CLIENT_FILE_NO_SUCH_FILE)
+      printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			 SILCTXT_FILE_ERROR_NO_SUCH_FILE, 
+			 client_entry->nickname, 
+			 filepath ? filepath : "[N/A]");
+    else if (error == SILC_CLIENT_FILE_PERMISSION_DENIED)
+      printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			 SILCTXT_FILE_ERROR_PERMISSION_DENIED, 
+			 client_entry->nickname);
+    else
+      printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			 SILCTXT_FILE_ERROR, client_entry->nickname);
+    silc_schedule_task_add(silc_client->schedule, 0,
+			   silc_client_file_close_later, ftp,
+			   1, 0, SILC_TASK_TIMEOUT, SILC_TASK_PRI_NORMAL);
+    if (ftp == server->current_session)
+      server->current_session = NULL;
+    silc_dlist_del(server->ftp_sessions, ftp);
+  }
+
+  if (status == SILC_CLIENT_FILE_MONITOR_KEY_AGREEMENT) {
+    printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+		       SILCTXT_FILE_KEY_EXCHANGE, client_entry->nickname);
+  }
+
+  /* Save some transmission data */
+  if (offset && filesize) {
+    unsigned long delta = time(NULL) - ftp->starttime;
+
+    ftp->percent = ((double)offset / (double)filesize) * (double)100.0;
+    if (delta)
+      ftp->kps = (double)((offset / (double)delta) + 1023) / (double)1024;
+    else
+      ftp->kps = (double)(offset + 1023) / (double)1024;
+    ftp->offset = offset;
+    ftp->filesize = filesize;
+  }
 
-	if (!settings_get_bool("skip_motd"))
-		printtext_multiline(server, NULL, MSGLEVEL_CRAP, "%s", text);
+  if (status == SILC_CLIENT_FILE_MONITOR_SEND) {
+    if (offset == 0) {
+      printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			 SILCTXT_FILE_TRANSMIT, filepath, fsize,
+			 client_entry->nickname);
+      ftp->starttime = time(NULL);
+    }
+    if (offset == filesize) {
+      printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			 SILCTXT_FILE_TRANSMITTED, filepath, fsize,
+			 client_entry->nickname, ftp->kps);
+      silc_schedule_task_add(silc_client->schedule, 0,
+			     silc_client_file_close_later, ftp,
+			     1, 0, SILC_TASK_TIMEOUT, SILC_TASK_PRI_NORMAL);
+      if (ftp == server->current_session)
+	server->current_session = NULL;
+      silc_dlist_del(server->ftp_sessions, ftp);
+    }
+  }
+
+  if (status == SILC_CLIENT_FILE_MONITOR_RECEIVE) {
+    if (offset == 0) {
+      printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			 SILCTXT_FILE_RECEIVE, filepath, fsize,
+			 client_entry->nickname);
+      ftp->starttime = time(NULL);
+    }
+
+    if (offset == filesize) {
+      printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			 SILCTXT_FILE_RECEIVED, filepath, fsize,
+			 client_entry->nickname, ftp->kps);
+      silc_schedule_task_add(silc_client->schedule, 0,
+			     silc_client_file_close_later, ftp,
+			     1, 0, SILC_TASK_TIMEOUT, SILC_TASK_PRI_NORMAL);
+      if (ftp == server->current_session)
+	server->current_session = NULL;
+      silc_dlist_del(server->ftp_sessions, ftp);
+    }
+  }
 }
 
-static void event_text(const char *line, SILC_SERVER_REC *server,
-		       WI_ITEM_REC *item)
+typedef struct {
+  SILC_SERVER_REC *server;
+  char *data;
+  char *nick;
+  WI_ITEM_REC *item;
+} *FileGetClients;
+
+static void silc_client_command_file_get_clients(SilcClient client,
+						 SilcClientConnection conn,
+						 SilcClientEntry *clients,
+						 SilcUInt32 clients_count,
+						 void *context)
 {
-	char *str;
+  FileGetClients internal = (FileGetClients)context;
+
+  if (!clients) {
+    printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, "Unknown nick: %s", 
+	      internal->nick);
+    silc_free(internal->data);
+    silc_free(internal->nick);
+    silc_free(internal);
+    return;
+  }
 
-	g_return_if_fail(line != NULL);
+  signal_emit("command file", 3, internal->data, internal->server,
+	      internal->item);
 
-	if (!IS_SILC_ITEM(item))
-		return;
+  silc_free(internal->data);
+  silc_free(internal->nick);
+  silc_free(internal);
+}
 
-	str = g_strdup_printf("%s %s", item->name, line);
-	signal_emit("command msg", 3, str, server, item);
-	g_free(str);
+static void command_file(const char *data, SILC_SERVER_REC *server,
+			 WI_ITEM_REC *item)
+{
+  SilcClientConnection conn;
+  SilcClientEntry *entrys, client_entry;
+  SilcClientFileError ret;
+  SilcUInt32 entry_count;
+  char *nickname = NULL, *tmp;
+  unsigned char **argv;
+  SilcUInt32 argc;
+  SilcUInt32 *argv_lens, *argv_types;
+  int type = 0;
+  FtpSession ftp;
+  char *local_ip = NULL;
+  SilcUInt32 local_port = 0;
+  SilcUInt32 session_id;
+
+  if (!server || !IS_SILC_SERVER(server) || !server->connected)
+    cmd_return_error(CMDERR_NOT_CONNECTED);
+
+  conn = server->conn;
+
+  /* Now parse all arguments */
+  tmp = g_strconcat("FILE", " ", data, NULL);
+  silc_parse_command_line(tmp, &argv, &argv_lens, &argv_types, &argc, 6);
+  g_free(tmp);
+
+  if (argc == 1)
+    type = 4;
+
+  if (argc >= 2) {
+    if (!strcasecmp(argv[1], "send"))
+      type = 1;
+    if (!strcasecmp(argv[1], "receive"))
+      type = 2;
+    if (!strcasecmp(argv[1], "close"))
+      type = 3;
+  }
+  
+  if (type == 0)
+    cmd_return_error(CMDERR_NOT_ENOUGH_PARAMS);
+
+  switch (type) {
+  case 1:
+    if (argc < 4)
+      cmd_return_error(CMDERR_NOT_ENOUGH_PARAMS);
+
+    /* Parse the typed nickname. */
+    if (!silc_parse_userfqdn(argv[3], &nickname, NULL)) {
+      printformat_module("fe-common/silc", server, NULL,
+			 MSGLEVEL_CRAP, SILCTXT_BAD_NICK, argv[3]);
+      goto out;
+    }
+    
+    /* Find client entry */
+    entrys = silc_client_get_clients_local(silc_client, conn, nickname,
+					   argv[3], &entry_count);
+    if (!entrys) {
+      FileGetClients inter = silc_calloc(1, sizeof(*inter));
+      inter->server = server;
+      inter->data = strdup(data);
+      inter->nick = strdup(nickname);
+      inter->item = item;
+      silc_client_get_clients(silc_client, conn, nickname, argv[3],
+			      silc_client_command_file_get_clients, inter);
+      goto out;
+    }
+    client_entry = entrys[0];
+    silc_free(entrys);
+
+    if (argc >= 5)
+      local_ip = argv[4];
+    if (argc >= 6)
+      local_port = atoi(argv[5]);
+
+    ret = 
+      silc_client_file_send(silc_client, conn, silc_client_file_monitor, 
+			    server, local_ip, local_port, 
+			    client_entry, argv[2], &session_id);
+    if (ret == SILC_CLIENT_FILE_OK) {
+      ftp = silc_calloc(1, sizeof(*ftp));
+      ftp->session_id = session_id;
+
+      printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			 SILCTXT_FILE_SEND, client_entry->nickname,
+			 argv[2]);
+
+      ftp->client_entry = client_entry;
+      ftp->filepath = strdup(argv[2]);
+      ftp->conn = conn;
+      ftp->send = TRUE;
+      silc_dlist_add(server->ftp_sessions, ftp);
+      server->current_session = ftp;
+    } else {
+      if (ret == SILC_CLIENT_FILE_ALREADY_STARTED)
+	printformat_module("fe-common/silc", server, NULL,
+			   MSGLEVEL_CRAP, SILCTXT_FILE_ALREADY_STARTED,
+			   client_entry->nickname);
+      if (ret == SILC_CLIENT_FILE_NO_SUCH_FILE)
+	printformat_module("fe-common/silc", NULL, NULL, MSGLEVEL_CRAP,
+			   SILCTXT_FILE_ERROR_NO_SUCH_FILE, 
+			   client_entry->nickname, argv[2]);
+    }
+
+    break;
+
+  case 2:
+    /* Parse the typed nickname. */
+    if (argc >= 3) {
+      if (!silc_parse_userfqdn(argv[2], &nickname, NULL)) {
+	printformat_module("fe-common/silc", server, NULL,
+			   MSGLEVEL_CRAP, SILCTXT_BAD_NICK, argv[2]);
+	goto out;
+      }
+    
+      /* Find client entry */
+      entrys = silc_client_get_clients_local(silc_client, conn, nickname,
+					     argv[2], &entry_count);
+      if (!entrys) {
+	FileGetClients inter = silc_calloc(1, sizeof(*inter));
+	inter->server = server;
+	inter->data = strdup(data);
+	inter->nick = strdup(nickname);
+	inter->item = item;
+	silc_client_get_clients(silc_client, conn, nickname, argv[2],
+				silc_client_command_file_get_clients, inter);
+	goto out;
+      }
+      client_entry = entrys[0];
+      silc_free(entrys);
+    } else {
+      if (!server->current_session) {
+	printformat_module("fe-common/silc", server, NULL,
+			   MSGLEVEL_CRAP, SILCTXT_FILE_NA);
+	goto out;
+      }
+
+      ret = silc_client_file_receive(silc_client, conn, 
+				     silc_client_file_monitor, server,
+				     server->current_session->session_id);
+      if (ret != SILC_CLIENT_FILE_OK) {
+	if (ret == SILC_CLIENT_FILE_ALREADY_STARTED)
+	  printformat_module("fe-common/silc", server, NULL,
+			     MSGLEVEL_CRAP, SILCTXT_FILE_ALREADY_STARTED,
+			     server->current_session->client_entry->nickname);
+	else
+	  printformat_module("fe-common/silc", server, NULL,
+			     MSGLEVEL_CRAP, SILCTXT_FILE_CLIENT_NA,
+			     server->current_session->client_entry->nickname);
+      }
+
+      goto out;
+    }
+
+    silc_dlist_start(server->ftp_sessions);
+    while ((ftp = silc_dlist_get(server->ftp_sessions)) != SILC_LIST_END) {
+      if (ftp->client_entry == client_entry && !ftp->filepath) {
+	ret = silc_client_file_receive(silc_client, conn, 
+				       silc_client_file_monitor, server,
+				       ftp->session_id);
+	if (ret != SILC_CLIENT_FILE_OK) {
+	  if (ret == SILC_CLIENT_FILE_ALREADY_STARTED)
+	    printformat_module("fe-common/silc", server, NULL,
+			       MSGLEVEL_CRAP, SILCTXT_FILE_ALREADY_STARTED,
+			       client_entry->nickname);
+	  else
+	    printformat_module("fe-common/silc", server, NULL,
+			       MSGLEVEL_CRAP, SILCTXT_FILE_CLIENT_NA,
+			       client_entry->nickname);
+	}
+	break;
+      }
+    }
+
+    if (ftp == SILC_LIST_END) {
+      printformat_module("fe-common/silc", server, NULL,
+			 MSGLEVEL_CRAP, SILCTXT_FILE_CLIENT_NA,
+			 client_entry->nickname);
+      goto out;
+    }
+    break;
+
+  case 3:
+    /* Parse the typed nickname. */
+    if (argc >= 3) {
+      if (!silc_parse_userfqdn(argv[2], &nickname, NULL)) {
+	printformat_module("fe-common/silc", server, NULL,
+			   MSGLEVEL_CRAP, SILCTXT_BAD_NICK, argv[2]);
+	goto out;
+      }
+    
+      /* Find client entry */
+      entrys = silc_client_get_clients_local(silc_client, conn, nickname,
+					     argv[2], &entry_count);
+      if (!entrys) {
+	FileGetClients inter = silc_calloc(1, sizeof(*inter));
+	inter->server = server;
+	inter->data = strdup(data);
+	inter->nick = strdup(nickname);
+	inter->item = item;
+	silc_client_get_clients(silc_client, conn, nickname, argv[2],
+				silc_client_command_file_get_clients, inter);
+	goto out;
+      }
+      client_entry = entrys[0];
+      silc_free(entrys);
+    } else {
+      if (!server->current_session) {
+	printformat_module("fe-common/silc", server, NULL,
+			   MSGLEVEL_CRAP, SILCTXT_FILE_NA);
+	goto out;
+      }
+ 
+      silc_client_file_close(silc_client, conn, 
+			     server->current_session->session_id);
+      printformat_module("fe-common/silc", server, NULL,
+			 MSGLEVEL_CRAP, SILCTXT_FILE_CLOSED,
+			 server->current_session->client_entry->nickname,
+			 server->current_session->filepath ?
+			 server->current_session->filepath : "[N/A]");
+      silc_dlist_del(server->ftp_sessions, server->current_session);
+      silc_free(server->current_session->filepath);
+      silc_free(server->current_session);
+      server->current_session = NULL;
+      goto out;
+    }
+
+    silc_dlist_start(server->ftp_sessions);
+    while ((ftp = silc_dlist_get(server->ftp_sessions)) != SILC_LIST_END) {
+      if (ftp->client_entry == client_entry) {
+	silc_client_file_close(silc_client, conn, ftp->session_id);
+	printformat_module("fe-common/silc", server, NULL,
+			   MSGLEVEL_CRAP, SILCTXT_FILE_CLOSED,
+			   client_entry->nickname,
+			   ftp->filepath ? ftp->filepath : "[N/A]");
+	if (ftp == server->current_session)
+	  server->current_session = NULL;
+	silc_dlist_del(server->ftp_sessions, ftp);
+	silc_free(ftp->filepath);
+	silc_free(ftp);
+	break;
+      }
+    }
+
+    if (ftp == SILC_LIST_END) {
+      printformat_module("fe-common/silc", server, NULL,
+			 MSGLEVEL_CRAP, SILCTXT_FILE_CLIENT_NA,
+			 client_entry->nickname);
+      goto out;
+    }
+    break;
+
+  case 4:
+
+    if (!silc_dlist_count(server->ftp_sessions)) {
+      printformat_module("fe-common/silc", server, NULL,
+			 MSGLEVEL_CRAP, SILCTXT_FILE_NA);
+      goto out;
+    }
+
+    printformat_module("fe-common/silc", server, NULL,
+		       MSGLEVEL_CRAP, SILCTXT_FILE_SHOW_HEADER);
+
+    silc_dlist_start(server->ftp_sessions);
+    while ((ftp = silc_dlist_get(server->ftp_sessions)) != SILC_LIST_END) {
+      printformat_module("fe-common/silc", server, NULL,
+			 MSGLEVEL_CRAP, SILCTXT_FILE_SHOW_LINE,
+			 ftp->client_entry->nickname, 
+			 ftp->send ? "send" : "receive",
+			 (SilcUInt32)(ftp->offset + 1023) / 1024,
+			 (SilcUInt32)(ftp->filesize + 1023) / 1024,
+			 ftp->percent, ftp->kps,
+			 ftp->filepath ? ftp->filepath : "[N/A]");
+    }
+
+    break;
+
+  default:
+    break;
+  }
 
-	signal_stop();
+ out:
+  silc_free(nickname);
 }
 
 void silc_server_init(void)
 {
-	silc_servers_reconnect_init();
-
-	signal_add_first("server connected", (SIGNAL_FUNC) sig_connected);
-        signal_add("server disconnected", (SIGNAL_FUNC) sig_disconnected);
-	signal_add("send text", (SIGNAL_FUNC) event_text);
-	signal_add("silc event motd", (SIGNAL_FUNC) event_motd);
-	command_bind("whois", MODULE_NAME, (SIGNAL_FUNC) command_self);
-	command_bind("nick", MODULE_NAME, (SIGNAL_FUNC) command_self);
-	command_bind("topic", MODULE_NAME, (SIGNAL_FUNC) command_self);
-	command_bind("cmode", MODULE_NAME, (SIGNAL_FUNC) command_self);
-	command_bind("cumode", MODULE_NAME, (SIGNAL_FUNC) command_self);
-	command_bind("users", MODULE_NAME, (SIGNAL_FUNC) command_users);
-
-	command_set_options("connect", "+silcnet");
+  silc_servers_reconnect_init();
+
+  signal_add_first("server connected", (SIGNAL_FUNC) sig_connected);
+  signal_add("server disconnected", (SIGNAL_FUNC) sig_disconnected);
+  command_bind("whois", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("whowas", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("nick", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("topic", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("cmode", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("cumode", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("users", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("list", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("ban", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("oper", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("silcoper", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("umode", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("invite", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("kill", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("kick", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("info", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("ping", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("motd", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("close", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("shutdown", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("getkey", MODULE_NAME, (SIGNAL_FUNC) command_self);
+  command_bind("sconnect", MODULE_NAME, (SIGNAL_FUNC) command_sconnect);
+  command_bind("file", MODULE_NAME, (SIGNAL_FUNC) command_file);
+
+  command_set_options("connect", "+silcnet");
 }
 
 void silc_server_deinit(void)
 {
-	silc_servers_reconnect_deinit();
-
-        signal_remove("server connected", (SIGNAL_FUNC) sig_connected);
-        signal_remove("server disconnected", (SIGNAL_FUNC) sig_disconnected);
-	signal_remove("send text", (SIGNAL_FUNC) event_text);
-	signal_remove("silc event motd", (SIGNAL_FUNC) event_motd);
-	command_unbind("whois", (SIGNAL_FUNC) command_self);
-	command_unbind("nick", (SIGNAL_FUNC) command_self);
-	command_unbind("topic", (SIGNAL_FUNC) command_self);
-	command_unbind("cmode", (SIGNAL_FUNC) command_self);
-	command_unbind("cumode", (SIGNAL_FUNC) command_self);
-	command_unbind("users", (SIGNAL_FUNC) command_users);
+  silc_servers_reconnect_deinit();
+
+  signal_remove("server connected", (SIGNAL_FUNC) sig_connected);
+  signal_remove("server disconnected", (SIGNAL_FUNC) sig_disconnected);
+  command_unbind("whois", (SIGNAL_FUNC) command_self);
+  command_unbind("whowas", (SIGNAL_FUNC) command_self);
+  command_unbind("nick", (SIGNAL_FUNC) command_self);
+  command_unbind("topic", (SIGNAL_FUNC) command_self);
+  command_unbind("cmode", (SIGNAL_FUNC) command_self);
+  command_unbind("cumode", (SIGNAL_FUNC) command_self);
+  command_unbind("users", (SIGNAL_FUNC) command_self);
+  command_unbind("list", (SIGNAL_FUNC) command_self);
+  command_unbind("oper", (SIGNAL_FUNC) command_self);
+  command_unbind("silcoper", (SIGNAL_FUNC) command_self);
+  command_unbind("umode", (SIGNAL_FUNC) command_self);
+  command_unbind("invite", (SIGNAL_FUNC) command_self);
+  command_unbind("kill", (SIGNAL_FUNC) command_self);
+  command_unbind("kick", (SIGNAL_FUNC) command_self);
+  command_unbind("info", (SIGNAL_FUNC) command_self);
+  command_unbind("ping", (SIGNAL_FUNC) command_self);
+  command_unbind("motd", (SIGNAL_FUNC) command_self);
+  command_unbind("ban", (SIGNAL_FUNC) command_self);
+  command_unbind("close", (SIGNAL_FUNC) command_self);
+  command_unbind("shutdown", (SIGNAL_FUNC) command_self);
+  command_unbind("getkey", (SIGNAL_FUNC) command_self);
+  command_unbind("sconnect", (SIGNAL_FUNC) command_sconnect);
+  command_unbind("file", (SIGNAL_FUNC) command_file);
+}
+
+void silc_server_free_ftp(SILC_SERVER_REC *server,
+			  SilcClientEntry client_entry)
+{
+  FtpSession ftp;
+
+  silc_dlist_start(server->ftp_sessions);
+  while ((ftp = silc_dlist_get(server->ftp_sessions)) != SILC_LIST_END) {
+    if (ftp->client_entry == client_entry) {
+      silc_dlist_del(server->ftp_sessions, ftp);
+      silc_free(ftp->filepath);
+      silc_free(ftp);
+    }
+  }
 }