1 /* ====================================================================
2 * The Kannel Software License, Version 1.0
3 *
4 * Copyright (c) 2001-2014 Kannel Group
5 * Copyright (c) 1998-2001 WapIT Ltd.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 *
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 *
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in
17 * the documentation and/or other materials provided with the
18 * distribution.
19 *
20 * 3. The end-user documentation included with the redistribution,
21 * if any, must include the following acknowledgment:
22 * "This product includes software developed by the
23 * Kannel Group (http://www.kannel.org/)."
24 * Alternately, this acknowledgment may appear in the software itself,
25 * if and wherever such third-party acknowledgments normally appear.
26 *
27 * 4. The names "Kannel" and "Kannel Group" must not be used to
28 * endorse or promote products derived from this software without
29 * prior written permission. For written permission, please
30 * contact org@kannel.org.
31 *
32 * 5. Products derived from this software may not be called "Kannel",
33 * nor may "Kannel" appear in their name, without prior written
34 * permission of the Kannel Group.
35 *
36 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
37 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
38 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
39 * DISCLAIMED. IN NO EVENT SHALL THE KANNEL GROUP OR ITS CONTRIBUTORS
40 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
41 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
42 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
43 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
44 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
45 * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
46 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
47 * ====================================================================
48 *
49 * This software consists of voluntary contributions made by many
50 * individuals on behalf of the Kannel Group. For more information on
51 * the Kannel Group, please see <http://www.kannel.org/>.
52 *
53 * Portions of this software are based upon software originally written at
54 * WapIT Ltd., Helsinki, Finland for the Kannel project.
55 */
56
57 /*
58 * test_pdu.c - test gw/wtp_pdu packing and unpacking.
59 *
60 * Richard Braakman
61 */
62
63 #include <string.h>
64 #include <unistd.h>
65 #include <signal.h>
66
67 #include "gwlib/gwlib.h"
68 #include "wap/wtp_pdu.h"
69 #include "wap/wsp_pdu.h"
70
main(int argc,char ** argv)71 int main(int argc, char **argv) {
72 int i;
73 Octstr *packet = NULL;
74 Octstr *newpacket = NULL;
75 WTP_PDU *pdu = NULL;
76 Octstr *wsp_data = NULL;
77 WSP_PDU *wsp = NULL;
78
79 gwlib_init();
80
81 for (i = 1; i < argc; i++) {
82 octstr_destroy(packet); packet = NULL;
83 octstr_destroy(newpacket); newpacket = NULL;
84 octstr_destroy(wsp_data); wsp_data = NULL;
85 wtp_pdu_destroy(pdu); pdu = NULL;
86 wsp_pdu_destroy(wsp); wsp = NULL;
87
88 packet = octstr_read_file(argv[i]);
89 pdu = wtp_pdu_unpack(packet);
90 if (!pdu) {
91 warning(0, "Unpacking PDU %s failed", argv[i]);
92 continue;
93 }
94 debug("test", 0, "PDU %s:", argv[i]);
95 wtp_pdu_dump(pdu, 0);
96 newpacket = wtp_pdu_pack(pdu);
97 if (!newpacket) {
98 warning(0, "Repacking PDU %s failed", argv[i]);
99 continue;
100 }
101 if (octstr_compare(packet, newpacket) != 0) {
102 error(0, "Repacking PDU %s changed it", argv[i]);
103 debug("test", 0, "Original:");
104 octstr_dump(packet, 1);
105 debug("test", 0, "New:");
106 octstr_dump(newpacket, 1);
107 continue;
108 }
109 if (pdu->type == Invoke) {
110 wsp_data = pdu->u.Invoke.user_data;
111 } else if (pdu->type == Result) {
112 wsp_data = pdu->u.Result.user_data;
113 } else {
114 continue;
115 }
116 wsp_data = octstr_duplicate(wsp_data);
117
118 wsp = wsp_pdu_unpack(wsp_data);
119 if (!wsp) {
120 warning(0, "Unpacking WSP data in %s failed", argv[i]);
121 continue;
122 }
123 wsp_pdu_dump(wsp, 0);
124 octstr_destroy(newpacket);
125 newpacket = wsp_pdu_pack(wsp);
126 if (!newpacket) {
127 warning(0, "Repacking WSP data in %s failed", argv[i]);
128 continue;
129 }
130 if (octstr_compare(wsp_data, newpacket) != 0) {
131 error(0, "Repacking WSP data in %s changed it",
132 argv[i]);
133 debug("test", 0, "Original:");
134 octstr_dump(wsp_data, 1);
135 debug("test", 0, "New:");
136 octstr_dump(newpacket, 1);
137 continue;
138 }
139 }
140
141 octstr_destroy(packet);
142 octstr_destroy(newpacket);
143 wtp_pdu_destroy(pdu);
144
145 gwlib_shutdown();
146 return 0;
147 }
148