5 Author: Pekka Riikonen <priikone@poseidon.pspt.fi>
7 Copyright (C) 2000 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.
20 /* Implementation of generic payloads described in the protocol
21 specification drafts. */
24 #include "silcincludes.h"
25 #include "silcpayload.h"
27 /******************************************************************************
31 ******************************************************************************/
33 struct SilcIDPayloadStruct {
39 /* Parses buffer and return ID payload into payload structure */
41 SilcIDPayload silc_id_payload_parse(SilcBuffer buffer)
46 SILC_LOG_DEBUG(("Parsing ID payload"));
48 new = silc_calloc(1, sizeof(*new));
50 ret = silc_buffer_unformat(buffer,
51 SILC_STR_UI_SHORT(&new->type),
52 SILC_STR_UI_SHORT(&new->len),
57 silc_buffer_pull(buffer, 4);
59 if (new->len > buffer->len)
62 ret = silc_buffer_unformat(buffer,
63 SILC_STR_UI_XNSTRING_ALLOC(&new->id, new->len),
68 silc_buffer_push(buffer, 4);
77 /* Parses data and return ID payload into payload structure. */
79 SilcIDPayload silc_id_payload_parse_data(unsigned char *data,
83 SilcBufferStruct buffer;
86 SILC_LOG_DEBUG(("Parsing ID payload"));
88 silc_buffer_set(&buffer, data, len);
90 new = silc_calloc(1, sizeof(*new));
92 ret = silc_buffer_unformat(&buffer,
93 SILC_STR_UI_SHORT(&new->type),
94 SILC_STR_UI_SHORT(&new->len),
99 silc_buffer_pull(&buffer, 4);
101 if (new->len > buffer.len)
104 ret = silc_buffer_unformat(&buffer,
105 SILC_STR_UI_XNSTRING_ALLOC(&new->id, new->len),
117 /* Return the ID directly from the raw payload data. */
119 void *silc_id_payload_parse_id(unsigned char *data, uint32 len)
121 SilcBufferStruct buffer;
124 unsigned char *id_data = NULL;
128 silc_buffer_set(&buffer, data, len);
130 ret = silc_buffer_unformat(&buffer,
131 SILC_STR_UI_SHORT(&type),
132 SILC_STR_UI_SHORT(&idlen),
137 silc_buffer_pull(&buffer, 4);
139 if (idlen > buffer.len)
142 ret = silc_buffer_unformat(&buffer,
143 SILC_STR_UI_XNSTRING_ALLOC(&id_data, idlen),
148 id = silc_id_str2id(id_data, idlen, type);
156 /* Encodes ID Payload */
158 SilcBuffer silc_id_payload_encode(void *id, SilcIdType type)
161 unsigned char *id_data;
164 SILC_LOG_DEBUG(("Encoding %s ID payload",
165 type == SILC_ID_CLIENT ? "Client" :
166 type == SILC_ID_SERVER ? "Server" : "Channel"));
168 id_data = silc_id_id2str(id, type);
169 len = silc_id_get_len(id, type);
171 buffer = silc_buffer_alloc(4 + len);
172 silc_buffer_pull_tail(buffer, SILC_BUFFER_END(buffer));
173 silc_buffer_format(buffer,
174 SILC_STR_UI_SHORT(type),
175 SILC_STR_UI_SHORT(len),
176 SILC_STR_UI_XNSTRING(id_data, len),
183 /* Free ID Payload */
185 void silc_id_payload_free(SilcIDPayload payload)
188 silc_free(payload->id);
195 SilcIdType silc_id_payload_get_type(SilcIDPayload payload)
197 return payload ? payload->type : 0;
202 void *silc_id_payload_get_id(SilcIDPayload payload)
204 return payload ? silc_id_str2id(payload->id, payload->len,
205 payload->type) : NULL;
208 /* Get raw ID data. Data is duplicated. */
210 unsigned char *silc_id_payload_get_data(SilcIDPayload payload)
217 ret = silc_calloc(payload->len, sizeof(*ret));
218 memcpy(ret, payload->id, payload->len);
222 /* Get length of ID */
224 uint32 silc_id_payload_get_len(SilcIDPayload payload)
226 return payload ? payload->len : 0;
229 /******************************************************************************
233 ******************************************************************************/
235 struct SilcArgumentPayloadStruct {
237 unsigned char **argv;
243 /* Parses arguments and returns them into Argument Payload structure. */
245 SilcArgumentPayload silc_argument_payload_parse(SilcBuffer buffer,
248 SilcArgumentPayload new;
249 uint16 payload_len = 0;
250 unsigned char arg_num = 0;
251 unsigned char arg_type = 0;
255 SILC_LOG_DEBUG(("Parsing argument payload"));
257 new = silc_calloc(1, sizeof(*new));
258 new->argv = silc_calloc(argc, sizeof(unsigned char *));
259 new->argv_lens = silc_calloc(argc, sizeof(uint32));
260 new->argv_types = silc_calloc(argc, sizeof(uint32));
264 for (i = 0; i < argc; i++) {
265 ret = silc_buffer_unformat(buffer,
266 SILC_STR_UI_SHORT(&payload_len),
267 SILC_STR_UI_CHAR(&arg_type),
272 new->argv_lens[i] = payload_len;
273 new->argv_types[i] = arg_type;
275 if (payload_len > buffer->len - 3)
278 /* Get argument data */
279 silc_buffer_pull(buffer, 3);
280 ret = silc_buffer_unformat(buffer,
281 SILC_STR_UI_XNSTRING_ALLOC(&new->argv[i],
287 silc_buffer_pull(buffer, payload_len);
288 pull_len += 3 + payload_len;
291 if (buffer->len != 0)
297 silc_buffer_push(buffer, pull_len);
305 for (k = 0; k < i; k++)
306 silc_free(new->argv[k]);
309 silc_free(new->argv);
310 silc_free(new->argv_lens);
311 silc_free(new->argv_types);
319 /* Encodes arguments in to Argument Paylods returning them to SilcBuffer. */
321 SilcBuffer silc_argument_payload_encode(uint32 argc,
322 unsigned char **argv,
330 SILC_LOG_DEBUG(("Encoding Argument payload"));
333 for (i = 0; i < argc; i++)
334 len += 3 + argv_lens[i];
336 buffer = silc_buffer_alloc(len);
337 silc_buffer_pull_tail(buffer, SILC_BUFFER_END(buffer));
340 for (i = 0; i < argc; i++) {
341 silc_buffer_format(buffer,
342 SILC_STR_UI_SHORT(argv_lens[i]),
343 SILC_STR_UI_CHAR(argv_types[i]),
344 SILC_STR_UI_XNSTRING(argv[i], argv_lens[i]),
346 silc_buffer_pull(buffer, 3 + argv_lens[i]);
349 silc_buffer_push(buffer, len);
354 /* Same as above but encode the buffer from SilcArgumentPayload structure
355 instead of raw data. */
357 SilcBuffer silc_argument_payload_encode_payload(SilcArgumentPayload payload)
363 SILC_LOG_DEBUG(("Encoding Argument payload"));
366 for (i = 0; i < payload->argc; i++)
367 len += 3 + payload->argv_lens[i];
369 buffer = silc_buffer_alloc(len);
370 silc_buffer_pull_tail(buffer, SILC_BUFFER_END(buffer));
373 for (i = 0; i < payload->argc; i++) {
374 silc_buffer_format(buffer,
375 SILC_STR_UI_SHORT(payload->argv_lens[i]),
376 SILC_STR_UI_CHAR(payload->argv_types[i]),
377 SILC_STR_UI_XNSTRING(payload->argv[i],
378 payload->argv_lens[i]),
380 silc_buffer_pull(buffer, 3 + payload->argv_lens[i]);
383 silc_buffer_push(buffer, len);
388 /* Frees Argument Payload */
390 void silc_argument_payload_free(SilcArgumentPayload payload)
395 for (i = 0; i < payload->argc; i++)
396 silc_free(payload->argv[i]);
398 silc_free(payload->argv);
399 silc_free(payload->argv_lens);
400 silc_free(payload->argv_types);
405 /* Returns number of arguments in payload */
407 uint32 silc_argument_get_arg_num(SilcArgumentPayload payload)
409 return payload ? payload->argc : 0;
412 /* Returns first argument from payload. */
414 unsigned char *silc_argument_get_first_arg(SilcArgumentPayload payload,
423 *ret_len = payload->argv_lens[payload->pos];
425 return payload->argv[payload->pos++];
428 /* Returns next argument from payload or NULL if no more arguments. */
430 unsigned char *silc_argument_get_next_arg(SilcArgumentPayload payload,
436 if (payload->pos >= payload->argc)
440 *ret_len = payload->argv_lens[payload->pos];
442 return payload->argv[payload->pos++];
445 /* Returns argument which type is `type'. */
447 unsigned char *silc_argument_get_arg_type(SilcArgumentPayload payload,
456 for (i = 0; i < payload->argc; i++)
457 if (payload->argv_types[i] == type)
460 if (i >= payload->argc)
464 *ret_len = payload->argv_lens[i];
466 return payload->argv[i];