1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <fcntl.h>
#include <stdlib.h>
#include <unistd.h>
#include <sys/ioctl.h>
#include "zaptel.h"
#include "tonezone.h"
#include "wcfxs.h"
static int tones[] = {
ZT_TONE_DIALTONE,
ZT_TONE_BUSY,
ZT_TONE_RINGTONE,
ZT_TONE_CONGESTION,
ZT_TONE_DIALRECALL,
};
int main(int argc, char *argv[])
{
int fd;
int res;
int x;
if (argc < 3) {
fprintf(stderr, "Usage: fxstest <zap device> <cmd>\n"
" where cmd is one of:\n"
" stats - reports voltages\n"
" regdump - dumps ProSLIC registers\n"
" tones - plays a series of tones\n"
" ring - rings phone\n");
exit(1);
}
fd = open(argv[1], O_RDWR);
if (fd < 0) {
fprintf(stderr, "Unable to open %s: %s\n", argv[1], strerror(errno));
exit(1);
}
if (!strcasecmp(argv[2], "ring")) {
fprintf(stderr, "Ringing phone...\n");
x = ZT_RING;
res = ioctl(fd, ZT_HOOK, &x);
if (res) {
fprintf(stderr, "Unable to ring phone...\n");
} else {
fprintf(stderr, "Phone is ringing...\n");
sleep(2);
}
} else if (!strcasecmp(argv[2], "tones")) {
int x = 0;
for (;;) {
res = tone_zone_play_tone(fd, tones[x]);
if (res)
fprintf(stderr, "Unable to play tone %d\n", tones[x]);
sleep(3);
x=(x+1) % (sizeof(tones) / sizeof(tones[0]));
}
} else if (!strcasecmp(argv[2], "stats")) {
struct wcfxs_stats stats;
res = ioctl(fd, WCFXS_GET_STATS, &stats);
if (res) {
fprintf(stderr, "Unable to get stats on channel %s\n", argv[1]);
} else {
printf("TIP: %7.4f Volts\n", (float)stats.tipvolt / 1000.0);
printf("RING: %7.4f Volts\n", (float)stats.ringvolt / 1000.0);
printf("VBAT: %7.4f Volts\n", (float)stats.batvolt / 1000.0);
}
} else if (!strcasecmp(argv[2], "regdump")) {
struct wcfxs_regs regs;
int numregs = NUM_REGS;
memset(®s, 0, sizeof(regs));
res = ioctl(fd, WCFXS_GET_REGS, ®s);
if (res) {
fprintf(stderr, "Unable to get registers on channel %s\n", argv[1]);
} else {
for (x=60;x<NUM_REGS;x++) {
if (regs.direct[x])
break;
}
if (x == NUM_REGS)
numregs = 60;
printf("Direct registers: \n");
for (x=0;x<numregs;x++) {
printf("%3d. %02x ", x, regs.direct[x]);
if ((x % 8) == 7)
printf("\n");
}
if (numregs == NUM_REGS) {
printf("\n\nIndirect registers: \n");
for (x=0;x<NUM_INDIRECT_REGS;x++) {
printf("%3d. %04x ", x, regs.indirect[x]);
if ((x % 6) == 5)
printf("\n");
}
}
printf("\n\n");
}
} else if (!strcasecmp(argv[2], "setdirect") ||
!strcasecmp(argv[2], "setindirect")) {
struct wcfxs_regop regop;
int val;
int reg;
if ((argc < 5) || (sscanf(argv[3], "%i", ®) != 1) ||
(sscanf(argv[4], "%i", &val) != 1)) {
fprintf(stderr, "Need a register and value...\n");
} else {
regop.reg = reg;
regop.val = val;
if (!strcasecmp(argv[2], "setindirect")) {
regop.indirect = 1;
regop.val &= 0xff;
} else {
regop.indirect = 0;
}
res = ioctl(fd, WCFXS_SET_REG, ®op);
if (res)
fprintf(stderr, "Unable to get registers on channel %s\n", argv[1]);
else
printf("Success.\n");
}
} else
fprintf(stderr, "Invalid command\n");
close(fd);
return 0;
}
|
