/* client_ops.c Author: Pekka Riikonen Copyright (C) 2000 Pekka Riikonen 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. */ #include "clientincludes.h" static bool silc_verify_public_key_internal(SilcClient client, SilcClientConnection conn, SilcSocketType conn_type, unsigned char *pk, SilcUInt32 pk_len, SilcSKEPKType pk_type) { int i; char file[256], filename[256], *fingerprint; struct passwd *pw; struct stat st; char *entity = ((conn_type == SILC_SOCKET_TYPE_SERVER || conn_type == SILC_SOCKET_TYPE_ROUTER) ? "server" : "client"); if (pk_type != SILC_SKE_PK_TYPE_SILC) { silc_say(client, conn, "We don't support %s public key type %d", entity, pk_type); return FALSE; } pw = getpwuid(getuid()); if (!pw) return FALSE; memset(filename, 0, sizeof(filename)); memset(file, 0, sizeof(file)); if (conn_type == SILC_SOCKET_TYPE_SERVER || conn_type == SILC_SOCKET_TYPE_ROUTER) { snprintf(file, sizeof(file) - 1, "%skey_%s_%d.pub", entity, conn->sock->hostname, conn->sock->port); snprintf(filename, sizeof(filename) - 1, "%s/.silc/%skeys/%s", pw->pw_dir, entity, file); } else { /* Replace all whitespaces with `_'. */ fingerprint = silc_hash_fingerprint(NULL, pk, pk_len); for (i = 0; i < strlen(fingerprint); i++) if (fingerprint[i] == ' ') fingerprint[i] = '_'; snprintf(file, sizeof(file) - 1, "%skey_%s.pub", entity, fingerprint); snprintf(filename, sizeof(filename) - 1, "%s/.silc/%skeys/%s", pw->pw_dir, entity, file); silc_free(fingerprint); } /* Take fingerprint of the public key */ fingerprint = silc_hash_fingerprint(NULL, pk, pk_len); /* Check whether this key already exists */ if (stat(filename, &st) < 0) { silc_say(client, conn, "Received %s public key", entity); silc_say(client, conn, "Fingerprint for the %s key is", entity); silc_say(client, conn, "%s", fingerprint); /* Ask user to verify the key and save it */ if (silc_client_ask_yes_no(client, "Would you like to accept the key (y/n)? ")) { /* Save the key for future checking */ silc_pkcs_save_public_key_data(filename, pk, pk_len, SILC_PKCS_FILE_PEM); silc_free(fingerprint); return TRUE; } } else { /* The key already exists, verify it. */ SilcPublicKey public_key; unsigned char *encpk; SilcUInt32 encpk_len; /* Load the key file */ if (!silc_pkcs_load_public_key(filename, &public_key, SILC_PKCS_FILE_PEM)) if (!silc_pkcs_load_public_key(filename, &public_key, SILC_PKCS_FILE_BIN)) { silc_say(client, conn, "Received %s public key", entity); silc_say(client, conn, "Fingerprint for the %s key is", entity); silc_say(client, conn, "%s", fingerprint); silc_say(client, conn, "Could not load your local copy of the %s key", entity); if (silc_client_ask_yes_no(client, "Would you like to accept the key anyway (y/n)? ")) { /* Save the key for future checking */ unlink(filename); silc_pkcs_save_public_key_data(filename, pk, pk_len, SILC_PKCS_FILE_PEM); silc_free(fingerprint); return TRUE; } silc_free(fingerprint); return FALSE; } /* Encode the key data */ encpk = silc_pkcs_public_key_encode(public_key, &encpk_len); if (!encpk) { silc_say(client, conn, "Received %s public key", entity); silc_say(client, conn, "Fingerprint for the %s key is", entity); silc_say(client, conn, "%s", fingerprint); silc_say(client, conn, "Your local copy of the %s key is malformed", entity); if (silc_client_ask_yes_no(client, "Would you like to accept the key anyway (y/n)? ")) { /* Save the key for future checking */ unlink(filename); silc_pkcs_save_public_key_data(filename, pk, pk_len, SILC_PKCS_FILE_PEM); silc_free(fingerprint); return TRUE; } silc_free(fingerprint); return FALSE; } if (memcmp(encpk, pk, encpk_len)) { silc_say(client, conn, "Received %s public key", entity); silc_say(client, conn, "Fingerprint for the %s key is", entity); silc_say(client, conn, "%s", fingerprint); silc_say(client, conn, "%s key does not match with your local copy", entity); silc_say(client, conn, "It is possible that the key has expired or changed"); silc_say(client, conn, "It is also possible that some one is performing " "man-in-the-middle attack"); /* Ask user to verify the key and save it */ if (silc_client_ask_yes_no(client, "Would you like to accept the key anyway (y/n)? ")) { /* Save the key for future checking */ unlink(filename); silc_pkcs_save_public_key_data(filename, pk, pk_len, SILC_PKCS_FILE_PEM); silc_free(fingerprint); return TRUE; } silc_say(client, conn, "Will not accept the %s key", entity); silc_free(fingerprint); return FALSE; } /* Local copy matched */ silc_free(fingerprint); return TRUE; } silc_say(client, conn, "Will not accept the %s key", entity); silc_free(fingerprint); return FALSE; } void silc_say(SilcClient client, SilcClientConnection conn, char *msg, ...) { va_list vp; char message[2048]; SilcClientInternal app = (SilcClientInternal)client->application; memset(message, 0, sizeof(message)); strncat(message, "\n*** ", 5); va_start(vp, msg); vsprintf(message + 5, msg, vp); va_end(vp); /* Print the message */ silc_print_to_window(app->screen->output_win[0], message); } /* Prints a message with three star (*) sign before the actual message on the current output window. This is used to print command outputs and error messages. */ void silc_op_say(SilcClient client, SilcClientConnection conn, SilcClientMessageType type, char *msg, ...) { va_list vp; char message[2048]; SilcClientInternal app = (SilcClientInternal)client->application; memset(message, 0, sizeof(message)); strncat(message, "\n*** ", 5); va_start(vp, msg); vsprintf(message + 5, msg, vp); va_end(vp); /* Print the message */ silc_print_to_window(app->screen->output_win[0], message); } /* Message for a channel. The `sender' is the nickname of the sender received in the packet. The `channel_name' is the name of the channel. */ void silc_channel_message(SilcClient client, SilcClientConnection conn, SilcClientEntry sender, SilcChannelEntry channel, SilcMessageFlags flags, char *msg) { /* Message from client */ if (conn && !strcmp(conn->current_channel->channel_name, channel->channel_name)) if (flags & SILC_MESSAGE_FLAG_ACTION) silc_print(client, "* %s %s", sender ? sender->nickname : "[]", msg); else if (flags & SILC_MESSAGE_FLAG_NOTICE) silc_print(client, "- %s %s", sender ? sender->nickname : "[]", msg); else silc_print(client, "<%s> %s", sender ? sender->nickname : "[]", msg); else if (flags & SILC_MESSAGE_FLAG_ACTION) silc_print(client, "* %s:%s %s", sender ? sender->nickname : "[]", channel->channel_name, msg); else if (flags & SILC_MESSAGE_FLAG_NOTICE) silc_print(client, "- %s:%s %s", sender ? sender->nickname : "[]", channel->channel_name, msg); else silc_print(client, "<%s:%s> %s", sender ? sender->nickname : "[]", channel->channel_name, msg); } /* Private message to the client. The `sender' is the nickname of the sender received in the packet. */ void silc_private_message(SilcClient client, SilcClientConnection conn, SilcClientEntry sender, SilcMessageFlags flags, char *msg) { silc_print(client, "*%s* %s", sender->nickname, msg); } /* Notify message to the client. The notify arguments are sent in the same order as servers sends them. The arguments are same as received from the server except for ID's. If ID is received application receives the corresponding entry to the ID. For example, if Client ID is received application receives SilcClientEntry. Also, if the notify type is for channel the channel entry is sent to application (even if server does not send it). */ void silc_notify(SilcClient client, SilcClientConnection conn, SilcNotifyType type, ...) { SilcClientInternal app = (SilcClientInternal)client->application; va_list vp; char message[4096]; SilcClientEntry client_entry, client_entry2; SilcChannelEntry channel_entry; char *tmp = NULL; SilcUInt32 tmp_int; va_start(vp, type); memset(message, 0, sizeof(message)); /* Get arguments (defined by protocol in silc-pp-01 -draft) */ switch(type) { case SILC_NOTIFY_TYPE_NONE: tmp = va_arg(vp, char *); if (!tmp) return; strcpy(message, tmp); break; case SILC_NOTIFY_TYPE_INVITE: (void)va_arg(vp, SilcChannelEntry); tmp = va_arg(vp, char *); client_entry = va_arg(vp, SilcClientEntry); snprintf(message, sizeof(message), "%s invites you to channel %s", client_entry->nickname, tmp); break; case SILC_NOTIFY_TYPE_JOIN: client_entry = va_arg(vp, SilcClientEntry); channel_entry = va_arg(vp, SilcChannelEntry); snprintf(message, sizeof(message), "%s (%s) has joined channel %s", client_entry->nickname, client_entry->username, channel_entry->channel_name); if (client_entry == conn->local_entry) { SilcChannelUser chu; silc_list_start(channel_entry->clients); while ((chu = silc_list_get(channel_entry->clients)) != SILC_LIST_END) { if (chu->client == client_entry) { if (app->screen->bottom_line->mode) silc_free(app->screen->bottom_line->mode); app->screen->bottom_line->mode = silc_client_chumode_char(chu->mode); silc_screen_print_bottom_line(app->screen, 0); break; } } } break; case SILC_NOTIFY_TYPE_LEAVE: client_entry = va_arg(vp, SilcClientEntry); channel_entry = va_arg(vp, SilcChannelEntry); if (client_entry->server) snprintf(message, sizeof(message), "%s@%s has left channel %s", client_entry->nickname, client_entry->server, channel_entry->channel_name); else snprintf(message, sizeof(message), "%s has left channel %s", client_entry->nickname, channel_entry->channel_name); break; case SILC_NOTIFY_TYPE_SIGNOFF: client_entry = va_arg(vp, SilcClientEntry); tmp = va_arg(vp, char *); if (client_entry->server) snprintf(message, sizeof(message), "Signoff: %s@%s %s%s%s", client_entry->nickname, client_entry->server, tmp ? "(" : "", tmp ? tmp : "", tmp ? ")" : ""); else snprintf(message, sizeof(message), "Signoff: %s %s%s%s", client_entry->nickname, tmp ? "(" : "", tmp ? tmp : "", tmp ? ")" : ""); break; case SILC_NOTIFY_TYPE_TOPIC_SET: client_entry = va_arg(vp, SilcClientEntry); tmp = va_arg(vp, char *); channel_entry = va_arg(vp, SilcChannelEntry); if (client_entry->server) snprintf(message, sizeof(message), "%s@%s set topic on %s: %s", client_entry->nickname, client_entry->server, channel_entry->channel_name, tmp); else snprintf(message, sizeof(message), "%s set topic on %s: %s", client_entry->nickname, channel_entry->channel_name, tmp); break; case SILC_NOTIFY_TYPE_NICK_CHANGE: client_entry = va_arg(vp, SilcClientEntry); client_entry2 = va_arg(vp, SilcClientEntry); if (client_entry->server && client_entry2->server) snprintf(message, sizeof(message), "%s@%s is known as %s@%s", client_entry->nickname, client_entry->server, client_entry2->nickname, client_entry2->server); else snprintf(message, sizeof(message), "%s is known as %s", client_entry->nickname, client_entry2->nickname); break; case SILC_NOTIFY_TYPE_CMODE_CHANGE: client_entry = va_arg(vp, SilcClientEntry); tmp_int = va_arg(vp, SilcUInt32); (void)va_arg(vp, char *); (void)va_arg(vp, char *); channel_entry = va_arg(vp, SilcChannelEntry); tmp = silc_client_chmode(tmp_int, channel_entry->channel_key->cipher->name, channel_entry->hmac->hmac->name); if (tmp) { if (client_entry) { snprintf(message, sizeof(message), "%s changed channel mode to +%s", client_entry->nickname, tmp); } else { snprintf(message, sizeof(message), "channel mode was changed to +%s (forced by router)", tmp); } } else { if (client_entry) { snprintf(message, sizeof(message), "%s removed all channel modes", client_entry->nickname); } else { snprintf(message, sizeof(message), "Removed all channel modes (forced by router)"); } } if (app->screen->bottom_line->channel_mode) silc_free(app->screen->bottom_line->channel_mode); app->screen->bottom_line->channel_mode = tmp; silc_screen_print_bottom_line(app->screen, 0); break; case SILC_NOTIFY_TYPE_CUMODE_CHANGE: client_entry = va_arg(vp, SilcClientEntry); tmp_int = va_arg(vp, SilcUInt32); tmp = silc_client_chumode(tmp_int); client_entry2 = va_arg(vp, SilcClientEntry); channel_entry = va_arg(vp, SilcChannelEntry); if (tmp) snprintf(message, sizeof(message), "%s changed %s's mode to +%s", client_entry->nickname, client_entry2->nickname, tmp); else snprintf(message, sizeof(message), "%s removed %s's modes", client_entry->nickname, client_entry2->nickname); if (client_entry2 == conn->local_entry) { if (app->screen->bottom_line->mode) silc_free(app->screen->bottom_line->mode); app->screen->bottom_line->mode = silc_client_chumode_char(tmp_int); silc_screen_print_bottom_line(app->screen, 0); } silc_free(tmp); break; case SILC_NOTIFY_TYPE_MOTD: { char line[256]; int i; tmp = va_arg(vp, unsigned char *); i = 0; while(tmp[i] != 0) { if (tmp[i++] == '\n') { memset(line, 0, sizeof(line)); strncat(line, tmp, i - 1); tmp += i; silc_say(client, conn, "%s", line); if (!strlen(tmp)) break; i = 0; } } } return; case SILC_NOTIFY_TYPE_CHANNEL_CHANGE: return; break; case SILC_NOTIFY_TYPE_KICKED: client_entry = va_arg(vp, SilcClientEntry); tmp = va_arg(vp, char *); channel_entry = va_arg(vp, SilcChannelEntry); if (client_entry == conn->local_entry) { snprintf(message, sizeof(message), "You have been kicked off channel %s %s%s%s", conn->current_channel->channel_name, tmp ? "(" : "", tmp ? tmp : "", tmp ? ")" : ""); } else { snprintf(message, sizeof(message), "%s%s%s has been kicked off channel %s %s%s%s", client_entry->nickname, client_entry->server ? "@" : "", client_entry->server ? client_entry->server : "", conn->current_channel->channel_name, tmp ? "(" : "", tmp ? tmp : "", tmp ? ")" : ""); } break; case SILC_NOTIFY_TYPE_KILLED: client_entry = va_arg(vp, SilcClientEntry); tmp = va_arg(vp, char *); channel_entry = va_arg(vp, SilcChannelEntry); if (client_entry == conn->local_entry) { snprintf(message, sizeof(message), "You have been killed from the SILC Network %s%s%s", tmp ? "(" : "", tmp ? tmp : "", tmp ? ")" : ""); } else { snprintf(message, sizeof(message), "%s%s%s has been killed from the SILC Network %s%s%s", client_entry->nickname, client_entry->server ? "@" : "", client_entry->server ? client_entry->server : "", tmp ? "(" : "", tmp ? tmp : "", tmp ? ")" : ""); } break; case SILC_NOTIFY_TYPE_SERVER_SIGNOFF: { SilcClientEntry *clients; SilcUInt32 clients_count; int i; (void)va_arg(vp, void *); clients = va_arg(vp, SilcClientEntry *); clients_count = va_arg(vp, SilcUInt32); for (i = 0; i < clients_count; i++) { if (clients[i]->server) snprintf(message, sizeof(message), "Server signoff: %s@%s %s%s%s", clients[i]->nickname, clients[i]->server, tmp ? "(" : "", tmp ? tmp : "", tmp ? ")" : ""); else snprintf(message, sizeof(message), "Server signoff: %s %s%s%s", clients[i]->nickname, tmp ? "(" : "", tmp ? tmp : "", tmp ? ")" : ""); silc_print(client, "*** %s", message); memset(message, 0, sizeof(message)); } return; } default: break; } silc_print(client, "*** %s", message); } /* Command handler. This function is called always in the command function. If error occurs it will be called as well. `conn' is the associated client connection. `cmd_context' is the command context that was originally sent to the command. `success' is FALSE if error occured during command. `command' is the command being processed. It must be noted that this is not reply from server. This is merely called just after application has called the command. Just to tell application that the command really was processed. */ void silc_command(SilcClient client, SilcClientConnection conn, SilcClientCommandContext cmd_context, int success, SilcCommand command) { SilcClientInternal app = (SilcClientInternal)client->application; if (!success) return; switch(command) { case SILC_COMMAND_QUIT: app->screen->bottom_line->channel = NULL; silc_screen_print_bottom_line(app->screen, 0); break; case SILC_COMMAND_LEAVE: /* We won't talk anymore on this channel */ silc_say(client, conn, "You have left channel %s", conn->current_channel->channel_name); break; } } /* We've resolved all clients we don't know about, now just print the users from the channel on the screen. */ void silc_client_show_users(SilcClient client, SilcClientConnection conn, SilcClientEntry *clients, SilcUInt32 clients_count, void *context) { SilcChannelEntry channel = (SilcChannelEntry)context; SilcChannelUser chu; int k = 0, len1 = 0, len2 = 0; char *name_list = NULL; if (!clients) return; silc_list_start(channel->clients); while ((chu = silc_list_get(channel->clients)) != SILC_LIST_END) { char *m, *n = chu->client->nickname; if (!n) continue; len2 = strlen(n); len1 += len2; name_list = silc_realloc(name_list, sizeof(*name_list) * (len1 + 3)); m = silc_client_chumode_char(chu->mode); if (m) { memcpy(name_list + (len1 - len2), m, strlen(m)); len1 += strlen(m); silc_free(m); } memcpy(name_list + (len1 - len2), n, len2); name_list[len1] = 0; if (k == silc_list_count(channel->clients) - 1) break; memcpy(name_list + len1, " ", 1); len1++; k++; } silc_say(client, conn, "Users on %s: %s", channel->channel_name, name_list); silc_free(name_list); } /* Command reply handler. This function is called always in the command reply function. If error occurs it will be called as well. Normal scenario is that it will be called after the received command data has been parsed and processed. The function is used to pass the received command data to the application. `conn' is the associated client connection. `cmd_payload' is the command payload data received from server and it can be ignored. It is provided if the application would like to re-parse the received command data, however, it must be noted that the data is parsed already by the library thus the payload can be ignored. `success' is FALSE if error occured. In this case arguments are not sent to the application. `command' is the command reply being processed. The function has variable argument list and each command defines the number and type of arguments it passes to the application (on error they are not sent). */ void silc_command_reply(SilcClient client, SilcClientConnection conn, SilcCommandPayload cmd_payload, int success, SilcCommand command, SilcCommandStatus status, ...) { SilcClientInternal app = (SilcClientInternal)client->application; SilcChannelUser chu; va_list vp; va_start(vp, status); switch(command) { case SILC_COMMAND_WHOIS: { char buf[1024], *nickname, *username, *realname; int len; SilcUInt32 idle, mode; SilcBuffer channels; if (status == SILC_STATUS_ERR_NO_SUCH_NICK || status == SILC_STATUS_ERR_NO_SUCH_CLIENT_ID) { char *tmp; tmp = silc_argument_get_arg_type(silc_command_get_args(cmd_payload), 3, NULL); if (tmp) silc_say(client, conn, "%s: %s", tmp, silc_client_command_status_message(status)); else silc_say(client, conn, "%s", silc_client_command_status_message(status)); break; } if (!success) return; (void)va_arg(vp, SilcClientEntry); nickname = va_arg(vp, char *); username = va_arg(vp, char *); realname = va_arg(vp, char *); channels = va_arg(vp, SilcBuffer); mode = va_arg(vp, SilcUInt32); idle = va_arg(vp, SilcUInt32); memset(buf, 0, sizeof(buf)); if (nickname) { len = strlen(nickname); strncat(buf, nickname, len); strncat(buf, " is ", 4); } if (username) { strncat(buf, username, strlen(username)); } if (realname) { strncat(buf, " (", 2); strncat(buf, realname, strlen(realname)); strncat(buf, ")", 1); } silc_say(client, conn, "%s", buf); if (channels) { SilcDList list = silc_channel_payload_parse_list(channels); if (list) { SilcChannelPayload entry; memset(buf, 0, sizeof(buf)); strcat(buf, "on channels: "); silc_dlist_start(list); while ((entry = silc_dlist_get(list)) != SILC_LIST_END) { char *m = silc_client_chumode_char(silc_channel_get_mode(entry)); SilcUInt32 name_len; char *name = silc_channel_get_name(entry, &name_len); if (m) strncat(buf, m, strlen(m)); strncat(buf, name, name_len); strncat(buf, " ", 1); silc_free(m); } silc_say(client, conn, "%s", buf); silc_channel_payload_list_free(list); } } if (mode) { if ((mode & SILC_UMODE_SERVER_OPERATOR) || (mode & SILC_UMODE_ROUTER_OPERATOR)) silc_say(client, conn, "%s is %s", nickname, (mode & SILC_UMODE_SERVER_OPERATOR) ? "Server Operator" : (mode & SILC_UMODE_ROUTER_OPERATOR) ? "SILC Operator" : "[Unknown mode]"); if (mode & SILC_UMODE_GONE) silc_say(client, conn, "%s is gone", nickname); } if (idle && nickname) silc_say(client, conn, "%s has been idle %d %s", nickname, idle > 60 ? (idle / 60) : idle, idle > 60 ? "minutes" : "seconds"); } break; case SILC_COMMAND_WHOWAS: { char buf[1024], *nickname, *username, *realname; int len; if (status == SILC_STATUS_ERR_NO_SUCH_NICK || status == SILC_STATUS_ERR_NO_SUCH_CLIENT_ID) { char *tmp; tmp = silc_argument_get_arg_type(silc_command_get_args(cmd_payload), 3, NULL); if (tmp) silc_say(client, conn, "%s: %s", tmp, silc_client_command_status_message(status)); else silc_say(client, conn, "%s", silc_client_command_status_message(status)); break; } if (!success) return; (void)va_arg(vp, SilcClientEntry); nickname = va_arg(vp, char *); username = va_arg(vp, char *); realname = va_arg(vp, char *); memset(buf, 0, sizeof(buf)); if (nickname) { len = strlen(nickname); strncat(buf, nickname, len); strncat(buf, " was ", 5); } if (username) { strncat(buf, username, strlen(nickname)); } if (realname) { strncat(buf, " (", 2); strncat(buf, realname, strlen(realname)); strncat(buf, ")", 1); } silc_say(client, conn, "%s", buf); } break; case SILC_COMMAND_INVITE: { SilcChannelEntry channel; char *invite_list; if (!success) return; channel = va_arg(vp, SilcChannelEntry); invite_list = va_arg(vp, char *); if (invite_list) silc_say(client, conn, "%s invite list: %s", channel->channel_name, invite_list); else silc_say(client, conn, "%s invite list not set", channel->channel_name); } break; case SILC_COMMAND_JOIN: { SilcUInt32 mode; char *topic; SilcBuffer client_id_list; SilcUInt32 list_count; SilcChannelEntry channel; if (!success) return; app->screen->bottom_line->channel = va_arg(vp, char *); channel = va_arg(vp, SilcChannelEntry); mode = va_arg(vp, SilcUInt32); (void)va_arg(vp, SilcUInt32); (void)va_arg(vp, unsigned char *); (void)va_arg(vp, unsigned char *); (void)va_arg(vp, unsigned char *); topic = va_arg(vp, char *); (void)va_arg(vp, unsigned char *); list_count = va_arg(vp, SilcUInt32); client_id_list = va_arg(vp, SilcBuffer); if (topic) silc_say(client, conn, "Topic for %s: %s", app->screen->bottom_line->channel, topic); app->screen->bottom_line->channel_mode = silc_client_chmode(mode, channel->channel_key->cipher->name, channel->hmac->hmac->name); silc_screen_print_bottom_line(app->screen, 0); /* Resolve the client information */ silc_client_get_clients_by_list(client, conn, list_count, client_id_list, silc_client_show_users, channel); } break; case SILC_COMMAND_NICK: { SilcClientEntry entry; if (!success) return; entry = va_arg(vp, SilcClientEntry); silc_say(client, conn, "Your current nickname is %s", entry->nickname); app->screen->bottom_line->nickname = entry->nickname; silc_screen_print_bottom_line(app->screen, 0); } break; case SILC_COMMAND_LIST: { char *topic, *name; int usercount; unsigned char buf[256], tmp[16]; int i, len; if (!success) return; (void)va_arg(vp, SilcChannelEntry); name = va_arg(vp, char *); topic = va_arg(vp, char *); usercount = va_arg(vp, int); if (status == SILC_STATUS_LIST_START || status == SILC_STATUS_OK) silc_say(client, conn, " Channel Users Topic"); memset(buf, 0, sizeof(buf)); strncat(buf, " ", 2); len = strlen(name); strncat(buf, name, len > 40 ? 40 : len); if (len < 40) for (i = 0; i < 40 - len; i++) strcat(buf, " "); strcat(buf, " "); memset(tmp, 0, sizeof(tmp)); if (usercount) { snprintf(tmp, sizeof(tmp), "%d", usercount); strcat(buf, tmp); } len = strlen(tmp); if (len < 10) for (i = 0; i < 10 - len; i++) strcat(buf, " "); strcat(buf, " "); if (topic) { len = strlen(topic); strncat(buf, topic, len); } silc_say(client, conn, "%s", buf); } break; case SILC_COMMAND_UMODE: { SilcUInt32 mode; if (!success) return; mode = va_arg(vp, SilcUInt32); if (!mode && app->screen->bottom_line->umode) { silc_free(app->screen->bottom_line->umode); app->screen->bottom_line->umode = NULL; } if (mode & SILC_UMODE_SERVER_OPERATOR) { if (app->screen->bottom_line->umode) silc_free(app->screen->bottom_line->umode); app->screen->bottom_line->umode = strdup("Server Operator");; } if (mode & SILC_UMODE_ROUTER_OPERATOR) { if (app->screen->bottom_line->umode) silc_free(app->screen->bottom_line->umode); app->screen->bottom_line->umode = strdup("SILC Operator");; } silc_screen_print_bottom_line(app->screen, 0); } break; case SILC_COMMAND_OPER: if (status == SILC_STATUS_OK) { conn->local_entry->mode |= SILC_UMODE_SERVER_OPERATOR; if (app->screen->bottom_line->umode) silc_free(app->screen->bottom_line->umode); app->screen->bottom_line->umode = strdup("Server Operator");; silc_screen_print_bottom_line(app->screen, 0); } break; case SILC_COMMAND_SILCOPER: if (status == SILC_STATUS_OK) { conn->local_entry->mode |= SILC_UMODE_ROUTER_OPERATOR; if (app->screen->bottom_line->umode) silc_free(app->screen->bottom_line->umode); app->screen->bottom_line->umode = strdup("SILC Operator");; silc_screen_print_bottom_line(app->screen, 0); } break; case SILC_COMMAND_USERS: { SilcChannelEntry channel; int line_len; char *line; if (!success) return; channel = va_arg(vp, SilcChannelEntry); /* There are two ways to do this, either parse the list (that the command_reply sends (just take it with va_arg()) or just traverse the channel's client list. I'll do the latter. See JOIN command reply for example for the list. */ silc_say(client, conn, "Users on %s", channel->channel_name); line = silc_calloc(1024, sizeof(*line)); line_len = 1024; silc_list_start(channel->clients); while ((chu = silc_list_get(channel->clients)) != SILC_LIST_END) { SilcClientEntry e = chu->client; int i, len1; char *m, tmp[80]; memset(line, 0, line_len); if (chu->client == conn->local_entry) { /* Update status line */ if (app->screen->bottom_line->mode) silc_free(app->screen->bottom_line->mode); app->screen->bottom_line->mode = silc_client_chumode_char(chu->mode); silc_screen_print_bottom_line(app->screen, 0); } if (strlen(e->nickname) + strlen(e->server) + 100 > line_len) { silc_free(line); line_len += strlen(e->nickname) + strlen(e->server) + 100; line = silc_calloc(line_len, sizeof(*line)); } memset(tmp, 0, sizeof(tmp)); m = silc_client_chumode_char(chu->mode); strncat(line, " ", 1); strncat(line, e->nickname, strlen(e->nickname)); strncat(line, e->server ? "@" : "", 1); len1 = 0; if (e->server) len1 = strlen(e->server); strncat(line, e->server ? e->server : "", len1 > 30 ? 30 : len1); len1 = strlen(line); if (len1 >= 30) { memset(&line[29], 0, len1 - 29); } else { for (i = 0; i < 30 - len1 - 1; i++) strcat(line, " "); } if (e->mode & SILC_UMODE_GONE) strcat(line, " G"); else strcat(line, " H"); strcat(tmp, m ? m : ""); strncat(line, tmp, strlen(tmp)); if (strlen(tmp) < 5) for (i = 0; i < 5 - strlen(tmp); i++) strcat(line, " "); strcat(line, e->username ? e->username : ""); silc_say(client, conn, "%s", line); if (m) silc_free(m); } silc_free(line); } break; case SILC_COMMAND_BAN: { SilcChannelEntry channel; char *ban_list; if (!success) return; channel = va_arg(vp, SilcChannelEntry); ban_list = va_arg(vp, char *); if (ban_list) silc_say(client, conn, "%s ban list: %s", channel->channel_name, ban_list); else silc_say(client, conn, "%s ban list not set", channel->channel_name); } break; case SILC_COMMAND_GETKEY: { SilcIdType id_type; void *entry; SilcPublicKey public_key; unsigned char *pk; SilcUInt32 pk_len; id_type = va_arg(vp, SilcUInt32); entry = va_arg(vp, void *); public_key = va_arg(vp, SilcPublicKey); pk = silc_pkcs_public_key_encode(public_key, &pk_len); if (id_type == SILC_ID_CLIENT) { silc_verify_public_key_internal(client, conn, SILC_SOCKET_TYPE_CLIENT, pk, pk_len, SILC_SKE_PK_TYPE_SILC); } silc_free(pk); } case SILC_COMMAND_TOPIC: { SilcChannelEntry channel; char *topic; if (!success) return; channel = va_arg(vp, SilcChannelEntry); topic = va_arg(vp, char *); if (topic) silc_say(client, conn, "Topic on channel %s: %s", channel->channel_name, topic); } break; default: break; } } /* Called to indicate that connection was either successfully established or connecting failed. This is also the first time application receives the SilcClientConnection objecet which it should save somewhere. */ void silc_connect(SilcClient client, SilcClientConnection conn, int success) { SilcClientInternal app = (SilcClientInternal)client->application; if (success) { app->screen->bottom_line->connection = conn->remote_host; silc_screen_print_bottom_line(app->screen, 0); app->conn = conn; } } /* Called to indicate that connection was disconnected to the server. */ void silc_disconnect(SilcClient client, SilcClientConnection conn) { SilcClientInternal app = (SilcClientInternal)client->application; app->screen->bottom_line->connection = NULL; silc_screen_print_bottom_line(app->screen, 0); app->conn = NULL; } /* Asks passphrase from user on the input line. */ void silc_ask_passphrase(SilcClient client, SilcClientConnection conn, SilcAskPassphrase completion, void *context) { SilcClientInternal app = (SilcClientInternal)conn->client->application; char pass1[256], pass2[256]; int try = 3; while(try) { /* Print prompt */ wattroff(app->screen->input_win, A_INVIS); silc_screen_input_print_prompt(app->screen, "Passphrase: "); wattron(app->screen->input_win, A_INVIS); /* Get string */ memset(pass1, 0, sizeof(pass1)); wgetnstr(app->screen->input_win, pass1, sizeof(pass1)); /* Print retype prompt */ wattroff(app->screen->input_win, A_INVIS); silc_screen_input_print_prompt(app->screen, "Retype passphrase: "); wattron(app->screen->input_win, A_INVIS); /* Get string */ memset(pass2, 0, sizeof(pass2)); wgetnstr(app->screen->input_win, pass2, sizeof(pass2)); if (!strncmp(pass1, pass2, strlen(pass2))) break; try--; } wattroff(app->screen->input_win, A_INVIS); silc_screen_input_reset(app->screen); /* Deliver the passphrase to the library */ completion(pass1, strlen(pass1), context); memset(pass1, 0, sizeof(pass1)); memset(pass2, 0, sizeof(pass2)); } /* Verifies received public key. The `conn_type' indicates which entity (server, client etc.) has sent the public key. If user decides to trust the key may be saved as trusted public key for later use. The `completion' must be called after the public key has been verified. */ void silc_verify_public_key(SilcClient client, SilcClientConnection conn, SilcSocketType conn_type, unsigned char *pk, SilcUInt32 pk_len, SilcSKEPKType pk_type, SilcVerifyPublicKey completion, void *context) { if (silc_verify_public_key_internal(client, conn, conn_type, pk, pk_len, pk_type)) { completion(TRUE, context); return; } completion(FALSE, context); } /* Find authentication method and authentication data by hostname and port. The hostname may be IP address as well. The found authentication method and authentication data is returned to `auth_meth', `auth_data' and `auth_data_len'. The function returns TRUE if authentication method is found and FALSE if not. `conn' may be NULL. */ int silc_get_auth_method(SilcClient client, SilcClientConnection conn, char *hostname, SilcUInt16 port, SilcProtocolAuthMeth *auth_meth, unsigned char **auth_data, SilcUInt32 *auth_data_len) { SilcClientInternal app = (SilcClientInternal)client->application; if (app->config && app->config->conns) { SilcClientConfigSectionConnection *conn = NULL; /* Check if we find a match from user configured connections */ conn = silc_client_config_find_connection(app->config, hostname, port); if (conn) { /* Match found. Use the configured authentication method */ *auth_meth = conn->auth_meth; if (conn->auth_data) { *auth_data = strdup(conn->auth_data); *auth_data_len = strlen(conn->auth_data); } return TRUE; } } *auth_meth = SILC_AUTH_NONE; *auth_data = NULL; *auth_data_len = 0; return TRUE; } /* Notifies application that failure packet was received. This is called if there is some protocol active in the client. The `protocol' is the protocol context. The `failure' is opaque pointer to the failure indication. Note, that the `failure' is protocol dependant and application must explicitly cast it to correct type. Usually `failure' is 32 bit failure type (see protocol specs for all protocol failure types). */ void silc_failure(SilcClient client, SilcClientConnection conn, SilcProtocol protocol, void *failure) { if (protocol->protocol->type == SILC_PROTOCOL_CLIENT_KEY_EXCHANGE) { SilcSKEStatus status = (SilcSKEStatus)failure; if (status == SILC_SKE_STATUS_BAD_VERSION) silc_say(client, conn, "You are running incompatible client version (it may be " "too old or too new)"); if (status == SILC_SKE_STATUS_UNSUPPORTED_PUBLIC_KEY) silc_say(client, conn, "Server does not support your public key type"); if (status == SILC_SKE_STATUS_UNKNOWN_GROUP) silc_say(client, conn, "Server does not support one of your proposed KE group"); if (status == SILC_SKE_STATUS_UNKNOWN_CIPHER) silc_say(client, conn, "Server does not support one of your proposed cipher"); if (status == SILC_SKE_STATUS_UNKNOWN_PKCS) silc_say(client, conn, "Server does not support one of your proposed PKCS"); if (status == SILC_SKE_STATUS_UNKNOWN_HASH_FUNCTION) silc_say(client, conn, "Server does not support one of your proposed hash function"); if (status == SILC_SKE_STATUS_UNKNOWN_HMAC) silc_say(client, conn, "Server does not support one of your proposed HMAC"); if (status == SILC_SKE_STATUS_INCORRECT_SIGNATURE) silc_say(client, conn, "Incorrect signature"); } if (protocol->protocol->type == SILC_PROTOCOL_CLIENT_CONNECTION_AUTH) { SilcUInt32 err = (SilcUInt32)failure; if (err == SILC_AUTH_FAILED) silc_say(client, conn, "Authentication failed"); } } /* Asks whether the user would like to perform the key agreement protocol. This is called after we have received an key agreement packet or an reply to our key agreement packet. This returns TRUE if the user wants the library to perform the key agreement protocol and FALSE if it is not desired (application may start it later by calling the function silc_client_perform_key_agreement). */ int silc_key_agreement(SilcClient client, SilcClientConnection conn, SilcClientEntry client_entry, char *hostname, int port, SilcKeyAgreementCallback *completion, void **context) { char host[256]; /* We will just display the info on the screen and return FALSE and user will have to start the key agreement with a command. */ if (hostname) { memset(host, 0, sizeof(host)); snprintf(host, sizeof(host) - 1, "(%s on port %d)", hostname, port); } silc_say(client, conn, "%s wants to perform key agreement %s", client_entry->nickname, hostname ? host : ""); *completion = NULL; *context = NULL; return FALSE; } /* SILC client operations */ SilcClientOperations ops = { silc_op_say, silc_channel_message, silc_private_message, silc_notify, silc_command, silc_command_reply, silc_connect, silc_disconnect, silc_get_auth_method, silc_verify_public_key, silc_ask_passphrase, silc_failure, silc_key_agreement, };