lib/silccore/silcnotify.c

   1 /*
   2
   3   silcnotify.c
   4
   5   Author: Pekka Riikonen <priikone@poseidon.pspt.fi>
   6
   7   Copyright (C) 2000 Pekka Riikonen
   8
   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.
  13
  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.
  18
  19 */
  20 /* $Id$ */
  21
  22 #include "silcincludes.h"
  23 #include "silcnotify.h"
  24
  25 /******************************************************************************
  26
  27                                Notify Payload
  28
  29 ******************************************************************************/
  30
  31 struct SilcNotifyPayloadStruct {
  32   SilcNotifyType type;
  33   unsigned char argc;
  34   SilcArgumentPayload args;
  35 };
  36
  37 /* Parse notify payload buffer and return data into payload structure */
  38
  39 SilcNotifyPayload silc_notify_payload_parse(const unsigned char *payload,
  40                                             uint32 payload_len)
  41 {
  42   SilcBufferStruct buffer;
  43   SilcNotifyPayload new;
  44   uint16 len;
  45   int ret;
  46
  47   SILC_LOG_DEBUG(("Parsing Notify payload"));
  48
  49   silc_buffer_set(&buffer, (unsigned char *)payload, payload_len);
  50   new = silc_calloc(1, sizeof(*new));
  51
  52   ret = silc_buffer_unformat(&buffer,
  53                              SILC_STR_UI_SHORT(&new->type),
  54                              SILC_STR_UI_SHORT(&len),
  55                              SILC_STR_UI_CHAR(&new->argc),
  56                              SILC_STR_END);
  57   if (ret == -1)
  58     goto err;
  59
  60   if (len > buffer.len)
  61     goto err;
  62
  63   if (new->argc) {
  64     silc_buffer_pull(&buffer, 5);
  65     new->args = silc_argument_payload_parse(buffer.data, buffer.len,
  66                                             new->argc);
  67     silc_buffer_push(&buffer, 5);
  68   }
  69
  70   return new;
  71
  72  err:
  73   silc_free(new);
  74   return NULL;
  75 }
  76
  77 /* Encode notify payload with variable argument list. If `argc' is > 0
  78    argument payloads will be associated to the notify payload. Variable
  79    arguments must be {usigned char *, uint32 (len)}. */
  80
  81 SilcBuffer silc_notify_payload_encode(SilcNotifyType type, uint32 argc,
  82                                       va_list ap)
  83 {
  84   SilcBuffer buffer;
  85   SilcBuffer args = NULL;
  86   unsigned char **argv;
  87   uint32 *argv_lens = NULL, *argv_types = NULL;
  88   unsigned char *x;
  89   uint32 x_len;
  90   int i, k = 0, len = 0;
  91
  92   if (argc) {
  93     argv = silc_calloc(argc, sizeof(unsigned char *));
  94     argv_lens = silc_calloc(argc, sizeof(uint32));
  95     argv_types = silc_calloc(argc, sizeof(uint32));
  96
  97     for (i = 0, k = 0; i < argc; i++) {
  98       x = va_arg(ap, unsigned char *);
  99       x_len = va_arg(ap, uint32);
 100
 101       if (!x || !x_len)
 102         continue;
 103
 104       argv[k] = silc_memdup(x, x_len);
 105       argv_lens[k] = x_len;
 106       argv_types[k] = i + 1;
 107       k++;
 108     }
 109
 110     args = silc_argument_payload_encode(k, argv, argv_lens, argv_types);
 111     len = args->len;
 112
 113     for (i = 0; i < k; i++)
 114       silc_free(argv[i]);
 115     silc_free(argv);
 116     silc_free(argv_lens);
 117     silc_free(argv_types);
 118   }
 119
 120   len += 5;
 121   buffer = silc_buffer_alloc(len);
 122   silc_buffer_pull_tail(buffer, SILC_BUFFER_END(buffer));
 123   silc_buffer_format(buffer,
 124                      SILC_STR_UI_SHORT(type),
 125                      SILC_STR_UI_SHORT(len),
 126                      SILC_STR_UI_CHAR(k),
 127                      SILC_STR_END);
 128
 129   if (k) {
 130     silc_buffer_pull(buffer, 5);
 131     silc_buffer_format(buffer,
 132                        SILC_STR_UI_XNSTRING(args->data, args->len),
 133                        SILC_STR_END);
 134     silc_buffer_push(buffer, 5);
 135     silc_buffer_free(args);
 136   }
 137
 138   return buffer;
 139 }
 140
 141 /* Same as above but takes argument from the `args' Argument Payload. */
 142
 143 SilcBuffer silc_notify_payload_encode_args(SilcNotifyType type,
 144                                            uint32 argc,
 145                                            SilcBuffer args)
 146 {
 147   SilcBuffer buffer;
 148   int len;
 149
 150   len = 5 + (args ? args->len : 0);
 151   buffer = silc_buffer_alloc(len);
 152   silc_buffer_pull_tail(buffer, SILC_BUFFER_END(buffer));
 153   silc_buffer_format(buffer,
 154                      SILC_STR_UI_SHORT(type),
 155                      SILC_STR_UI_SHORT(len),
 156                      SILC_STR_UI_CHAR(argc),
 157                      SILC_STR_END);
 158
 159   if (args) {
 160     silc_buffer_pull(buffer, 5);
 161     silc_buffer_format(buffer,
 162                        SILC_STR_UI_XNSTRING(args->data, args->len),
 163                        SILC_STR_END);
 164     silc_buffer_push(buffer, 5);
 165   }
 166
 167   return buffer;
 168 }
 169
 170 /* Frees notify payload */
 171
 172 void silc_notify_payload_free(SilcNotifyPayload payload)
 173 {
 174   if (payload) {
 175     silc_argument_payload_free(payload->args);
 176     silc_free(payload);
 177   }
 178 }
 179
 180 /* Return notify type */
 181
 182 SilcNotifyType silc_notify_get_type(SilcNotifyPayload payload)
 183 {
 184   return payload->type;
 185 }
 186
 187 /* Return argument nums */
 188
 189 uint32 silc_notify_get_arg_num(SilcNotifyPayload payload)
 190 {
 191   return payload->argc;
 192 }
 193
 194 /* Return argument payload */
 195
 196 SilcArgumentPayload silc_notify_get_args(SilcNotifyPayload payload)
 197 {
 198   return payload->args;
 199 }