5 Author: Pekka Riikonen <priikone@poseidon.pspt.fi>
7 Copyright (C) 1997 - 2001 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; either version 2 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
21 * Server packet routines to send packets.
25 #include "serverincludes.h"
26 #include "server_internal.h"
28 /* Routine that sends packet or marks packet to be sent. This is used
29 directly only in special cases. Normal cases should use
30 silc_server_packet_send. Returns < 0 error. */
32 int silc_server_packet_send_real(SilcServer server,
33 SilcSocketConnection sock,
38 /* If rekey protocol is active we must assure that all packets are
39 sent through packet queue. */
40 if (SILC_SERVER_IS_REKEY(sock))
44 ret = silc_packet_send(sock, force_send);
48 /* Mark that there is some outgoing data available for this connection.
49 This call sets the connection both for input and output (the input
50 is set always and this call keeps the input setting, actually).
51 Actual data sending is performed by silc_server_packet_process. */
52 SILC_SET_CONNECTION_FOR_OUTPUT(sock->sock);
54 /* Mark to socket that data is pending in outgoing buffer. This flag
55 is needed if new data is added to the buffer before the earlier
56 put data is sent to the network. */
57 SILC_SET_OUTBUF_PENDING(sock);
62 /* Assembles a new packet to be sent out to network. This doesn't actually
63 send the packet but creates the packet and fills the outgoing data
64 buffer and marks the packet ready to be sent to network. However, If
65 argument force_send is TRUE the packet is sent immediately and not put
66 to queue. Normal case is that the packet is not sent immediately. */
68 void silc_server_packet_send(SilcServer server,
69 SilcSocketConnection sock,
71 SilcPacketFlags flags,
77 SilcIdType dst_id_type = SILC_ID_NONE;
82 /* Get data used in the packet sending, keys and stuff */
84 case SILC_SOCKET_TYPE_CLIENT:
85 dst_id = ((SilcClientEntry)sock->user_data)->id;
86 dst_id_type = SILC_ID_CLIENT;
88 case SILC_SOCKET_TYPE_SERVER:
89 case SILC_SOCKET_TYPE_ROUTER:
90 dst_id = ((SilcServerEntry)sock->user_data)->id;
91 dst_id_type = SILC_ID_SERVER;
97 silc_server_packet_send_dest(server, sock, type, flags, dst_id,
98 dst_id_type, data, data_len, force_send);
101 /* Assembles a new packet to be sent out to network. This doesn't actually
102 send the packet but creates the packet and fills the outgoing data
103 buffer and marks the packet ready to be sent to network. However, If
104 argument force_send is TRUE the packet is sent immediately and not put
105 to queue. Normal case is that the packet is not sent immediately.
106 Destination information is sent as argument for this function. */
108 void silc_server_packet_send_dest(SilcServer server,
109 SilcSocketConnection sock,
111 SilcPacketFlags flags,
113 SilcIdType dst_id_type,
118 SilcPacketContext packetdata;
119 SilcIDListData idata;
120 SilcCipher cipher = NULL;
121 SilcHmac hmac = NULL;
122 unsigned char *dst_id_data = NULL;
123 uint32 dst_id_len = 0;
125 SILC_LOG_DEBUG(("Sending packet, type %d", type));
127 /* Get data used in the packet sending, keys and stuff */
128 idata = (SilcIDListData)sock->user_data;
131 dst_id_data = silc_id_id2str(dst_id, dst_id_type);
132 dst_id_len = silc_id_get_len(dst_id_type);
135 /* Set the packet context pointers */
136 packetdata.type = type;
137 packetdata.flags = flags;
138 packetdata.src_id = silc_id_id2str(server->id, server->id_type);
139 packetdata.src_id_len = SILC_ID_SERVER_LEN;
140 packetdata.src_id_type = server->id_type;
141 packetdata.dst_id = dst_id_data;
142 packetdata.dst_id_len = dst_id_len;
143 packetdata.dst_id_type = dst_id_type;
144 packetdata.truelen = data_len + SILC_PACKET_HEADER_LEN +
145 packetdata.src_id_len + dst_id_len;
146 packetdata.padlen = SILC_PACKET_PADLEN(packetdata.truelen);
148 /* Prepare outgoing data buffer for packet sending */
149 silc_packet_send_prepare(sock,
150 SILC_PACKET_HEADER_LEN +
151 packetdata.src_id_len +
152 packetdata.dst_id_len,
156 SILC_LOG_DEBUG(("Putting data to outgoing buffer, len %d", data_len));
158 packetdata.buffer = sock->outbuf;
160 /* Put the data to the buffer */
161 if (data && data_len)
162 silc_buffer_put(sock->outbuf, data, data_len);
164 /* Create the outgoing packet */
165 silc_packet_assemble(&packetdata);
168 cipher = idata->send_key;
169 hmac = idata->hmac_send;
172 /* Encrypt the packet */
173 silc_packet_encrypt(cipher, hmac, sock->outbuf, sock->outbuf->len);
175 SILC_LOG_HEXDUMP(("Outgoing packet, len %d", sock->outbuf->len),
176 sock->outbuf->data, sock->outbuf->len);
178 /* Now actually send the packet */
179 silc_server_packet_send_real(server, sock, force_send);
181 if (packetdata.src_id)
182 silc_free(packetdata.src_id);
183 if (packetdata.dst_id)
184 silc_free(packetdata.dst_id);
187 /* Assembles a new packet to be sent out to network. This doesn't actually
188 send the packet but creates the packet and fills the outgoing data
189 buffer and marks the packet ready to be sent to network. However, If
190 argument force_send is TRUE the packet is sent immediately and not put
191 to queue. Normal case is that the packet is not sent immediately.
192 The source and destination information is sent as argument for this
195 void silc_server_packet_send_srcdest(SilcServer server,
196 SilcSocketConnection sock,
198 SilcPacketFlags flags,
200 SilcIdType src_id_type,
202 SilcIdType dst_id_type,
207 SilcPacketContext packetdata;
208 SilcIDListData idata;
209 SilcCipher cipher = NULL;
210 SilcHmac hmac = NULL;
211 unsigned char *dst_id_data = NULL;
212 uint32 dst_id_len = 0;
213 unsigned char *src_id_data = NULL;
214 uint32 src_id_len = 0;
216 SILC_LOG_DEBUG(("Sending packet, type %d", type));
218 /* Get data used in the packet sending, keys and stuff */
219 idata = (SilcIDListData)sock->user_data;
222 dst_id_data = silc_id_id2str(dst_id, dst_id_type);
223 dst_id_len = silc_id_get_len(dst_id_type);
227 src_id_data = silc_id_id2str(src_id, src_id_type);
228 src_id_len = silc_id_get_len(src_id_type);
231 /* Set the packet context pointers */
232 packetdata.type = type;
233 packetdata.flags = flags;
234 packetdata.src_id = src_id_data;
235 packetdata.src_id_len = src_id_len;
236 packetdata.src_id_type = src_id_type;
237 packetdata.dst_id = dst_id_data;
238 packetdata.dst_id_len = dst_id_len;
239 packetdata.dst_id_type = dst_id_type;
240 packetdata.truelen = data_len + SILC_PACKET_HEADER_LEN +
241 packetdata.src_id_len + dst_id_len;
242 packetdata.padlen = SILC_PACKET_PADLEN(packetdata.truelen);
244 /* Prepare outgoing data buffer for packet sending */
245 silc_packet_send_prepare(sock,
246 SILC_PACKET_HEADER_LEN +
247 packetdata.src_id_len +
248 packetdata.dst_id_len,
252 SILC_LOG_DEBUG(("Putting data to outgoing buffer, len %d", data_len));
254 packetdata.buffer = sock->outbuf;
256 /* Put the data to the buffer */
257 if (data && data_len)
258 silc_buffer_put(sock->outbuf, data, data_len);
260 /* Create the outgoing packet */
261 silc_packet_assemble(&packetdata);
264 cipher = idata->send_key;
265 hmac = idata->hmac_send;
268 /* Encrypt the packet */
269 silc_packet_encrypt(cipher, hmac, sock->outbuf, sock->outbuf->len);
271 SILC_LOG_HEXDUMP(("Outgoing packet, len %d", sock->outbuf->len),
272 sock->outbuf->data, sock->outbuf->len);
274 /* Now actually send the packet */
275 silc_server_packet_send_real(server, sock, force_send);
277 if (packetdata.src_id)
278 silc_free(packetdata.src_id);
279 if (packetdata.dst_id)
280 silc_free(packetdata.dst_id);
283 /* Broadcast received packet to our primary route. This function is used
284 by router to further route received broadcast packet. It is expected
285 that the broadcast flag from the packet is checked before calling this
286 function. This does not test or set the broadcast flag. */
288 void silc_server_packet_broadcast(SilcServer server,
289 SilcSocketConnection sock,
290 SilcPacketContext *packet)
292 SilcBuffer buffer = packet->buffer;
293 SilcIDListData idata;
296 SILC_LOG_DEBUG(("Broadcasting received broadcast packet"));
298 /* If the packet is originated from our primary route we are
299 not allowed to send the packet. */
300 id = silc_id_str2id(packet->src_id, packet->src_id_len, packet->src_id_type);
301 if (id && SILC_ID_SERVER_COMPARE(id, server->router->id)) {
302 idata = (SilcIDListData)sock->user_data;
304 silc_buffer_push(buffer, buffer->data - buffer->head);
305 silc_packet_send_prepare(sock, 0, 0, buffer->len);
306 silc_buffer_put(sock->outbuf, buffer->data, buffer->len);
307 silc_packet_encrypt(idata->send_key, idata->hmac_send,
308 sock->outbuf, sock->outbuf->len);
310 SILC_LOG_HEXDUMP(("Broadcasted packet, len %d", sock->outbuf->len),
311 sock->outbuf->data, sock->outbuf->len);
313 /* Now actually send the packet */
314 silc_server_packet_send_real(server, sock, TRUE);
319 SILC_LOG_DEBUG(("Will not broadcast to primary route since it is the "
320 "original sender of this packet"));
324 /* Routes received packet to `sock'. This is used to route the packets that
325 router receives but are not destined to it. */
327 void silc_server_packet_route(SilcServer server,
328 SilcSocketConnection sock,
329 SilcPacketContext *packet)
331 SilcBuffer buffer = packet->buffer;
332 SilcIDListData idata;
334 SILC_LOG_DEBUG(("Routing received packet"));
336 idata = (SilcIDListData)sock->user_data;
338 silc_buffer_push(buffer, buffer->data - buffer->head);
339 silc_packet_send_prepare(sock, 0, 0, buffer->len);
340 silc_buffer_put(sock->outbuf, buffer->data, buffer->len);
341 silc_packet_encrypt(idata->send_key, idata->hmac_send,
342 sock->outbuf, sock->outbuf->len);
344 SILC_LOG_HEXDUMP(("Routed packet, len %d", sock->outbuf->len),
345 sock->outbuf->data, sock->outbuf->len);
347 /* Now actually send the packet */
348 silc_server_packet_send_real(server, sock, TRUE);
351 /* Internal routine to actually create the channel packet and send it
352 to network. This is common function in channel message sending. If
353 `channel_message' is TRUE this encrypts the message as it is strictly
354 a channel message. If FALSE normal encryption process is used. */
357 silc_server_packet_send_to_channel_real(SilcServer server,
358 SilcSocketConnection sock,
359 SilcPacketContext *packet,
367 packet->truelen = data_len + SILC_PACKET_HEADER_LEN +
368 packet->src_id_len + packet->dst_id_len;
370 /* Prepare outgoing data buffer for packet sending */
371 silc_packet_send_prepare(sock,
372 SILC_PACKET_HEADER_LEN +
378 packet->buffer = sock->outbuf;
380 /* Put the data to buffer, assemble and encrypt the packet. The packet
381 is encrypted with normal session key shared with the client. */
382 silc_buffer_put(sock->outbuf, data, data_len);
383 silc_packet_assemble(packet);
385 silc_packet_encrypt(cipher, hmac, sock->outbuf, SILC_PACKET_HEADER_LEN +
386 packet->src_id_len + packet->dst_id_len +
389 silc_packet_encrypt(cipher, hmac, sock->outbuf, sock->outbuf->len);
391 SILC_LOG_HEXDUMP(("Channel packet, len %d", sock->outbuf->len),
392 sock->outbuf->data, sock->outbuf->len);
394 /* Now actually send the packet */
395 silc_server_packet_send_real(server, sock, force_send);
398 /* This routine is used by the server to send packets to channel. The
399 packet sent with this function is distributed to all clients on
400 the channel. Usually this is used to send notify messages to the
401 channel, things like notify about new user joining to the channel.
402 If `route' is FALSE then the packet is sent only locally and will not
403 be routed anywhere (for router locally means cell wide). If `sender'
404 is provided then the packet is not sent to that connection since it
405 originally came from it. */
407 void silc_server_packet_send_to_channel(SilcServer server,
408 SilcSocketConnection sender,
409 SilcChannelEntry channel,
416 SilcSocketConnection sock = NULL;
417 SilcPacketContext packetdata;
418 SilcClientEntry client = NULL;
419 SilcServerEntry *routed = NULL;
420 SilcChannelClientEntry chl;
421 SilcIDListData idata;
422 uint32 routed_count = 0;
424 /* This doesn't send channel message packets */
425 if (type == SILC_PACKET_CHANNEL_MESSAGE)
428 SILC_LOG_DEBUG(("Sending packet to channel"));
430 /* Set the packet context pointers. */
431 packetdata.flags = 0;
432 packetdata.type = type;
433 packetdata.src_id = silc_id_id2str(server->id, SILC_ID_SERVER);
434 packetdata.src_id_len = SILC_ID_SERVER_LEN;
435 packetdata.src_id_type = SILC_ID_SERVER;
436 packetdata.dst_id = silc_id_id2str(channel->id, SILC_ID_CHANNEL);
437 packetdata.dst_id_len = SILC_ID_CHANNEL_LEN;
438 packetdata.dst_id_type = SILC_ID_CHANNEL;
439 packetdata.truelen = data_len + SILC_PACKET_HEADER_LEN +
440 packetdata.src_id_len + packetdata.dst_id_len;
441 packetdata.padlen = SILC_PACKET_PADLEN(packetdata.truelen);
443 /* If there are global users in the channel we will send the message
444 first to our router for further routing. */
445 if (route && server->server_type == SILC_SERVER && !server->standalone &&
446 channel->global_users) {
447 SilcServerEntry router;
449 /* Get data used in packet header encryption, keys and stuff. */
450 router = server->router;
451 sock = (SilcSocketConnection)router->connection;
452 idata = (SilcIDListData)router;
454 if (sock != sender) {
455 SILC_LOG_DEBUG(("Sending channel message to router for routing"));
457 silc_server_packet_send_to_channel_real(server, sock, &packetdata,
460 data, data_len, FALSE,
465 /* Send the message to clients on the channel's client list. */
466 silc_list_start(channel->user_list);
467 while ((chl = silc_list_get(channel->user_list)) != SILC_LIST_END) {
468 client = chl->client;
470 /* If client has router set it is not locally connected client and
471 we will route the message to the router set in the client. Though,
472 send locally connected server in all cases. */
473 if (server->server_type == SILC_ROUTER && client && client->router &&
474 ((!route && client->router->router == server->id_entry) || route)) {
477 /* Check if we have sent the packet to this route already */
478 for (k = 0; k < routed_count; k++)
479 if (routed[k] == client->router)
481 if (k < routed_count)
484 /* Get data used in packet header encryption, keys and stuff. */
485 sock = (SilcSocketConnection)client->router->connection;
486 idata = (SilcIDListData)client->router;
488 if (sender && sock == sender)
491 /* Send the packet */
492 silc_server_packet_send_to_channel_real(server, sock, &packetdata,
495 data, data_len, FALSE,
498 /* We want to make sure that the packet is routed to same router
499 only once. Mark this route as sent route. */
501 routed = silc_realloc(routed, sizeof(*routed) * (k + 1));
502 routed[k] = client->router;
508 if (client && client->router)
511 /* Send to locally connected client */
514 /* Get data used in packet header encryption, keys and stuff. */
515 sock = (SilcSocketConnection)client->connection;
516 idata = (SilcIDListData)client;
518 if (sender && sock == sender)
521 /* Send the packet */
522 silc_server_packet_send_to_channel_real(server, sock, &packetdata,
525 data, data_len, FALSE,
532 silc_free(packetdata.src_id);
533 silc_free(packetdata.dst_id);
536 /* This routine is explicitly used to relay messages to some channel.
537 Packets sent with this function we have received earlier and are
538 totally encrypted. This just sends the packet to all clients on
539 the channel. If the sender of the packet is someone on the channel
540 the message will not be sent to that client. The SILC Packet header
541 is encrypted with the session key shared between us and the client.
542 MAC is also computed before encrypting the header. Rest of the
543 packet will be untouched. */
545 void silc_server_packet_relay_to_channel(SilcServer server,
546 SilcSocketConnection sender_sock,
547 SilcChannelEntry channel,
549 SilcIdType sender_type,
555 SilcSocketConnection sock = NULL;
556 SilcPacketContext packetdata;
557 SilcClientEntry client = NULL;
558 SilcServerEntry *routed = NULL;
559 SilcChannelClientEntry chl;
560 uint32 routed_count = 0;
561 SilcIDListData idata;
563 SILC_LOG_DEBUG(("Relaying packet to channel"));
565 /* Set the packet context pointers. */
566 packetdata.flags = 0;
567 packetdata.type = SILC_PACKET_CHANNEL_MESSAGE;
568 packetdata.src_id = silc_id_id2str(sender, sender_type);
569 packetdata.src_id_len = silc_id_get_len(sender_type);
570 packetdata.src_id_type = sender_type;
571 packetdata.dst_id = silc_id_id2str(channel->id, SILC_ID_CHANNEL);
572 packetdata.dst_id_len = SILC_ID_CHANNEL_LEN;
573 packetdata.dst_id_type = SILC_ID_CHANNEL;
574 packetdata.padlen = SILC_PACKET_PADLEN((SILC_PACKET_HEADER_LEN +
575 packetdata.src_id_len +
576 packetdata.dst_id_len));
578 /* If there are global users in the channel we will send the message
579 first to our router for further routing. */
580 if (server->server_type == SILC_SERVER && !server->standalone &&
581 channel->global_users) {
582 SilcServerEntry router;
584 router = server->router;
586 /* Check that the sender is not our router. */
587 if (sender_sock != (SilcSocketConnection)router->connection) {
589 /* Get data used in packet header encryption, keys and stuff. */
590 sock = (SilcSocketConnection)router->connection;
591 idata = (SilcIDListData)router;
593 SILC_LOG_DEBUG(("Sending channel message to router for routing"));
595 silc_server_packet_send_to_channel_real(server, sock, &packetdata,
598 data, data_len, TRUE,
603 /* Send the message to clients on the channel's client list. */
604 silc_list_start(channel->user_list);
605 while ((chl = silc_list_get(channel->user_list)) != SILC_LIST_END) {
606 client = chl->client;
610 /* If sender is one on the channel do not send it the packet. */
611 if (!found && !SILC_ID_CLIENT_COMPARE(client->id, sender)) {
616 /* If the client has set router it means that it is not locally
617 connected client and we will route the packet further. */
618 if (server->server_type == SILC_ROUTER && client->router) {
621 /* Sender maybe server as well so we want to make sure that
622 we won't send the message to the server it came from. */
623 if (!found && !SILC_ID_SERVER_COMPARE(client->router->id, sender)) {
628 /* Check if we have sent the packet to this route already */
629 for (k = 0; k < routed_count; k++)
630 if (routed[k] == client->router)
632 if (k < routed_count)
635 /* Get data used in packet header encryption, keys and stuff. */
636 sock = (SilcSocketConnection)client->router->connection;
637 idata = (SilcIDListData)client->router;
639 if (sender_sock && sock == sender_sock)
642 SILC_LOG_DEBUG(("Relaying packet to client ID(%s) %s (%s)",
643 silc_id_render(client->id, SILC_ID_CLIENT),
644 sock->hostname, sock->ip));
646 /* We want to make sure that the packet is routed to same router
647 only once. Mark this route as sent route. */
649 routed = silc_realloc(routed, sizeof(*routed) * (k + 1));
650 routed[k] = client->router;
653 /* If the remote connection is router then we'll decrypt the
654 channel message and re-encrypt it with the session key shared
655 between us and the remote router. This is done because the
656 channel keys are cell specific and we have different channel
657 key than the remote router has. */
658 if (sock->type == SILC_SOCKET_TYPE_ROUTER) {
660 /* If private key mode is not set then decrypt the packet
662 if (!(channel->mode & SILC_CHANNEL_MODE_PRIVKEY)) {
663 unsigned char *tmp = silc_calloc(data_len, sizeof(*data));
664 memcpy(tmp, data, data_len);
666 /* Decrypt the channel message (we don't check the MAC) */
667 if (!silc_channel_message_payload_decrypt(tmp, data_len,
668 channel->channel_key,
670 memset(tmp, 0, data_len);
675 /* Now re-encrypt and send it to the router */
676 silc_server_packet_send_srcdest(server, sock,
677 SILC_PACKET_CHANNEL_MESSAGE, 0,
679 channel->id, SILC_ID_CHANNEL,
680 tmp, data_len, force_send);
682 /* Free the copy of the channel message */
683 memset(tmp, 0, data_len);
686 /* Private key mode is set, we don't have the channel key, so
687 just re-encrypt the entire packet and send it to the router. */
688 silc_server_packet_send_srcdest(server, sock,
689 SILC_PACKET_CHANNEL_MESSAGE, 0,
691 channel->id, SILC_ID_CHANNEL,
692 data, data_len, force_send);
697 /* Send the packet (to normal server) */
698 silc_server_packet_send_to_channel_real(server, sock, &packetdata,
701 data, data_len, TRUE,
707 if (client && client->router)
710 /* Get data used in packet header encryption, keys and stuff. */
711 sock = (SilcSocketConnection)client->connection;
712 idata = (SilcIDListData)client;
714 if (sender_sock && sock == sender_sock)
717 SILC_LOG_DEBUG(("Sending packet to client ID(%s) %s (%s)",
718 silc_id_render(client->id, SILC_ID_CLIENT),
719 sock->hostname, sock->ip));
721 /* Send the packet */
722 silc_server_packet_send_to_channel_real(server, sock, &packetdata,
725 data, data_len, TRUE,
730 silc_free(packetdata.src_id);
731 silc_free(packetdata.dst_id);
734 /* This function is used to send packets strictly to all local clients
735 on a particular channel. This is used for example to distribute new
736 channel key to all our locally connected clients on the channel.
737 The packets are always encrypted with the session key shared between
738 the client, this means these are not _to the channel_ but _to the client_
741 void silc_server_packet_send_local_channel(SilcServer server,
742 SilcChannelEntry channel,
744 SilcPacketFlags flags,
749 SilcChannelClientEntry chl;
750 SilcSocketConnection sock = NULL;
752 SILC_LOG_DEBUG(("Start"));
754 /* Send the message to clients on the channel's client list. */
755 silc_list_start(channel->user_list);
756 while ((chl = silc_list_get(channel->user_list)) != SILC_LIST_END) {
757 if (chl->client && !chl->client->router) {
758 sock = (SilcSocketConnection)chl->client->connection;
760 /* Send the packet to the client */
761 silc_server_packet_send_dest(server, sock, type, flags, chl->client->id,
762 SILC_ID_CLIENT, data, data_len,
768 /* Routine used to send (relay, route) private messages to some destination.
769 If the private message key does not exist then the message is re-encrypted,
770 otherwise we just pass it along. This really is not used to send new
771 private messages (as server does not send them) but to relay received
774 void silc_server_send_private_message(SilcServer server,
775 SilcSocketConnection dst_sock,
778 SilcPacketContext *packet)
780 SilcBuffer buffer = packet->buffer;
782 /* Re-encrypt and send if private messge key does not exist */
783 if ((packet->flags & SILC_PACKET_FLAG_PRIVMSG_KEY) == FALSE) {
785 silc_buffer_push(buffer, SILC_PACKET_HEADER_LEN + packet->src_id_len
786 + packet->dst_id_len + packet->padlen);
787 silc_packet_send_prepare(dst_sock, 0, 0, buffer->len);
788 silc_buffer_put(dst_sock->outbuf, buffer->data, buffer->len);
790 /* Re-encrypt packet */
791 silc_packet_encrypt(cipher, hmac, dst_sock->outbuf, buffer->len);
793 /* Send the packet */
794 silc_server_packet_send_real(server, dst_sock, FALSE);
797 /* Key exist so encrypt just header and send it */
798 silc_buffer_push(buffer, SILC_PACKET_HEADER_LEN + packet->src_id_len
799 + packet->dst_id_len + packet->padlen);
800 silc_packet_send_prepare(dst_sock, 0, 0, buffer->len);
801 silc_buffer_put(dst_sock->outbuf, buffer->data, buffer->len);
804 silc_packet_encrypt(cipher, hmac, dst_sock->outbuf,
805 SILC_PACKET_HEADER_LEN + packet->src_id_len +
806 packet->dst_id_len + packet->padlen);
808 silc_server_packet_send_real(server, dst_sock, FALSE);
812 /* Sends current motd to client */
814 void silc_server_send_motd(SilcServer server,
815 SilcSocketConnection sock)
820 if (server->config && server->config->motd &&
821 server->config->motd->motd_file) {
823 motd = silc_file_read(server->config->motd->motd_file, &motd_len);
827 silc_server_send_notify(server, sock, FALSE, SILC_NOTIFY_TYPE_MOTD, 1,
833 /* Sends error message. Error messages may or may not have any
836 void silc_server_send_error(SilcServer server,
837 SilcSocketConnection sock,
838 const char *fmt, ...)
841 unsigned char buf[4096];
843 memset(buf, 0, sizeof(buf));
845 vsprintf(buf, fmt, ap);
848 silc_server_packet_send(server, sock, SILC_PACKET_ERROR, 0,
849 buf, strlen(buf), FALSE);
852 /* Sends notify message. If format is TRUE the variable arguments are
853 formatted and the formatted string is sent as argument payload. If it is
854 FALSE then each argument is sent as separate argument and their format
855 in the argument list must be { argument data, argument length }. */
857 void silc_server_send_notify(SilcServer server,
858 SilcSocketConnection sock,
868 packet = silc_notify_payload_encode(type, argc, ap);
869 silc_server_packet_send(server, sock, SILC_PACKET_NOTIFY, 0,
870 packet->data, packet->len, FALSE);
871 silc_buffer_free(packet);
874 /* Sends notify message and gets the arguments from the `args' Argument
877 void silc_server_send_notify_args(SilcServer server,
878 SilcSocketConnection sock,
886 packet = silc_notify_payload_encode_args(type, argc, args);
887 silc_server_packet_send(server, sock, SILC_PACKET_NOTIFY, 0,
888 packet->data, packet->len, FALSE);
889 silc_buffer_free(packet);
892 /* Send CHANNEL_CHANGE notify type. This tells the receiver to replace the
893 `old_id' with the `new_id'. */
895 void silc_server_send_notify_channel_change(SilcServer server,
896 SilcSocketConnection sock,
898 SilcChannelID *old_id,
899 SilcChannelID *new_id,
902 SilcBuffer idp1, idp2;
904 idp1 = silc_id_payload_encode((void *)old_id, SILC_ID_CHANNEL);
905 idp2 = silc_id_payload_encode((void *)new_id, SILC_ID_CHANNEL);
907 silc_server_send_notify(server, sock, broadcast,
908 SILC_NOTIFY_TYPE_CHANNEL_CHANGE,
909 2, idp1->data, idp1->len, idp2->data, idp2->len);
910 silc_buffer_free(idp1);
911 silc_buffer_free(idp2);
914 /* Send NICK_CHANGE notify type. This tells the receiver to replace the
915 `old_id' with the `new_id'. */
917 void silc_server_send_notify_nick_change(SilcServer server,
918 SilcSocketConnection sock,
920 SilcClientID *old_id,
921 SilcClientID *new_id,
924 SilcBuffer idp1, idp2;
926 idp1 = silc_id_payload_encode((void *)old_id, SILC_ID_CLIENT);
927 idp2 = silc_id_payload_encode((void *)new_id, SILC_ID_CLIENT);
929 silc_server_send_notify(server, sock, broadcast,
930 SILC_NOTIFY_TYPE_NICK_CHANGE,
931 2, idp1->data, idp1->len, idp2->data, idp2->len);
932 silc_buffer_free(idp1);
933 silc_buffer_free(idp2);
936 /* Sends JOIN notify type. This tells that new client by `client_id' ID
937 has joined to the `channel'. */
939 void silc_server_send_notify_join(SilcServer server,
940 SilcSocketConnection sock,
942 SilcChannelEntry channel,
943 SilcClientID *client_id,
944 uint32 client_id_len)
946 SilcBuffer idp1, idp2;
948 idp1 = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
949 idp2 = silc_id_payload_encode((void *)channel->id, SILC_ID_CHANNEL);
950 silc_server_send_notify(server, sock, broadcast, SILC_NOTIFY_TYPE_JOIN,
951 2, idp1->data, idp1->len,
952 idp2->data, idp2->len);
953 silc_buffer_free(idp1);
954 silc_buffer_free(idp2);
957 /* Sends LEAVE notify type. This tells that `client_id' has left the
958 `channel'. The Notify packet is always destined to the channel. */
960 void silc_server_send_notify_leave(SilcServer server,
961 SilcSocketConnection sock,
963 SilcChannelEntry channel,
964 SilcClientID *client_id,
965 uint32 client_id_len)
969 idp = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
970 silc_server_send_notify_dest(server, sock, broadcast, (void *)channel->id,
971 SILC_ID_CHANNEL, SILC_NOTIFY_TYPE_LEAVE,
972 1, idp->data, idp->len);
973 silc_buffer_free(idp);
976 /* Sends CMODE_CHANGE notify type. This tells that `client_id' changed the
977 `channel' mode to `mode. The Notify packet is always destined to
980 void silc_server_send_notify_cmode(SilcServer server,
981 SilcSocketConnection sock,
983 SilcChannelEntry channel,
985 void *id, SilcIdType id_type,
987 char *cipher, char *hmac)
990 unsigned char mode[4];
992 idp = silc_id_payload_encode((void *)id, id_type);
993 SILC_PUT32_MSB(mode_mask, mode);
995 silc_server_send_notify_dest(server, sock, broadcast, (void *)channel->id,
996 SILC_ID_CHANNEL, SILC_NOTIFY_TYPE_CMODE_CHANGE,
997 4, idp->data, idp->len,
999 cipher, cipher ? strlen(cipher) : 0,
1000 hmac, hmac ? strlen(hmac) : 0);
1001 silc_buffer_free(idp);
1004 /* Sends CUMODE_CHANGE notify type. This tells that `client_id' changed the
1005 `target' client's mode on `channel'. The Notify packet is always
1006 destined to the channel. */
1008 void silc_server_send_notify_cumode(SilcServer server,
1009 SilcSocketConnection sock,
1011 SilcChannelEntry channel,
1013 SilcClientID *client_id,
1014 uint32 client_id_len,
1015 SilcClientID *target,
1018 SilcBuffer idp1, idp2;
1019 unsigned char mode[4];
1021 idp1 = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
1022 idp2 = silc_id_payload_encode((void *)target, SILC_ID_CLIENT);
1023 SILC_PUT32_MSB(mode_mask, mode);
1025 silc_server_send_notify_dest(server, sock, broadcast, (void *)channel->id,
1027 SILC_NOTIFY_TYPE_CUMODE_CHANGE, 3,
1028 idp1->data, idp1->len,
1030 idp2->data, idp2->len);
1031 silc_buffer_free(idp1);
1032 silc_buffer_free(idp2);
1035 /* Sends SIGNOFF notify type. This tells that `client_id' client has
1036 left SILC network. This function is used only between server and router
1037 traffic. This is not used to send the notify to the channel for
1038 client. The `message may be NULL. */
1040 void silc_server_send_notify_signoff(SilcServer server,
1041 SilcSocketConnection sock,
1043 SilcClientID *client_id,
1044 uint32 client_id_len,
1049 idp = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
1050 silc_server_send_notify(server, sock, broadcast,
1051 SILC_NOTIFY_TYPE_SIGNOFF,
1052 message ? 2 : 1, idp->data, idp->len,
1053 message, message ? strlen(message): 0);
1054 silc_buffer_free(idp);
1057 /* Sends TOPIC_SET notify type. This tells that `client_id' changed
1058 the `channel's topic to `topic'. The Notify packet is always destined
1059 to the channel. This function is used to send the topic set notifies
1062 void silc_server_send_notify_topic_set(SilcServer server,
1063 SilcSocketConnection sock,
1065 SilcChannelEntry channel,
1066 SilcClientID *client_id,
1067 uint32 client_id_len,
1072 idp = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
1073 silc_server_send_notify(server, sock, broadcast,
1074 SILC_NOTIFY_TYPE_SERVER_SIGNOFF,
1076 idp->data, idp->len,
1077 topic, topic ? strlen(topic) : 0);
1078 silc_buffer_free(idp);
1081 /* Send KICKED notify type. This tells that the `client_id' on `channel'
1082 was kicked off the channel. The `comment' may indicate the reason
1083 for the kicking. This function is used only between server and router
1086 void silc_server_send_notify_kicked(SilcServer server,
1087 SilcSocketConnection sock,
1089 SilcChannelEntry channel,
1090 SilcClientID *client_id,
1091 uint32 client_id_len,
1096 idp = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
1097 silc_server_send_notify_dest(server, sock, broadcast, (void *)channel->id,
1098 SILC_ID_CHANNEL, SILC_NOTIFY_TYPE_KICKED,
1099 comment ? 2 : 1, idp->data, idp->len,
1100 comment, comment ? strlen(comment) : 0);
1101 silc_buffer_free(idp);
1104 /* Send KILLED notify type. This tells that the `client_id' client was
1105 killed from the network. The `comment' may indicate the reason
1108 void silc_server_send_notify_killed(SilcServer server,
1109 SilcSocketConnection sock,
1111 SilcClientID *client_id,
1112 uint32 client_id_len,
1117 idp = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
1118 silc_server_send_notify_dest(server, sock, broadcast, (void *)client_id,
1119 SILC_ID_CLIENT, SILC_NOTIFY_TYPE_KILLED,
1120 comment ? 2 : 1, idp->data, idp->len,
1121 comment, comment ? strlen(comment) : 0);
1122 silc_buffer_free(idp);
1125 /* Sends UMODE_CHANGE notify type. This tells that `client_id' client's
1126 user mode in the SILC Network was changed. This function is used to
1127 send the packet between routers as broadcast packet. */
1129 void silc_server_send_notify_umode(SilcServer server,
1130 SilcSocketConnection sock,
1132 SilcClientID *client_id,
1133 uint32 client_id_len,
1137 unsigned char mode[4];
1139 idp = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
1140 SILC_PUT32_MSB(mode_mask, mode);
1142 silc_server_send_notify(server, sock, broadcast,
1143 SILC_NOTIFY_TYPE_UMODE_CHANGE, 2,
1144 idp->data, idp->len,
1146 silc_buffer_free(idp);
1149 /* Sends BAN notify type. This tells that ban has been either `add'ed
1150 or `del'eted on the `channel. This function is used to send the packet
1151 between routers as broadcast packet. */
1153 void silc_server_send_notify_ban(SilcServer server,
1154 SilcSocketConnection sock,
1156 SilcChannelEntry channel,
1157 char *add, char *del)
1161 idp = silc_id_payload_encode((void *)channel->id, SILC_ID_CHANNEL);
1162 silc_server_send_notify(server, sock, broadcast,
1163 SILC_NOTIFY_TYPE_BAN, 3,
1164 idp->data, idp->len,
1165 add, add ? strlen(add) : 0,
1166 del, del ? strlen(del) : 0);
1167 silc_buffer_free(idp);
1170 /* Sends INVITE notify type. This tells that invite has been either `add'ed
1171 or `del'eted on the `channel. The sender of the invite is the `client_id'.
1172 This function is used to send the packet between routers as broadcast
1175 void silc_server_send_notify_invite(SilcServer server,
1176 SilcSocketConnection sock,
1178 SilcChannelEntry channel,
1179 SilcClientID *client_id,
1180 uint32 client_id_len,
1181 char *add, char *del)
1183 SilcBuffer idp, idp2;
1185 idp = silc_id_payload_encode((void *)channel->id, SILC_ID_CHANNEL);
1186 idp2 = silc_id_payload_encode((void *)client_id, SILC_ID_CLIENT);
1187 silc_server_send_notify(server, sock, broadcast,
1188 SILC_NOTIFY_TYPE_INVITE, 5,
1189 idp->data, idp->len,
1190 channel->channel_name, strlen(channel->channel_name),
1191 idp2->data, idp2->len,
1192 add, add ? strlen(add) : 0,
1193 del, del ? strlen(del) : 0);
1194 silc_buffer_free(idp);
1195 silc_buffer_free(idp2);
1198 /* Sends notify message destined to specific entity. */
1200 void silc_server_send_notify_dest(SilcServer server,
1201 SilcSocketConnection sock,
1204 SilcIdType dest_id_type,
1205 SilcNotifyType type,
1213 packet = silc_notify_payload_encode(type, argc, ap);
1214 silc_server_packet_send_dest(server, sock, SILC_PACKET_NOTIFY, 0,
1215 dest_id, dest_id_type,
1216 packet->data, packet->len, FALSE);
1217 silc_buffer_free(packet);
1220 /* Sends notify message to a channel. The notify message sent is
1221 distributed to all clients on the channel. If `route_notify' is TRUE
1222 then the notify may be routed to primary route or to some other routers.
1223 If FALSE it is assured that the notify is sent only locally. If `sender'
1224 is provided then the packet is not sent to that connection since it
1225 originally came from it. */
1227 void silc_server_send_notify_to_channel(SilcServer server,
1228 SilcSocketConnection sender,
1229 SilcChannelEntry channel,
1230 unsigned char route_notify,
1231 SilcNotifyType type,
1239 packet = silc_notify_payload_encode(type, argc, ap);
1240 silc_server_packet_send_to_channel(server, sender, channel,
1241 SILC_PACKET_NOTIFY, route_notify,
1242 packet->data, packet->len, FALSE);
1243 silc_buffer_free(packet);
1246 /* Send notify message to all channels the client has joined. It is quaranteed
1247 that the message is sent only once to a client (ie. if a client is joined
1248 on two same channel it will receive only one notify message). Also, this
1249 sends only to local clients (locally connected if we are server, and to
1250 local servers if we are router). If `sender' is provided the packet is
1251 not sent to that client at all. */
1253 void silc_server_send_notify_on_channels(SilcServer server,
1254 SilcClientEntry sender,
1255 SilcClientEntry client,
1256 SilcNotifyType type,
1260 SilcSocketConnection sock = NULL;
1261 SilcPacketContext packetdata;
1263 SilcClientEntry *sent_clients = NULL;
1264 uint32 sent_clients_count = 0;
1265 SilcServerEntry *routed = NULL;
1266 uint32 routed_count = 0;
1267 SilcChannelEntry channel;
1268 SilcChannelClientEntry chl, chl2;
1269 SilcIDListData idata;
1271 unsigned char *data;
1273 int force_send = FALSE;
1276 SILC_LOG_DEBUG(("Start"));
1278 if (!silc_list_count(client->channels))
1282 packet = silc_notify_payload_encode(type, argc, ap);
1283 data = packet->data;
1284 data_len = packet->len;
1286 /* Set the packet context pointers. */
1287 packetdata.flags = 0;
1288 packetdata.type = SILC_PACKET_NOTIFY;
1289 packetdata.src_id = silc_id_id2str(server->id, SILC_ID_SERVER);
1290 packetdata.src_id_len = SILC_ID_SERVER_LEN;
1291 packetdata.src_id_type = SILC_ID_SERVER;
1293 silc_list_start(client->channels);
1294 while ((chl = silc_list_get(client->channels)) != SILC_LIST_END) {
1295 channel = chl->channel;
1297 /* Send the message to all clients on the channel's client list. */
1298 silc_list_start(channel->user_list);
1299 while ((chl2 = silc_list_get(channel->user_list)) != SILC_LIST_END) {
1302 if (sender && c == sender)
1305 /* Check if we have sent the packet to this client already */
1306 for (k = 0; k < sent_clients_count; k++)
1307 if (sent_clients[k] == c)
1309 if (k < sent_clients_count)
1312 /* If we are router and if this client has router set it is not
1313 locally connected client and we will route the message to the
1314 router set in the client. */
1315 if (c && c->router && server->server_type == SILC_ROUTER) {
1316 /* Check if we have sent the packet to this route already */
1317 for (k = 0; k < routed_count; k++)
1318 if (routed[k] == c->router)
1320 if (k < routed_count)
1323 /* Get data used in packet header encryption, keys and stuff. */
1324 sock = (SilcSocketConnection)c->router->connection;
1325 idata = (SilcIDListData)c->router;
1327 packetdata.dst_id = silc_id_id2str(c->router->id, SILC_ID_SERVER);
1328 packetdata.dst_id_len = SILC_ID_SERVER_LEN;
1329 packetdata.dst_id_type = SILC_ID_SERVER;
1330 packetdata.truelen = data_len + SILC_PACKET_HEADER_LEN +
1331 packetdata.src_id_len + packetdata.dst_id_len;
1332 packetdata.padlen = SILC_PACKET_PADLEN(packetdata.truelen);
1334 /* Send the packet */
1335 silc_server_packet_send_to_channel_real(server, sock, &packetdata,
1338 data, data_len, FALSE,
1341 silc_free(packetdata.dst_id);
1343 /* We want to make sure that the packet is routed to same router
1344 only once. Mark this route as sent route. */
1346 routed = silc_realloc(routed, sizeof(*routed) * (k + 1));
1347 routed[k] = c->router;
1356 /* Send to locally connected client */
1359 /* Get data used in packet header encryption, keys and stuff. */
1360 sock = (SilcSocketConnection)c->connection;
1361 idata = (SilcIDListData)c;
1363 packetdata.dst_id = silc_id_id2str(c->id, SILC_ID_CLIENT);
1364 packetdata.dst_id_len = SILC_ID_CLIENT_LEN;
1365 packetdata.dst_id_type = SILC_ID_CLIENT;
1366 packetdata.truelen = data_len + SILC_PACKET_HEADER_LEN +
1367 packetdata.src_id_len + packetdata.dst_id_len;
1368 packetdata.padlen = SILC_PACKET_PADLEN(packetdata.truelen);
1370 /* Send the packet */
1371 silc_server_packet_send_to_channel_real(server, sock, &packetdata,
1374 data, data_len, FALSE,
1377 silc_free(packetdata.dst_id);
1379 /* Make sure that we send the notify only once per client. */
1380 sent_clients = silc_realloc(sent_clients, sizeof(*sent_clients) *
1381 (sent_clients_count + 1));
1382 sent_clients[sent_clients_count] = c;
1383 sent_clients_count++;
1390 if (sent_clients_count)
1391 silc_free(sent_clients);
1392 silc_free(packetdata.src_id);
1395 /* Sends New ID Payload to remote end. The packet is used to distribute
1396 information about new registered clients, servers, channel etc. usually
1397 to routers so that they can keep these information up to date.
1398 If the argument `broadcast' is TRUE then the packet is sent as
1399 broadcast packet. */
1401 void silc_server_send_new_id(SilcServer server,
1402 SilcSocketConnection sock,
1404 void *id, SilcIdType id_type,
1409 SILC_LOG_DEBUG(("Start"));
1411 idp = silc_id_payload_encode(id, id_type);
1412 silc_server_packet_send(server, sock, SILC_PACKET_NEW_ID,
1413 broadcast ? SILC_PACKET_FLAG_BROADCAST : 0,
1414 idp->data, idp->len, FALSE);
1415 silc_buffer_free(idp);
1418 /* Send New Channel Payload to notify about newly created channel in the
1419 SILC network. Normal server nevers sends this packet. Router uses this
1420 to notify other routers in the network about new channel. This packet
1423 void silc_server_send_new_channel(SilcServer server,
1424 SilcSocketConnection sock,
1428 uint32 channel_id_len,
1433 uint32 name_len = strlen(channel_name);
1435 SILC_LOG_DEBUG(("Start"));
1437 cid = silc_id_id2str(channel_id, SILC_ID_CHANNEL);
1441 /* Encode the channel payload */
1442 packet = silc_channel_payload_encode(channel_name, name_len,
1443 cid, channel_id_len, mode);
1445 silc_server_packet_send(server, sock, SILC_PACKET_NEW_CHANNEL,
1446 broadcast ? SILC_PACKET_FLAG_BROADCAST : 0,
1447 packet->data, packet->len, FALSE);
1450 silc_buffer_free(packet);
1453 /* Send Channel Key payload to distribute the new channel key. Normal server
1454 sends this to router when new client joins to existing channel. Router
1455 sends this to the local server who sent the join command in case where
1456 the channel did not exist yet. Both normal and router servers uses this
1457 also to send this to locally connected clients on the channel. This
1458 must not be broadcasted packet. Routers do not send this to each other.
1459 If `sender is provided then the packet is not sent to that connection since
1460 it originally came from it. */
1462 void silc_server_send_channel_key(SilcServer server,
1463 SilcSocketConnection sender,
1464 SilcChannelEntry channel,
1465 unsigned char route)
1468 unsigned char *chid;
1471 SILC_LOG_DEBUG(("Start"));
1473 chid = silc_id_id2str(channel->id, SILC_ID_CHANNEL);
1477 /* Encode channel key packet */
1478 tmp_len = strlen(channel->channel_key->cipher->name);
1479 packet = silc_channel_key_payload_encode(SILC_ID_CHANNEL_LEN, chid, tmp_len,
1480 channel->channel_key->cipher->name,
1481 channel->key_len / 8, channel->key);
1483 silc_server_packet_send_to_channel(server, sender, channel,
1484 SILC_PACKET_CHANNEL_KEY,
1485 route, packet->data, packet->len, FALSE);
1486 silc_buffer_free(packet);
1490 /* Generic function to send any command. The arguments must be sent already
1491 encoded into correct form in correct order. */
1493 void silc_server_send_command(SilcServer server,
1494 SilcSocketConnection sock,
1495 SilcCommand command,
1503 packet = silc_command_payload_encode_vap(command, 0, argc, ap);
1504 silc_server_packet_send(server, sock, SILC_PACKET_COMMAND, 0,
1505 packet->data, packet->len, TRUE);
1506 silc_buffer_free(packet);
1509 /* Send the heartbeat packet. */
1511 void silc_server_send_heartbeat(SilcServer server,
1512 SilcSocketConnection sock)
1514 silc_server_packet_send(server, sock, SILC_PACKET_HEARTBEAT, 0,
1518 /* Generic function to relay packet we've received. This is used to relay
1519 packets to a client but generally can be used to other purposes as well. */
1521 void silc_server_relay_packet(SilcServer server,
1522 SilcSocketConnection dst_sock,
1525 SilcPacketContext *packet,
1528 silc_buffer_push(packet->buffer, SILC_PACKET_HEADER_LEN + packet->src_id_len
1529 + packet->dst_id_len + packet->padlen);
1531 silc_packet_send_prepare(dst_sock, 0, 0, packet->buffer->len);
1532 silc_buffer_put(dst_sock->outbuf, packet->buffer->data, packet->buffer->len);
1534 /* Re-encrypt packet */
1535 silc_packet_encrypt(cipher, hmac, dst_sock->outbuf, packet->buffer->len);
1537 /* Send the packet */
1538 silc_server_packet_send_real(server, dst_sock, force_send);
1540 silc_buffer_pull(packet->buffer, SILC_PACKET_HEADER_LEN + packet->src_id_len
1541 + packet->dst_id_len + packet->padlen);
1544 /* Routine used to send the connection authentication packet. */
1546 void silc_server_send_connection_auth_request(SilcServer server,
1547 SilcSocketConnection sock,
1549 SilcAuthMethod auth_meth)
1553 packet = silc_buffer_alloc(4);
1554 silc_buffer_pull_tail(packet, SILC_BUFFER_END(packet));
1555 silc_buffer_format(packet,
1556 SILC_STR_UI_SHORT(conn_type),
1557 SILC_STR_UI_SHORT(auth_meth),
1560 silc_server_packet_send(server, sock, SILC_PACKET_CONNECTION_AUTH_REQUEST,
1561 0, packet->data, packet->len, FALSE);
1562 silc_buffer_free(packet);