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(const unsigned char *payload,
44 SilcBufferStruct buffer;
48 SILC_LOG_DEBUG(("Parsing ID payload"));
50 silc_buffer_set(&buffer, (unsigned char *)payload, payload_len);
51 new = silc_calloc(1, sizeof(*new));
53 ret = silc_buffer_unformat(&buffer,
54 SILC_STR_UI_SHORT(&new->type),
55 SILC_STR_UI_SHORT(&new->len),
60 silc_buffer_pull(&buffer, 4);
62 if (new->len > buffer.len)
65 ret = silc_buffer_unformat(&buffer,
66 SILC_STR_UI_XNSTRING_ALLOC(&new->id, new->len),
71 silc_buffer_push(&buffer, 4);
80 /* Return the ID directly from the raw payload data. */
82 void *silc_id_payload_parse_id(const unsigned char *data, uint32 len)
84 SilcBufferStruct buffer;
87 unsigned char *id_data = NULL;
91 silc_buffer_set(&buffer, (unsigned char *)data, len);
92 ret = silc_buffer_unformat(&buffer,
93 SILC_STR_UI_SHORT(&type),
94 SILC_STR_UI_SHORT(&idlen),
99 silc_buffer_pull(&buffer, 4);
101 if (idlen > buffer.len)
104 ret = silc_buffer_unformat(&buffer,
105 SILC_STR_UI_XNSTRING_ALLOC(&id_data, idlen),
110 id = silc_id_str2id(id_data, idlen, type);
118 /* Encodes ID Payload */
120 SilcBuffer silc_id_payload_encode(const void *id, SilcIdType type)
123 unsigned char *id_data;
126 id_data = silc_id_id2str(id, type);
127 len = silc_id_get_len(id, type);
128 buffer = silc_id_payload_encode_data((const unsigned char *)id_data,
134 SilcBuffer silc_id_payload_encode_data(const unsigned char *id,
135 uint32 id_len, SilcIdType type)
139 SILC_LOG_DEBUG(("Encoding %s ID payload",
140 type == SILC_ID_CLIENT ? "Client" :
141 type == SILC_ID_SERVER ? "Server" : "Channel"));
143 buffer = silc_buffer_alloc(4 + id_len);
144 silc_buffer_pull_tail(buffer, SILC_BUFFER_END(buffer));
145 silc_buffer_format(buffer,
146 SILC_STR_UI_SHORT(type),
147 SILC_STR_UI_SHORT(id_len),
148 SILC_STR_UI_XNSTRING(id, id_len),
153 /* Free ID Payload */
155 void silc_id_payload_free(SilcIDPayload payload)
158 silc_free(payload->id);
165 SilcIdType silc_id_payload_get_type(SilcIDPayload payload)
167 return payload ? payload->type : 0;
172 void *silc_id_payload_get_id(SilcIDPayload payload)
174 return payload ? silc_id_str2id(payload->id, payload->len,
175 payload->type) : NULL;
178 /* Get raw ID data. Data is duplicated. */
180 unsigned char *silc_id_payload_get_data(SilcIDPayload payload)
187 ret = silc_calloc(payload->len, sizeof(*ret));
188 memcpy(ret, payload->id, payload->len);
192 /* Get length of ID */
194 uint32 silc_id_payload_get_len(SilcIDPayload payload)
196 return payload ? payload->len : 0;
199 /******************************************************************************
203 ******************************************************************************/
205 struct SilcArgumentPayloadStruct {
207 unsigned char **argv;
213 /* Parses arguments and returns them into Argument Payload structure. */
215 SilcArgumentPayload silc_argument_payload_parse(const unsigned char *payload,
219 SilcBufferStruct buffer;
220 SilcArgumentPayload new;
222 unsigned char arg_num = 0;
223 unsigned char arg_type = 0;
227 SILC_LOG_DEBUG(("Parsing argument payload"));
229 silc_buffer_set(&buffer, (unsigned char *)payload, payload_len);
230 new = silc_calloc(1, sizeof(*new));
231 new->argv = silc_calloc(argc, sizeof(unsigned char *));
232 new->argv_lens = silc_calloc(argc, sizeof(uint32));
233 new->argv_types = silc_calloc(argc, sizeof(uint32));
237 for (i = 0; i < argc; i++) {
238 ret = silc_buffer_unformat(&buffer,
239 SILC_STR_UI_SHORT(&p_len),
240 SILC_STR_UI_CHAR(&arg_type),
245 new->argv_lens[i] = p_len;
246 new->argv_types[i] = arg_type;
248 if (p_len > buffer.len - 3)
251 /* Get argument data */
252 silc_buffer_pull(&buffer, 3);
253 ret = silc_buffer_unformat(&buffer,
254 SILC_STR_UI_XNSTRING_ALLOC(&new->argv[i],
260 silc_buffer_pull(&buffer, p_len);
261 pull_len += 3 + p_len;
270 silc_buffer_push(&buffer, pull_len);
278 for (k = 0; k < i; k++)
279 silc_free(new->argv[k]);
282 silc_free(new->argv);
283 silc_free(new->argv_lens);
284 silc_free(new->argv_types);
292 /* Encodes arguments in to Argument Paylods returning them to SilcBuffer. */
294 SilcBuffer silc_argument_payload_encode(uint32 argc,
295 unsigned char **argv,
303 SILC_LOG_DEBUG(("Encoding Argument payload"));
306 for (i = 0; i < argc; i++)
307 len += 3 + argv_lens[i];
309 buffer = silc_buffer_alloc(len);
310 silc_buffer_pull_tail(buffer, SILC_BUFFER_END(buffer));
313 for (i = 0; i < argc; i++) {
314 silc_buffer_format(buffer,
315 SILC_STR_UI_SHORT(argv_lens[i]),
316 SILC_STR_UI_CHAR(argv_types[i]),
317 SILC_STR_UI_XNSTRING(argv[i], argv_lens[i]),
319 silc_buffer_pull(buffer, 3 + argv_lens[i]);
322 silc_buffer_push(buffer, len);
327 /* Same as above but encode the buffer from SilcArgumentPayload structure
328 instead of raw data. */
330 SilcBuffer silc_argument_payload_encode_payload(SilcArgumentPayload payload)
336 SILC_LOG_DEBUG(("Encoding Argument payload"));
339 for (i = 0; i < payload->argc; i++)
340 len += 3 + payload->argv_lens[i];
342 buffer = silc_buffer_alloc(len);
343 silc_buffer_pull_tail(buffer, SILC_BUFFER_END(buffer));
346 for (i = 0; i < payload->argc; i++) {
347 silc_buffer_format(buffer,
348 SILC_STR_UI_SHORT(payload->argv_lens[i]),
349 SILC_STR_UI_CHAR(payload->argv_types[i]),
350 SILC_STR_UI_XNSTRING(payload->argv[i],
351 payload->argv_lens[i]),
353 silc_buffer_pull(buffer, 3 + payload->argv_lens[i]);
356 silc_buffer_push(buffer, len);
361 /* Frees Argument Payload */
363 void silc_argument_payload_free(SilcArgumentPayload payload)
368 for (i = 0; i < payload->argc; i++)
369 silc_free(payload->argv[i]);
371 silc_free(payload->argv);
372 silc_free(payload->argv_lens);
373 silc_free(payload->argv_types);
378 /* Returns number of arguments in payload */
380 uint32 silc_argument_get_arg_num(SilcArgumentPayload payload)
382 return payload ? payload->argc : 0;
385 /* Returns first argument from payload. */
387 unsigned char *silc_argument_get_first_arg(SilcArgumentPayload payload,
396 *ret_len = payload->argv_lens[payload->pos];
398 return payload->argv[payload->pos++];
401 /* Returns next argument from payload or NULL if no more arguments. */
403 unsigned char *silc_argument_get_next_arg(SilcArgumentPayload payload,
409 if (payload->pos >= payload->argc)
413 *ret_len = payload->argv_lens[payload->pos];
415 return payload->argv[payload->pos++];
418 /* Returns argument which type is `type'. */
420 unsigned char *silc_argument_get_arg_type(SilcArgumentPayload payload,
429 for (i = 0; i < payload->argc; i++)
430 if (payload->argv_types[i] == type)
433 if (i >= payload->argc)
437 *ret_len = payload->argv_lens[i];
439 return payload->argv[i];