summaryrefslogtreecommitdiff
path: root/net/tcl-scotty/patches/patch-tnm_snmp_tnmSnmpUtil.c
blob: 0dc3a9fa1d4a717269bb340bc1dbfc68f3df268b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
$NetBSD: patch-tnm_snmp_tnmSnmpUtil.c,v 1.1 2014/03/05 13:52:29 he Exp $

Constify.
Avoid use of interp->result.

--- tnm/snmp/tnmSnmpUtil.c.orig	1998-04-23 11:18:13.000000000 +0000
+++ tnm/snmp/tnmSnmpUtil.c
@@ -569,16 +569,17 @@ Tnm_SnmpEvalCallback(interp, session, pd
     Tcl_Interp *interp;
     SNMP_Session *session;
     SNMP_PDU *pdu;
-    char *cmd;
-    char *instance;
-    char *oid;
-    char *value;
+    const char *cmd;
+    const char *instance;
+    const char *oid;
+    const char *value;
     char *last;
 {
     char buf[20];
     int	code;
     Tcl_DString tclCmd;
-    char *startPtr, *scanPtr, *name;
+    char *name;
+    const char *startPtr, *scanPtr;
 
     Tcl_DStringInit(&tclCmd);
     startPtr = cmd;
@@ -676,7 +677,7 @@ Tnm_SnmpEvalCallback(interp, session, pd
      */
 
     if (code == TCL_ERROR && oid == NULL) {
-	char *errorMsg = ckstrdup(interp->result);
+        char *errorMsg = ckstrdup(Tcl_GetStringResult(interp));
 	Tcl_AddErrorInfo(interp, "\n    (snmp callback)");
 	Tcl_BackgroundError(interp);
 	Tcl_SetResult(interp, errorMsg, TCL_DYNAMIC);
@@ -752,7 +753,7 @@ Tnm_SnmpDumpPDU(interp, pdu)
     if (hexdump) {
 
         int i, code, argc;
-	char **argv;
+	const char **argv;
 	char *name, *status;
 
 	name = TnmGetTableValue(tnmSnmpPDUTable, pdu->type);
@@ -1234,12 +1235,12 @@ TnmSnmpGetRequestId()
 int
 Tnm_SnmpSplitVBList(interp, list, varBindSizePtr, varBindPtrPtr)
     Tcl_Interp *interp;
-    char *list;
+    const char *list;
     int *varBindSizePtr;
     SNMP_VarBind **varBindPtrPtr;
 {
     int code, vblc, i;
-    char **vblv;
+    const char **vblv;
     int varBindSize;
     SNMP_VarBind *varBindPtr;
 
@@ -1260,7 +1261,7 @@ Tnm_SnmpSplitVBList(interp, list, varBin
 
     for (i = 0; i < varBindSize; i++) {
         int vbc;
-        char **vbv;
+        const char **vbv;
         code = Tcl_SplitList(interp, vblv[i], &vbc, &vbv);
 	if (code != TCL_OK) {
 	    Tnm_SnmpFreeVBList(varBindSize, varBindPtr);
@@ -1346,7 +1347,7 @@ Tnm_SnmpMergeVBList(varBindSize, varBind
 void
 Tnm_SnmpFreeVBList(varBindSize, varBindPtr)
     int varBindSize;
-    SNMP_VarBind *varBindPtr;
+    const SNMP_VarBind *varBindPtr;
 {
     int i;
     
@@ -1409,7 +1410,7 @@ Tnm_SnmpSysUpTime()
 
 void
 Tnm_SnmpBinToHex(s, n, d)
-    char *s;
+    const char *s;
     int n;
     char *d;
 {
@@ -1446,7 +1447,8 @@ Tnm_SnmpBinToHex(s, n, d)
 
 int
 Tnm_SnmpHexToBin(s, d, n)
-    char *s, *d;
+    const char *s;
+    char *d;
     int *n;
 {
     int v;