summaryrefslogtreecommitdiff
path: root/sys/src/cmd/fax/fax2modem.c
blob: 00640ab49a93217afb9d04497f919b3f80b5b372 (plain)
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
#include <u.h>
#include <libc.h>
#include <bio.h>

#include "modem.h"

int
initfaxmodem(Modem *m)
{
	m->fax = 1;
	m->phase = 'A';
	m->valid = 0;

	return Eok;
}

static int
parameters(long a[], char *s)
{
	char *p;
	int i;

	i = 0;
	if((p = strchr(s, ':')) == 0)
		return 0;
	p++;
	while(s = strchr(p, ',')){
		a[i++] = strtol(p, 0, 10);
		p = s+1;
	}
	if(p)
		a[i++] = strtol(p, 0, 10);

	return i;
}

int
fcon(Modem *m)
{
	verbose("fcon: %s", m->response);
	if(m->fax == 0 || m->phase != 'A')
		return Rrerror;
	m->phase = 'B';
	return Rcontinue;
}

int
ftsi(Modem *m)
{
	char *p, *q;

	verbose("ftsi: %s", m->response);
	if((p = strchr(m->response, '"')) == 0 || (q = strrchr(p+1, '"')) == 0)
		return Rrerror;
	while(*++p == ' ')
		;
	*q = 0;
	if((m->valid &  Vftsi) == 0){
		strncpy(m->ftsi, p, sizeof(m->ftsi)-1);
		m->valid |= Vftsi;
	}
	return Rcontinue;
}

int
fdcs(Modem *m)
{
	verbose("fdcs: %s", m->response);
	parameters(m->fdcs, m->response);
	m->valid |= Vfdcs;
	return Rcontinue;
}

int
fcfr(Modem *m)
{
	verbose("fcfr: %s", m->response);
	if(m->fax == 0)
		return Rrerror;
	/* ???? */
	return Rcontinue;
}

int
fpts(Modem *m)
{
	verbose("fpts: %s", m->response);
	if(m->fax == 0)
		return Rrerror;
	parameters(m->fpts, m->response);
	m->valid |= Vfpts;
	return Rcontinue;
}

int
fet(Modem *m)
{
	char *p;

	verbose("fet: %s", m->response);
	if(m->fax == 0 || (p = strchr(m->response, ':')) == 0)
		return Rrerror;
	m->fet = strtol(p+1, 0, 10);
	m->valid |= Vfet;
	return Rcontinue;
}

int
fhng(Modem *m)
{
	char *p;

	verbose("fhng: %s", m->response);
	if(m->fax == 0 || (p = strchr(m->response, ':')) == 0)
		return Rrerror;
	m->fhng = strtol(p+1, 0, 10);
	m->valid |= Vfhng;
	return Rhangup;
}