1 /* 2 * Copyright 1992 by Jutta Degener and Carsten Bormann, Technische 3 * Universitaet Berlin. See the accompanying file "COPYRIGHT" for 4 * details. THERE IS ABSOLUTELY NO WARRANTY FOR THIS SOFTWARE. 5 */ 6 7 /*$Header: /tmp_amd/presto/export/kbs/jutta/src/gsm/RCS/cod2txt.c,v 1.1 1994/10/21 20:52:11 jutta Exp $*/ 8 9 #include <stdio.h> 10 #include <assert.h> 11 12 #include "gsm.h" 13 #include "proto.h" 14 15 char * pname; 16 17 int debug = 0; 18 int verbosity = 0; 19 int error = 0; 20 21 usage P0() 22 { 23 fprintf(stderr, "Usage: %s [files...]\n", pname); 24 exit(1); 25 } 26 27 void process P2((f, filename), FILE * f, char * filename) 28 { 29 gsm_frame buf; 30 gsm_signal source[160]; 31 32 int cc; 33 gsm r; 34 int nr=0; 35 36 (void)memset(source, 0, sizeof(source)); 37 38 if (!(r = gsm_create())) { 39 perror("gsm_create"); 40 error = 1; 41 return ; 42 } 43 gsm_option(r, GSM_OPT_VERBOSE, &verbosity); 44 for (;;) { 45 cc = fread((char *)source, sizeof(*source), 76, f); 46 if (cc == 0) { 47 gsm_destroy(r); 48 return; 49 } 50 if (cc != 76) { 51 error = 1; 52 fprintf(stderr, 53 "%s: %s -- %d trailing bytes ignored\n", 54 pname, filename, cc); 55 gsm_destroy(r); 56 return; 57 } 58 59 gsm_implode(r, source, buf); 60 printf("[%d] ", ++nr); 61 if (gsm_print(stdout, r, buf)) { 62 fprintf(stderr, 63 "%s: %s: bad magic\n", pname, filename); 64 gsm_destroy(r); 65 return; 66 67 } 68 } 69 } 70 71 main P2((ac, av), int ac, char ** av) 72 { 73 int opt; 74 extern char * optarg; 75 extern int optind; 76 77 FILE * f; 78 79 if (!(pname = av[0])) pname = "cod2txt"; 80 81 ac--; 82 av++; 83 84 if (!ac) process(stdin, "*stdin*"); 85 else for (; *av; av++) { 86 if (!(f = fopen(*av, "r"))) perror(*av); 87 else { 88 process(f, *av); 89 fclose(f); 90 } 91 } 92 93 exit(error); 94 } 95
