NetServices Stack source

Dependents:   HelloWorld ServoInterfaceBoardExample1 4180_Lab4

Committer:
donatien
Date:
Fri Jun 11 16:05:15 2010 +0000
Revision:
0:632c9925f013

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:632c9925f013 1 /**
donatien 0:632c9925f013 2 * @file
donatien 0:632c9925f013 3 * SNMP input message processing (RFC1157).
donatien 0:632c9925f013 4 */
donatien 0:632c9925f013 5
donatien 0:632c9925f013 6 /*
donatien 0:632c9925f013 7 * Copyright (c) 2006 Axon Digital Design B.V., The Netherlands.
donatien 0:632c9925f013 8 * All rights reserved.
donatien 0:632c9925f013 9 *
donatien 0:632c9925f013 10 * Redistribution and use in source and binary forms, with or without modification,
donatien 0:632c9925f013 11 * are permitted provided that the following conditions are met:
donatien 0:632c9925f013 12 *
donatien 0:632c9925f013 13 * 1. Redistributions of source code must retain the above copyright notice,
donatien 0:632c9925f013 14 * this list of conditions and the following disclaimer.
donatien 0:632c9925f013 15 * 2. Redistributions in binary form must reproduce the above copyright notice,
donatien 0:632c9925f013 16 * this list of conditions and the following disclaimer in the documentation
donatien 0:632c9925f013 17 * and/or other materials provided with the distribution.
donatien 0:632c9925f013 18 * 3. The name of the author may not be used to endorse or promote products
donatien 0:632c9925f013 19 * derived from this software without specific prior written permission.
donatien 0:632c9925f013 20 *
donatien 0:632c9925f013 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
donatien 0:632c9925f013 22 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
donatien 0:632c9925f013 23 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
donatien 0:632c9925f013 24 * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
donatien 0:632c9925f013 25 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
donatien 0:632c9925f013 26 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
donatien 0:632c9925f013 27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
donatien 0:632c9925f013 28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
donatien 0:632c9925f013 29 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
donatien 0:632c9925f013 30 * OF SUCH DAMAGE.
donatien 0:632c9925f013 31 *
donatien 0:632c9925f013 32 * Author: Christiaan Simons <christiaan.simons@axon.tv>
donatien 0:632c9925f013 33 */
donatien 0:632c9925f013 34
donatien 0:632c9925f013 35 #include "lwip/opt.h"
donatien 0:632c9925f013 36
donatien 0:632c9925f013 37 #if LWIP_SNMP /* don't build if not configured for use in lwipopts.h */
donatien 0:632c9925f013 38
donatien 0:632c9925f013 39 #include "lwip/snmp.h"
donatien 0:632c9925f013 40 #include "lwip/snmp_asn1.h"
donatien 0:632c9925f013 41 #include "lwip/snmp_msg.h"
donatien 0:632c9925f013 42 #include "lwip/snmp_structs.h"
donatien 0:632c9925f013 43 #include "lwip/ip_addr.h"
donatien 0:632c9925f013 44 #include "lwip/memp.h"
donatien 0:632c9925f013 45 #include "lwip/udp.h"
donatien 0:632c9925f013 46 #include "lwip/stats.h"
donatien 0:632c9925f013 47
donatien 0:632c9925f013 48 #include <string.h>
donatien 0:632c9925f013 49
donatien 0:632c9925f013 50 /* public (non-static) constants */
donatien 0:632c9925f013 51 /** SNMP v1 == 0 */
donatien 0:632c9925f013 52 const s32_t snmp_version = 0;
donatien 0:632c9925f013 53 /** default SNMP community string */
donatien 0:632c9925f013 54 const char snmp_publiccommunity[7] = "public";
donatien 0:632c9925f013 55
donatien 0:632c9925f013 56 /* statically allocated buffers for SNMP_CONCURRENT_REQUESTS */
donatien 0:632c9925f013 57 struct snmp_msg_pstat msg_input_list[SNMP_CONCURRENT_REQUESTS];
donatien 0:632c9925f013 58 /* UDP Protocol Control Block */
donatien 0:632c9925f013 59 struct udp_pcb *snmp1_pcb;
donatien 0:632c9925f013 60
donatien 0:632c9925f013 61 static void snmp_recv(void *arg, struct udp_pcb *pcb, struct pbuf *p, ip_addr_t *addr, u16_t port);
donatien 0:632c9925f013 62 static err_t snmp_pdu_header_check(struct pbuf *p, u16_t ofs, u16_t pdu_len, u16_t *ofs_ret, struct snmp_msg_pstat *m_stat);
donatien 0:632c9925f013 63 static err_t snmp_pdu_dec_varbindlist(struct pbuf *p, u16_t ofs, u16_t *ofs_ret, struct snmp_msg_pstat *m_stat);
donatien 0:632c9925f013 64
donatien 0:632c9925f013 65
donatien 0:632c9925f013 66 /**
donatien 0:632c9925f013 67 * Starts SNMP Agent.
donatien 0:632c9925f013 68 * Allocates UDP pcb and binds it to IP_ADDR_ANY port 161.
donatien 0:632c9925f013 69 */
donatien 0:632c9925f013 70 void
donatien 0:632c9925f013 71 snmp_init(void)
donatien 0:632c9925f013 72 {
donatien 0:632c9925f013 73 struct snmp_msg_pstat *msg_ps;
donatien 0:632c9925f013 74 u8_t i;
donatien 0:632c9925f013 75
donatien 0:632c9925f013 76 snmp1_pcb = udp_new();
donatien 0:632c9925f013 77 if (snmp1_pcb != NULL)
donatien 0:632c9925f013 78 {
donatien 0:632c9925f013 79 udp_recv(snmp1_pcb, snmp_recv, (void *)SNMP_IN_PORT);
donatien 0:632c9925f013 80 udp_bind(snmp1_pcb, IP_ADDR_ANY, SNMP_IN_PORT);
donatien 0:632c9925f013 81 }
donatien 0:632c9925f013 82 msg_ps = &msg_input_list[0];
donatien 0:632c9925f013 83 for (i=0; i<SNMP_CONCURRENT_REQUESTS; i++)
donatien 0:632c9925f013 84 {
donatien 0:632c9925f013 85 msg_ps->state = SNMP_MSG_EMPTY;
donatien 0:632c9925f013 86 msg_ps->error_index = 0;
donatien 0:632c9925f013 87 msg_ps->error_status = SNMP_ES_NOERROR;
donatien 0:632c9925f013 88 msg_ps++;
donatien 0:632c9925f013 89 }
donatien 0:632c9925f013 90 trap_msg.pcb = snmp1_pcb;
donatien 0:632c9925f013 91
donatien 0:632c9925f013 92 #ifdef SNMP_PRIVATE_MIB_INIT
donatien 0:632c9925f013 93 /* If defined, rhis must be a function-like define to initialize the
donatien 0:632c9925f013 94 * private MIB after the stack has been initialized.
donatien 0:632c9925f013 95 * The private MIB can also be initialized in tcpip_callback (or after
donatien 0:632c9925f013 96 * the stack is initialized), this define is only for convenience. */
donatien 0:632c9925f013 97 SNMP_PRIVATE_MIB_INIT();
donatien 0:632c9925f013 98 #endif /* SNMP_PRIVATE_MIB_INIT */
donatien 0:632c9925f013 99
donatien 0:632c9925f013 100 /* The coldstart trap will only be output
donatien 0:632c9925f013 101 if our outgoing interface is up & configured */
donatien 0:632c9925f013 102 snmp_coldstart_trap();
donatien 0:632c9925f013 103 }
donatien 0:632c9925f013 104
donatien 0:632c9925f013 105 static void
donatien 0:632c9925f013 106 snmp_error_response(struct snmp_msg_pstat *msg_ps, u8_t error)
donatien 0:632c9925f013 107 {
donatien 0:632c9925f013 108 snmp_varbind_list_free(&msg_ps->outvb);
donatien 0:632c9925f013 109 msg_ps->outvb = msg_ps->invb;
donatien 0:632c9925f013 110 msg_ps->invb.head = NULL;
donatien 0:632c9925f013 111 msg_ps->invb.tail = NULL;
donatien 0:632c9925f013 112 msg_ps->invb.count = 0;
donatien 0:632c9925f013 113 msg_ps->error_status = error;
donatien 0:632c9925f013 114 msg_ps->error_index = 1 + msg_ps->vb_idx;
donatien 0:632c9925f013 115 snmp_send_response(msg_ps);
donatien 0:632c9925f013 116 snmp_varbind_list_free(&msg_ps->outvb);
donatien 0:632c9925f013 117 msg_ps->state = SNMP_MSG_EMPTY;
donatien 0:632c9925f013 118 }
donatien 0:632c9925f013 119
donatien 0:632c9925f013 120 static void
donatien 0:632c9925f013 121 snmp_ok_response(struct snmp_msg_pstat *msg_ps)
donatien 0:632c9925f013 122 {
donatien 0:632c9925f013 123 err_t err_ret;
donatien 0:632c9925f013 124
donatien 0:632c9925f013 125 err_ret = snmp_send_response(msg_ps);
donatien 0:632c9925f013 126 if (err_ret == ERR_MEM)
donatien 0:632c9925f013 127 {
donatien 0:632c9925f013 128 /* serious memory problem, can't return tooBig */
donatien 0:632c9925f013 129 }
donatien 0:632c9925f013 130 else
donatien 0:632c9925f013 131 {
donatien 0:632c9925f013 132 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_event = %"S32_F"\n",msg_ps->error_status));
donatien 0:632c9925f013 133 }
donatien 0:632c9925f013 134 /* free varbinds (if available) */
donatien 0:632c9925f013 135 snmp_varbind_list_free(&msg_ps->invb);
donatien 0:632c9925f013 136 snmp_varbind_list_free(&msg_ps->outvb);
donatien 0:632c9925f013 137 msg_ps->state = SNMP_MSG_EMPTY;
donatien 0:632c9925f013 138 }
donatien 0:632c9925f013 139
donatien 0:632c9925f013 140 /**
donatien 0:632c9925f013 141 * Service an internal or external event for SNMP GET.
donatien 0:632c9925f013 142 *
donatien 0:632c9925f013 143 * @param request_id identifies requests from 0 to (SNMP_CONCURRENT_REQUESTS-1)
donatien 0:632c9925f013 144 * @param msg_ps points to the assosicated message process state
donatien 0:632c9925f013 145 */
donatien 0:632c9925f013 146 static void
donatien 0:632c9925f013 147 snmp_msg_get_event(u8_t request_id, struct snmp_msg_pstat *msg_ps)
donatien 0:632c9925f013 148 {
donatien 0:632c9925f013 149 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_get_event: msg_ps->state==%"U16_F"\n",(u16_t)msg_ps->state));
donatien 0:632c9925f013 150
donatien 0:632c9925f013 151 if (msg_ps->state == SNMP_MSG_EXTERNAL_GET_OBJDEF)
donatien 0:632c9925f013 152 {
donatien 0:632c9925f013 153 struct mib_external_node *en;
donatien 0:632c9925f013 154 struct snmp_name_ptr np;
donatien 0:632c9925f013 155
donatien 0:632c9925f013 156 /* get_object_def() answer*/
donatien 0:632c9925f013 157 en = msg_ps->ext_mib_node;
donatien 0:632c9925f013 158 np = msg_ps->ext_name_ptr;
donatien 0:632c9925f013 159
donatien 0:632c9925f013 160 /* translate answer into a known lifeform */
donatien 0:632c9925f013 161 en->get_object_def_a(request_id, np.ident_len, np.ident, &msg_ps->ext_object_def);
donatien 0:632c9925f013 162 if ((msg_ps->ext_object_def.instance != MIB_OBJECT_NONE) &&
donatien 0:632c9925f013 163 (msg_ps->ext_object_def.access & MIB_ACCESS_READ))
donatien 0:632c9925f013 164 {
donatien 0:632c9925f013 165 msg_ps->state = SNMP_MSG_EXTERNAL_GET_VALUE;
donatien 0:632c9925f013 166 en->get_value_q(request_id, &msg_ps->ext_object_def);
donatien 0:632c9925f013 167 }
donatien 0:632c9925f013 168 else
donatien 0:632c9925f013 169 {
donatien 0:632c9925f013 170 en->get_object_def_pc(request_id, np.ident_len, np.ident);
donatien 0:632c9925f013 171 /* search failed, object id points to unknown object (nosuchname) */
donatien 0:632c9925f013 172 snmp_error_response(msg_ps,SNMP_ES_NOSUCHNAME);
donatien 0:632c9925f013 173 }
donatien 0:632c9925f013 174 }
donatien 0:632c9925f013 175 else if (msg_ps->state == SNMP_MSG_EXTERNAL_GET_VALUE)
donatien 0:632c9925f013 176 {
donatien 0:632c9925f013 177 struct mib_external_node *en;
donatien 0:632c9925f013 178 struct snmp_varbind *vb;
donatien 0:632c9925f013 179
donatien 0:632c9925f013 180 /* get_value() answer */
donatien 0:632c9925f013 181 en = msg_ps->ext_mib_node;
donatien 0:632c9925f013 182
donatien 0:632c9925f013 183 /* allocate output varbind */
donatien 0:632c9925f013 184 vb = (struct snmp_varbind *)memp_malloc(MEMP_SNMP_VARBIND);
donatien 0:632c9925f013 185 LWIP_ASSERT("vb != NULL",vb != NULL);
donatien 0:632c9925f013 186 if (vb != NULL)
donatien 0:632c9925f013 187 {
donatien 0:632c9925f013 188 vb->next = NULL;
donatien 0:632c9925f013 189 vb->prev = NULL;
donatien 0:632c9925f013 190
donatien 0:632c9925f013 191 /* move name from invb to outvb */
donatien 0:632c9925f013 192 vb->ident = msg_ps->vb_ptr->ident;
donatien 0:632c9925f013 193 vb->ident_len = msg_ps->vb_ptr->ident_len;
donatien 0:632c9925f013 194 /* ensure this memory is refereced once only */
donatien 0:632c9925f013 195 msg_ps->vb_ptr->ident = NULL;
donatien 0:632c9925f013 196 msg_ps->vb_ptr->ident_len = 0;
donatien 0:632c9925f013 197
donatien 0:632c9925f013 198 vb->value_type = msg_ps->ext_object_def.asn_type;
donatien 0:632c9925f013 199 LWIP_ASSERT("invalid length", msg_ps->ext_object_def.v_len <= 0xff);
donatien 0:632c9925f013 200 vb->value_len = (u8_t)msg_ps->ext_object_def.v_len;
donatien 0:632c9925f013 201 if (vb->value_len > 0)
donatien 0:632c9925f013 202 {
donatien 0:632c9925f013 203 LWIP_ASSERT("SNMP_MAX_OCTET_STRING_LEN is configured too low", vb->value_len <= SNMP_MAX_VALUE_SIZE);
donatien 0:632c9925f013 204 vb->value = memp_malloc(MEMP_SNMP_VALUE);
donatien 0:632c9925f013 205 LWIP_ASSERT("vb->value != NULL",vb->value != NULL);
donatien 0:632c9925f013 206 if (vb->value != NULL)
donatien 0:632c9925f013 207 {
donatien 0:632c9925f013 208 en->get_value_a(request_id, &msg_ps->ext_object_def, vb->value_len, vb->value);
donatien 0:632c9925f013 209 snmp_varbind_tail_add(&msg_ps->outvb, vb);
donatien 0:632c9925f013 210 /* search again (if vb_idx < msg_ps->invb.count) */
donatien 0:632c9925f013 211 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 212 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 213 }
donatien 0:632c9925f013 214 else
donatien 0:632c9925f013 215 {
donatien 0:632c9925f013 216 en->get_value_pc(request_id, &msg_ps->ext_object_def);
donatien 0:632c9925f013 217 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_event: no variable space\n"));
donatien 0:632c9925f013 218 msg_ps->vb_ptr->ident = vb->ident;
donatien 0:632c9925f013 219 msg_ps->vb_ptr->ident_len = vb->ident_len;
donatien 0:632c9925f013 220 memp_free(MEMP_SNMP_VARBIND, vb);
donatien 0:632c9925f013 221 snmp_error_response(msg_ps,SNMP_ES_TOOBIG);
donatien 0:632c9925f013 222 }
donatien 0:632c9925f013 223 }
donatien 0:632c9925f013 224 else
donatien 0:632c9925f013 225 {
donatien 0:632c9925f013 226 /* vb->value_len == 0, empty value (e.g. empty string) */
donatien 0:632c9925f013 227 en->get_value_a(request_id, &msg_ps->ext_object_def, 0, NULL);
donatien 0:632c9925f013 228 vb->value = NULL;
donatien 0:632c9925f013 229 snmp_varbind_tail_add(&msg_ps->outvb, vb);
donatien 0:632c9925f013 230 /* search again (if vb_idx < msg_ps->invb.count) */
donatien 0:632c9925f013 231 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 232 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 233 }
donatien 0:632c9925f013 234 }
donatien 0:632c9925f013 235 else
donatien 0:632c9925f013 236 {
donatien 0:632c9925f013 237 en->get_value_pc(request_id, &msg_ps->ext_object_def);
donatien 0:632c9925f013 238 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_event: no outvb space\n"));
donatien 0:632c9925f013 239 snmp_error_response(msg_ps,SNMP_ES_TOOBIG);
donatien 0:632c9925f013 240 }
donatien 0:632c9925f013 241 }
donatien 0:632c9925f013 242
donatien 0:632c9925f013 243 while ((msg_ps->state == SNMP_MSG_SEARCH_OBJ) &&
donatien 0:632c9925f013 244 (msg_ps->vb_idx < msg_ps->invb.count))
donatien 0:632c9925f013 245 {
donatien 0:632c9925f013 246 struct mib_node *mn;
donatien 0:632c9925f013 247 struct snmp_name_ptr np;
donatien 0:632c9925f013 248
donatien 0:632c9925f013 249 if (msg_ps->vb_idx == 0)
donatien 0:632c9925f013 250 {
donatien 0:632c9925f013 251 msg_ps->vb_ptr = msg_ps->invb.head;
donatien 0:632c9925f013 252 }
donatien 0:632c9925f013 253 else
donatien 0:632c9925f013 254 {
donatien 0:632c9925f013 255 msg_ps->vb_ptr = msg_ps->vb_ptr->next;
donatien 0:632c9925f013 256 }
donatien 0:632c9925f013 257 /** test object identifier for .iso.org.dod.internet prefix */
donatien 0:632c9925f013 258 if (snmp_iso_prefix_tst(msg_ps->vb_ptr->ident_len, msg_ps->vb_ptr->ident))
donatien 0:632c9925f013 259 {
donatien 0:632c9925f013 260 mn = snmp_search_tree((struct mib_node*)&internet, msg_ps->vb_ptr->ident_len - 4,
donatien 0:632c9925f013 261 msg_ps->vb_ptr->ident + 4, &np);
donatien 0:632c9925f013 262 if (mn != NULL)
donatien 0:632c9925f013 263 {
donatien 0:632c9925f013 264 if (mn->node_type == MIB_NODE_EX)
donatien 0:632c9925f013 265 {
donatien 0:632c9925f013 266 /* external object */
donatien 0:632c9925f013 267 struct mib_external_node *en = (struct mib_external_node*)mn;
donatien 0:632c9925f013 268
donatien 0:632c9925f013 269 msg_ps->state = SNMP_MSG_EXTERNAL_GET_OBJDEF;
donatien 0:632c9925f013 270 /* save en && args in msg_ps!! */
donatien 0:632c9925f013 271 msg_ps->ext_mib_node = en;
donatien 0:632c9925f013 272 msg_ps->ext_name_ptr = np;
donatien 0:632c9925f013 273
donatien 0:632c9925f013 274 en->get_object_def_q(en->addr_inf, request_id, np.ident_len, np.ident);
donatien 0:632c9925f013 275 }
donatien 0:632c9925f013 276 else
donatien 0:632c9925f013 277 {
donatien 0:632c9925f013 278 /* internal object */
donatien 0:632c9925f013 279 struct obj_def object_def;
donatien 0:632c9925f013 280
donatien 0:632c9925f013 281 msg_ps->state = SNMP_MSG_INTERNAL_GET_OBJDEF;
donatien 0:632c9925f013 282 mn->get_object_def(np.ident_len, np.ident, &object_def);
donatien 0:632c9925f013 283 if ((object_def.instance != MIB_OBJECT_NONE) &&
donatien 0:632c9925f013 284 (object_def.access & MIB_ACCESS_READ))
donatien 0:632c9925f013 285 {
donatien 0:632c9925f013 286 mn = mn;
donatien 0:632c9925f013 287 }
donatien 0:632c9925f013 288 else
donatien 0:632c9925f013 289 {
donatien 0:632c9925f013 290 /* search failed, object id points to unknown object (nosuchname) */
donatien 0:632c9925f013 291 mn = NULL;
donatien 0:632c9925f013 292 }
donatien 0:632c9925f013 293 if (mn != NULL)
donatien 0:632c9925f013 294 {
donatien 0:632c9925f013 295 struct snmp_varbind *vb;
donatien 0:632c9925f013 296
donatien 0:632c9925f013 297 msg_ps->state = SNMP_MSG_INTERNAL_GET_VALUE;
donatien 0:632c9925f013 298 /* allocate output varbind */
donatien 0:632c9925f013 299 vb = (struct snmp_varbind *)memp_malloc(MEMP_SNMP_VARBIND);
donatien 0:632c9925f013 300 LWIP_ASSERT("vb != NULL",vb != NULL);
donatien 0:632c9925f013 301 if (vb != NULL)
donatien 0:632c9925f013 302 {
donatien 0:632c9925f013 303 vb->next = NULL;
donatien 0:632c9925f013 304 vb->prev = NULL;
donatien 0:632c9925f013 305
donatien 0:632c9925f013 306 /* move name from invb to outvb */
donatien 0:632c9925f013 307 vb->ident = msg_ps->vb_ptr->ident;
donatien 0:632c9925f013 308 vb->ident_len = msg_ps->vb_ptr->ident_len;
donatien 0:632c9925f013 309 /* ensure this memory is refereced once only */
donatien 0:632c9925f013 310 msg_ps->vb_ptr->ident = NULL;
donatien 0:632c9925f013 311 msg_ps->vb_ptr->ident_len = 0;
donatien 0:632c9925f013 312
donatien 0:632c9925f013 313 vb->value_type = object_def.asn_type;
donatien 0:632c9925f013 314 LWIP_ASSERT("invalid length", object_def.v_len <= 0xff);
donatien 0:632c9925f013 315 vb->value_len = (u8_t)object_def.v_len;
donatien 0:632c9925f013 316 if (vb->value_len > 0)
donatien 0:632c9925f013 317 {
donatien 0:632c9925f013 318 LWIP_ASSERT("SNMP_MAX_OCTET_STRING_LEN is configured too low",
donatien 0:632c9925f013 319 vb->value_len <= SNMP_MAX_VALUE_SIZE);
donatien 0:632c9925f013 320 vb->value = memp_malloc(MEMP_SNMP_VALUE);
donatien 0:632c9925f013 321 LWIP_ASSERT("vb->value != NULL",vb->value != NULL);
donatien 0:632c9925f013 322 if (vb->value != NULL)
donatien 0:632c9925f013 323 {
donatien 0:632c9925f013 324 mn->get_value(&object_def, vb->value_len, vb->value);
donatien 0:632c9925f013 325 snmp_varbind_tail_add(&msg_ps->outvb, vb);
donatien 0:632c9925f013 326 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 327 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 328 }
donatien 0:632c9925f013 329 else
donatien 0:632c9925f013 330 {
donatien 0:632c9925f013 331 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_event: couldn't allocate variable space\n"));
donatien 0:632c9925f013 332 msg_ps->vb_ptr->ident = vb->ident;
donatien 0:632c9925f013 333 msg_ps->vb_ptr->ident_len = vb->ident_len;
donatien 0:632c9925f013 334 memp_free(MEMP_SNMP_VARBIND, vb);
donatien 0:632c9925f013 335 snmp_error_response(msg_ps,SNMP_ES_TOOBIG);
donatien 0:632c9925f013 336 }
donatien 0:632c9925f013 337 }
donatien 0:632c9925f013 338 else
donatien 0:632c9925f013 339 {
donatien 0:632c9925f013 340 /* vb->value_len == 0, empty value (e.g. empty string) */
donatien 0:632c9925f013 341 vb->value = NULL;
donatien 0:632c9925f013 342 snmp_varbind_tail_add(&msg_ps->outvb, vb);
donatien 0:632c9925f013 343 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 344 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 345 }
donatien 0:632c9925f013 346 }
donatien 0:632c9925f013 347 else
donatien 0:632c9925f013 348 {
donatien 0:632c9925f013 349 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_event: couldn't allocate outvb space\n"));
donatien 0:632c9925f013 350 snmp_error_response(msg_ps,SNMP_ES_TOOBIG);
donatien 0:632c9925f013 351 }
donatien 0:632c9925f013 352 }
donatien 0:632c9925f013 353 }
donatien 0:632c9925f013 354 }
donatien 0:632c9925f013 355 }
donatien 0:632c9925f013 356 else
donatien 0:632c9925f013 357 {
donatien 0:632c9925f013 358 mn = NULL;
donatien 0:632c9925f013 359 }
donatien 0:632c9925f013 360 if (mn == NULL)
donatien 0:632c9925f013 361 {
donatien 0:632c9925f013 362 /* mn == NULL, noSuchName */
donatien 0:632c9925f013 363 snmp_error_response(msg_ps,SNMP_ES_NOSUCHNAME);
donatien 0:632c9925f013 364 }
donatien 0:632c9925f013 365 }
donatien 0:632c9925f013 366 if ((msg_ps->state == SNMP_MSG_SEARCH_OBJ) &&
donatien 0:632c9925f013 367 (msg_ps->vb_idx == msg_ps->invb.count))
donatien 0:632c9925f013 368 {
donatien 0:632c9925f013 369 snmp_ok_response(msg_ps);
donatien 0:632c9925f013 370 }
donatien 0:632c9925f013 371 }
donatien 0:632c9925f013 372
donatien 0:632c9925f013 373 /**
donatien 0:632c9925f013 374 * Service an internal or external event for SNMP GETNEXT.
donatien 0:632c9925f013 375 *
donatien 0:632c9925f013 376 * @param request_id identifies requests from 0 to (SNMP_CONCURRENT_REQUESTS-1)
donatien 0:632c9925f013 377 * @param msg_ps points to the assosicated message process state
donatien 0:632c9925f013 378 */
donatien 0:632c9925f013 379 static void
donatien 0:632c9925f013 380 snmp_msg_getnext_event(u8_t request_id, struct snmp_msg_pstat *msg_ps)
donatien 0:632c9925f013 381 {
donatien 0:632c9925f013 382 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_getnext_event: msg_ps->state==%"U16_F"\n",(u16_t)msg_ps->state));
donatien 0:632c9925f013 383
donatien 0:632c9925f013 384 if (msg_ps->state == SNMP_MSG_EXTERNAL_GET_OBJDEF)
donatien 0:632c9925f013 385 {
donatien 0:632c9925f013 386 struct mib_external_node *en;
donatien 0:632c9925f013 387
donatien 0:632c9925f013 388 /* get_object_def() answer*/
donatien 0:632c9925f013 389 en = msg_ps->ext_mib_node;
donatien 0:632c9925f013 390
donatien 0:632c9925f013 391 /* translate answer into a known lifeform */
donatien 0:632c9925f013 392 en->get_object_def_a(request_id, 1, &msg_ps->ext_oid.id[msg_ps->ext_oid.len - 1], &msg_ps->ext_object_def);
donatien 0:632c9925f013 393 if (msg_ps->ext_object_def.instance != MIB_OBJECT_NONE)
donatien 0:632c9925f013 394 {
donatien 0:632c9925f013 395 msg_ps->state = SNMP_MSG_EXTERNAL_GET_VALUE;
donatien 0:632c9925f013 396 en->get_value_q(request_id, &msg_ps->ext_object_def);
donatien 0:632c9925f013 397 }
donatien 0:632c9925f013 398 else
donatien 0:632c9925f013 399 {
donatien 0:632c9925f013 400 en->get_object_def_pc(request_id, 1, &msg_ps->ext_oid.id[msg_ps->ext_oid.len - 1]);
donatien 0:632c9925f013 401 /* search failed, object id points to unknown object (nosuchname) */
donatien 0:632c9925f013 402 snmp_error_response(msg_ps,SNMP_ES_NOSUCHNAME);
donatien 0:632c9925f013 403 }
donatien 0:632c9925f013 404 }
donatien 0:632c9925f013 405 else if (msg_ps->state == SNMP_MSG_EXTERNAL_GET_VALUE)
donatien 0:632c9925f013 406 {
donatien 0:632c9925f013 407 struct mib_external_node *en;
donatien 0:632c9925f013 408 struct snmp_varbind *vb;
donatien 0:632c9925f013 409
donatien 0:632c9925f013 410 /* get_value() answer */
donatien 0:632c9925f013 411 en = msg_ps->ext_mib_node;
donatien 0:632c9925f013 412
donatien 0:632c9925f013 413 LWIP_ASSERT("invalid length", msg_ps->ext_object_def.v_len <= 0xff);
donatien 0:632c9925f013 414 vb = snmp_varbind_alloc(&msg_ps->ext_oid,
donatien 0:632c9925f013 415 msg_ps->ext_object_def.asn_type,
donatien 0:632c9925f013 416 (u8_t)msg_ps->ext_object_def.v_len);
donatien 0:632c9925f013 417 if (vb != NULL)
donatien 0:632c9925f013 418 {
donatien 0:632c9925f013 419 en->get_value_a(request_id, &msg_ps->ext_object_def, vb->value_len, vb->value);
donatien 0:632c9925f013 420 snmp_varbind_tail_add(&msg_ps->outvb, vb);
donatien 0:632c9925f013 421 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 422 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 423 }
donatien 0:632c9925f013 424 else
donatien 0:632c9925f013 425 {
donatien 0:632c9925f013 426 en->get_value_pc(request_id, &msg_ps->ext_object_def);
donatien 0:632c9925f013 427 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_getnext_event: couldn't allocate outvb space\n"));
donatien 0:632c9925f013 428 snmp_error_response(msg_ps,SNMP_ES_TOOBIG);
donatien 0:632c9925f013 429 }
donatien 0:632c9925f013 430 }
donatien 0:632c9925f013 431
donatien 0:632c9925f013 432 while ((msg_ps->state == SNMP_MSG_SEARCH_OBJ) &&
donatien 0:632c9925f013 433 (msg_ps->vb_idx < msg_ps->invb.count))
donatien 0:632c9925f013 434 {
donatien 0:632c9925f013 435 struct mib_node *mn;
donatien 0:632c9925f013 436 struct snmp_obj_id oid;
donatien 0:632c9925f013 437
donatien 0:632c9925f013 438 if (msg_ps->vb_idx == 0)
donatien 0:632c9925f013 439 {
donatien 0:632c9925f013 440 msg_ps->vb_ptr = msg_ps->invb.head;
donatien 0:632c9925f013 441 }
donatien 0:632c9925f013 442 else
donatien 0:632c9925f013 443 {
donatien 0:632c9925f013 444 msg_ps->vb_ptr = msg_ps->vb_ptr->next;
donatien 0:632c9925f013 445 }
donatien 0:632c9925f013 446 if (snmp_iso_prefix_expand(msg_ps->vb_ptr->ident_len, msg_ps->vb_ptr->ident, &oid))
donatien 0:632c9925f013 447 {
donatien 0:632c9925f013 448 if (msg_ps->vb_ptr->ident_len > 3)
donatien 0:632c9925f013 449 {
donatien 0:632c9925f013 450 /* can offset ident_len and ident */
donatien 0:632c9925f013 451 mn = snmp_expand_tree((struct mib_node*)&internet,
donatien 0:632c9925f013 452 msg_ps->vb_ptr->ident_len - 4,
donatien 0:632c9925f013 453 msg_ps->vb_ptr->ident + 4, &oid);
donatien 0:632c9925f013 454 }
donatien 0:632c9925f013 455 else
donatien 0:632c9925f013 456 {
donatien 0:632c9925f013 457 /* can't offset ident_len -4, ident + 4 */
donatien 0:632c9925f013 458 mn = snmp_expand_tree((struct mib_node*)&internet, 0, NULL, &oid);
donatien 0:632c9925f013 459 }
donatien 0:632c9925f013 460 }
donatien 0:632c9925f013 461 else
donatien 0:632c9925f013 462 {
donatien 0:632c9925f013 463 mn = NULL;
donatien 0:632c9925f013 464 }
donatien 0:632c9925f013 465 if (mn != NULL)
donatien 0:632c9925f013 466 {
donatien 0:632c9925f013 467 if (mn->node_type == MIB_NODE_EX)
donatien 0:632c9925f013 468 {
donatien 0:632c9925f013 469 /* external object */
donatien 0:632c9925f013 470 struct mib_external_node *en = (struct mib_external_node*)mn;
donatien 0:632c9925f013 471
donatien 0:632c9925f013 472 msg_ps->state = SNMP_MSG_EXTERNAL_GET_OBJDEF;
donatien 0:632c9925f013 473 /* save en && args in msg_ps!! */
donatien 0:632c9925f013 474 msg_ps->ext_mib_node = en;
donatien 0:632c9925f013 475 msg_ps->ext_oid = oid;
donatien 0:632c9925f013 476
donatien 0:632c9925f013 477 en->get_object_def_q(en->addr_inf, request_id, 1, &oid.id[oid.len - 1]);
donatien 0:632c9925f013 478 }
donatien 0:632c9925f013 479 else
donatien 0:632c9925f013 480 {
donatien 0:632c9925f013 481 /* internal object */
donatien 0:632c9925f013 482 struct obj_def object_def;
donatien 0:632c9925f013 483 struct snmp_varbind *vb;
donatien 0:632c9925f013 484
donatien 0:632c9925f013 485 msg_ps->state = SNMP_MSG_INTERNAL_GET_OBJDEF;
donatien 0:632c9925f013 486 mn->get_object_def(1, &oid.id[oid.len - 1], &object_def);
donatien 0:632c9925f013 487
donatien 0:632c9925f013 488 LWIP_ASSERT("invalid length", object_def.v_len <= 0xff);
donatien 0:632c9925f013 489 vb = snmp_varbind_alloc(&oid, object_def.asn_type, (u8_t)object_def.v_len);
donatien 0:632c9925f013 490 if (vb != NULL)
donatien 0:632c9925f013 491 {
donatien 0:632c9925f013 492 msg_ps->state = SNMP_MSG_INTERNAL_GET_VALUE;
donatien 0:632c9925f013 493 mn->get_value(&object_def, object_def.v_len, vb->value);
donatien 0:632c9925f013 494 snmp_varbind_tail_add(&msg_ps->outvb, vb);
donatien 0:632c9925f013 495 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 496 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 497 }
donatien 0:632c9925f013 498 else
donatien 0:632c9925f013 499 {
donatien 0:632c9925f013 500 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_recv couldn't allocate outvb space\n"));
donatien 0:632c9925f013 501 snmp_error_response(msg_ps,SNMP_ES_TOOBIG);
donatien 0:632c9925f013 502 }
donatien 0:632c9925f013 503 }
donatien 0:632c9925f013 504 }
donatien 0:632c9925f013 505 if (mn == NULL)
donatien 0:632c9925f013 506 {
donatien 0:632c9925f013 507 /* mn == NULL, noSuchName */
donatien 0:632c9925f013 508 snmp_error_response(msg_ps,SNMP_ES_NOSUCHNAME);
donatien 0:632c9925f013 509 }
donatien 0:632c9925f013 510 }
donatien 0:632c9925f013 511 if ((msg_ps->state == SNMP_MSG_SEARCH_OBJ) &&
donatien 0:632c9925f013 512 (msg_ps->vb_idx == msg_ps->invb.count))
donatien 0:632c9925f013 513 {
donatien 0:632c9925f013 514 snmp_ok_response(msg_ps);
donatien 0:632c9925f013 515 }
donatien 0:632c9925f013 516 }
donatien 0:632c9925f013 517
donatien 0:632c9925f013 518 /**
donatien 0:632c9925f013 519 * Service an internal or external event for SNMP SET.
donatien 0:632c9925f013 520 *
donatien 0:632c9925f013 521 * @param request_id identifies requests from 0 to (SNMP_CONCURRENT_REQUESTS-1)
donatien 0:632c9925f013 522 * @param msg_ps points to the assosicated message process state
donatien 0:632c9925f013 523 */
donatien 0:632c9925f013 524 static void
donatien 0:632c9925f013 525 snmp_msg_set_event(u8_t request_id, struct snmp_msg_pstat *msg_ps)
donatien 0:632c9925f013 526 {
donatien 0:632c9925f013 527 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_msg_set_event: msg_ps->state==%"U16_F"\n",(u16_t)msg_ps->state));
donatien 0:632c9925f013 528
donatien 0:632c9925f013 529 if (msg_ps->state == SNMP_MSG_EXTERNAL_GET_OBJDEF)
donatien 0:632c9925f013 530 {
donatien 0:632c9925f013 531 struct mib_external_node *en;
donatien 0:632c9925f013 532 struct snmp_name_ptr np;
donatien 0:632c9925f013 533
donatien 0:632c9925f013 534 /* get_object_def() answer*/
donatien 0:632c9925f013 535 en = msg_ps->ext_mib_node;
donatien 0:632c9925f013 536 np = msg_ps->ext_name_ptr;
donatien 0:632c9925f013 537
donatien 0:632c9925f013 538 /* translate answer into a known lifeform */
donatien 0:632c9925f013 539 en->get_object_def_a(request_id, np.ident_len, np.ident, &msg_ps->ext_object_def);
donatien 0:632c9925f013 540 if (msg_ps->ext_object_def.instance != MIB_OBJECT_NONE)
donatien 0:632c9925f013 541 {
donatien 0:632c9925f013 542 msg_ps->state = SNMP_MSG_EXTERNAL_SET_TEST;
donatien 0:632c9925f013 543 en->set_test_q(request_id, &msg_ps->ext_object_def);
donatien 0:632c9925f013 544 }
donatien 0:632c9925f013 545 else
donatien 0:632c9925f013 546 {
donatien 0:632c9925f013 547 en->get_object_def_pc(request_id, np.ident_len, np.ident);
donatien 0:632c9925f013 548 /* search failed, object id points to unknown object (nosuchname) */
donatien 0:632c9925f013 549 snmp_error_response(msg_ps,SNMP_ES_NOSUCHNAME);
donatien 0:632c9925f013 550 }
donatien 0:632c9925f013 551 }
donatien 0:632c9925f013 552 else if (msg_ps->state == SNMP_MSG_EXTERNAL_SET_TEST)
donatien 0:632c9925f013 553 {
donatien 0:632c9925f013 554 struct mib_external_node *en;
donatien 0:632c9925f013 555
donatien 0:632c9925f013 556 /* set_test() answer*/
donatien 0:632c9925f013 557 en = msg_ps->ext_mib_node;
donatien 0:632c9925f013 558
donatien 0:632c9925f013 559 if (msg_ps->ext_object_def.access & MIB_ACCESS_WRITE)
donatien 0:632c9925f013 560 {
donatien 0:632c9925f013 561 if ((msg_ps->ext_object_def.asn_type == msg_ps->vb_ptr->value_type) &&
donatien 0:632c9925f013 562 (en->set_test_a(request_id,&msg_ps->ext_object_def,
donatien 0:632c9925f013 563 msg_ps->vb_ptr->value_len,msg_ps->vb_ptr->value) != 0))
donatien 0:632c9925f013 564 {
donatien 0:632c9925f013 565 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 566 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 567 }
donatien 0:632c9925f013 568 else
donatien 0:632c9925f013 569 {
donatien 0:632c9925f013 570 en->set_test_pc(request_id,&msg_ps->ext_object_def);
donatien 0:632c9925f013 571 /* bad value */
donatien 0:632c9925f013 572 snmp_error_response(msg_ps,SNMP_ES_BADVALUE);
donatien 0:632c9925f013 573 }
donatien 0:632c9925f013 574 }
donatien 0:632c9925f013 575 else
donatien 0:632c9925f013 576 {
donatien 0:632c9925f013 577 en->set_test_pc(request_id,&msg_ps->ext_object_def);
donatien 0:632c9925f013 578 /* object not available for set */
donatien 0:632c9925f013 579 snmp_error_response(msg_ps,SNMP_ES_NOSUCHNAME);
donatien 0:632c9925f013 580 }
donatien 0:632c9925f013 581 }
donatien 0:632c9925f013 582 else if (msg_ps->state == SNMP_MSG_EXTERNAL_GET_OBJDEF_S)
donatien 0:632c9925f013 583 {
donatien 0:632c9925f013 584 struct mib_external_node *en;
donatien 0:632c9925f013 585 struct snmp_name_ptr np;
donatien 0:632c9925f013 586
donatien 0:632c9925f013 587 /* get_object_def() answer*/
donatien 0:632c9925f013 588 en = msg_ps->ext_mib_node;
donatien 0:632c9925f013 589 np = msg_ps->ext_name_ptr;
donatien 0:632c9925f013 590
donatien 0:632c9925f013 591 /* translate answer into a known lifeform */
donatien 0:632c9925f013 592 en->get_object_def_a(request_id, np.ident_len, np.ident, &msg_ps->ext_object_def);
donatien 0:632c9925f013 593 if (msg_ps->ext_object_def.instance != MIB_OBJECT_NONE)
donatien 0:632c9925f013 594 {
donatien 0:632c9925f013 595 msg_ps->state = SNMP_MSG_EXTERNAL_SET_VALUE;
donatien 0:632c9925f013 596 en->set_value_q(request_id, &msg_ps->ext_object_def,
donatien 0:632c9925f013 597 msg_ps->vb_ptr->value_len,msg_ps->vb_ptr->value);
donatien 0:632c9925f013 598 }
donatien 0:632c9925f013 599 else
donatien 0:632c9925f013 600 {
donatien 0:632c9925f013 601 en->get_object_def_pc(request_id, np.ident_len, np.ident);
donatien 0:632c9925f013 602 /* set_value failed, object has disappeared for some odd reason?? */
donatien 0:632c9925f013 603 snmp_error_response(msg_ps,SNMP_ES_GENERROR);
donatien 0:632c9925f013 604 }
donatien 0:632c9925f013 605 }
donatien 0:632c9925f013 606 else if (msg_ps->state == SNMP_MSG_EXTERNAL_SET_VALUE)
donatien 0:632c9925f013 607 {
donatien 0:632c9925f013 608 struct mib_external_node *en;
donatien 0:632c9925f013 609
donatien 0:632c9925f013 610 /** set_value_a() */
donatien 0:632c9925f013 611 en = msg_ps->ext_mib_node;
donatien 0:632c9925f013 612 en->set_value_a(request_id, &msg_ps->ext_object_def,
donatien 0:632c9925f013 613 msg_ps->vb_ptr->value_len, msg_ps->vb_ptr->value);
donatien 0:632c9925f013 614
donatien 0:632c9925f013 615 /** @todo use set_value_pc() if toobig */
donatien 0:632c9925f013 616 msg_ps->state = SNMP_MSG_INTERNAL_SET_VALUE;
donatien 0:632c9925f013 617 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 618 }
donatien 0:632c9925f013 619
donatien 0:632c9925f013 620 /* test all values before setting */
donatien 0:632c9925f013 621 while ((msg_ps->state == SNMP_MSG_SEARCH_OBJ) &&
donatien 0:632c9925f013 622 (msg_ps->vb_idx < msg_ps->invb.count))
donatien 0:632c9925f013 623 {
donatien 0:632c9925f013 624 struct mib_node *mn;
donatien 0:632c9925f013 625 struct snmp_name_ptr np;
donatien 0:632c9925f013 626
donatien 0:632c9925f013 627 if (msg_ps->vb_idx == 0)
donatien 0:632c9925f013 628 {
donatien 0:632c9925f013 629 msg_ps->vb_ptr = msg_ps->invb.head;
donatien 0:632c9925f013 630 }
donatien 0:632c9925f013 631 else
donatien 0:632c9925f013 632 {
donatien 0:632c9925f013 633 msg_ps->vb_ptr = msg_ps->vb_ptr->next;
donatien 0:632c9925f013 634 }
donatien 0:632c9925f013 635 /** test object identifier for .iso.org.dod.internet prefix */
donatien 0:632c9925f013 636 if (snmp_iso_prefix_tst(msg_ps->vb_ptr->ident_len, msg_ps->vb_ptr->ident))
donatien 0:632c9925f013 637 {
donatien 0:632c9925f013 638 mn = snmp_search_tree((struct mib_node*)&internet, msg_ps->vb_ptr->ident_len - 4,
donatien 0:632c9925f013 639 msg_ps->vb_ptr->ident + 4, &np);
donatien 0:632c9925f013 640 if (mn != NULL)
donatien 0:632c9925f013 641 {
donatien 0:632c9925f013 642 if (mn->node_type == MIB_NODE_EX)
donatien 0:632c9925f013 643 {
donatien 0:632c9925f013 644 /* external object */
donatien 0:632c9925f013 645 struct mib_external_node *en = (struct mib_external_node*)mn;
donatien 0:632c9925f013 646
donatien 0:632c9925f013 647 msg_ps->state = SNMP_MSG_EXTERNAL_GET_OBJDEF;
donatien 0:632c9925f013 648 /* save en && args in msg_ps!! */
donatien 0:632c9925f013 649 msg_ps->ext_mib_node = en;
donatien 0:632c9925f013 650 msg_ps->ext_name_ptr = np;
donatien 0:632c9925f013 651
donatien 0:632c9925f013 652 en->get_object_def_q(en->addr_inf, request_id, np.ident_len, np.ident);
donatien 0:632c9925f013 653 }
donatien 0:632c9925f013 654 else
donatien 0:632c9925f013 655 {
donatien 0:632c9925f013 656 /* internal object */
donatien 0:632c9925f013 657 struct obj_def object_def;
donatien 0:632c9925f013 658
donatien 0:632c9925f013 659 msg_ps->state = SNMP_MSG_INTERNAL_GET_OBJDEF;
donatien 0:632c9925f013 660 mn->get_object_def(np.ident_len, np.ident, &object_def);
donatien 0:632c9925f013 661 if (object_def.instance != MIB_OBJECT_NONE)
donatien 0:632c9925f013 662 {
donatien 0:632c9925f013 663 mn = mn;
donatien 0:632c9925f013 664 }
donatien 0:632c9925f013 665 else
donatien 0:632c9925f013 666 {
donatien 0:632c9925f013 667 /* search failed, object id points to unknown object (nosuchname) */
donatien 0:632c9925f013 668 mn = NULL;
donatien 0:632c9925f013 669 }
donatien 0:632c9925f013 670 if (mn != NULL)
donatien 0:632c9925f013 671 {
donatien 0:632c9925f013 672 msg_ps->state = SNMP_MSG_INTERNAL_SET_TEST;
donatien 0:632c9925f013 673
donatien 0:632c9925f013 674 if (object_def.access & MIB_ACCESS_WRITE)
donatien 0:632c9925f013 675 {
donatien 0:632c9925f013 676 if ((object_def.asn_type == msg_ps->vb_ptr->value_type) &&
donatien 0:632c9925f013 677 (mn->set_test(&object_def,msg_ps->vb_ptr->value_len,msg_ps->vb_ptr->value) != 0))
donatien 0:632c9925f013 678 {
donatien 0:632c9925f013 679 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 680 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 681 }
donatien 0:632c9925f013 682 else
donatien 0:632c9925f013 683 {
donatien 0:632c9925f013 684 /* bad value */
donatien 0:632c9925f013 685 snmp_error_response(msg_ps,SNMP_ES_BADVALUE);
donatien 0:632c9925f013 686 }
donatien 0:632c9925f013 687 }
donatien 0:632c9925f013 688 else
donatien 0:632c9925f013 689 {
donatien 0:632c9925f013 690 /* object not available for set */
donatien 0:632c9925f013 691 snmp_error_response(msg_ps,SNMP_ES_NOSUCHNAME);
donatien 0:632c9925f013 692 }
donatien 0:632c9925f013 693 }
donatien 0:632c9925f013 694 }
donatien 0:632c9925f013 695 }
donatien 0:632c9925f013 696 }
donatien 0:632c9925f013 697 else
donatien 0:632c9925f013 698 {
donatien 0:632c9925f013 699 mn = NULL;
donatien 0:632c9925f013 700 }
donatien 0:632c9925f013 701 if (mn == NULL)
donatien 0:632c9925f013 702 {
donatien 0:632c9925f013 703 /* mn == NULL, noSuchName */
donatien 0:632c9925f013 704 snmp_error_response(msg_ps,SNMP_ES_NOSUCHNAME);
donatien 0:632c9925f013 705 }
donatien 0:632c9925f013 706 }
donatien 0:632c9925f013 707
donatien 0:632c9925f013 708 if ((msg_ps->state == SNMP_MSG_SEARCH_OBJ) &&
donatien 0:632c9925f013 709 (msg_ps->vb_idx == msg_ps->invb.count))
donatien 0:632c9925f013 710 {
donatien 0:632c9925f013 711 msg_ps->vb_idx = 0;
donatien 0:632c9925f013 712 msg_ps->state = SNMP_MSG_INTERNAL_SET_VALUE;
donatien 0:632c9925f013 713 }
donatien 0:632c9925f013 714
donatien 0:632c9925f013 715 /* set all values "atomically" (be as "atomic" as possible) */
donatien 0:632c9925f013 716 while ((msg_ps->state == SNMP_MSG_INTERNAL_SET_VALUE) &&
donatien 0:632c9925f013 717 (msg_ps->vb_idx < msg_ps->invb.count))
donatien 0:632c9925f013 718 {
donatien 0:632c9925f013 719 struct mib_node *mn;
donatien 0:632c9925f013 720 struct snmp_name_ptr np;
donatien 0:632c9925f013 721
donatien 0:632c9925f013 722 if (msg_ps->vb_idx == 0)
donatien 0:632c9925f013 723 {
donatien 0:632c9925f013 724 msg_ps->vb_ptr = msg_ps->invb.head;
donatien 0:632c9925f013 725 }
donatien 0:632c9925f013 726 else
donatien 0:632c9925f013 727 {
donatien 0:632c9925f013 728 msg_ps->vb_ptr = msg_ps->vb_ptr->next;
donatien 0:632c9925f013 729 }
donatien 0:632c9925f013 730 /* skip iso prefix test, was done previously while settesting() */
donatien 0:632c9925f013 731 mn = snmp_search_tree((struct mib_node*)&internet, msg_ps->vb_ptr->ident_len - 4,
donatien 0:632c9925f013 732 msg_ps->vb_ptr->ident + 4, &np);
donatien 0:632c9925f013 733 /* check if object is still available
donatien 0:632c9925f013 734 (e.g. external hot-plug thingy present?) */
donatien 0:632c9925f013 735 if (mn != NULL)
donatien 0:632c9925f013 736 {
donatien 0:632c9925f013 737 if (mn->node_type == MIB_NODE_EX)
donatien 0:632c9925f013 738 {
donatien 0:632c9925f013 739 /* external object */
donatien 0:632c9925f013 740 struct mib_external_node *en = (struct mib_external_node*)mn;
donatien 0:632c9925f013 741
donatien 0:632c9925f013 742 msg_ps->state = SNMP_MSG_EXTERNAL_GET_OBJDEF_S;
donatien 0:632c9925f013 743 /* save en && args in msg_ps!! */
donatien 0:632c9925f013 744 msg_ps->ext_mib_node = en;
donatien 0:632c9925f013 745 msg_ps->ext_name_ptr = np;
donatien 0:632c9925f013 746
donatien 0:632c9925f013 747 en->get_object_def_q(en->addr_inf, request_id, np.ident_len, np.ident);
donatien 0:632c9925f013 748 }
donatien 0:632c9925f013 749 else
donatien 0:632c9925f013 750 {
donatien 0:632c9925f013 751 /* internal object */
donatien 0:632c9925f013 752 struct obj_def object_def;
donatien 0:632c9925f013 753
donatien 0:632c9925f013 754 msg_ps->state = SNMP_MSG_INTERNAL_GET_OBJDEF_S;
donatien 0:632c9925f013 755 mn->get_object_def(np.ident_len, np.ident, &object_def);
donatien 0:632c9925f013 756 msg_ps->state = SNMP_MSG_INTERNAL_SET_VALUE;
donatien 0:632c9925f013 757 mn->set_value(&object_def,msg_ps->vb_ptr->value_len,msg_ps->vb_ptr->value);
donatien 0:632c9925f013 758 msg_ps->vb_idx += 1;
donatien 0:632c9925f013 759 }
donatien 0:632c9925f013 760 }
donatien 0:632c9925f013 761 }
donatien 0:632c9925f013 762 if ((msg_ps->state == SNMP_MSG_INTERNAL_SET_VALUE) &&
donatien 0:632c9925f013 763 (msg_ps->vb_idx == msg_ps->invb.count))
donatien 0:632c9925f013 764 {
donatien 0:632c9925f013 765 /* simply echo the input if we can set it
donatien 0:632c9925f013 766 @todo do we need to return the actual value?
donatien 0:632c9925f013 767 e.g. if value is silently modified or behaves sticky? */
donatien 0:632c9925f013 768 msg_ps->outvb = msg_ps->invb;
donatien 0:632c9925f013 769 msg_ps->invb.head = NULL;
donatien 0:632c9925f013 770 msg_ps->invb.tail = NULL;
donatien 0:632c9925f013 771 msg_ps->invb.count = 0;
donatien 0:632c9925f013 772 snmp_ok_response(msg_ps);
donatien 0:632c9925f013 773 }
donatien 0:632c9925f013 774 }
donatien 0:632c9925f013 775
donatien 0:632c9925f013 776
donatien 0:632c9925f013 777 /**
donatien 0:632c9925f013 778 * Handle one internal or external event.
donatien 0:632c9925f013 779 * Called for one async event. (recv external/private answer)
donatien 0:632c9925f013 780 *
donatien 0:632c9925f013 781 * @param request_id identifies requests from 0 to (SNMP_CONCURRENT_REQUESTS-1)
donatien 0:632c9925f013 782 */
donatien 0:632c9925f013 783 void
donatien 0:632c9925f013 784 snmp_msg_event(u8_t request_id)
donatien 0:632c9925f013 785 {
donatien 0:632c9925f013 786 struct snmp_msg_pstat *msg_ps;
donatien 0:632c9925f013 787
donatien 0:632c9925f013 788 if (request_id < SNMP_CONCURRENT_REQUESTS)
donatien 0:632c9925f013 789 {
donatien 0:632c9925f013 790 msg_ps = &msg_input_list[request_id];
donatien 0:632c9925f013 791 if (msg_ps->rt == SNMP_ASN1_PDU_GET_NEXT_REQ)
donatien 0:632c9925f013 792 {
donatien 0:632c9925f013 793 snmp_msg_getnext_event(request_id, msg_ps);
donatien 0:632c9925f013 794 }
donatien 0:632c9925f013 795 else if (msg_ps->rt == SNMP_ASN1_PDU_GET_REQ)
donatien 0:632c9925f013 796 {
donatien 0:632c9925f013 797 snmp_msg_get_event(request_id, msg_ps);
donatien 0:632c9925f013 798 }
donatien 0:632c9925f013 799 else if(msg_ps->rt == SNMP_ASN1_PDU_SET_REQ)
donatien 0:632c9925f013 800 {
donatien 0:632c9925f013 801 snmp_msg_set_event(request_id, msg_ps);
donatien 0:632c9925f013 802 }
donatien 0:632c9925f013 803 }
donatien 0:632c9925f013 804 }
donatien 0:632c9925f013 805
donatien 0:632c9925f013 806
donatien 0:632c9925f013 807 /* lwIP UDP receive callback function */
donatien 0:632c9925f013 808 static void
donatien 0:632c9925f013 809 snmp_recv(void *arg, struct udp_pcb *pcb, struct pbuf *p, ip_addr_t *addr, u16_t port)
donatien 0:632c9925f013 810 {
donatien 0:632c9925f013 811 struct snmp_msg_pstat *msg_ps;
donatien 0:632c9925f013 812 u8_t req_idx;
donatien 0:632c9925f013 813 err_t err_ret;
donatien 0:632c9925f013 814 u16_t payload_len = p->tot_len;
donatien 0:632c9925f013 815 u16_t payload_ofs = 0;
donatien 0:632c9925f013 816 u16_t varbind_ofs = 0;
donatien 0:632c9925f013 817
donatien 0:632c9925f013 818 /* suppress unused argument warning */
donatien 0:632c9925f013 819 LWIP_UNUSED_ARG(arg);
donatien 0:632c9925f013 820
donatien 0:632c9925f013 821 /* traverse input message process list, look for SNMP_MSG_EMPTY */
donatien 0:632c9925f013 822 msg_ps = &msg_input_list[0];
donatien 0:632c9925f013 823 req_idx = 0;
donatien 0:632c9925f013 824 while ((req_idx < SNMP_CONCURRENT_REQUESTS) && (msg_ps->state != SNMP_MSG_EMPTY))
donatien 0:632c9925f013 825 {
donatien 0:632c9925f013 826 req_idx++;
donatien 0:632c9925f013 827 msg_ps++;
donatien 0:632c9925f013 828 }
donatien 0:632c9925f013 829 if (req_idx == SNMP_CONCURRENT_REQUESTS)
donatien 0:632c9925f013 830 {
donatien 0:632c9925f013 831 /* exceeding number of concurrent requests */
donatien 0:632c9925f013 832 pbuf_free(p);
donatien 0:632c9925f013 833 return;
donatien 0:632c9925f013 834 }
donatien 0:632c9925f013 835
donatien 0:632c9925f013 836 /* accepting request */
donatien 0:632c9925f013 837 snmp_inc_snmpinpkts();
donatien 0:632c9925f013 838 /* record used 'protocol control block' */
donatien 0:632c9925f013 839 msg_ps->pcb = pcb;
donatien 0:632c9925f013 840 /* source address (network order) */
donatien 0:632c9925f013 841 msg_ps->sip = *addr;
donatien 0:632c9925f013 842 /* source port (host order (lwIP oddity)) */
donatien 0:632c9925f013 843 msg_ps->sp = port;
donatien 0:632c9925f013 844
donatien 0:632c9925f013 845 /* check total length, version, community, pdu type */
donatien 0:632c9925f013 846 err_ret = snmp_pdu_header_check(p, payload_ofs, payload_len, &varbind_ofs, msg_ps);
donatien 0:632c9925f013 847 /* Only accept requests and requests without error (be robust) */
donatien 0:632c9925f013 848 /* Reject response and trap headers or error requests as input! */
donatien 0:632c9925f013 849 if ((err_ret != ERR_OK) ||
donatien 0:632c9925f013 850 ((msg_ps->rt != SNMP_ASN1_PDU_GET_REQ) &&
donatien 0:632c9925f013 851 (msg_ps->rt != SNMP_ASN1_PDU_GET_NEXT_REQ) &&
donatien 0:632c9925f013 852 (msg_ps->rt != SNMP_ASN1_PDU_SET_REQ)) ||
donatien 0:632c9925f013 853 ((msg_ps->error_status != SNMP_ES_NOERROR) ||
donatien 0:632c9925f013 854 (msg_ps->error_index != 0)) )
donatien 0:632c9925f013 855 {
donatien 0:632c9925f013 856 /* header check failed drop request silently, do not return error! */
donatien 0:632c9925f013 857 pbuf_free(p);
donatien 0:632c9925f013 858 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_pdu_header_check() failed\n"));
donatien 0:632c9925f013 859 return;
donatien 0:632c9925f013 860 }
donatien 0:632c9925f013 861 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_recv ok, community %s\n", msg_ps->community));
donatien 0:632c9925f013 862
donatien 0:632c9925f013 863 /* Builds a list of variable bindings. Copy the varbinds from the pbuf
donatien 0:632c9925f013 864 chain to glue them when these are divided over two or more pbuf's. */
donatien 0:632c9925f013 865 err_ret = snmp_pdu_dec_varbindlist(p, varbind_ofs, &varbind_ofs, msg_ps);
donatien 0:632c9925f013 866 /* we've decoded the incoming message, release input msg now */
donatien 0:632c9925f013 867 pbuf_free(p);
donatien 0:632c9925f013 868 if ((err_ret != ERR_OK) || (msg_ps->invb.count == 0))
donatien 0:632c9925f013 869 {
donatien 0:632c9925f013 870 /* varbind-list decode failed, or varbind list empty.
donatien 0:632c9925f013 871 drop request silently, do not return error!
donatien 0:632c9925f013 872 (errors are only returned for a specific varbind failure) */
donatien 0:632c9925f013 873 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_pdu_dec_varbindlist() failed\n"));
donatien 0:632c9925f013 874 return;
donatien 0:632c9925f013 875 }
donatien 0:632c9925f013 876
donatien 0:632c9925f013 877 msg_ps->error_status = SNMP_ES_NOERROR;
donatien 0:632c9925f013 878 msg_ps->error_index = 0;
donatien 0:632c9925f013 879 /* find object for each variable binding */
donatien 0:632c9925f013 880 msg_ps->state = SNMP_MSG_SEARCH_OBJ;
donatien 0:632c9925f013 881 /* first variable binding from list to inspect */
donatien 0:632c9925f013 882 msg_ps->vb_idx = 0;
donatien 0:632c9925f013 883
donatien 0:632c9925f013 884 LWIP_DEBUGF(SNMP_MSG_DEBUG, ("snmp_recv varbind cnt=%"U16_F"\n",(u16_t)msg_ps->invb.count));
donatien 0:632c9925f013 885
donatien 0:632c9925f013 886 /* handle input event and as much objects as possible in one go */
donatien 0:632c9925f013 887 snmp_msg_event(req_idx);
donatien 0:632c9925f013 888 }
donatien 0:632c9925f013 889
donatien 0:632c9925f013 890 /**
donatien 0:632c9925f013 891 * Checks and decodes incoming SNMP message header, logs header errors.
donatien 0:632c9925f013 892 *
donatien 0:632c9925f013 893 * @param p points to pbuf chain of SNMP message (UDP payload)
donatien 0:632c9925f013 894 * @param ofs points to first octet of SNMP message
donatien 0:632c9925f013 895 * @param pdu_len the length of the UDP payload
donatien 0:632c9925f013 896 * @param ofs_ret returns the ofset of the variable bindings
donatien 0:632c9925f013 897 * @param m_stat points to the current message request state return
donatien 0:632c9925f013 898 * @return
donatien 0:632c9925f013 899 * - ERR_OK SNMP header is sane and accepted
donatien 0:632c9925f013 900 * - ERR_ARG SNMP header is either malformed or rejected
donatien 0:632c9925f013 901 */
donatien 0:632c9925f013 902 static err_t
donatien 0:632c9925f013 903 snmp_pdu_header_check(struct pbuf *p, u16_t ofs, u16_t pdu_len, u16_t *ofs_ret, struct snmp_msg_pstat *m_stat)
donatien 0:632c9925f013 904 {
donatien 0:632c9925f013 905 err_t derr;
donatien 0:632c9925f013 906 u16_t len, ofs_base;
donatien 0:632c9925f013 907 u8_t len_octets;
donatien 0:632c9925f013 908 u8_t type;
donatien 0:632c9925f013 909 s32_t version;
donatien 0:632c9925f013 910
donatien 0:632c9925f013 911 ofs_base = ofs;
donatien 0:632c9925f013 912 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 913 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 914 if ((derr != ERR_OK) ||
donatien 0:632c9925f013 915 (pdu_len != (1 + len_octets + len)) ||
donatien 0:632c9925f013 916 (type != (SNMP_ASN1_UNIV | SNMP_ASN1_CONSTR | SNMP_ASN1_SEQ)))
donatien 0:632c9925f013 917 {
donatien 0:632c9925f013 918 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 919 return ERR_ARG;
donatien 0:632c9925f013 920 }
donatien 0:632c9925f013 921 ofs += (1 + len_octets);
donatien 0:632c9925f013 922 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 923 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 924 if ((derr != ERR_OK) || (type != (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_INTEG)))
donatien 0:632c9925f013 925 {
donatien 0:632c9925f013 926 /* can't decode or no integer (version) */
donatien 0:632c9925f013 927 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 928 return ERR_ARG;
donatien 0:632c9925f013 929 }
donatien 0:632c9925f013 930 derr = snmp_asn1_dec_s32t(p, ofs + 1 + len_octets, len, &version);
donatien 0:632c9925f013 931 if (derr != ERR_OK)
donatien 0:632c9925f013 932 {
donatien 0:632c9925f013 933 /* can't decode */
donatien 0:632c9925f013 934 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 935 return ERR_ARG;
donatien 0:632c9925f013 936 }
donatien 0:632c9925f013 937 if (version != 0)
donatien 0:632c9925f013 938 {
donatien 0:632c9925f013 939 /* not version 1 */
donatien 0:632c9925f013 940 snmp_inc_snmpinbadversions();
donatien 0:632c9925f013 941 return ERR_ARG;
donatien 0:632c9925f013 942 }
donatien 0:632c9925f013 943 ofs += (1 + len_octets + len);
donatien 0:632c9925f013 944 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 945 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 946 if ((derr != ERR_OK) || (type != (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_OC_STR)))
donatien 0:632c9925f013 947 {
donatien 0:632c9925f013 948 /* can't decode or no octet string (community) */
donatien 0:632c9925f013 949 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 950 return ERR_ARG;
donatien 0:632c9925f013 951 }
donatien 0:632c9925f013 952 derr = snmp_asn1_dec_raw(p, ofs + 1 + len_octets, len, SNMP_COMMUNITY_STR_LEN, m_stat->community);
donatien 0:632c9925f013 953 if (derr != ERR_OK)
donatien 0:632c9925f013 954 {
donatien 0:632c9925f013 955 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 956 return ERR_ARG;
donatien 0:632c9925f013 957 }
donatien 0:632c9925f013 958 /* add zero terminator */
donatien 0:632c9925f013 959 len = ((len < (SNMP_COMMUNITY_STR_LEN))?(len):(SNMP_COMMUNITY_STR_LEN));
donatien 0:632c9925f013 960 m_stat->community[len] = 0;
donatien 0:632c9925f013 961 m_stat->com_strlen = (u8_t)len;
donatien 0:632c9925f013 962 if (strncmp(snmp_publiccommunity, (const char*)m_stat->community, SNMP_COMMUNITY_STR_LEN) != 0)
donatien 0:632c9925f013 963 {
donatien 0:632c9925f013 964 /** @todo: move this if we need to check more names */
donatien 0:632c9925f013 965 snmp_inc_snmpinbadcommunitynames();
donatien 0:632c9925f013 966 snmp_authfail_trap();
donatien 0:632c9925f013 967 return ERR_ARG;
donatien 0:632c9925f013 968 }
donatien 0:632c9925f013 969 ofs += (1 + len_octets + len);
donatien 0:632c9925f013 970 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 971 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 972 if (derr != ERR_OK)
donatien 0:632c9925f013 973 {
donatien 0:632c9925f013 974 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 975 return ERR_ARG;
donatien 0:632c9925f013 976 }
donatien 0:632c9925f013 977 switch(type)
donatien 0:632c9925f013 978 {
donatien 0:632c9925f013 979 case (SNMP_ASN1_CONTXT | SNMP_ASN1_CONSTR | SNMP_ASN1_PDU_GET_REQ):
donatien 0:632c9925f013 980 /* GetRequest PDU */
donatien 0:632c9925f013 981 snmp_inc_snmpingetrequests();
donatien 0:632c9925f013 982 derr = ERR_OK;
donatien 0:632c9925f013 983 break;
donatien 0:632c9925f013 984 case (SNMP_ASN1_CONTXT | SNMP_ASN1_CONSTR | SNMP_ASN1_PDU_GET_NEXT_REQ):
donatien 0:632c9925f013 985 /* GetNextRequest PDU */
donatien 0:632c9925f013 986 snmp_inc_snmpingetnexts();
donatien 0:632c9925f013 987 derr = ERR_OK;
donatien 0:632c9925f013 988 break;
donatien 0:632c9925f013 989 case (SNMP_ASN1_CONTXT | SNMP_ASN1_CONSTR | SNMP_ASN1_PDU_GET_RESP):
donatien 0:632c9925f013 990 /* GetResponse PDU */
donatien 0:632c9925f013 991 snmp_inc_snmpingetresponses();
donatien 0:632c9925f013 992 derr = ERR_ARG;
donatien 0:632c9925f013 993 break;
donatien 0:632c9925f013 994 case (SNMP_ASN1_CONTXT | SNMP_ASN1_CONSTR | SNMP_ASN1_PDU_SET_REQ):
donatien 0:632c9925f013 995 /* SetRequest PDU */
donatien 0:632c9925f013 996 snmp_inc_snmpinsetrequests();
donatien 0:632c9925f013 997 derr = ERR_OK;
donatien 0:632c9925f013 998 break;
donatien 0:632c9925f013 999 case (SNMP_ASN1_CONTXT | SNMP_ASN1_CONSTR | SNMP_ASN1_PDU_TRAP):
donatien 0:632c9925f013 1000 /* Trap PDU */
donatien 0:632c9925f013 1001 snmp_inc_snmpintraps();
donatien 0:632c9925f013 1002 derr = ERR_ARG;
donatien 0:632c9925f013 1003 break;
donatien 0:632c9925f013 1004 default:
donatien 0:632c9925f013 1005 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1006 derr = ERR_ARG;
donatien 0:632c9925f013 1007 break;
donatien 0:632c9925f013 1008 }
donatien 0:632c9925f013 1009 if (derr != ERR_OK)
donatien 0:632c9925f013 1010 {
donatien 0:632c9925f013 1011 /* unsupported input PDU for this agent (no parse error) */
donatien 0:632c9925f013 1012 return ERR_ARG;
donatien 0:632c9925f013 1013 }
donatien 0:632c9925f013 1014 m_stat->rt = type & 0x1F;
donatien 0:632c9925f013 1015 ofs += (1 + len_octets);
donatien 0:632c9925f013 1016 if (len != (pdu_len - (ofs - ofs_base)))
donatien 0:632c9925f013 1017 {
donatien 0:632c9925f013 1018 /* decoded PDU length does not equal actual payload length */
donatien 0:632c9925f013 1019 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1020 return ERR_ARG;
donatien 0:632c9925f013 1021 }
donatien 0:632c9925f013 1022 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 1023 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 1024 if ((derr != ERR_OK) || (type != (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_INTEG)))
donatien 0:632c9925f013 1025 {
donatien 0:632c9925f013 1026 /* can't decode or no integer (request ID) */
donatien 0:632c9925f013 1027 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1028 return ERR_ARG;
donatien 0:632c9925f013 1029 }
donatien 0:632c9925f013 1030 derr = snmp_asn1_dec_s32t(p, ofs + 1 + len_octets, len, &m_stat->rid);
donatien 0:632c9925f013 1031 if (derr != ERR_OK)
donatien 0:632c9925f013 1032 {
donatien 0:632c9925f013 1033 /* can't decode */
donatien 0:632c9925f013 1034 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1035 return ERR_ARG;
donatien 0:632c9925f013 1036 }
donatien 0:632c9925f013 1037 ofs += (1 + len_octets + len);
donatien 0:632c9925f013 1038 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 1039 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 1040 if ((derr != ERR_OK) || (type != (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_INTEG)))
donatien 0:632c9925f013 1041 {
donatien 0:632c9925f013 1042 /* can't decode or no integer (error-status) */
donatien 0:632c9925f013 1043 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1044 return ERR_ARG;
donatien 0:632c9925f013 1045 }
donatien 0:632c9925f013 1046 /* must be noError (0) for incoming requests.
donatien 0:632c9925f013 1047 log errors for mib-2 completeness and for debug purposes */
donatien 0:632c9925f013 1048 derr = snmp_asn1_dec_s32t(p, ofs + 1 + len_octets, len, &m_stat->error_status);
donatien 0:632c9925f013 1049 if (derr != ERR_OK)
donatien 0:632c9925f013 1050 {
donatien 0:632c9925f013 1051 /* can't decode */
donatien 0:632c9925f013 1052 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1053 return ERR_ARG;
donatien 0:632c9925f013 1054 }
donatien 0:632c9925f013 1055 switch (m_stat->error_status)
donatien 0:632c9925f013 1056 {
donatien 0:632c9925f013 1057 case SNMP_ES_TOOBIG:
donatien 0:632c9925f013 1058 snmp_inc_snmpintoobigs();
donatien 0:632c9925f013 1059 break;
donatien 0:632c9925f013 1060 case SNMP_ES_NOSUCHNAME:
donatien 0:632c9925f013 1061 snmp_inc_snmpinnosuchnames();
donatien 0:632c9925f013 1062 break;
donatien 0:632c9925f013 1063 case SNMP_ES_BADVALUE:
donatien 0:632c9925f013 1064 snmp_inc_snmpinbadvalues();
donatien 0:632c9925f013 1065 break;
donatien 0:632c9925f013 1066 case SNMP_ES_READONLY:
donatien 0:632c9925f013 1067 snmp_inc_snmpinreadonlys();
donatien 0:632c9925f013 1068 break;
donatien 0:632c9925f013 1069 case SNMP_ES_GENERROR:
donatien 0:632c9925f013 1070 snmp_inc_snmpingenerrs();
donatien 0:632c9925f013 1071 break;
donatien 0:632c9925f013 1072 }
donatien 0:632c9925f013 1073 ofs += (1 + len_octets + len);
donatien 0:632c9925f013 1074 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 1075 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 1076 if ((derr != ERR_OK) || (type != (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_INTEG)))
donatien 0:632c9925f013 1077 {
donatien 0:632c9925f013 1078 /* can't decode or no integer (error-index) */
donatien 0:632c9925f013 1079 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1080 return ERR_ARG;
donatien 0:632c9925f013 1081 }
donatien 0:632c9925f013 1082 /* must be 0 for incoming requests.
donatien 0:632c9925f013 1083 decode anyway to catch bad integers (and dirty tricks) */
donatien 0:632c9925f013 1084 derr = snmp_asn1_dec_s32t(p, ofs + 1 + len_octets, len, &m_stat->error_index);
donatien 0:632c9925f013 1085 if (derr != ERR_OK)
donatien 0:632c9925f013 1086 {
donatien 0:632c9925f013 1087 /* can't decode */
donatien 0:632c9925f013 1088 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1089 return ERR_ARG;
donatien 0:632c9925f013 1090 }
donatien 0:632c9925f013 1091 ofs += (1 + len_octets + len);
donatien 0:632c9925f013 1092 *ofs_ret = ofs;
donatien 0:632c9925f013 1093 return ERR_OK;
donatien 0:632c9925f013 1094 }
donatien 0:632c9925f013 1095
donatien 0:632c9925f013 1096 static err_t
donatien 0:632c9925f013 1097 snmp_pdu_dec_varbindlist(struct pbuf *p, u16_t ofs, u16_t *ofs_ret, struct snmp_msg_pstat *m_stat)
donatien 0:632c9925f013 1098 {
donatien 0:632c9925f013 1099 err_t derr;
donatien 0:632c9925f013 1100 u16_t len, vb_len;
donatien 0:632c9925f013 1101 u8_t len_octets;
donatien 0:632c9925f013 1102 u8_t type;
donatien 0:632c9925f013 1103
donatien 0:632c9925f013 1104 /* variable binding list */
donatien 0:632c9925f013 1105 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 1106 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &vb_len);
donatien 0:632c9925f013 1107 if ((derr != ERR_OK) ||
donatien 0:632c9925f013 1108 (type != (SNMP_ASN1_UNIV | SNMP_ASN1_CONSTR | SNMP_ASN1_SEQ)))
donatien 0:632c9925f013 1109 {
donatien 0:632c9925f013 1110 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1111 return ERR_ARG;
donatien 0:632c9925f013 1112 }
donatien 0:632c9925f013 1113 ofs += (1 + len_octets);
donatien 0:632c9925f013 1114
donatien 0:632c9925f013 1115 /* start with empty list */
donatien 0:632c9925f013 1116 m_stat->invb.count = 0;
donatien 0:632c9925f013 1117 m_stat->invb.head = NULL;
donatien 0:632c9925f013 1118 m_stat->invb.tail = NULL;
donatien 0:632c9925f013 1119
donatien 0:632c9925f013 1120 while (vb_len > 0)
donatien 0:632c9925f013 1121 {
donatien 0:632c9925f013 1122 struct snmp_obj_id oid, oid_value;
donatien 0:632c9925f013 1123 struct snmp_varbind *vb;
donatien 0:632c9925f013 1124
donatien 0:632c9925f013 1125 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 1126 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 1127 if ((derr != ERR_OK) ||
donatien 0:632c9925f013 1128 (type != (SNMP_ASN1_UNIV | SNMP_ASN1_CONSTR | SNMP_ASN1_SEQ)) ||
donatien 0:632c9925f013 1129 (len == 0) || (len > vb_len))
donatien 0:632c9925f013 1130 {
donatien 0:632c9925f013 1131 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1132 /* free varbinds (if available) */
donatien 0:632c9925f013 1133 snmp_varbind_list_free(&m_stat->invb);
donatien 0:632c9925f013 1134 return ERR_ARG;
donatien 0:632c9925f013 1135 }
donatien 0:632c9925f013 1136 ofs += (1 + len_octets);
donatien 0:632c9925f013 1137 vb_len -= (1 + len_octets);
donatien 0:632c9925f013 1138
donatien 0:632c9925f013 1139 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 1140 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 1141 if ((derr != ERR_OK) || (type != (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_OBJ_ID)))
donatien 0:632c9925f013 1142 {
donatien 0:632c9925f013 1143 /* can't decode object name length */
donatien 0:632c9925f013 1144 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1145 /* free varbinds (if available) */
donatien 0:632c9925f013 1146 snmp_varbind_list_free(&m_stat->invb);
donatien 0:632c9925f013 1147 return ERR_ARG;
donatien 0:632c9925f013 1148 }
donatien 0:632c9925f013 1149 derr = snmp_asn1_dec_oid(p, ofs + 1 + len_octets, len, &oid);
donatien 0:632c9925f013 1150 if (derr != ERR_OK)
donatien 0:632c9925f013 1151 {
donatien 0:632c9925f013 1152 /* can't decode object name */
donatien 0:632c9925f013 1153 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1154 /* free varbinds (if available) */
donatien 0:632c9925f013 1155 snmp_varbind_list_free(&m_stat->invb);
donatien 0:632c9925f013 1156 return ERR_ARG;
donatien 0:632c9925f013 1157 }
donatien 0:632c9925f013 1158 ofs += (1 + len_octets + len);
donatien 0:632c9925f013 1159 vb_len -= (1 + len_octets + len);
donatien 0:632c9925f013 1160
donatien 0:632c9925f013 1161 snmp_asn1_dec_type(p, ofs, &type);
donatien 0:632c9925f013 1162 derr = snmp_asn1_dec_length(p, ofs+1, &len_octets, &len);
donatien 0:632c9925f013 1163 if (derr != ERR_OK)
donatien 0:632c9925f013 1164 {
donatien 0:632c9925f013 1165 /* can't decode object value length */
donatien 0:632c9925f013 1166 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1167 /* free varbinds (if available) */
donatien 0:632c9925f013 1168 snmp_varbind_list_free(&m_stat->invb);
donatien 0:632c9925f013 1169 return ERR_ARG;
donatien 0:632c9925f013 1170 }
donatien 0:632c9925f013 1171
donatien 0:632c9925f013 1172 switch (type)
donatien 0:632c9925f013 1173 {
donatien 0:632c9925f013 1174 case (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_INTEG):
donatien 0:632c9925f013 1175 vb = snmp_varbind_alloc(&oid, type, sizeof(s32_t));
donatien 0:632c9925f013 1176 if (vb != NULL)
donatien 0:632c9925f013 1177 {
donatien 0:632c9925f013 1178 s32_t *vptr = (s32_t*)vb->value;
donatien 0:632c9925f013 1179
donatien 0:632c9925f013 1180 derr = snmp_asn1_dec_s32t(p, ofs + 1 + len_octets, len, vptr);
donatien 0:632c9925f013 1181 snmp_varbind_tail_add(&m_stat->invb, vb);
donatien 0:632c9925f013 1182 }
donatien 0:632c9925f013 1183 else
donatien 0:632c9925f013 1184 {
donatien 0:632c9925f013 1185 derr = ERR_ARG;
donatien 0:632c9925f013 1186 }
donatien 0:632c9925f013 1187 break;
donatien 0:632c9925f013 1188 case (SNMP_ASN1_APPLIC | SNMP_ASN1_PRIMIT | SNMP_ASN1_COUNTER):
donatien 0:632c9925f013 1189 case (SNMP_ASN1_APPLIC | SNMP_ASN1_PRIMIT | SNMP_ASN1_GAUGE):
donatien 0:632c9925f013 1190 case (SNMP_ASN1_APPLIC | SNMP_ASN1_PRIMIT | SNMP_ASN1_TIMETICKS):
donatien 0:632c9925f013 1191 vb = snmp_varbind_alloc(&oid, type, sizeof(u32_t));
donatien 0:632c9925f013 1192 if (vb != NULL)
donatien 0:632c9925f013 1193 {
donatien 0:632c9925f013 1194 u32_t *vptr = (u32_t*)vb->value;
donatien 0:632c9925f013 1195
donatien 0:632c9925f013 1196 derr = snmp_asn1_dec_u32t(p, ofs + 1 + len_octets, len, vptr);
donatien 0:632c9925f013 1197 snmp_varbind_tail_add(&m_stat->invb, vb);
donatien 0:632c9925f013 1198 }
donatien 0:632c9925f013 1199 else
donatien 0:632c9925f013 1200 {
donatien 0:632c9925f013 1201 derr = ERR_ARG;
donatien 0:632c9925f013 1202 }
donatien 0:632c9925f013 1203 break;
donatien 0:632c9925f013 1204 case (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_OC_STR):
donatien 0:632c9925f013 1205 case (SNMP_ASN1_APPLIC | SNMP_ASN1_PRIMIT | SNMP_ASN1_OPAQUE):
donatien 0:632c9925f013 1206 LWIP_ASSERT("invalid length", len <= 0xff);
donatien 0:632c9925f013 1207 vb = snmp_varbind_alloc(&oid, type, (u8_t)len);
donatien 0:632c9925f013 1208 if (vb != NULL)
donatien 0:632c9925f013 1209 {
donatien 0:632c9925f013 1210 derr = snmp_asn1_dec_raw(p, ofs + 1 + len_octets, len, vb->value_len, (u8_t*)vb->value);
donatien 0:632c9925f013 1211 snmp_varbind_tail_add(&m_stat->invb, vb);
donatien 0:632c9925f013 1212 }
donatien 0:632c9925f013 1213 else
donatien 0:632c9925f013 1214 {
donatien 0:632c9925f013 1215 derr = ERR_ARG;
donatien 0:632c9925f013 1216 }
donatien 0:632c9925f013 1217 break;
donatien 0:632c9925f013 1218 case (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_NUL):
donatien 0:632c9925f013 1219 vb = snmp_varbind_alloc(&oid, type, 0);
donatien 0:632c9925f013 1220 if (vb != NULL)
donatien 0:632c9925f013 1221 {
donatien 0:632c9925f013 1222 snmp_varbind_tail_add(&m_stat->invb, vb);
donatien 0:632c9925f013 1223 derr = ERR_OK;
donatien 0:632c9925f013 1224 }
donatien 0:632c9925f013 1225 else
donatien 0:632c9925f013 1226 {
donatien 0:632c9925f013 1227 derr = ERR_ARG;
donatien 0:632c9925f013 1228 }
donatien 0:632c9925f013 1229 break;
donatien 0:632c9925f013 1230 case (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_OBJ_ID):
donatien 0:632c9925f013 1231 derr = snmp_asn1_dec_oid(p, ofs + 1 + len_octets, len, &oid_value);
donatien 0:632c9925f013 1232 if (derr == ERR_OK)
donatien 0:632c9925f013 1233 {
donatien 0:632c9925f013 1234 vb = snmp_varbind_alloc(&oid, type, oid_value.len * sizeof(s32_t));
donatien 0:632c9925f013 1235 if (vb != NULL)
donatien 0:632c9925f013 1236 {
donatien 0:632c9925f013 1237 u8_t i = oid_value.len;
donatien 0:632c9925f013 1238 s32_t *vptr = (s32_t*)vb->value;
donatien 0:632c9925f013 1239
donatien 0:632c9925f013 1240 while(i > 0)
donatien 0:632c9925f013 1241 {
donatien 0:632c9925f013 1242 i--;
donatien 0:632c9925f013 1243 vptr[i] = oid_value.id[i];
donatien 0:632c9925f013 1244 }
donatien 0:632c9925f013 1245 snmp_varbind_tail_add(&m_stat->invb, vb);
donatien 0:632c9925f013 1246 derr = ERR_OK;
donatien 0:632c9925f013 1247 }
donatien 0:632c9925f013 1248 else
donatien 0:632c9925f013 1249 {
donatien 0:632c9925f013 1250 derr = ERR_ARG;
donatien 0:632c9925f013 1251 }
donatien 0:632c9925f013 1252 }
donatien 0:632c9925f013 1253 break;
donatien 0:632c9925f013 1254 case (SNMP_ASN1_APPLIC | SNMP_ASN1_PRIMIT | SNMP_ASN1_IPADDR):
donatien 0:632c9925f013 1255 if (len == 4)
donatien 0:632c9925f013 1256 {
donatien 0:632c9925f013 1257 /* must be exactly 4 octets! */
donatien 0:632c9925f013 1258 vb = snmp_varbind_alloc(&oid, type, 4);
donatien 0:632c9925f013 1259 if (vb != NULL)
donatien 0:632c9925f013 1260 {
donatien 0:632c9925f013 1261 derr = snmp_asn1_dec_raw(p, ofs + 1 + len_octets, len, vb->value_len, (u8_t*)vb->value);
donatien 0:632c9925f013 1262 snmp_varbind_tail_add(&m_stat->invb, vb);
donatien 0:632c9925f013 1263 }
donatien 0:632c9925f013 1264 else
donatien 0:632c9925f013 1265 {
donatien 0:632c9925f013 1266 derr = ERR_ARG;
donatien 0:632c9925f013 1267 }
donatien 0:632c9925f013 1268 }
donatien 0:632c9925f013 1269 else
donatien 0:632c9925f013 1270 {
donatien 0:632c9925f013 1271 derr = ERR_ARG;
donatien 0:632c9925f013 1272 }
donatien 0:632c9925f013 1273 break;
donatien 0:632c9925f013 1274 default:
donatien 0:632c9925f013 1275 derr = ERR_ARG;
donatien 0:632c9925f013 1276 break;
donatien 0:632c9925f013 1277 }
donatien 0:632c9925f013 1278 if (derr != ERR_OK)
donatien 0:632c9925f013 1279 {
donatien 0:632c9925f013 1280 snmp_inc_snmpinasnparseerrs();
donatien 0:632c9925f013 1281 /* free varbinds (if available) */
donatien 0:632c9925f013 1282 snmp_varbind_list_free(&m_stat->invb);
donatien 0:632c9925f013 1283 return ERR_ARG;
donatien 0:632c9925f013 1284 }
donatien 0:632c9925f013 1285 ofs += (1 + len_octets + len);
donatien 0:632c9925f013 1286 vb_len -= (1 + len_octets + len);
donatien 0:632c9925f013 1287 }
donatien 0:632c9925f013 1288
donatien 0:632c9925f013 1289 if (m_stat->rt == SNMP_ASN1_PDU_SET_REQ)
donatien 0:632c9925f013 1290 {
donatien 0:632c9925f013 1291 snmp_add_snmpintotalsetvars(m_stat->invb.count);
donatien 0:632c9925f013 1292 }
donatien 0:632c9925f013 1293 else
donatien 0:632c9925f013 1294 {
donatien 0:632c9925f013 1295 snmp_add_snmpintotalreqvars(m_stat->invb.count);
donatien 0:632c9925f013 1296 }
donatien 0:632c9925f013 1297
donatien 0:632c9925f013 1298 *ofs_ret = ofs;
donatien 0:632c9925f013 1299 return ERR_OK;
donatien 0:632c9925f013 1300 }
donatien 0:632c9925f013 1301
donatien 0:632c9925f013 1302 struct snmp_varbind*
donatien 0:632c9925f013 1303 snmp_varbind_alloc(struct snmp_obj_id *oid, u8_t type, u8_t len)
donatien 0:632c9925f013 1304 {
donatien 0:632c9925f013 1305 struct snmp_varbind *vb;
donatien 0:632c9925f013 1306
donatien 0:632c9925f013 1307 vb = (struct snmp_varbind *)memp_malloc(MEMP_SNMP_VARBIND);
donatien 0:632c9925f013 1308 LWIP_ASSERT("vb != NULL",vb != NULL);
donatien 0:632c9925f013 1309 if (vb != NULL)
donatien 0:632c9925f013 1310 {
donatien 0:632c9925f013 1311 u8_t i;
donatien 0:632c9925f013 1312
donatien 0:632c9925f013 1313 vb->next = NULL;
donatien 0:632c9925f013 1314 vb->prev = NULL;
donatien 0:632c9925f013 1315 i = oid->len;
donatien 0:632c9925f013 1316 vb->ident_len = i;
donatien 0:632c9925f013 1317 if (i > 0)
donatien 0:632c9925f013 1318 {
donatien 0:632c9925f013 1319 LWIP_ASSERT("SNMP_MAX_TREE_DEPTH is configured too low", i <= SNMP_MAX_TREE_DEPTH);
donatien 0:632c9925f013 1320 /* allocate array of s32_t for our object identifier */
donatien 0:632c9925f013 1321 vb->ident = (s32_t*)memp_malloc(MEMP_SNMP_VALUE);
donatien 0:632c9925f013 1322 LWIP_ASSERT("vb->ident != NULL",vb->ident != NULL);
donatien 0:632c9925f013 1323 if (vb->ident == NULL)
donatien 0:632c9925f013 1324 {
donatien 0:632c9925f013 1325 memp_free(MEMP_SNMP_VARBIND, vb);
donatien 0:632c9925f013 1326 return NULL;
donatien 0:632c9925f013 1327 }
donatien 0:632c9925f013 1328 while(i > 0)
donatien 0:632c9925f013 1329 {
donatien 0:632c9925f013 1330 i--;
donatien 0:632c9925f013 1331 vb->ident[i] = oid->id[i];
donatien 0:632c9925f013 1332 }
donatien 0:632c9925f013 1333 }
donatien 0:632c9925f013 1334 else
donatien 0:632c9925f013 1335 {
donatien 0:632c9925f013 1336 /* i == 0, pass zero length object identifier */
donatien 0:632c9925f013 1337 vb->ident = NULL;
donatien 0:632c9925f013 1338 }
donatien 0:632c9925f013 1339 vb->value_type = type;
donatien 0:632c9925f013 1340 vb->value_len = len;
donatien 0:632c9925f013 1341 if (len > 0)
donatien 0:632c9925f013 1342 {
donatien 0:632c9925f013 1343 LWIP_ASSERT("SNMP_MAX_OCTET_STRING_LEN is configured too low", vb->value_len <= SNMP_MAX_VALUE_SIZE);
donatien 0:632c9925f013 1344 /* allocate raw bytes for our object value */
donatien 0:632c9925f013 1345 vb->value = memp_malloc(MEMP_SNMP_VALUE);
donatien 0:632c9925f013 1346 LWIP_ASSERT("vb->value != NULL",vb->value != NULL);
donatien 0:632c9925f013 1347 if (vb->value == NULL)
donatien 0:632c9925f013 1348 {
donatien 0:632c9925f013 1349 if (vb->ident != NULL)
donatien 0:632c9925f013 1350 {
donatien 0:632c9925f013 1351 memp_free(MEMP_SNMP_VALUE, vb->ident);
donatien 0:632c9925f013 1352 }
donatien 0:632c9925f013 1353 memp_free(MEMP_SNMP_VARBIND, vb);
donatien 0:632c9925f013 1354 return NULL;
donatien 0:632c9925f013 1355 }
donatien 0:632c9925f013 1356 }
donatien 0:632c9925f013 1357 else
donatien 0:632c9925f013 1358 {
donatien 0:632c9925f013 1359 /* ASN1_NUL type, or zero length ASN1_OC_STR */
donatien 0:632c9925f013 1360 vb->value = NULL;
donatien 0:632c9925f013 1361 }
donatien 0:632c9925f013 1362 }
donatien 0:632c9925f013 1363 return vb;
donatien 0:632c9925f013 1364 }
donatien 0:632c9925f013 1365
donatien 0:632c9925f013 1366 void
donatien 0:632c9925f013 1367 snmp_varbind_free(struct snmp_varbind *vb)
donatien 0:632c9925f013 1368 {
donatien 0:632c9925f013 1369 if (vb->value != NULL )
donatien 0:632c9925f013 1370 {
donatien 0:632c9925f013 1371 memp_free(MEMP_SNMP_VALUE, vb->value);
donatien 0:632c9925f013 1372 }
donatien 0:632c9925f013 1373 if (vb->ident != NULL )
donatien 0:632c9925f013 1374 {
donatien 0:632c9925f013 1375 memp_free(MEMP_SNMP_VALUE, vb->ident);
donatien 0:632c9925f013 1376 }
donatien 0:632c9925f013 1377 memp_free(MEMP_SNMP_VARBIND, vb);
donatien 0:632c9925f013 1378 }
donatien 0:632c9925f013 1379
donatien 0:632c9925f013 1380 void
donatien 0:632c9925f013 1381 snmp_varbind_list_free(struct snmp_varbind_root *root)
donatien 0:632c9925f013 1382 {
donatien 0:632c9925f013 1383 struct snmp_varbind *vb, *prev;
donatien 0:632c9925f013 1384
donatien 0:632c9925f013 1385 vb = root->tail;
donatien 0:632c9925f013 1386 while ( vb != NULL )
donatien 0:632c9925f013 1387 {
donatien 0:632c9925f013 1388 prev = vb->prev;
donatien 0:632c9925f013 1389 snmp_varbind_free(vb);
donatien 0:632c9925f013 1390 vb = prev;
donatien 0:632c9925f013 1391 }
donatien 0:632c9925f013 1392 root->count = 0;
donatien 0:632c9925f013 1393 root->head = NULL;
donatien 0:632c9925f013 1394 root->tail = NULL;
donatien 0:632c9925f013 1395 }
donatien 0:632c9925f013 1396
donatien 0:632c9925f013 1397 void
donatien 0:632c9925f013 1398 snmp_varbind_tail_add(struct snmp_varbind_root *root, struct snmp_varbind *vb)
donatien 0:632c9925f013 1399 {
donatien 0:632c9925f013 1400 if (root->count == 0)
donatien 0:632c9925f013 1401 {
donatien 0:632c9925f013 1402 /* add first varbind to list */
donatien 0:632c9925f013 1403 root->head = vb;
donatien 0:632c9925f013 1404 root->tail = vb;
donatien 0:632c9925f013 1405 }
donatien 0:632c9925f013 1406 else
donatien 0:632c9925f013 1407 {
donatien 0:632c9925f013 1408 /* add nth varbind to list tail */
donatien 0:632c9925f013 1409 root->tail->next = vb;
donatien 0:632c9925f013 1410 vb->prev = root->tail;
donatien 0:632c9925f013 1411 root->tail = vb;
donatien 0:632c9925f013 1412 }
donatien 0:632c9925f013 1413 root->count += 1;
donatien 0:632c9925f013 1414 }
donatien 0:632c9925f013 1415
donatien 0:632c9925f013 1416 struct snmp_varbind*
donatien 0:632c9925f013 1417 snmp_varbind_tail_remove(struct snmp_varbind_root *root)
donatien 0:632c9925f013 1418 {
donatien 0:632c9925f013 1419 struct snmp_varbind* vb;
donatien 0:632c9925f013 1420
donatien 0:632c9925f013 1421 if (root->count > 0)
donatien 0:632c9925f013 1422 {
donatien 0:632c9925f013 1423 /* remove tail varbind */
donatien 0:632c9925f013 1424 vb = root->tail;
donatien 0:632c9925f013 1425 root->tail = vb->prev;
donatien 0:632c9925f013 1426 vb->prev->next = NULL;
donatien 0:632c9925f013 1427 root->count -= 1;
donatien 0:632c9925f013 1428 }
donatien 0:632c9925f013 1429 else
donatien 0:632c9925f013 1430 {
donatien 0:632c9925f013 1431 /* nothing to remove */
donatien 0:632c9925f013 1432 vb = NULL;
donatien 0:632c9925f013 1433 }
donatien 0:632c9925f013 1434 return vb;
donatien 0:632c9925f013 1435 }
donatien 0:632c9925f013 1436
donatien 0:632c9925f013 1437 #endif /* LWIP_SNMP */