Fix it so that it builds with "--disable-zlib".
[obnox/wireshark/wip.git] / wiretap / radcom.c
1 /* radcom.c
2  *
3  * $Id: radcom.c,v 1.12 1999/09/24 05:49:52 guy Exp $
4  *
5  * Wiretap Library
6  * Copyright (c) 1998 by Gilbert Ramirez <gram@verdict.uthscsa.edu>
7  * 
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License
10  * as published by the Free Software Foundation; either version 2
11  * of the License, or (at your option) any later version.
12  * 
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  * 
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
21  *
22  */
23 #ifdef HAVE_CONFIG_H
24 #include "config.h"
25 #endif
26
27 #include <stdlib.h>
28 #include <errno.h>
29 #include <time.h>
30 #include "wtap.h"
31 #include "file.h"
32 #include "buffer.h"
33 #include "radcom.h"
34
35 struct frame_date {
36         guint16 year;
37         guint8  month;
38         guint8  day;
39         guint32 sec;            /* seconds since midnight */
40         guint32 usec;
41 };
42
43 struct unaligned_frame_date {
44         char    year[2];
45         char    month;
46         char    day;
47         char    sec[4];         /* seconds since midnight */
48         char    usec[4];
49 };
50
51 static char radcom_magic[8] = {
52         0x42, 0xD2, 0x00, 0x34, 0x12, 0x66, 0x22, 0x88
53 };
54
55 /* RADCOM record header - followed by frame data (perhaps including FCS).
56    The first two bytes of "xxz" appear to equal "length", as do the
57    second two bytes; if a RADCOM box can be told not to save all of
58    the captured packet, might one or the other of those be the
59    captured length of the packet? */
60 struct radcomrec_hdr {
61         char    xxx[4];         /* unknown */
62         char    length[2];      /* packet length */
63         char    xxy[5];         /* unknown */
64         struct unaligned_frame_date date; /* date/time stamp of packet */
65         char    xxz[6];         /* unknown */
66         char    dce;            /* DCE/DTE flag (and other flags?) */
67         char    xxw[9];         /* unknown */
68 };
69
70 static int radcom_read(wtap *wth, int *err);
71
72 int radcom_open(wtap *wth, int *err)
73 {
74         int bytes_read;
75         char magic[8];
76         struct frame_date start_date;
77         guint32 sec;
78         struct tm tm;
79         char byte;
80         char encap_magic[7] = {0x54, 0x43, 0x50, 0x00, 0x42, 0x43, 0x09};
81         char search_encap[7];
82
83         /* Read in the string that should be at the start of a RADCOM file */
84         file_seek(wth->fh, 0, SEEK_SET);
85         errno = WTAP_ERR_CANT_READ;
86         bytes_read = file_read(magic, 1, 8, wth->fh);
87         if (bytes_read != 8) {
88                 if (file_error(wth->fh)) {
89                         *err = errno;
90                         return -1;
91                 }
92                 return 0;
93         }
94
95         if (memcmp(magic, radcom_magic, 8)) {
96                 return 0;
97         }
98
99         file_seek(wth->fh, 0x8B, SEEK_SET);
100         wth->data_offset = 0x8B;
101         errno = WTAP_ERR_CANT_READ;
102         bytes_read = file_read(&byte, 1, 1, wth->fh);
103         if (bytes_read != 1) {
104                 if (file_error(wth->fh)) {
105                         *err = errno;
106                         return -1;
107                 }
108                 return 0;
109         }
110         wth->data_offset += 1;
111         while (byte) {
112                 errno = WTAP_ERR_CANT_READ;
113                 bytes_read = file_read(&byte, 1, 1, wth->fh);
114                 if (bytes_read != 1) {
115                         if (file_error(wth->fh)) {
116                                 *err = errno;
117                                 return -1;
118                         }
119                         return 0;
120                 }
121                 wth->data_offset += 1;
122         }
123         file_seek(wth->fh, 1, SEEK_CUR);
124         wth->data_offset += 1;
125
126         /* Get capture start time */
127         errno = WTAP_ERR_CANT_READ;
128         bytes_read = file_read(&start_date, 1, sizeof(struct frame_date), wth->fh);
129         if (bytes_read != sizeof(struct frame_date)) {
130                 if (file_error(wth->fh)) {
131                         *err = errno;
132                         return -1;
133                 }
134                 return 0;
135         }
136         wth->data_offset += sizeof(struct frame_date);
137
138         /* This is a radcom file */
139         wth->file_type = WTAP_FILE_RADCOM;
140         wth->capture.radcom = g_malloc(sizeof(radcom_t));
141         wth->subtype_read = radcom_read;
142         wth->snapshot_length = 16384;   /* not available in header, only in frame */
143
144         tm.tm_year = pletohs(&start_date.year)-1900;
145         tm.tm_mon = start_date.month-1;
146         tm.tm_mday = start_date.day;
147         sec = pletohl(&start_date.sec);
148         tm.tm_hour = sec/3600;
149         tm.tm_min = (sec%3600)/60;
150         tm.tm_sec = sec%60;
151         tm.tm_isdst = -1;
152         wth->capture.radcom->start = mktime(&tm);
153
154         file_seek(wth->fh, sizeof(struct frame_date), SEEK_CUR);
155         wth->data_offset += sizeof(struct frame_date);
156
157         errno = WTAP_ERR_CANT_READ;
158         bytes_read = file_read(search_encap, 1, 7, wth->fh);
159         if (bytes_read != 7) {
160                 goto read_error;
161         }
162         wth->data_offset += 7;
163         while (memcmp(encap_magic, search_encap, 7)) {
164                 file_seek(wth->fh, -6, SEEK_CUR);
165                 wth->data_offset -= 6;
166                 errno = WTAP_ERR_CANT_READ;
167                 bytes_read = file_read(search_encap, 1, 7, wth->fh);
168                 if (bytes_read != 7) {
169                         goto read_error;
170                 }
171                 wth->data_offset += 7;
172         }
173         file_seek(wth->fh, 12, SEEK_CUR);
174         wth->data_offset += 12;
175         errno = WTAP_ERR_CANT_READ;
176         bytes_read = file_read(search_encap, 1, 4, wth->fh);
177         if (bytes_read != 4) {
178                 goto read_error;
179         }
180         wth->data_offset += 4;
181         if (!memcmp(search_encap, "LAPB", 4))
182                 wth->file_encap = WTAP_ENCAP_LAPB;
183         else if (!memcmp(search_encap, "Ethe", 4))
184                 wth->file_encap = WTAP_ENCAP_ETHERNET;
185         else {
186                 g_message("pcap: network type \"%.4s\" unknown", search_encap);
187                 *err = WTAP_ERR_UNSUPPORTED;
188                 return -1;
189         }
190
191         /*bytes_read = file_read(&next_date, 1, sizeof(struct frame_date), wth->fh);
192         errno = WTAP_ERR_CANT_READ;
193         if (bytes_read != sizeof(struct frame_date)) {
194                 goto read_error;
195         }
196
197         while (memcmp(&start_date, &next_date, 4)) {
198                 file_seek(wth->fh, 1-sizeof(struct frame_date), SEEK_CUR);
199                 errno = WTAP_ERR_CANT_READ;
200                 bytes_read = file_read(&next_date, 1, sizeof(struct frame_date),
201                                    wth->fh);
202                 if (bytes_read != sizeof(struct frame_date)) {
203                         goto read_error;
204                 }
205         }*/
206
207         if (wth->file_encap == WTAP_ENCAP_ETHERNET) {
208                 file_seek(wth->fh, 294, SEEK_CUR);
209                 wth->data_offset += 294;
210         } else if (wth->file_encap == WTAP_ENCAP_LAPB) {
211                 file_seek(wth->fh, 297, SEEK_CUR);
212                 wth->data_offset += 297;
213         }
214
215         return 1;
216
217 read_error:
218         if (file_error(wth->fh)) {
219                 *err = errno;
220                 free(wth->capture.radcom);
221                 return -1;
222         }
223         free(wth->capture.radcom);
224         return 0;
225 }
226
227 /* Read the next packet */
228 static int radcom_read(wtap *wth, int *err)
229 {
230         int     bytes_read;
231         struct radcomrec_hdr hdr;
232         guint16 length;
233         guint32 sec;
234         struct tm tm;
235         int     data_offset;
236         char    fcs[2];
237
238         /* Read record header. */
239         errno = WTAP_ERR_CANT_READ;
240         bytes_read = file_read(&hdr, 1, sizeof hdr, wth->fh);
241         if (bytes_read != sizeof hdr) {
242                 if (file_error(wth->fh)) {
243                         *err = errno;
244                         return -1;
245                 }
246                 if (bytes_read != 0) {
247                         *err = WTAP_ERR_SHORT_READ;
248                         return -1;
249                 }
250                 return 0;
251         }
252         wth->data_offset += sizeof hdr;
253         length = pletohs(&hdr.length);
254         if (length == 0) return 0;
255
256         if (wth->file_encap == WTAP_ENCAP_LAPB)
257                 length -= 2; /* FCS */
258
259         wth->phdr.len = length;
260         wth->phdr.caplen = length;
261
262         tm.tm_year = pletohs(&hdr.date.year)-1900;
263         tm.tm_mon = hdr.date.month-1;
264         tm.tm_mday = hdr.date.day;
265         sec = pletohl(&hdr.date.sec);
266         tm.tm_hour = sec/3600;
267         tm.tm_min = (sec%3600)/60;
268         tm.tm_sec = sec%60;
269         tm.tm_isdst = -1;
270         wth->phdr.ts.tv_sec = mktime(&tm);
271         wth->phdr.ts.tv_usec = pletohl(&hdr.date.usec);
272         wth->phdr.pseudo_header.x25.flags = (hdr.dce & 0x1) ? 0x00 : 0x80;
273
274         /*
275          * Read the packet data.
276          */
277         buffer_assure_space(wth->frame_buffer, length);
278         data_offset = wth->data_offset;
279         errno = WTAP_ERR_CANT_READ;
280         bytes_read = file_read(buffer_start_ptr(wth->frame_buffer), 1,
281                         length, wth->fh);
282
283         if (bytes_read != length) {
284                 if (file_error(wth->fh))
285                         *err = errno;
286                 else
287                         *err = WTAP_ERR_SHORT_READ;
288                 return -1;
289         }
290         wth->data_offset += length;
291
292         wth->phdr.pkt_encap = wth->file_encap;
293
294         if (wth->file_encap == WTAP_ENCAP_LAPB) {
295                 /* Read the FCS.
296                    XXX - should we put it in the pseudo-header? */
297                 errno = WTAP_ERR_CANT_READ;
298                 bytes_read = file_read(&fcs, 1, sizeof fcs, wth->fh);
299                 if (bytes_read != sizeof fcs) {
300                         if (file_error(wth->fh))
301                                 *err = errno;
302                         else
303                                 *err = WTAP_ERR_SHORT_READ;
304                         return -1;
305                 }
306                 wth->data_offset += sizeof fcs;
307         }
308
309         return data_offset;
310 }