2 * Copyright 2008 Juan Lang
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #include "wine/test.h"
26 static HMODULE inetmib1
;
28 static void testInit(void)
30 BOOL (WINAPI
*pInit
)(DWORD
, HANDLE
*, AsnObjectIdentifier
*);
33 AsnObjectIdentifier oid
;
35 pInit
= (void *)GetProcAddress(inetmib1
, "SnmpExtensionInit");
38 skip("no SnmpExtensionInit\n");
42 ret = pInit(0, NULL, NULL);
43 ret = pInit(0, NULL, &oid);
44 ret = pInit(0, &event, NULL);
46 ret
= pInit(0, &event
, &oid
);
47 ok(ret
, "SnmpExtensionInit failed: %d\n", GetLastError());
48 ok(!strcmp("1.3.6.1.2.1.1", SnmpUtilOidToA(&oid
)),
49 "Expected 1.3.6.1.2.1.1, got %s\n", SnmpUtilOidToA(&oid
));
52 static void testQuery(void)
54 BOOL (WINAPI
*pQuery
)(BYTE
, SnmpVarBindList
*, AsnInteger32
*,
56 BOOL ret
, moreData
, noChange
;
58 AsnInteger32 error
, index
;
59 UINT bogus
[] = { 1,2,3,4 };
60 UINT mib2System
[] = { 1,3,6,1,2,1,1 };
61 UINT mib2If
[] = { 1,3,6,1,2,1,2 };
62 UINT mib2IfTable
[] = { 1,3,6,1,2,1,2,2 };
63 UINT mib2IfDescr
[] = { 1,3,6,1,2,1,2,2,1,2 };
64 UINT mib2IfAdminStatus
[] = { 1,3,6,1,2,1,2,2,1,7 };
65 UINT mib2IfOperStatus
[] = { 1,3,6,1,2,1,2,2,1,8 };
66 UINT mib2IpAddr
[] = { 1,3,6,1,2,1,4,20,1,1 };
67 UINT mib2IpRouteTable
[] = { 1,3,6,1,2,1,4,21,1,1 };
68 UINT mib2UdpTable
[] = { 1,3,6,1,2,1,7,5,1,1 };
69 SnmpVarBind vars
[3], vars2
[3];
72 pQuery
= (void *)GetProcAddress(inetmib1
, "SnmpExtensionQuery");
75 skip("couldn't find SnmpExtensionQuery\n");
79 ret = pQuery(0, NULL, NULL, NULL);
80 ret = pQuery(0, NULL, &error, NULL);
81 ret = pQuery(0, NULL, NULL, &index);
82 ret = pQuery(0, &list, NULL, NULL);
83 ret = pQuery(0, &list, &error, NULL);
86 /* An empty list succeeds */
90 ret
= pQuery(SNMP_PDU_GET
, &list
, &error
, &index
);
91 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
92 ok(error
== SNMP_ERRORSTATUS_NOERROR
,
93 "expected SNMP_ERRORSTATUS_NOERROR, got %d\n", error
);
94 ok(index
== 0, "expected index 0, got %d\n", index
);
96 /* Oddly enough, this "succeeds," even though the OID is clearly
99 vars
[0].name
.idLength
= sizeof(bogus
) / sizeof(bogus
[0]);
100 vars
[0].name
.ids
= bogus
;
101 vars
[0].value
.asnType
= 0;
104 SetLastError(0xdeadbeef);
107 ret
= pQuery(SNMP_PDU_GET
, &list
, &error
, &index
);
108 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
109 ok(error
== SNMP_ERRORSTATUS_NOERROR
||
110 error
== ERROR_FILE_NOT_FOUND
/* Win9x */,
111 "expected SNMP_ERRORSTATUS_NOERROR or ERROR_FILE_NOT_FOUND, got %d\n",
113 if (error
== SNMP_ERRORSTATUS_NOERROR
)
114 ok(index
== 0, "expected index 0, got %d\n", index
);
115 else if (error
== ERROR_FILE_NOT_FOUND
)
116 ok(index
== 1, "expected index 1, got %d\n", index
);
117 /* The OID isn't changed either: */
118 ok(!strcmp("1.2.3.4", SnmpUtilOidToA(&vars
[0].name
)),
119 "expected 1.2.3.4, got %s\n", SnmpUtilOidToA(&vars
[0].name
));
121 /* The table is not an accessible variable, so it fails */
122 vars
[0].name
.idLength
= sizeof(mib2IfTable
) / sizeof(mib2IfTable
[0]);
123 vars
[0].name
.ids
= mib2IfTable
;
124 SetLastError(0xdeadbeef);
127 ret
= pQuery(SNMP_PDU_GET
, &list
, &error
, &index
);
128 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
129 ok(error
== SNMP_ERRORSTATUS_NOSUCHNAME
,
130 "expected SNMP_ERRORSTATUS_NOSUCHNAME, got %d\n", error
);
131 /* The index is 1-based rather than 0-based */
132 ok(index
== 1, "expected index 1, got %d\n", index
);
134 /* A Get fails on something that specifies a table (but not a particular
137 vars
[0].name
.idLength
= sizeof(mib2IfDescr
) / sizeof(mib2IfDescr
[0]);
138 vars
[0].name
.ids
= mib2IfDescr
;
139 vars
[1].name
.idLength
=
140 sizeof(mib2IfAdminStatus
) / sizeof(mib2IfAdminStatus
[0]);
141 vars
[1].name
.ids
= mib2IfAdminStatus
;
142 vars
[2].name
.idLength
=
143 sizeof(mib2IfOperStatus
) / sizeof(mib2IfOperStatus
[0]);
144 vars
[2].name
.ids
= mib2IfOperStatus
;
146 SetLastError(0xdeadbeef);
149 ret
= pQuery(SNMP_PDU_GET
, &list
, &error
, &index
);
150 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
151 ok(error
== SNMP_ERRORSTATUS_NOSUCHNAME
,
152 "expected SNMP_ERRORSTATUS_NOSUCHNAME, got %d\n", error
);
153 ok(index
== 1, "expected index 1, got %d\n", index
);
154 /* but a GetNext succeeds with the same values, because GetNext gets the
155 * entry after the specified OID, not the entry specified by it. The
156 * successor to the table is the first entry in the table.
157 * The OIDs need to be allocated, because GetNext modifies them to indicate
160 SnmpUtilOidCpy(&vars2
[0].name
, &vars
[0].name
);
161 SnmpUtilOidCpy(&vars2
[1].name
, &vars
[1].name
);
162 SnmpUtilOidCpy(&vars2
[2].name
, &vars
[2].name
);
168 SetLastError(0xdeadbeef);
171 ret
= pQuery(SNMP_PDU_GETNEXT
, &list
, &error
, &index
);
172 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
173 ok(error
== SNMP_ERRORSTATUS_NOERROR
,
174 "expected SNMP_ERRORSTATUS_NOERROR, got %d\n", error
);
175 ok(index
== 0, "expected index 0, got %d\n", index
);
180 else if (SnmpUtilOidNCmp(&vars2
[0].name
, &vars
[0].name
,
181 vars
[0].name
.idLength
))
183 else if (SnmpUtilOidNCmp(&vars2
[1].name
, &vars
[1].name
,
184 vars
[1].name
.idLength
))
186 else if (SnmpUtilOidNCmp(&vars2
[2].name
, &vars
[2].name
,
187 vars
[2].name
.idLength
))
189 else if (!SnmpUtilOidCmp(&vars
[0].name
, &vars2
[0].name
) ||
190 !SnmpUtilOidCmp(&vars
[0].name
, &vars2
[0].name
) ||
191 !SnmpUtilOidCmp(&vars
[0].name
, &vars2
[0].name
))
193 /* If the OID isn't modified, the function isn't implemented on this
194 * platform, skip the remaining tests.
202 /* Check the OIDs. For these types of values (display strings and
203 * integers) they should increase by 1 for each element of the table
204 * according to RFC 1158. Windows sometimes has a weird value in the
205 * table, so allow any value as long as it's greater than the previous
208 ok(vars2
[0].name
.idLength
== vars
[0].name
.idLength
+ 1,
209 "expected length %d, got %d\n", vars
[0].name
.idLength
+ 1,
210 vars2
[0].name
.idLength
);
211 lastID
= vars2
[0].name
.ids
[vars2
[0].name
.idLength
- 1];
212 ok(lastID
== entry
+ 1 || broken(lastID
> entry
),
213 "expected %d, got %d\n", entry
+ 1, lastID
);
214 ok(vars2
[1].name
.idLength
== vars
[1].name
.idLength
+ 1,
215 "expected length %d, got %d\n", vars
[1].name
.idLength
+ 1,
216 vars2
[1].name
.idLength
);
217 lastID
= vars2
[1].name
.ids
[vars2
[1].name
.idLength
- 1];
218 ok(lastID
== entry
+ 1 || broken(lastID
> entry
),
219 "expected %d, got %d\n", entry
+ 1, lastID
);
220 ok(vars2
[2].name
.idLength
== vars
[2].name
.idLength
+ 1,
221 "expected length %d, got %d\n", vars
[2].name
.idLength
+ 1,
222 vars2
[2].name
.idLength
);
223 lastID
= vars2
[2].name
.ids
[vars2
[2].name
.idLength
- 1];
224 ok(lastID
== entry
+ 1 || broken(lastID
> entry
),
225 "expected %d, got %d\n", entry
+ 1, lastID
);
227 /* Check the types while we're at it */
228 ok(vars2
[0].value
.asnType
== ASN_OCTETSTRING
,
229 "expected ASN_OCTETSTRING, got %02x\n", vars2
[0].value
.asnType
);
230 ok(vars2
[1].value
.asnType
== ASN_INTEGER
,
231 "expected ASN_INTEGER, got %02x\n", vars2
[1].value
.asnType
);
232 ok(vars2
[2].value
.asnType
== ASN_INTEGER
,
233 "expected ASN_INTEGER, got %02x\n", vars2
[2].value
.asnType
);
234 /* Check that the operational status of an interface correctly
235 * follows the MIB2 definition of it, rather than the values
236 * defined for IPHlpApi's dwOperStatus field.
238 ok(vars2
[2].value
.asnValue
.unsigned32
<= 2,
239 "expected a value of 0, 1, or 2, got %u\n",
240 vars2
[2].value
.asnValue
.unsigned32
);
243 skip("no change in OID, no MIB2 IF table implementation\n");
244 } while (moreData
&& !noChange
);
245 SnmpUtilVarBindFree(&vars2
[0]);
246 SnmpUtilVarBindFree(&vars2
[1]);
247 SnmpUtilVarBindFree(&vars2
[2]);
249 /* Even though SnmpExtensionInit says this DLL supports the MIB2 system
250 * variables, the first variable it returns a value for is the first
253 vars
[0].name
.idLength
= sizeof(mib2System
) / sizeof(mib2System
[0]);
254 vars
[0].name
.ids
= mib2System
;
255 SnmpUtilOidCpy(&vars2
[0].name
, &vars
[0].name
);
256 vars2
[0].value
.asnType
= 0;
261 ret
= pQuery(SNMP_PDU_GETNEXT
, &list
, &error
, &index
);
262 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
263 ok(error
== SNMP_ERRORSTATUS_NOERROR
,
264 "expected SNMP_ERRORSTATUS_NOERROR, got %d\n", error
);
265 ok(index
== 0, "expected index 0, got %d\n", index
);
266 vars
[0].name
.idLength
= sizeof(mib2If
) / sizeof(mib2If
[0]);
267 vars
[0].name
.ids
= mib2If
;
268 ok(!SnmpUtilOidNCmp(&vars2
[0].name
, &vars
[0].name
, vars
[0].name
.idLength
),
269 "expected 1.3.6.1.2.1.2, got %s\n", SnmpUtilOidToA(&vars2
[0].name
));
270 SnmpUtilVarBindFree(&vars2
[0]);
272 /* Check the type and OIDs of the IP address table */
273 vars
[0].name
.idLength
= sizeof(mib2IpAddr
) / sizeof(mib2IpAddr
[0]);
274 vars
[0].name
.ids
= mib2IpAddr
;
275 SnmpUtilOidCpy(&vars2
[0].name
, &vars
[0].name
);
276 vars2
[0].value
.asnType
= 0;
281 ret
= pQuery(SNMP_PDU_GETNEXT
, &list
, &error
, &index
);
282 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
283 ok(error
== SNMP_ERRORSTATUS_NOERROR
,
284 "expected SNMP_ERRORSTATUS_NOERROR, got %d\n", error
);
285 ok(index
== 0, "expected index 0, got %d\n", index
);
290 else if (SnmpUtilOidNCmp(&vars2
[0].name
, &vars
[0].name
,
291 vars
[0].name
.idLength
))
293 else if (!SnmpUtilOidCmp(&vars2
[0].name
, &vars
[0].name
))
295 /* If the OID isn't modified, the function isn't implemented on this
296 * platform, skip the remaining tests.
302 /* Make sure the size of the OID is right.
303 * FIXME: don't know if IPv6 addrs are shared with this table.
304 * Don't think so, but I'm not certain.
306 ok(vars2
[0].name
.idLength
== vars
[0].name
.idLength
+ 4,
307 "expected length %d, got %d\n", vars
[0].name
.idLength
+ 4,
308 vars2
[0].name
.idLength
);
309 /* Make sure the type is right */
310 ok(vars2
[0].value
.asnType
== ASN_IPADDRESS
,
311 "expected type ASN_IPADDRESS, got %02x\n",
312 vars2
[0].value
.asnType
);
313 if (vars2
[0].value
.asnType
== ASN_IPADDRESS
)
317 /* This looks uglier than it is: the base OID for the IP
318 * address, 1.3.6.1.2.1.4.20.1.1, is appended with the IP
319 * address of the entry. So e.g. the loopback address is
320 * identified in MIB2 as 1.3.6.1.2.1.4.20.1.1.127.0.0.1
322 for (i
= 0; i
< vars2
[0].value
.asnValue
.address
.length
; i
++)
324 ok(vars2
[0].value
.asnValue
.address
.stream
[i
] ==
325 vars2
[0].name
.ids
[vars2
[0].name
.idLength
- 4 + i
],
326 "expected ident byte %d to be %d, got %d\n", i
,
327 vars2
[0].value
.asnValue
.address
.stream
[i
],
328 vars2
[0].name
.ids
[vars2
[0].name
.idLength
- 4 + i
]);
333 skip("no change in OID, no MIB2 IP address table implementation\n");
334 } while (moreData
&& !noChange
);
335 SnmpUtilVarBindFree(&vars2
[0]);
337 /* Check the type and OIDs of the IP route table */
338 vars
[0].name
.idLength
= DEFINE_SIZEOF(mib2IpRouteTable
);
339 vars
[0].name
.ids
= mib2IpRouteTable
;
340 SnmpUtilOidCpy(&vars2
[0].name
, &vars
[0].name
);
341 vars2
[0].value
.asnType
= 0;
347 ret
= pQuery(SNMP_PDU_GETNEXT
, &list
, &error
, &index
);
348 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
349 ok(error
== SNMP_ERRORSTATUS_NOERROR
,
350 "expected SNMP_ERRORSTATUS_NOERROR, got %d\n", error
);
351 ok(index
== 0, "expected index 0, got %d\n", index
);
356 else if (SnmpUtilOidNCmp(&vars2
[0].name
, &vars
[0].name
,
357 vars
[0].name
.idLength
))
359 else if (!SnmpUtilOidCmp(&vars2
[0].name
, &vars
[0].name
))
361 /* If the OID isn't modified, the function isn't implemented on this
362 * platform, skip the remaining tests.
368 /* Make sure the size of the OID is right.
369 * FIXME: don't know if IPv6 addrs are shared with this table.
370 * Don't think so, but I'm not certain.
372 ok(vars2
[0].name
.idLength
== vars
[0].name
.idLength
+ 4,
373 "expected length %d, got %d\n", vars
[0].name
.idLength
+ 4,
374 vars2
[0].name
.idLength
);
375 /* Make sure the type is right */
376 ok(vars2
[0].value
.asnType
== ASN_IPADDRESS
,
377 "expected type ASN_IPADDRESS, got %02x\n",
378 vars2
[0].value
.asnType
);
379 if (vars2
[0].value
.asnType
== ASN_IPADDRESS
)
383 /* The base OID for the route table, 1.3.6.1.2.1.4.21.1.1, is
384 * appended with the dest IP address of the entry. So e.g. a
385 * route entry for 224.0.0.0 is identified in MIB2 as
386 * 1.3.6.1.2.1.4.21.1.1.224.0.0.0
388 for (i
= 0; i
< vars2
[0].value
.asnValue
.address
.length
; i
++)
390 ok(vars2
[0].value
.asnValue
.address
.stream
[i
] ==
391 vars2
[0].name
.ids
[vars2
[0].name
.idLength
- 4 + i
],
392 "expected ident byte %d to be %d, got %d\n", i
,
393 vars2
[0].value
.asnValue
.address
.stream
[i
],
394 vars2
[0].name
.ids
[vars2
[0].name
.idLength
- 4 + i
]);
399 skip("no change in OID, no MIB2 IP route table implementation\n");
400 } while (moreData
&& !noChange
);
401 SnmpUtilVarBindFree(&vars2
[0]);
403 /* Check the type and OIDs of the UDP table */
404 vars
[0].name
.idLength
= DEFINE_SIZEOF(mib2UdpTable
);
405 vars
[0].name
.ids
= mib2UdpTable
;
406 SnmpUtilOidCpy(&vars2
[0].name
, &vars
[0].name
);
407 vars2
[0].value
.asnType
= 0;
413 ret
= pQuery(SNMP_PDU_GETNEXT
, &list
, &error
, &index
);
414 ok(ret
, "SnmpExtensionQuery failed: %d\n", GetLastError());
415 /* FIXME: error and index aren't checked here because the UDP table is
416 * the last OID currently supported by Wine, so the last GetNext fails.
417 * todo_wine is also not effective because it will succeed for all but
418 * the last GetNext. Remove the if (0) if any later OID is supported
422 ok(error
== SNMP_ERRORSTATUS_NOERROR
,
423 "expected SNMP_ERRORSTATUS_NOERROR, got %d\n", error
);
424 ok(index
== 0, "expected index 0, got %d\n", index
);
430 else if (SnmpUtilOidNCmp(&vars2
[0].name
, &vars
[0].name
,
431 vars
[0].name
.idLength
))
433 else if (!SnmpUtilOidCmp(&vars2
[0].name
, &vars
[0].name
))
435 /* If the OID isn't modified, the function isn't implemented on this
436 * platform, skip the remaining tests.
442 /* Make sure the size of the OID is right. */
443 ok(vars2
[0].name
.idLength
== vars
[0].name
.idLength
+ 5,
444 "expected length %d, got %d\n", vars
[0].name
.idLength
+ 5,
445 vars2
[0].name
.idLength
);
446 /* Make sure the type is right */
447 ok(vars2
[0].value
.asnType
== ASN_IPADDRESS
,
448 "expected type ASN_IPADDRESS, got %02x\n",
449 vars2
[0].value
.asnType
);
450 if (vars2
[0].value
.asnType
== ASN_IPADDRESS
)
454 /* Again with the ugly: the base OID for the UDP table,
455 * 1.3.6.1.2.1.7.5.1, is appended with the local IP address and
456 * port number of the entry. So e.g. an entry for
457 * 192.168.1.1:4000 is identified in MIB2 as
458 * 1.3.6.1.2.1.7.5.1.192.168.1.1.4000
460 for (i
= 0; i
< vars2
[0].value
.asnValue
.address
.length
; i
++)
462 ok(vars2
[0].value
.asnValue
.address
.stream
[i
] ==
463 vars2
[0].name
.ids
[vars2
[0].name
.idLength
- 5 + i
],
464 "expected ident byte %d to be %d, got %d\n", i
,
465 vars2
[0].value
.asnValue
.address
.stream
[i
],
466 vars2
[0].name
.ids
[vars2
[0].name
.idLength
- 5 + i
]);
471 skip("no change in OID, no MIB2 UDP table implementation\n");
472 } while (moreData
&& !noChange
);
473 SnmpUtilVarBindFree(&vars2
[0]);
478 inetmib1
= LoadLibraryA("inetmib1");