5 Author: Pekka Riikonen <priikone@silcnet.org>
7 Copyright (C) 1997 - 2002 Pekka Riikonen
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; version 2 of the License.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
21 #include "serverincludes.h"
22 #include "server_internal.h"
24 extern char *server_version;
26 /* Removes the client from channels and possibly removes the channels
27 as well. After removing those channels that exist, their channel
28 keys are regnerated. This is called only by the function
29 silc_server_remove_clients_by_server. */
32 silc_server_remove_clients_channels(SilcServer server,
33 SilcServerEntry server_entry,
34 SilcHashTable clients,
35 SilcClientEntry client,
36 SilcHashTable channels)
38 SilcChannelEntry channel;
39 SilcChannelClientEntry chl, chl2;
40 SilcHashTableList htl, htl2;
45 SILC_LOG_DEBUG(("Remove client %s from all channels",
46 client->nickname ? client->nickname :
47 (unsigned char *)""));
49 if (silc_hash_table_find(clients, client, NULL, NULL))
50 silc_hash_table_del(clients, client);
52 /* Remove the client from all channels. The client is removed from
53 the channels' user list. */
54 silc_hash_table_list(client->channels, &htl);
55 while (silc_hash_table_get(&htl, NULL, (void **)&chl)) {
56 channel = chl->channel;
58 /* Remove channel if this is last client leaving the channel, unless
59 the channel is permanent. */
60 if (server->server_type != SILC_SERVER &&
61 silc_hash_table_count(channel->user_list) < 2) {
62 if (silc_hash_table_find(channels, channel, NULL, NULL))
63 silc_hash_table_del(channels, channel);
64 silc_schedule_task_del_by_context(server->schedule, channel->rekey);
65 silc_server_channel_delete(server, channel);
69 silc_hash_table_del(client->channels, channel);
70 silc_hash_table_del(channel->user_list, chl->client);
71 channel->user_count--;
73 /* If there is no global users on the channel anymore mark the channel
74 as local channel. Do not check if the removed client is local client. */
75 if (server->server_type != SILC_ROUTER && channel->global_users &&
76 chl->client->router && !silc_server_channel_has_global(channel))
77 channel->global_users = FALSE;
81 /* Update statistics */
82 if (SILC_IS_LOCAL(client))
83 server->stat.my_chanclients--;
84 if (server->server_type == SILC_ROUTER) {
85 server->stat.cell_chanclients--;
86 server->stat.chanclients--;
89 /* If there is not at least one local user on the channel then we don't
90 need the channel entry anymore, we can remove it safely, unless the
91 channel is permanent channel */
92 if (server->server_type == SILC_SERVER &&
93 !silc_server_channel_has_local(channel)) {
94 if (silc_hash_table_find(channels, channel, NULL, NULL))
95 silc_hash_table_del(channels, channel);
96 silc_schedule_task_del_by_context(server->schedule, channel->rekey);
97 silc_server_channel_delete(server, channel);
101 /* Mark other local clients to the table of clients whom will receive
102 the SERVER_SIGNOFF notify. */
103 silc_hash_table_list(channel->user_list, &htl2);
104 while (silc_hash_table_get(&htl2, NULL, (void **)&chl2)) {
105 SilcClientEntry c = chl2->client;
109 /* Add client to table, if it's not from the signoff server */
110 if (c->router != server_entry &&
111 !silc_hash_table_find(clients, c, NULL, NULL))
112 silc_hash_table_add(clients, c, c);
114 silc_hash_table_list_reset(&htl2);
116 /* Add the channel to the the channels list to regenerate the
118 if (!silc_hash_table_find(channels, channel, NULL, NULL))
119 silc_hash_table_add(channels, channel, channel);
121 silc_hash_table_list_reset(&htl);
124 /* This function removes all client entries that are originated from
125 `router' and are owned by `entry'. `router' and `entry' can be same
126 too. If `server_signoff' is TRUE then SERVER_SIGNOFF notify is
127 distributed to our local clients. */
129 bool silc_server_remove_clients_by_server(SilcServer server,
130 SilcServerEntry router,
131 SilcServerEntry entry,
134 SilcIDCacheList list = NULL;
135 SilcIDCacheEntry id_cache = NULL;
136 SilcClientEntry client = NULL;
138 unsigned char **argv = NULL;
139 SilcUInt32 *argv_lens = NULL, *argv_types = NULL, argc = 0;
140 SilcHashTableList htl;
141 SilcChannelEntry channel;
142 SilcHashTable channels, clients;
145 if (!(entry->data.status & SILC_IDLIST_STATUS_REGISTERED))
148 SILC_LOG_DEBUG(("Removing clients by %s",
149 entry->server_name ? entry->server_name : "server"));
154 /* Allocate the hash table that holds the channels that require
155 channel key re-generation after we've removed this server's clients
156 from the channels. */
157 channels = silc_hash_table_alloc(0, silc_hash_ptr, NULL, NULL, NULL,
159 clients = silc_hash_table_alloc(0, silc_hash_ptr, NULL, NULL, NULL,
162 if (server_signoff) {
163 idp = silc_id_payload_encode(entry->id, SILC_ID_SERVER);
164 argv = silc_realloc(argv, sizeof(*argv) * (argc + 1));
165 argv_lens = silc_realloc(argv_lens, sizeof(*argv_lens) * (argc + 1));
166 argv_types = silc_realloc(argv_types, sizeof(*argv_types) * (argc + 1));
167 argv[argc] = silc_calloc(idp->len, sizeof(*argv[0]));
168 memcpy(argv[argc], idp->data, idp->len);
169 argv_lens[argc] = idp->len;
170 argv_types[argc] = argc + 1;
172 silc_buffer_free(idp);
175 if (silc_idcache_get_all(server->local_list->clients, &list)) {
176 if (silc_idcache_list_first(list, &id_cache)) {
178 client = (SilcClientEntry)id_cache->context;
180 /* If client is not registered, is not originated from `router'
181 and is not owned by `entry', skip it. */
182 if (!(client->data.status & SILC_IDLIST_STATUS_REGISTERED) ||
183 client->router != router ||
184 (router != entry && !SILC_ID_COMPARE(client->id, entry->id,
185 client->id->ip.data_len))) {
186 if (!silc_idcache_list_next(list, &id_cache))
192 if (server_signoff) {
193 idp = silc_id_payload_encode(client->id, SILC_ID_CLIENT);
194 argv = silc_realloc(argv, sizeof(*argv) * (argc + 1));
195 argv_lens = silc_realloc(argv_lens, sizeof(*argv_lens) *
197 argv_types = silc_realloc(argv_types, sizeof(*argv_types) *
199 argv[argc] = silc_calloc(idp->len, sizeof(*argv[0]));
200 memcpy(argv[argc], idp->data, idp->len);
201 argv_lens[argc] = idp->len;
202 argv_types[argc] = argc + 1;
204 silc_buffer_free(idp);
207 /* Update statistics */
208 server->stat.clients--;
209 if (server->stat.cell_clients)
210 server->stat.cell_clients--;
211 SILC_OPER_STATS_UPDATE(client, server, SILC_UMODE_SERVER_OPERATOR);
212 SILC_OPER_STATS_UPDATE(client, router, SILC_UMODE_ROUTER_OPERATOR);
214 silc_server_remove_clients_channels(server, entry, clients,
216 silc_server_del_from_watcher_list(server, client);
218 /* Remove the client entry */
219 if (!server_signoff) {
220 client->data.status &= ~SILC_IDLIST_STATUS_REGISTERED;
221 id_cache->expire = SILC_ID_CACHE_EXPIRE_DEF;
223 silc_idlist_del_data(client);
224 silc_idlist_del_client(server->local_list, client);
227 if (!silc_idcache_list_next(list, &id_cache))
231 silc_idcache_list_free(list);
234 if (silc_idcache_get_all(server->global_list->clients, &list)) {
236 if (silc_idcache_list_first(list, &id_cache)) {
238 client = (SilcClientEntry)id_cache->context;
240 /* If client is not registered, is not originated from `router'
241 and is not owned by `entry', skip it. */
242 if (!(client->data.status & SILC_IDLIST_STATUS_REGISTERED) ||
243 client->router != router ||
244 (router != entry && !SILC_ID_COMPARE(client->id, entry->id,
245 client->id->ip.data_len))) {
246 if (!silc_idcache_list_next(list, &id_cache))
252 if (server_signoff) {
253 idp = silc_id_payload_encode(client->id, SILC_ID_CLIENT);
254 argv = silc_realloc(argv, sizeof(*argv) * (argc + 1));
255 argv_lens = silc_realloc(argv_lens, sizeof(*argv_lens) *
257 argv_types = silc_realloc(argv_types, sizeof(*argv_types) *
259 argv[argc] = silc_calloc(idp->len, sizeof(*argv[0]));
260 memcpy(argv[argc], idp->data, idp->len);
261 argv_lens[argc] = idp->len;
262 argv_types[argc] = argc + 1;
264 silc_buffer_free(idp);
267 /* Update statistics */
268 server->stat.clients--;
269 if (server->stat.cell_clients)
270 server->stat.cell_clients--;
271 SILC_OPER_STATS_UPDATE(client, server, SILC_UMODE_SERVER_OPERATOR);
272 SILC_OPER_STATS_UPDATE(client, router, SILC_UMODE_ROUTER_OPERATOR);
274 silc_server_remove_clients_channels(server, entry, clients,
276 silc_server_del_from_watcher_list(server, client);
278 /* Remove the client entry */
279 if (!server_signoff) {
280 client->data.status &= ~SILC_IDLIST_STATUS_REGISTERED;
281 id_cache->expire = SILC_ID_CACHE_EXPIRE_DEF;
283 silc_idlist_del_data(client);
284 silc_idlist_del_client(server->global_list, client);
287 if (!silc_idcache_list_next(list, &id_cache))
291 silc_idcache_list_free(list);
294 /* Return now if we are shutting down */
295 if (server->server_shutdown) {
296 silc_hash_table_free(channels);
298 if (server_signoff) {
299 for (i = 0; i < argc; i++)
302 silc_free(argv_lens);
303 silc_free(argv_types);
304 silc_hash_table_free(clients);
309 /* Send the SERVER_SIGNOFF notify */
310 if (server_signoff) {
311 SilcBuffer args, not;
313 SILC_LOG_DEBUG(("Sending SERVER_SIGNOFF for %s with %d clients",
314 silc_id_render(entry->id, SILC_ID_SERVER), argc - 1));
316 /* Send SERVER_SIGNOFF notify to our primary router */
317 if (server->router != entry) {
318 args = silc_argument_payload_encode(1, argv, argv_lens,
320 silc_server_send_notify_args(server, SILC_PRIMARY_ROUTE(server),
321 SILC_BROADCAST(server),
322 SILC_NOTIFY_TYPE_SERVER_SIGNOFF,
324 silc_buffer_free(args);
327 /* Send to local clients. We also send the list of client ID's that
328 is to be removed for those servers that would like to use that list. */
329 args = silc_argument_payload_encode(argc, argv, argv_lens,
331 not = silc_notify_payload_encode_args(SILC_NOTIFY_TYPE_SERVER_SIGNOFF,
333 silc_server_packet_send_clients(server, clients,
334 SILC_PACKET_NOTIFY, 0, FALSE,
335 not->data, not->len, FALSE);
337 /* Send notify also to local backup routers */
338 silc_server_backup_send(server, NULL, SILC_PACKET_NOTIFY, 0,
339 not->data, not->len, FALSE, TRUE);
341 silc_buffer_free(args);
342 silc_buffer_free(not);
343 for (i = 0; i < argc; i++)
346 silc_free(argv_lens);
347 silc_free(argv_types);
348 silc_hash_table_free(clients);
351 /* We must now re-generate the channel key for all channels that had
352 this server's client(s) on the channel. As they left the channel we
353 must re-generate the channel key. */
354 silc_hash_table_list(channels, &htl);
355 while (silc_hash_table_get(&htl, NULL, (void **)&channel)) {
356 if (!silc_server_create_channel_key(server, channel, 0)) {
357 silc_hash_table_list_reset(&htl);
358 silc_hash_table_free(channels);
362 /* Do not send the channel key if private channel key mode is set */
363 if (channel->mode & SILC_CHANNEL_MODE_PRIVKEY || !channel->channel_key)
366 silc_server_send_channel_key(server, NULL, channel,
367 server->server_type == SILC_ROUTER ?
368 FALSE : !server->standalone);
370 silc_hash_table_list_reset(&htl);
371 silc_hash_table_free(channels);
376 static SilcServerEntry
377 silc_server_update_clients_by_real_server(SilcServer server,
378 SilcServerEntry from,
380 SilcClientEntry client,
382 SilcIDCacheEntry client_cache)
384 SilcServerEntry server_entry;
385 SilcIDCacheEntry id_cache = NULL;
386 SilcIDCacheList list;
387 bool tolocal = (to == server->id_entry);
389 if (!silc_idcache_get_all(server->local_list->servers, &list))
392 if (silc_idcache_list_first(list, &id_cache)) {
394 server_entry = (SilcServerEntry)id_cache->context;
395 if (server_entry != from &&
396 (tolocal || server_entry != server->id_entry) &&
397 SILC_ID_COMPARE(server_entry->id, client->id,
398 client->id->ip.data_len)) {
399 SILC_LOG_DEBUG(("Found (local) %s",
400 silc_id_render(server_entry->id, SILC_ID_SERVER)));
402 if (!server_entry->data.send_key && server_entry->router) {
403 SILC_LOG_DEBUG(("Server not locally connected, use its router"));
404 /* If the client is not marked as local then move it to local list
405 since the server is local. */
407 SILC_LOG_DEBUG(("Moving client to local list"));
408 silc_idcache_add(server->local_list->clients, client_cache->name,
409 client_cache->id, client_cache->context,
410 client_cache->expire, NULL);
411 silc_idcache_del_by_context(server->global_list->clients, client);
413 server_entry = server_entry->router;
415 /* If the client is not marked as local then move it to local list
416 since the server is local. */
417 if (server_entry->server_type != SILC_BACKUP_ROUTER && !local) {
418 SILC_LOG_DEBUG(("Moving client to local list"));
419 silc_idcache_add(server->local_list->clients, client_cache->name,
420 client_cache->id, client_cache->context,
421 client_cache->expire, NULL);
422 silc_idcache_del_by_context(server->global_list->clients, client);
426 silc_idcache_list_free(list);
430 if (!silc_idcache_list_next(list, &id_cache))
435 silc_idcache_list_free(list);
437 if (!silc_idcache_get_all(server->global_list->servers, &list))
440 if (silc_idcache_list_first(list, &id_cache)) {
442 server_entry = (SilcServerEntry)id_cache->context;
443 if (server_entry != from && server_entry != server->id_entry &&
444 (tolocal || server_entry != server->id_entry) &&
445 SILC_ID_COMPARE(server_entry->id, client->id,
446 client->id->ip.data_len)) {
447 SILC_LOG_DEBUG(("Found (global) %s",
448 silc_id_render(server_entry->id, SILC_ID_SERVER)));
450 if (!server_entry->data.send_key && server_entry->router) {
451 SILC_LOG_DEBUG(("Server not locally connected, use its router"));
452 /* If the client is marked as local then move it to global list
453 since the server is global. */
455 SILC_LOG_DEBUG(("Moving client to global list"));
456 silc_idcache_add(server->global_list->clients, client_cache->name,
457 client_cache->id, client_cache->context, 0, NULL);
458 silc_idcache_del_by_context(server->local_list->clients, client);
460 server_entry = server_entry->router;
462 /* If the client is marked as local then move it to global list
463 since the server is global. */
464 if (server_entry->server_type != SILC_BACKUP_ROUTER && local) {
465 SILC_LOG_DEBUG(("Moving client to global list"));
466 silc_idcache_add(server->global_list->clients, client_cache->name,
467 client_cache->id, client_cache->context, 0, NULL);
468 silc_idcache_del_by_context(server->local_list->clients, client);
472 silc_idcache_list_free(list);
476 if (!silc_idcache_list_next(list, &id_cache))
481 silc_idcache_list_free(list);
486 /* Updates the clients that are originated from the `from' to be originated
487 from the `to'. If the `resolve_real_server' is TRUE then this will
488 attempt to figure out which clients really are originated from the
489 `from' and which are originated from a server that we have connection
490 to, when we've acting as backup router. If it is FALSE the `to' will
491 be the new source. */
493 void silc_server_update_clients_by_server(SilcServer server,
494 SilcServerEntry from,
496 bool resolve_real_server)
498 SilcIDCacheList list = NULL;
499 SilcIDCacheEntry id_cache = NULL;
500 SilcClientEntry client = NULL;
504 if (silc_idcache_get_all(server->global_list->clients, &list)) {
505 if (silc_idcache_list_first(list, &id_cache)) {
507 client = (SilcClientEntry)id_cache->context;
509 /* If entry is disabled skip it. If entry is local to us, do not
510 switch it to anyone else, it is ours so skip it. */
511 if (!(client->data.status & SILC_IDLIST_STATUS_REGISTERED) ||
512 SILC_IS_LOCAL(client)) {
513 if (!silc_idcache_list_next(list, &id_cache))
519 SILC_LOG_DEBUG(("Client %s",
520 silc_id_render(client->id, SILC_ID_CLIENT)));
522 SILC_LOG_DEBUG(("Client->router %s",
523 silc_id_render(client->router->id, SILC_ID_SERVER)));
526 if (client->router == from) {
527 if (resolve_real_server) {
529 silc_server_update_clients_by_real_server(server, from, to,
532 if (!client->router) {
533 if (server->server_type == SILC_ROUTER)
534 client->router = from;
543 /* All are changed */
548 SILC_LOG_DEBUG(("Client changed to %s",
549 silc_id_render(client->router->id, SILC_ID_SERVER)));
551 if (!silc_idcache_list_next(list, &id_cache))
555 silc_idcache_list_free(list);
559 if (silc_idcache_get_all(server->local_list->clients, &list)) {
560 if (silc_idcache_list_first(list, &id_cache)) {
562 client = (SilcClientEntry)id_cache->context;
564 /* If entry is disabled skip it. If entry is local to us, do not
565 switch it to anyone else, it is ours so skip it. */
566 if (!(client->data.status & SILC_IDLIST_STATUS_REGISTERED) ||
567 SILC_IS_LOCAL(client)) {
568 if (!silc_idcache_list_next(list, &id_cache))
574 SILC_LOG_DEBUG(("Client %s",
575 silc_id_render(client->id, SILC_ID_CLIENT)));
577 SILC_LOG_DEBUG(("Client->router %s",
578 silc_id_render(client->router->id, SILC_ID_SERVER)));
581 if (client->router == from) {
582 if (resolve_real_server) {
584 silc_server_update_clients_by_real_server(server, from, to,
588 client->router = from;
594 /* All are changed */
599 SILC_LOG_DEBUG(("Client changed to %s",
600 silc_id_render(client->router->id, SILC_ID_SERVER)));
602 if (!silc_idcache_list_next(list, &id_cache))
606 silc_idcache_list_free(list);
610 /* Updates servers that are from `from' to be originated from `to'. This
611 will also update the server's connection to `to's connection. */
613 void silc_server_update_servers_by_server(SilcServer server,
614 SilcServerEntry from,
617 SilcIDCacheList list = NULL;
618 SilcIDCacheEntry id_cache = NULL;
619 SilcServerEntry server_entry = NULL;
621 SILC_LOG_DEBUG(("Updating servers"));
623 if (silc_idcache_get_all(server->local_list->servers, &list)) {
624 if (silc_idcache_list_first(list, &id_cache)) {
626 server_entry = (SilcServerEntry)id_cache->context;
628 /* If entry is local to us, do not switch it to any anyone else,
630 if (SILC_IS_LOCAL(server_entry) || server_entry == server->id_entry ||
631 server_entry == from) {
632 if (!silc_idcache_list_next(list, &id_cache))
638 /* If we are standalone router, any server that is not directly
639 connected to cannot exist anymore. If we are not standalone
640 we update it correctly. */
641 if (server->server_type == SILC_ROUTER && server->standalone) {
642 silc_server_backup_del(server, server_entry);
643 silc_server_backup_replaced_del(server, server_entry);
644 silc_idlist_del_data(server_entry);
645 silc_idlist_del_server(server->local_list, server_entry);
646 server->stat.servers--;
647 server->stat.cell_servers--;
649 /* XXX if we are not standalone, do a check from local config
650 whether this server is in our cell, but not connected to
651 us (in which case we must remove it). */
653 if (server_entry->router == from) {
654 SILC_LOG_DEBUG(("Updating server (local) %s",
655 server_entry->server_name ?
656 server_entry->server_name : ""));
657 server_entry->router = to;
658 server_entry->connection = to->connection;
662 if (!silc_idcache_list_next(list, &id_cache))
666 silc_idcache_list_free(list);
669 if (silc_idcache_get_all(server->global_list->servers, &list)) {
670 if (silc_idcache_list_first(list, &id_cache)) {
672 server_entry = (SilcServerEntry)id_cache->context;
674 /* If entry is local to us, do not switch it to anyone else,
676 if (SILC_IS_LOCAL(server_entry) || server_entry == server->id_entry ||
677 server_entry == from) {
678 if (!silc_idcache_list_next(list, &id_cache))
684 /* If we are standalone router, any server that is not directly
685 connected to cannot exist anymore. If we are not standalone
686 we update it correctly. */
687 if (server->server_type == SILC_ROUTER && server->standalone) {
688 silc_server_backup_del(server, server_entry);
689 silc_server_backup_replaced_del(server, server_entry);
690 silc_idlist_del_data(server_entry);
691 silc_idlist_del_server(server->global_list, server_entry);
692 server->stat.servers--;
693 server->stat.cell_servers--;
695 /* XXX if we are not standalone, do a check from local config
696 whether this server is in our cell, but not connected to
697 us (in which case we must remove it). */
699 if (server_entry->router == from) {
700 SILC_LOG_DEBUG(("Updating server (global) %s",
701 server_entry->server_name ?
702 server_entry->server_name : ""));
703 server_entry->router = to;
704 server_entry->connection = to->connection;
708 if (!silc_idcache_list_next(list, &id_cache))
712 silc_idcache_list_free(list);
717 /* Toggles the enabled/disabled status of local server connections. Packets
718 can be sent to the servers when `toggle_enabled' is TRUE and will be
719 dropped if `toggle_enabled' is FALSE, after this function is called. */
721 void silc_server_local_servers_toggle_enabled(SilcServer server,
724 SilcIDCacheList list = NULL;
725 SilcIDCacheEntry id_cache = NULL;
726 SilcServerEntry server_entry = NULL;
728 if (silc_idcache_get_all(server->local_list->servers, &list)) {
729 if (silc_idcache_list_first(list, &id_cache)) {
731 server_entry = (SilcServerEntry)id_cache->context;
732 if (!SILC_IS_LOCAL(server_entry) || server_entry == server->id_entry) {
733 if (!silc_idcache_list_next(list, &id_cache))
740 server_entry->data.status &= ~SILC_IDLIST_STATUS_DISABLED;
742 server_entry->data.status |= SILC_IDLIST_STATUS_DISABLED;
744 if (!silc_idcache_list_next(list, &id_cache))
748 silc_idcache_list_free(list);
751 if (silc_idcache_get_all(server->global_list->servers, &list)) {
752 if (silc_idcache_list_first(list, &id_cache)) {
754 server_entry = (SilcServerEntry)id_cache->context;
755 if (!SILC_IS_LOCAL(server_entry) || server_entry == server->id_entry) {
756 if (!silc_idcache_list_next(list, &id_cache))
763 server_entry->data.status &= ~SILC_IDLIST_STATUS_DISABLED;
765 server_entry->data.status |= SILC_IDLIST_STATUS_DISABLED;
767 if (!silc_idcache_list_next(list, &id_cache))
771 silc_idcache_list_free(list);
775 /* Removes servers that are originated from the `from'. The server
776 entry is deleted in this function. If `remove_clients' is TRUE then
777 all clients originated from the server are removed too, and server
778 signoff is sent. Note that this does not remove the `from'. This
779 also does not remove locally connected servers. */
781 void silc_server_remove_servers_by_server(SilcServer server,
782 SilcServerEntry from,
785 SilcIDCacheList list = NULL;
786 SilcIDCacheEntry id_cache = NULL;
787 SilcServerEntry server_entry = NULL;
789 SILC_LOG_DEBUG(("Removing servers by %s",
790 from->server_name ? from->server_name : "server"));
792 if (silc_idcache_get_all(server->local_list->servers, &list)) {
793 if (silc_idcache_list_first(list, &id_cache)) {
795 server_entry = (SilcServerEntry)id_cache->context;
796 if (SILC_IS_LOCAL(server_entry) || server_entry == server->id_entry ||
797 server_entry->router != from || server_entry == from) {
798 if (!silc_idcache_list_next(list, &id_cache))
804 /* Remove clients owned by this server */
806 silc_server_remove_clients_by_server(server, from, server_entry,
809 /* Remove the server */
810 silc_idlist_del_server(server->local_list, server_entry);
812 if (!silc_idcache_list_next(list, &id_cache))
816 silc_idcache_list_free(list);
819 if (silc_idcache_get_all(server->global_list->servers, &list)) {
820 if (silc_idcache_list_first(list, &id_cache)) {
822 server_entry = (SilcServerEntry)id_cache->context;
823 if (SILC_IS_LOCAL(server_entry) || server_entry == server->id_entry ||
824 server_entry->router != from || server_entry == from) {
825 if (!silc_idcache_list_next(list, &id_cache))
831 /* Remove clients owned by this server */
833 silc_server_remove_clients_by_server(server, from, server_entry,
836 /* Remove the server */
837 silc_idlist_del_server(server->global_list, server_entry);
839 if (!silc_idcache_list_next(list, &id_cache))
843 silc_idcache_list_free(list);
847 /* Removes channels that are from `from. */
849 void silc_server_remove_channels_by_server(SilcServer server,
850 SilcServerEntry from)
852 SilcIDCacheList list = NULL;
853 SilcIDCacheEntry id_cache = NULL;
854 SilcChannelEntry channel = NULL;
856 SILC_LOG_DEBUG(("Removing channels by server"));
858 if (silc_idcache_get_all(server->global_list->channels, &list)) {
859 if (silc_idcache_list_first(list, &id_cache)) {
861 channel = (SilcChannelEntry)id_cache->context;
862 if (channel->router == from)
863 silc_idlist_del_channel(server->global_list, channel);
864 if (!silc_idcache_list_next(list, &id_cache))
868 silc_idcache_list_free(list);
872 /* Updates channels that are from `from' to be originated from `to'. */
874 void silc_server_update_channels_by_server(SilcServer server,
875 SilcServerEntry from,
878 SilcIDCacheList list = NULL;
879 SilcIDCacheEntry id_cache = NULL;
880 SilcChannelEntry channel = NULL;
882 SILC_LOG_DEBUG(("Updating channels by server"));
884 if (silc_idcache_get_all(server->global_list->channels, &list)) {
885 if (silc_idcache_list_first(list, &id_cache)) {
887 channel = (SilcChannelEntry)id_cache->context;
888 if (channel->router == from)
889 channel->router = to;
890 if (!silc_idcache_list_next(list, &id_cache))
894 silc_idcache_list_free(list);
898 /* Checks whether given channel has global users. If it does this returns
899 TRUE and FALSE if there is only locally connected clients on the channel. */
901 bool silc_server_channel_has_global(SilcChannelEntry channel)
903 SilcChannelClientEntry chl;
904 SilcHashTableList htl;
906 silc_hash_table_list(channel->user_list, &htl);
907 while (silc_hash_table_get(&htl, NULL, (void **)&chl)) {
908 if (chl->client->router) {
909 silc_hash_table_list_reset(&htl);
913 silc_hash_table_list_reset(&htl);
918 /* Checks whether given channel has locally connected users. If it does this
919 returns TRUE and FALSE if there is not one locally connected client. */
921 bool silc_server_channel_has_local(SilcChannelEntry channel)
923 SilcChannelClientEntry chl;
924 SilcHashTableList htl;
926 silc_hash_table_list(channel->user_list, &htl);
927 while (silc_hash_table_get(&htl, NULL, (void **)&chl)) {
928 if (SILC_IS_LOCAL(chl->client)) {
929 silc_hash_table_list_reset(&htl);
933 silc_hash_table_list_reset(&htl);
938 /* This function removes the channel and all users on the channel, unless
939 the channel is permanent. In this case the channel is disabled but all
940 users are removed from the channel. Returns TRUE if the channel is
941 destroyed totally, and FALSE if it is permanent and remains. */
943 bool silc_server_channel_delete(SilcServer server,
944 SilcChannelEntry channel)
946 SilcChannelClientEntry chl;
947 SilcHashTableList htl;
948 bool delchan = !(channel->mode & SILC_CHANNEL_MODE_FOUNDER_AUTH);
951 /* Update statistics */
952 if (server->server_type == SILC_ROUTER)
953 server->stat.chanclients -= channel->user_count;
955 /* Totally delete the channel and all users on the channel. The
956 users are deleted automatically in silc_idlist_del_channel. */
957 silc_schedule_task_del_by_context(server->schedule, channel->rekey);
958 if (silc_idlist_del_channel(server->local_list, channel)) {
959 server->stat.my_channels--;
960 if (server->server_type == SILC_ROUTER) {
961 server->stat.channels--;
962 server->stat.cell_channels--;
965 if (silc_idlist_del_channel(server->global_list, channel))
966 if (server->server_type == SILC_ROUTER)
967 server->stat.channels--;
973 /* Channel is permanent, do not remove it, remove only users */
974 channel->disabled = TRUE;
975 silc_hash_table_list(channel->user_list, &htl);
976 while (silc_hash_table_get(&htl, NULL, (void *)&chl)) {
977 silc_hash_table_del(chl->client->channels, channel);
978 silc_hash_table_del(channel->user_list, chl->client);
979 channel->user_count--;
981 /* Update statistics */
982 if (SILC_IS_LOCAL(chl->client))
983 server->stat.my_chanclients--;
984 if (server->server_type == SILC_ROUTER) {
985 server->stat.cell_chanclients--;
986 server->stat.chanclients--;
991 silc_hash_table_list_reset(&htl);
993 SILC_LOG_DEBUG(("Channel %s remains", channel->channel_name));
998 /* Returns TRUE if the given client is on the channel. FALSE if not.
999 This works because we assure that the user list on the channel is
1000 always in up to date thus we can only check the channel list from
1001 `client' which is faster than checking the user list from `channel'. */
1003 bool silc_server_client_on_channel(SilcClientEntry client,
1004 SilcChannelEntry channel,
1005 SilcChannelClientEntry *chl)
1007 if (!client || !channel)
1010 return silc_hash_table_find(client->channels, channel, NULL,
1014 /* Checks string for bad characters and returns TRUE if they are found. */
1016 bool silc_server_name_bad_chars(const char *name, SilcUInt32 name_len)
1020 for (i = 0; i < name_len; i++) {
1021 if (!isascii(name[i]))
1023 if (name[i] <= 32) return TRUE;
1024 if (name[i] == ' ') return TRUE;
1025 if (name[i] == '*') return TRUE;
1026 if (name[i] == '?') return TRUE;
1027 if (name[i] == ',') return TRUE;
1033 /* Modifies the `name' if it includes bad characters and returns new
1034 allocated name that does not include bad characters. */
1036 char *silc_server_name_modify_bad(const char *name, SilcUInt32 name_len)
1039 char *newname = strdup(name);
1041 for (i = 0; i < name_len; i++) {
1042 if (!isascii(newname[i])) newname[i] = '_';
1043 if (newname[i] <= 32) newname[i] = '_';
1044 if (newname[i] == ' ') newname[i] = '_';
1045 if (newname[i] == '*') newname[i] = '_';
1046 if (newname[i] == '?') newname[i] = '_';
1047 if (newname[i] == ',') newname[i] = '_';
1053 /* Find number of sockets by IP address indicated by `ip'. Returns 0 if
1054 socket connections with the IP address does not exist. */
1056 SilcUInt32 silc_server_num_sockets_by_ip(SilcServer server, const char *ip,
1057 SilcSocketType type)
1061 for (i = 0, count = 0; i < server->config->param.connections_max; i++) {
1062 if (server->sockets[i] && !SILC_IS_LISTENER(server->sockets[i]) &&
1063 !strcmp(server->sockets[i]->ip, ip) &&
1064 server->sockets[i]->type == type)
1071 /* Find number of sockets by IP address indicated by remote host, indicatd
1072 by `ip' or `hostname', `port', and `type'. Returns 0 if socket connections
1073 does not exist. If `ip' is provided then `hostname' is ignored. */
1075 SilcUInt32 silc_server_num_sockets_by_remote(SilcServer server,
1077 const char *hostname,
1079 SilcSocketType type)
1083 if (!ip && !hostname)
1086 for (i = 0, count = 0; i < server->config->param.connections_max; i++) {
1087 if (server->sockets[i] && !SILC_IS_LISTENER(server->sockets[i]) &&
1088 ((ip && !strcmp(server->sockets[i]->ip, ip)) ||
1089 (hostname && !strcmp(server->sockets[i]->hostname, hostname))) &&
1090 server->sockets[i]->port == port &&
1091 server->sockets[i]->type == type)
1098 /* Finds locally cached public key by the public key received in the SKE.
1099 If we have it locally cached then we trust it and will use it in the
1100 authentication protocol. Returns the locally cached public key or NULL
1101 if we do not find the public key. */
1103 SilcPublicKey silc_server_find_public_key(SilcServer server,
1104 SilcHashTable local_public_keys,
1105 SilcPublicKey remote_public_key)
1107 SilcPublicKey cached_key;
1109 SILC_LOG_DEBUG(("Find remote public key (%d keys in local cache)",
1110 silc_hash_table_count(local_public_keys)));
1112 if (!silc_hash_table_find_ext(local_public_keys, remote_public_key,
1113 (void **)&cached_key, NULL,
1114 silc_hash_public_key, NULL,
1115 silc_hash_public_key_compare, NULL)) {
1116 SILC_LOG_ERROR(("Public key not found"));
1120 SILC_LOG_DEBUG(("Found public key"));
1125 /* This returns the first public key from the table of public keys. This
1126 is used only in cases where single public key exists in the table and
1127 we want to get a pointer to it. For public key tables that has multiple
1128 keys in it the silc_server_find_public_key must be used. */
1130 SilcPublicKey silc_server_get_public_key(SilcServer server,
1131 SilcHashTable local_public_keys)
1133 SilcPublicKey cached_key;
1134 SilcHashTableList htl;
1136 SILC_LOG_DEBUG(("Start"));
1138 assert(silc_hash_table_count(local_public_keys) < 2);
1140 silc_hash_table_list(local_public_keys, &htl);
1141 if (!silc_hash_table_get(&htl, NULL, (void **)&cached_key))
1143 silc_hash_table_list_reset(&htl);
1148 /* Check whether the connection `sock' is allowed to connect to us. This
1149 checks for example whether there is too much connections for this host,
1150 and required version for the host etc. */
1152 bool silc_server_connection_allowed(SilcServer server,
1153 SilcSocketConnection sock,
1154 SilcSocketType type,
1155 SilcServerConfigConnParams *global,
1156 SilcServerConfigConnParams *params,
1159 SilcUInt32 conn_number = (type == SILC_SOCKET_TYPE_CLIENT ?
1160 server->stat.my_clients :
1161 type == SILC_SOCKET_TYPE_SERVER ?
1162 server->stat.my_servers :
1163 server->stat.my_routers);
1164 SilcUInt32 num_sockets, max_hosts, max_per_host;
1165 SilcUInt32 r_protocol_version, l_protocol_version;
1166 SilcUInt32 r_software_version, l_software_version;
1167 char *r_vendor_version = NULL, *l_vendor_version;
1169 SILC_LOG_DEBUG(("Checking whether connection is allowed"));
1173 l_protocol_version =
1174 silc_version_to_num(params && params->version_protocol ?
1175 params->version_protocol :
1176 global->version_protocol);
1177 l_software_version =
1178 silc_version_to_num(params && params->version_software ?
1179 params->version_software :
1180 global->version_software);
1181 l_vendor_version = (params && params->version_software_vendor ?
1182 params->version_software_vendor :
1183 global->version_software_vendor);
1185 if (ske && silc_ske_parse_version(ske, &r_protocol_version, NULL,
1186 &r_software_version, NULL,
1187 &r_vendor_version)) {
1188 sock->version = r_protocol_version;
1190 /* Match protocol version */
1191 if (l_protocol_version && r_protocol_version &&
1192 r_protocol_version < l_protocol_version) {
1193 SILC_LOG_INFO(("Connection %s (%s) is too old version",
1194 sock->hostname, sock->ip));
1195 silc_server_disconnect_remote(server, sock,
1196 SILC_STATUS_ERR_BAD_VERSION,
1197 "You support too old protocol version");
1201 /* Math software version */
1202 if (l_software_version && r_software_version &&
1203 r_software_version < l_software_version) {
1204 SILC_LOG_INFO(("Connection %s (%s) is too old version",
1205 sock->hostname, sock->ip));
1206 silc_server_disconnect_remote(server, sock,
1207 SILC_STATUS_ERR_BAD_VERSION,
1208 "You support too old software version");
1212 /* Regex match vendor version */
1213 if (l_vendor_version && r_vendor_version &&
1214 !silc_string_match(l_vendor_version, r_vendor_version)) {
1215 SILC_LOG_INFO(("Connection %s (%s) is unsupported version",
1216 sock->hostname, sock->ip));
1217 silc_server_disconnect_remote(server, sock,
1218 SILC_STATUS_ERR_BAD_VERSION,
1219 "Your software is not supported");
1223 silc_free(r_vendor_version);
1225 /* Check for maximum connections limit */
1227 num_sockets = silc_server_num_sockets_by_ip(server, sock->ip, type);
1228 max_hosts = (params ? params->connections_max : global->connections_max);
1229 max_per_host = (params ? params->connections_max_per_host :
1230 global->connections_max_per_host);
1232 if (max_hosts && conn_number >= max_hosts) {
1233 SILC_LOG_INFO(("Server is full, closing %s (%s) connection",
1234 sock->hostname, sock->ip));
1235 silc_server_disconnect_remote(server, sock,
1236 SILC_STATUS_ERR_RESOURCE_LIMIT,
1237 "Server is full, try again later");
1241 if (num_sockets >= max_per_host) {
1242 SILC_LOG_INFO(("Too many connections from %s (%s), closing connection",
1243 sock->hostname, sock->ip));
1244 silc_server_disconnect_remote(server, sock,
1245 SILC_STATUS_ERR_RESOURCE_LIMIT,
1246 "Too many connections from your host");
1253 /* Checks that client has rights to add or remove channel modes. If any
1254 of the checks fails FALSE is returned. */
1256 bool silc_server_check_cmode_rights(SilcServer server,
1257 SilcChannelEntry channel,
1258 SilcChannelClientEntry client,
1261 bool is_op = client->mode & SILC_CHANNEL_UMODE_CHANOP;
1262 bool is_fo = client->mode & SILC_CHANNEL_UMODE_CHANFO;
1264 /* Check whether has rights to change anything */
1265 if (!is_op && !is_fo)
1268 /* Check whether has rights to change everything */
1272 /* Founder implies operator */
1276 /* We know that client is channel operator, check that they are not
1277 changing anything that requires channel founder rights. Rest of the
1278 modes are available automatically for channel operator. */
1280 if (mode & SILC_CHANNEL_MODE_PRIVKEY) {
1281 if (is_op && !is_fo)
1284 if (channel->mode & SILC_CHANNEL_MODE_PRIVKEY) {
1285 if (is_op && !is_fo)
1290 if (mode & SILC_CHANNEL_MODE_PASSPHRASE) {
1291 if (!(channel->mode & SILC_CHANNEL_MODE_PASSPHRASE)) {
1292 if (is_op && !is_fo)
1296 if (channel->mode & SILC_CHANNEL_MODE_PASSPHRASE) {
1297 if (is_op && !is_fo)
1302 if (mode & SILC_CHANNEL_MODE_CIPHER) {
1303 if (!(channel->mode & SILC_CHANNEL_MODE_CIPHER)) {
1304 if (is_op && !is_fo)
1308 if (channel->mode & SILC_CHANNEL_MODE_CIPHER) {
1309 if (is_op && !is_fo)
1314 if (mode & SILC_CHANNEL_MODE_FOUNDER_AUTH) {
1315 if (!(channel->mode & SILC_CHANNEL_MODE_FOUNDER_AUTH)) {
1316 if (is_op && !is_fo)
1320 if (channel->mode & SILC_CHANNEL_MODE_FOUNDER_AUTH) {
1321 if (is_op && !is_fo)
1326 if (mode & SILC_CHANNEL_MODE_SILENCE_USERS) {
1327 if (!(channel->mode & SILC_CHANNEL_MODE_SILENCE_USERS)) {
1328 if (is_op && !is_fo)
1332 if (channel->mode & SILC_CHANNEL_MODE_SILENCE_USERS) {
1333 if (is_op && !is_fo)
1338 if (mode & SILC_CHANNEL_MODE_SILENCE_OPERS) {
1339 if (!(channel->mode & SILC_CHANNEL_MODE_SILENCE_OPERS)) {
1340 if (is_op && !is_fo)
1344 if (channel->mode & SILC_CHANNEL_MODE_SILENCE_OPERS) {
1345 if (is_op && !is_fo)
1353 /* Check that the client has rights to change its user mode. Returns
1354 FALSE if setting some mode is not allowed. */
1356 bool silc_server_check_umode_rights(SilcServer server,
1357 SilcClientEntry client,
1360 bool server_op = FALSE, router_op = FALSE;
1362 if (mode & SILC_UMODE_SERVER_OPERATOR) {
1363 /* Cannot set server operator mode (must use OPER command) */
1364 if (!(client->mode & SILC_UMODE_SERVER_OPERATOR))
1367 /* Remove the server operator rights */
1368 if (client->mode & SILC_UMODE_SERVER_OPERATOR)
1372 if (mode & SILC_UMODE_ROUTER_OPERATOR) {
1373 /* Cannot set router operator mode (must use SILCOPER command) */
1374 if (!(client->mode & SILC_UMODE_ROUTER_OPERATOR))
1377 /* Remove the router operator rights */
1378 if (client->mode & SILC_UMODE_ROUTER_OPERATOR)
1383 SILC_UMODE_STATS_UPDATE(server, SILC_UMODE_SERVER_OPERATOR);
1385 SILC_UMODE_STATS_UPDATE(router, SILC_UMODE_ROUTER_OPERATOR);
1390 /* This function is used to send the notify packets and motd to the
1391 incoming client connection. */
1393 void silc_server_send_connect_notifys(SilcServer server,
1394 SilcSocketConnection sock,
1395 SilcClientEntry client)
1397 SilcIDListData idata = (SilcIDListData)client;
1399 SILC_LOG_DEBUG(("Send welcome notifys"));
1401 /* Send some nice info to the client */
1402 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1403 ("Welcome to the SILC Network %s",
1405 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1406 ("Your host is %s, running version %s",
1407 server->server_name, server_version));
1409 if (server->server_type == SILC_ROUTER) {
1410 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1411 ("There are %d clients, %d servers and %d "
1412 "routers in SILC Network",
1413 server->stat.clients, server->stat.servers + 1,
1414 server->stat.routers));
1416 if (server->stat.clients && server->stat.servers + 1)
1417 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1418 ("There are %d clients, %d servers and %d "
1419 "routers in SILC Network",
1420 server->stat.clients, server->stat.servers + 1,
1421 (server->standalone ? 0 :
1422 !server->stat.routers ? 1 :
1423 server->stat.routers)));
1426 if (server->stat.cell_clients && server->stat.cell_servers + 1)
1427 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1428 ("There are %d clients on %d server in our cell",
1429 server->stat.cell_clients,
1430 server->stat.cell_servers + 1));
1431 if (server->server_type == SILC_ROUTER) {
1432 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1433 ("I have %d clients, %d channels, %d servers and "
1435 server->stat.my_clients,
1436 server->stat.my_channels,
1437 server->stat.my_servers,
1438 server->stat.my_routers));
1440 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1441 ("I have %d clients and %d channels formed",
1442 server->stat.my_clients,
1443 server->stat.my_channels));
1446 if (server->stat.server_ops || server->stat.router_ops)
1447 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1448 ("There are %d server operators and %d router "
1450 server->stat.server_ops,
1451 server->stat.router_ops));
1452 if (server->stat.my_router_ops + server->stat.my_server_ops)
1453 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1454 ("I have %d operators online",
1455 server->stat.my_router_ops +
1456 server->stat.my_server_ops));
1458 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1459 ("Your connection is secured with %s cipher, "
1460 "key length %d bits",
1461 silc_cipher_get_name(idata->send_key),
1462 silc_cipher_get_key_len(idata->send_key)));
1463 SILC_SERVER_SEND_NOTIFY(server, sock, SILC_NOTIFY_TYPE_NONE,
1464 ("Your current nickname is %s",
1468 silc_server_send_motd(server, sock);
1471 /* Kill the client indicated by `remote_client' sending KILLED notify
1472 to the client, to all channels client has joined and to primary
1473 router if needed. The killed client is also removed from all channels. */
1475 void silc_server_kill_client(SilcServer server,
1476 SilcClientEntry remote_client,
1477 const char *comment,
1479 SilcIdType killer_id_type)
1481 SilcBuffer killed, killer;
1483 SILC_LOG_DEBUG(("Killing client %s",
1484 silc_id_render(remote_client->id, SILC_ID_CLIENT)));
1486 /* Send the KILL notify packets. First send it to the channel, then
1487 to our primary router and then directly to the client who is being
1488 killed right now. */
1490 killed = silc_id_payload_encode(remote_client->id, SILC_ID_CLIENT);
1491 killer = silc_id_payload_encode(killer_id, killer_id_type);
1493 /* Send KILLED notify to the channels. It is not sent to the client
1494 as it will be sent differently destined directly to the client and not
1496 silc_server_send_notify_on_channels(server, remote_client,
1497 remote_client, SILC_NOTIFY_TYPE_KILLED,
1498 3, killed->data, killed->len,
1499 comment, comment ? strlen(comment) : 0,
1500 killer->data, killer->len);
1502 /* Send KILLED notify to primary route */
1503 silc_server_send_notify_killed(server, SILC_PRIMARY_ROUTE(server),
1504 SILC_BROADCAST(server), remote_client->id,
1505 comment, killer_id, killer_id_type);
1507 /* Send KILLED notify to the client directly */
1508 if (remote_client->connection || remote_client->router)
1509 silc_server_send_notify_killed(server, remote_client->connection ?
1510 remote_client->connection :
1511 remote_client->router->connection, FALSE,
1512 remote_client->id, comment,
1513 killer_id, killer_id_type);
1515 /* Remove the client from all channels. This generates new keys to the
1516 channels as well. */
1517 silc_server_remove_from_channels(server, NULL, remote_client, FALSE,
1520 /* Remove the client entry, If it is locally connected then we will also
1521 disconnect the client here */
1522 if (remote_client->connection) {
1523 /* Remove locally conneted client */
1524 SilcSocketConnection sock = remote_client->connection;
1525 silc_server_free_client_data(server, sock, remote_client, FALSE, NULL);
1526 silc_server_close_connection(server, sock);
1528 /* Update statistics */
1529 server->stat.clients--;
1530 if (server->stat.cell_clients)
1531 server->stat.cell_clients--;
1532 SILC_OPER_STATS_UPDATE(remote_client, server, SILC_UMODE_SERVER_OPERATOR);
1533 SILC_OPER_STATS_UPDATE(remote_client, router, SILC_UMODE_ROUTER_OPERATOR);
1535 if (SILC_IS_LOCAL(remote_client)) {
1536 server->stat.my_clients--;
1537 silc_schedule_task_del_by_context(server->schedule, remote_client);
1538 silc_idlist_del_data(remote_client);
1541 /* Remove remote client */
1542 silc_idlist_del_data(remote_client);
1543 if (!silc_idlist_del_client(server->global_list, remote_client)) {
1544 /* Remove this client from watcher list if it is */
1545 silc_server_del_from_watcher_list(server, remote_client);
1546 silc_idlist_del_client(server->local_list, remote_client);
1550 silc_buffer_free(killer);
1551 silc_buffer_free(killed);
1556 SilcClientEntry client;
1557 SilcNotifyType notify;
1558 const char *new_nick;
1559 } WatcherNotifyContext;
1562 silc_server_check_watcher_list_foreach(void *key, void *context,
1565 WatcherNotifyContext *notify = user_context;
1566 SilcClientEntry entry = context;
1567 SilcSocketConnection sock;
1572 if (entry == notify->client)
1575 sock = silc_server_get_client_route(notify->server, NULL, 0, entry->id,
1578 SILC_LOG_DEBUG(("Sending WATCH notify to %s",
1579 silc_id_render(entry->id, SILC_ID_CLIENT)));
1581 /* Send the WATCH notify */
1582 silc_server_send_notify_watch(notify->server, sock, entry,
1584 notify->new_nick ? notify->new_nick :
1585 (const char *)notify->client->nickname,
1590 /* This function checks whether the `client' nickname is being watched
1591 by someone, and notifies the watcher of the notify change of notify
1592 type indicated by `notify'. */
1594 bool silc_server_check_watcher_list(SilcServer server,
1595 SilcClientEntry client,
1596 const char *new_nick,
1597 SilcNotifyType notify)
1599 unsigned char hash[16];
1600 WatcherNotifyContext n;
1602 SILC_LOG_DEBUG(("Checking watcher list %s",
1603 client->nickname ? client->nickname : (unsigned char *)""));
1605 /* If the watching is rejected by the client do nothing */
1606 if (client->mode & SILC_UMODE_REJECT_WATCHING)
1609 /* Make hash from the nick, or take it from Client ID */
1610 if (client->nickname) {
1612 memset(nick, 0, sizeof(nick));
1613 silc_to_lower(client->nickname, nick, sizeof(nick) - 1);
1614 silc_hash_make(server->md5hash, nick, strlen(nick), hash);
1616 memset(hash, 0, sizeof(hash));
1617 memcpy(hash, client->id->hash, sizeof(client->id->hash));
1622 n.new_nick = new_nick;
1625 /* Send notify to all watchers */
1626 silc_hash_table_find_foreach(server->watcher_list, hash,
1627 silc_server_check_watcher_list_foreach, &n);
1632 /* Remove the `client' from watcher list. After calling this the `client'
1633 is not watching any nicknames. */
1635 bool silc_server_del_from_watcher_list(SilcServer server,
1636 SilcClientEntry client)
1638 SilcHashTableList htl;
1640 SilcClientEntry entry;
1643 silc_hash_table_list(server->watcher_list, &htl);
1644 while (silc_hash_table_get(&htl, &key, (void **)&entry)) {
1645 if (entry == client) {
1646 silc_hash_table_del_by_context(server->watcher_list, key, client);
1649 SILC_LOG_DEBUG(("Removing %s from WATCH list",
1650 silc_id_render(client->id, SILC_ID_CLIENT)));
1652 /* Now check whether there still exists entries with this key, if not
1653 then free the key to not leak memory. */
1654 if (!silc_hash_table_find(server->watcher_list, key, NULL, NULL))
1660 silc_hash_table_list_reset(&htl);
1665 /* Force the client indicated by `chl' to change the channel user mode
1666 on channel indicated by `channel' to `forced_mode'. */
1668 bool silc_server_force_cumode_change(SilcServer server,
1669 SilcSocketConnection sock,
1670 SilcChannelEntry channel,
1671 SilcChannelClientEntry chl,
1672 SilcUInt32 forced_mode)
1674 SilcBuffer idp1, idp2;
1675 unsigned char cumode[4];
1677 SILC_LOG_DEBUG(("Enforcing sender to change mode"));
1680 silc_server_send_notify_cumode(server, sock, FALSE, channel, forced_mode,
1681 server->id, SILC_ID_SERVER,
1682 chl->client->id, NULL);
1684 idp1 = silc_id_payload_encode(server->id, SILC_ID_SERVER);
1685 idp2 = silc_id_payload_encode(chl->client->id, SILC_ID_CLIENT);
1686 SILC_PUT32_MSB(forced_mode, cumode);
1687 silc_server_send_notify_to_channel(server, sock, channel, FALSE,
1688 SILC_NOTIFY_TYPE_CUMODE_CHANGE,
1689 3, idp1->data, idp1->len,
1690 cumode, sizeof(cumode),
1691 idp2->data, idp2->len);
1692 silc_buffer_free(idp1);
1693 silc_buffer_free(idp2);
1698 /* Find active socket connection by the IP address and port indicated by
1699 `ip' and `port', and socket connection type of `type'. */
1701 SilcSocketConnection
1702 silc_server_find_socket_by_host(SilcServer server,
1703 SilcSocketType type,
1704 const char *ip, SilcUInt16 port)
1708 for (i = 0; i < server->config->param.connections_max; i++) {
1709 if (!server->sockets[i])
1711 if (!strcmp(server->sockets[i]->ip, ip) &&
1712 (!port || server->sockets[i]->port == port) &&
1713 server->sockets[i]->type == type)
1714 return server->sockets[i];
1720 /* This function can be used to match the invite and ban lists. */
1722 bool silc_server_inviteban_match(SilcServer server, SilcHashTable list,
1723 SilcUInt8 type, void *check)
1725 unsigned char *tmp = NULL;
1726 SilcUInt32 len = 0, t;
1727 SilcHashTableList htl;
1728 SilcBuffer entry, idp = NULL;
1731 if (type < 1 || type > 3 || !check)
1735 tmp = strdup((char *)check);
1740 tmp = silc_pkcs_public_key_encode(check, &len);
1745 idp = silc_id_payload_encode(check, SILC_ID_CLIENT);
1752 /* Compare the list */
1753 silc_hash_table_list(list, &htl);
1754 while (silc_hash_table_get(&htl, (void **)&t, (void **)&entry)) {
1757 if (silc_string_match((char *)entry, tmp)) {
1761 } else if (!memcmp(entry->data, tmp, len)) {
1767 silc_hash_table_list_reset(&htl);
1771 silc_buffer_free(idp);
1775 /* Process invite or ban information */
1777 void silc_server_inviteban_process(SilcServer server, SilcHashTable list,
1778 SilcUInt8 action, SilcArgumentPayload args)
1781 SilcUInt32 type, len;
1783 SilcHashTableList htl;
1785 SILC_LOG_DEBUG(("Processing invite/ban for %s action",
1786 action == 0x00 ? "ADD" : "DEL"));
1788 /* Add the information to invite list */
1789 if (action == 0x00) {
1790 /* Traverse all arguments and add to the hash table according to
1792 tmp = silc_argument_get_first_arg(args, &type, &len);
1795 /* Invite string. Get the old invite string from hash table
1796 and append this at the end of the existing one. */
1797 char *string = NULL;
1798 silc_hash_table_find(list, (void *)1,
1799 NULL, (void **)&string);
1800 silc_hash_table_del(list, (void *)1);
1802 string = silc_calloc(len + 2, sizeof(*string));
1804 string = silc_realloc(string, sizeof(*string) *
1805 (strlen(string) + len + 2));
1806 memset(string + strlen(string), 0, len + 2);
1807 if (tmp[len - 1] == ',')
1808 tmp[len - 1] = '\0';
1809 strncat(string, tmp, len);
1810 strncat(string, ",", 1);
1812 /* Add new invite string to invite list */
1813 silc_hash_table_add(list, (void *)1, string);
1815 } else if (type == 2) {
1816 /* Public key. Check first if the public key is already on the
1817 list and ignore it if it is, otherwise, add it to hash table. */
1819 /* Check if the public key is in the list already */
1820 silc_hash_table_list(list, &htl);
1821 while (silc_hash_table_get(&htl, (void **)&type, (void **)&tmp2)) {
1822 if (type == 2 && !memcmp(tmp2->data, tmp, len)) {
1827 silc_hash_table_list_reset(&htl);
1829 /* Add new public key to invite list */
1831 tmp2 = silc_buffer_alloc_size(len);
1832 silc_buffer_put(tmp2, tmp, len);
1833 silc_hash_table_add(list, (void *)2, tmp2);
1836 } else if (type == 3) {
1839 /* Check if the ID is in the list already */
1840 silc_hash_table_list(list, &htl);
1841 while (silc_hash_table_get(&htl, (void **)&type, (void **)&tmp2)) {
1842 if (type == 3 && !memcmp(tmp2->data, tmp, len)) {
1847 silc_hash_table_list_reset(&htl);
1849 /* Add new Client ID to invite list */
1851 tmp2 = silc_buffer_alloc_size(len);
1852 silc_buffer_put(tmp2, tmp, len);
1853 silc_hash_table_add(list, (void *)3, tmp2);
1857 tmp = silc_argument_get_next_arg(args, &type, &len);
1861 /* Delete information to invite list */
1862 if (action == 0x01 && list) {
1863 /* Now delete the arguments from invite list */
1864 tmp = silc_argument_get_first_arg(args, &type, &len);
1867 /* Invite string. Get the old string from hash table and delete
1868 the requested string. */
1869 char *string = NULL, *start, *end, *n;
1871 if (silc_hash_table_find(list, (void *)1, NULL, (void **)&string)) {
1872 silc_hash_table_del(list, (void *)1);
1874 if (!strncmp(string, tmp, strlen(string) - 1)) {
1878 start = strstr(string, tmp);
1879 if (start && strlen(start) >= len) {
1881 n = silc_calloc(strlen(string) - len, sizeof(*n));
1882 strncat(n, string, start - string);
1883 strncat(n, end + 1, ((string + strlen(string)) - end) - 1);
1889 /* Add new invite string to invite list */
1891 silc_hash_table_add(list, (void *)1, string);
1894 } else if (type == 2) {
1897 /* Delete from the invite list */
1898 silc_hash_table_list(list, &htl);
1899 while (silc_hash_table_get(&htl, (void **)&type, (void **)&tmp2)) {
1900 if (type == 2 && !memcmp(tmp2->data, tmp, len)) {
1901 silc_hash_table_del_by_context(list, (void *)2, tmp2);
1902 silc_buffer_free(tmp2);
1906 silc_hash_table_list_reset(&htl);
1908 } else if (type == 3) {
1911 /* Delete from the invite list */
1912 silc_hash_table_list(list, &htl);
1913 while (silc_hash_table_get(&htl, (void **)&type, (void **)&tmp2)) {
1914 if (type == 3 && !memcmp(tmp2->data, tmp, len)) {
1915 silc_hash_table_del_by_context(list, (void *)3, tmp2);
1916 silc_buffer_free(tmp2);
1920 silc_hash_table_list_reset(&htl);
1923 tmp = silc_argument_get_next_arg(args, &type, &len);