FreeCalypso > hg > freecalypso-tools
comparison rvinterf/asyncshell/tchplay.c @ 0:e7502631a0f9
initial import from freecalypso-sw rev 1033:5ab737ac3ad7
| author | Mychaela Falconia <falcon@freecalypso.org> |
|---|---|
| date | Sat, 11 Jun 2016 00:13:35 +0000 |
| parents | |
| children | 971906d7763d |
comparison
equal
deleted
inserted
replaced
| -1:000000000000 | 0:e7502631a0f9 |
|---|---|
| 1 /* | |
| 2 * TCH uplink play-from-file functionality | |
| 3 */ | |
| 4 | |
| 5 #include <sys/types.h> | |
| 6 #include <stdio.h> | |
| 7 #include <string.h> | |
| 8 #include <strings.h> | |
| 9 #include <stdlib.h> | |
| 10 #include "pktmux.h" | |
| 11 #include "tch_feature.h" | |
| 12 | |
| 13 extern u_char rvi_msg[]; | |
| 14 extern int rvi_msg_len; | |
| 15 | |
| 16 extern void async_msg_output(); | |
| 17 | |
| 18 static FILE *gsm_data_file; | |
| 19 static int queued_frames; | |
| 20 | |
| 21 #define QUEUE_LIMIT 3 | |
| 22 | |
| 23 static void | |
| 24 sync_msgout(msg) | |
| 25 char *msg; | |
| 26 { | |
| 27 printf("%s\n", msg); | |
| 28 } | |
| 29 | |
| 30 static void | |
| 31 fill_uplink(msgout) | |
| 32 void (*msgout)(); | |
| 33 { | |
| 34 u_char readbytes[33], sendpkt[35]; | |
| 35 int cc; | |
| 36 | |
| 37 sendpkt[0] = RVT_TCH_HEADER; | |
| 38 sendpkt[1] = TCH_ULBITS_REQ; | |
| 39 while (queued_frames < QUEUE_LIMIT) { | |
| 40 cc = fread(readbytes, 1, 33, gsm_data_file); | |
| 41 if (cc < 33) { | |
| 42 if (cc) | |
| 43 msgout("TCH UL: extra bytes at the end of the file"); | |
| 44 msgout("TCH UL: file play finished"); | |
| 45 gsm_data_file = 0; | |
| 46 return; | |
| 47 } | |
| 48 if ((readbytes[0] & 0xF0) != 0xD0) { | |
| 49 msgout("TCH UL: bad file input, play aborted"); | |
| 50 gsm_data_file = 0; | |
| 51 return; | |
| 52 } | |
| 53 gsm0610_libgsm_to_tidsp(readbytes, sendpkt + 2); | |
| 54 send_pkt_to_target(sendpkt, 35); | |
| 55 queued_frames++; | |
| 56 } | |
| 57 } | |
| 58 | |
| 59 void | |
| 60 tch_ulbits_conf() | |
| 61 { | |
| 62 if (queued_frames > 0) | |
| 63 queued_frames--; | |
| 64 if (gsm_data_file) | |
| 65 fill_uplink(async_msg_output); | |
| 66 } | |
| 67 | |
| 68 static void | |
| 69 cmd_tch_play_start(filename) | |
| 70 char *filename; | |
| 71 { | |
| 72 if (gsm_data_file) { | |
| 73 printf("error: tch play session already in progress\n"); | |
| 74 return; | |
| 75 } | |
| 76 gsm_data_file = fopen(filename, "r"); | |
| 77 if (!gsm_data_file) { | |
| 78 perror(filename); | |
| 79 return; | |
| 80 } | |
| 81 printf("Starting TCH UL play from file\n"); | |
| 82 tch_rx_control(1); | |
| 83 fill_uplink(sync_msgout); | |
| 84 } | |
| 85 | |
| 86 static void | |
| 87 cmd_tch_play_stop() | |
| 88 { | |
| 89 if (!gsm_data_file) { | |
| 90 printf("error: no tch play session in progress\n"); | |
| 91 return; | |
| 92 } | |
| 93 fclose(gsm_data_file); | |
| 94 gsm_data_file = 0; | |
| 95 printf("TCH UL play from file terminated\n"); | |
| 96 } | |
| 97 | |
| 98 void | |
| 99 cmd_tch_play(argc, argv) | |
| 100 char **argv; | |
| 101 { | |
| 102 if (argc < 2) { | |
| 103 printf("error: too few arguments\n"); | |
| 104 return; | |
| 105 } | |
| 106 if (strcmp(argv[1], "stop")) | |
| 107 cmd_tch_play_start(argv[1]); | |
| 108 else | |
| 109 cmd_tch_play_stop(); | |
| 110 } | |
| 111 | |
| 112 void | |
| 113 show_tch_play_status() | |
| 114 { | |
| 115 printf("TCH UL play from file: %s\n", | |
| 116 gsm_data_file ? "RUNNING" : "not running"); | |
| 117 printf("Outstanding UL frames: %d\n", queued_frames); | |
| 118 } |
