Move #include <time.h> into wtap-int.h instead of requiring it in
[obnox/wireshark/wip.git] / wiretap / radcom.c
1 /* radcom.c
2  *
3  * $Id: radcom.c,v 1.25 2000/08/25 21:25:42 gram Exp $
4  *
5  * Wiretap Library
6  * Copyright (c) 1998 by Gilbert Ramirez <gram@xiexie.org>
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 "wtap-int.h"
30 #include "file_wrappers.h"
31 #include "buffer.h"
32 #include "radcom.h"
33
34 struct frame_date {
35         guint16 year;
36         guint8  month;
37         guint8  day;
38         guint32 sec;            /* seconds since midnight */
39         guint32 usec;
40 };
41
42 struct unaligned_frame_date {
43         char    year[2];
44         char    month;
45         char    day;
46         char    sec[4];         /* seconds since midnight */
47         char    usec[4];
48 };
49
50 static guint8 radcom_magic[8] = {
51         0x42, 0xD2, 0x00, 0x34, 0x12, 0x66, 0x22, 0x88
52 };
53
54 /* RADCOM record header - followed by frame data (perhaps including FCS).
55    The first two bytes of "xxz" appear to equal "length", as do the
56    second two bytes; if a RADCOM box can be told not to save all of
57    the captured packet, might one or the other of those be the
58    captured length of the packet? */
59 struct radcomrec_hdr {
60         char    xxx[4];         /* unknown */
61         char    length[2];      /* packet length */
62         char    xxy[5];         /* unknown */
63         struct unaligned_frame_date date; /* date/time stamp of packet */
64         char    xxz[6];         /* unknown */
65         char    dce;            /* DCE/DTE flag (and other flags?) */
66         char    xxw[9];         /* unknown */
67 };
68
69 static int radcom_read(wtap *wth, int *err);
70 static int radcom_seek_read(wtap *wth, int seek_off,
71         union wtap_pseudo_header *pseudo_header, u_char *pd, int length);
72 static int radcom_read_rec_header(FILE_T fh, struct radcomrec_hdr *hdr,
73         int *err);
74 static int radcom_read_rec_data(FILE_T fh, u_char *pd, int length, int *err);
75
76 int radcom_open(wtap *wth, int *err)
77 {
78         int bytes_read;
79         char magic[8];
80         struct frame_date start_date;
81         guint32 sec;
82         struct tm tm;
83         char byte;
84         char encap_magic[7] = {0x54, 0x43, 0x50, 0x00, 0x42, 0x43, 0x09};
85         char search_encap[7];
86
87         /* Read in the string that should be at the start of a RADCOM file */
88         file_seek(wth->fh, 0, SEEK_SET);
89         errno = WTAP_ERR_CANT_READ;
90         bytes_read = file_read(magic, 1, 8, wth->fh);
91         if (bytes_read != 8) {
92                 *err = file_error(wth->fh);
93                 if (*err != 0)
94                         return -1;
95                 return 0;
96         }
97
98         if (memcmp(magic, radcom_magic, 8) != 0) {
99                 return 0;
100         }
101
102         file_seek(wth->fh, 0x8B, SEEK_SET);
103         wth->data_offset = 0x8B;
104         errno = WTAP_ERR_CANT_READ;
105         bytes_read = file_read(&byte, 1, 1, wth->fh);
106         if (bytes_read != 1) {
107                 *err = file_error(wth->fh);
108                 if (*err != 0)
109                         return -1;
110                 return 0;
111         }
112         wth->data_offset += 1;
113         while (byte) {
114                 errno = WTAP_ERR_CANT_READ;
115                 bytes_read = file_read(&byte, 1, 1, wth->fh);
116                 if (bytes_read != 1) {
117                         *err = file_error(wth->fh);
118                         if (*err != 0)
119                                 return -1;
120                         return 0;
121                 }
122                 wth->data_offset += 1;
123         }
124         file_seek(wth->fh, 1, SEEK_CUR);
125         wth->data_offset += 1;
126
127         /* Get capture start time */
128         errno = WTAP_ERR_CANT_READ;
129         bytes_read = file_read(&start_date, 1, sizeof(struct frame_date), wth->fh);
130         if (bytes_read != sizeof(struct frame_date)) {
131                 *err = file_error(wth->fh);
132                 if (*err != 0)
133                         return -1;
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->subtype_read = radcom_read;
141         wth->subtype_seek_read = radcom_seek_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
153         file_seek(wth->fh, sizeof(struct frame_date), SEEK_CUR);
154         wth->data_offset += sizeof(struct frame_date);
155
156         errno = WTAP_ERR_CANT_READ;
157         bytes_read = file_read(search_encap, 1, 7, wth->fh);
158         if (bytes_read != 7) {
159                 goto read_error;
160         }
161         wth->data_offset += 7;
162         while (memcmp(encap_magic, search_encap, 7)) {
163                 file_seek(wth->fh, -6, SEEK_CUR);
164                 wth->data_offset -= 6;
165                 errno = WTAP_ERR_CANT_READ;
166                 bytes_read = file_read(search_encap, 1, 7, wth->fh);
167                 if (bytes_read != 7) {
168                         goto read_error;
169                 }
170                 wth->data_offset += 7;
171         }
172         file_seek(wth->fh, 12, SEEK_CUR);
173         wth->data_offset += 12;
174         errno = WTAP_ERR_CANT_READ;
175         bytes_read = file_read(search_encap, 1, 4, wth->fh);
176         if (bytes_read != 4) {
177                 goto read_error;
178         }
179         wth->data_offset += 4;
180         if (!memcmp(search_encap, "LAPB", 4))
181                 wth->file_encap = WTAP_ENCAP_LAPB;
182         else if (!memcmp(search_encap, "Ethe", 4))
183                 wth->file_encap = WTAP_ENCAP_ETHERNET;
184         else {
185                 g_message("pcap: network type \"%.4s\" unknown", search_encap);
186                 *err = WTAP_ERR_UNSUPPORTED_ENCAP;
187                 return -1;
188         }
189
190         /*bytes_read = file_read(&next_date, 1, sizeof(struct frame_date), wth->fh);
191         errno = WTAP_ERR_CANT_READ;
192         if (bytes_read != sizeof(struct frame_date)) {
193                 goto read_error;
194         }
195
196         while (memcmp(&start_date, &next_date, 4)) {
197                 file_seek(wth->fh, 1-sizeof(struct frame_date), SEEK_CUR);
198                 errno = WTAP_ERR_CANT_READ;
199                 bytes_read = file_read(&next_date, 1, sizeof(struct frame_date),
200                                    wth->fh);
201                 if (bytes_read != sizeof(struct frame_date)) {
202                         goto read_error;
203                 }
204         }*/
205
206         if (wth->file_encap == WTAP_ENCAP_ETHERNET) {
207                 file_seek(wth->fh, 294, SEEK_CUR);
208                 wth->data_offset += 294;
209         } else if (wth->file_encap == WTAP_ENCAP_LAPB) {
210                 file_seek(wth->fh, 297, SEEK_CUR);
211                 wth->data_offset += 297;
212         }
213
214         return 1;
215
216 read_error:
217         *err = file_error(wth->fh);
218         if (*err != 0)
219                 return -1;
220         return 0;
221 }
222
223 /* Read the next packet */
224 static int radcom_read(wtap *wth, int *err)
225 {
226         int     record_offset;
227         int     ret;
228         struct radcomrec_hdr hdr;
229         guint16 length;
230         guint32 sec;
231         int     bytes_read;
232         struct tm tm;
233         char    fcs[2];
234
235         /* Read record header. */
236         record_offset = wth->data_offset;
237         ret = radcom_read_rec_header(wth->fh, &hdr, err);
238         if (ret <= 0) {
239                 /* Read error or EOF */
240                 return ret;
241         }
242         wth->data_offset += sizeof hdr;
243         length = pletohs(&hdr.length);
244         if (length == 0) return 0;
245
246         if (wth->file_encap == WTAP_ENCAP_LAPB)
247                 length -= 2; /* FCS */
248
249         wth->phdr.len = length;
250         wth->phdr.caplen = length;
251
252         tm.tm_year = pletohs(&hdr.date.year)-1900;
253         tm.tm_mon = hdr.date.month-1;
254         tm.tm_mday = hdr.date.day;
255         sec = pletohl(&hdr.date.sec);
256         tm.tm_hour = sec/3600;
257         tm.tm_min = (sec%3600)/60;
258         tm.tm_sec = sec%60;
259         tm.tm_isdst = -1;
260         wth->phdr.ts.tv_sec = mktime(&tm);
261         wth->phdr.ts.tv_usec = pletohl(&hdr.date.usec);
262         wth->pseudo_header.x25.flags = (hdr.dce & 0x1) ? 0x00 : 0x80;
263
264         /*
265          * Read the packet data.
266          */
267         buffer_assure_space(wth->frame_buffer, length);
268         if (radcom_read_rec_data(wth->fh,
269             buffer_start_ptr(wth->frame_buffer), length, err) < 0)
270                 return -1;      /* Read error */
271         wth->data_offset += length;
272
273         wth->phdr.pkt_encap = wth->file_encap;
274
275         if (wth->file_encap == WTAP_ENCAP_LAPB) {
276                 /* Read the FCS.
277                    XXX - should we put it in the pseudo-header? */
278                 errno = WTAP_ERR_CANT_READ;
279                 bytes_read = file_read(&fcs, 1, sizeof fcs, wth->fh);
280                 if (bytes_read != sizeof fcs) {
281                         *err = file_error(wth->fh);
282                         if (*err == 0)
283                                 *err = WTAP_ERR_SHORT_READ;
284                         return -1;
285                 }
286                 wth->data_offset += sizeof fcs;
287         }
288
289         return record_offset;
290 }
291
292 static int
293 radcom_seek_read(wtap *wth, int seek_off,
294     union wtap_pseudo_header *pseudo_header, u_char *pd, int length)
295 {
296         int     ret;
297         int     err;            /* XXX - return this */
298         struct radcomrec_hdr hdr;
299
300         file_seek(wth->random_fh, seek_off, SEEK_SET);
301
302         /* Read record header. */
303         ret = radcom_read_rec_header(wth->random_fh, &hdr, &err);
304         if (ret <= 0) {
305                 /* Read error or EOF */
306                 return ret;
307         }
308
309         pseudo_header->x25.flags = (hdr.dce & 0x1) ? 0x00 : 0x80;
310
311         /*
312          * Read the packet data.
313          */
314         return radcom_read_rec_data(wth->random_fh, pd, length, &err);
315 }
316
317 static int
318 radcom_read_rec_header(FILE_T fh, struct radcomrec_hdr *hdr, int *err)
319 {
320         int     bytes_read;
321
322         errno = WTAP_ERR_CANT_READ;
323         bytes_read = file_read(hdr, 1, sizeof *hdr, fh);
324         if (bytes_read != sizeof *hdr) {
325                 *err = file_error(fh);
326                 if (*err != 0)
327                         return -1;
328                 if (bytes_read != 0) {
329                         *err = WTAP_ERR_SHORT_READ;
330                         return -1;
331                 }
332                 return 0;
333         }
334         return 1;
335 }
336
337 static int
338 radcom_read_rec_data(FILE_T fh, u_char *pd, int length, int *err)
339 {
340         int     bytes_read;
341
342         errno = WTAP_ERR_CANT_READ;
343         bytes_read = file_read(pd, 1, length, fh);
344
345         if (bytes_read != length) {
346                 *err = file_error(fh);
347                 if (*err == 0)
348                         *err = WTAP_ERR_SHORT_READ;
349                 return -1;
350         }
351         return 0;
352 }