SPAN_DECLARE(fax_state_t *) fax_init(fax_state_t *s, int calling_party)
{
if (s == NULL)
{
if ((s = (fax_state_t *) malloc(sizeof(*s))) == NULL)
return NULL;
}
memset(s, 0, sizeof(*s));
span_log_init(&s->logging, SPAN_LOG_NONE, NULL);
span_log_set_protocol(&s->logging, "FAX");
fax_modems_init(&s->modems,
FALSE,
t30_hdlc_accept,
hdlc_underflow_handler,
t30_non_ecm_put_bit,
t30_non_ecm_get_bit,
tone_detected,
&s->t30);
t30_init(&s->t30,
calling_party,
fax_set_rx_type,
(void *) s,
fax_set_tx_type,
(void *) s,
fax_send_hdlc,
(void *) s);
t30_set_supported_modems(&s->t30, T30_SUPPORT_V27TER | T30_SUPPORT_V29 | T30_SUPPORT_V17);
t30_restart(&s->t30);
#if defined(LOG_FAX_AUDIO)
{
char buf[100 + 1];
struct tm *tm;
time_t now;
time(&now);
tm = localtime(&now);
sprintf(buf,
"/tmp/fax-rx-audio-%p-%02d%02d%02d%02d%02d%02d",
s,
tm->tm_year%100,
tm->tm_mon + 1,
tm->tm_mday,
tm->tm_hour,
tm->tm_min,
tm->tm_sec);
s->modems.audio_rx_log = open(buf, O_CREAT | O_TRUNC | O_WRONLY, 0666);
sprintf(buf,
"/tmp/fax-tx-audio-%p-%02d%02d%02d%02d%02d%02d",
s,
tm->tm_year%100,
tm->tm_mon + 1,
tm->tm_mday,
tm->tm_hour,
tm->tm_min,
tm->tm_sec);
s->modems.audio_tx_log = open(buf, O_CREAT | O_TRUNC | O_WRONLY, 0666);
}
#endif
return s;
}
SPAN_DECLARE(fax_state_t *) fax_init(fax_state_t *s, int calling_party)
{
#if 0
v8_parms_t v8_parms;
#endif
if (s == NULL)
{
if ((s = (fax_state_t *) span_alloc(sizeof(*s))) == NULL)
return NULL;
/*endif*/
}
/*endif*/
memset(s, 0, sizeof(*s));
span_log_init(&s->logging, SPAN_LOG_NONE, NULL);
span_log_set_protocol(&s->logging, "FAX");
fax_modems_init(&s->modems,
false,
t30_hdlc_accept,
hdlc_underflow_handler,
t30_non_ecm_put_bit,
t30_non_ecm_get_bit,
tone_detected,
&s->t30);
t30_init(&s->t30,
calling_party,
fax_set_rx_type,
(void *) s,
fax_set_tx_type,
(void *) s,
fax_send_hdlc,
(void *) s);
t30_set_supported_modems(&s->t30, T30_SUPPORT_V27TER | T30_SUPPORT_V29 | T30_SUPPORT_V17);
#if 0
v8_parms.modem_connect_tone = MODEM_CONNECT_TONES_ANSAM_PR;
v8_parms.call_function = V8_CALL_T30_RX;
v8_parms.modulations = V8_MOD_V21;
if (s->t30.supported_modems & T30_SUPPORT_V27TER)
v8_parms.modulations |= V8_MOD_V27TER;
/*endif*/
if (s->t30.supported_modems & T30_SUPPORT_V29)
v8_parms.modulations |= V8_MOD_V29;
/*endif*/
if (s->t30.supported_modems & T30_SUPPORT_V17)
v8_parms.modulations |= V8_MOD_V17;
/*endif*/
if (s->t30.supported_modems & T30_SUPPORT_V34HDX)
v8_parms.modulations |= V8_MOD_V34HDX;
/*endif*/
v8_parms.protocol = V8_PROTOCOL_NONE;
v8_parms.pcm_modem_availability = 0;
v8_parms.pstn_access = 0;
v8_parms.nsf = -1;
v8_parms.t66 = -1;
v8_init(&s->v8, calling_party, &v8_parms, v8_handler, s);
#endif
fax_restart(s, calling_party);
return s;
}
t38_terminal_state_t *t38_terminal_init(t38_terminal_state_t *s,
int calling_party,
t38_tx_packet_handler_t *tx_packet_handler,
void *tx_packet_user_data)
{
if (tx_packet_handler == NULL)
return NULL;
memset(s, 0, sizeof(*s));
span_log_init(&s->logging, SPAN_LOG_NONE, NULL);
span_log_set_protocol(&s->logging, "T.38T");
s->rx_signal_present = FALSE;
s->timed_step = T38_TIMED_STEP_NONE;
s->tx_ptr = 0;
t38_core_init(&s->t38,
process_rx_indicator,
process_rx_data,
process_rx_missing,
(void *) s,
tx_packet_handler,
tx_packet_user_data);
s->t38.fastest_image_data_rate = 14400;
t38_terminal_set_config(s, FALSE);
s->timed_step = T38_TIMED_STEP_NONE;
s->current_tx_data_type = T38_DATA_NONE;
s->next_tx_samples = 0;
t30_init(&(s->t30_state),
calling_party,
set_rx_type,
(void *) s,
set_tx_type,
(void *) s,
send_hdlc,
(void *) s);
t30_set_supported_modems(&(s->t30_state),
T30_SUPPORT_V27TER | T30_SUPPORT_V29 | T30_SUPPORT_V17 | T30_SUPPORT_IAF);
t30_set_iaf_mode(&(s->t30_state), T30_IAF_MODE_T37 | T30_IAF_MODE_T38);
t30_restart(&s->t30_state);
return s;
}
static void handle_uc_event(uc_t *uc, void *user_data, uc_event_t *e)
{
int chan;
chan = (int) user_data;
printf ("-- %s (%d)\n", uc_event2str(e->e), chan);
switch (e->e)
{
case UC_EVENT_DEVICEFAIL:
break;
case UC_EVENT_PROTOCOLFAIL:
printf("-- Protocol failure on channel %d, cause %d\n", e->gen.channel, e->gen.data);
break;
case UC_EVENT_SIGCHANSTATUS:
printf("-- Signalling channel status - %s\n", e->sigchanstatus.ok ? "Up" : "Down");
break;
case UC_EVENT_ALARM:
printf("-- Alarm - 0x%X 0x%X\n", e->alarm.raised, e->alarm.cleared);
break;
case UC_EVENT_FARBLOCKED:
printf("-- Channel far end blocked! :-(\n");
chan_stuff[chan].xxx &= ~1;
break;
case UC_EVENT_FARUNBLOCKED:
printf("-- Channel far end unblocked! :-)\n");
chan_stuff[chan].xxx |= 1;
if (chan_stuff[chan].xxx == 3)
{
if (caller_mode)
initiate_call(uc, chan, e);
/*endif*/
}
/*endif*/
break;
case UC_EVENT_LOCALBLOCKED:
printf("-- Channel local end blocked! :-(\n");
chan_stuff[chan].xxx &= ~2;
break;
case UC_EVENT_LOCALUNBLOCKED:
printf("-- Channel local end unblocked! :-)\n");
chan_stuff[chan].xxx |= 2;
if (chan_stuff[chan].xxx == 3)
{
if (caller_mode)
initiate_call(uc, chan, e);
/*endif*/
}
/*endif*/
break;
case UC_EVENT_DIALING:
printf("-- Dialing on channel %d\n", e->gen.channel);
break;
case UC_EVENT_PROCEEDING:
printf("-- Proceeding on channel %d\n", e->gen.channel);
break;
case UC_EVENT_ACCEPTED:
printf("-- Accepted on channel %d\n", e->gen.channel);
if (uc_call_control(uc, UC_OP_ANSWERCALL, e->gen.crn, (void *) -1))
fprintf(stderr, "Answer Call failed\n");
/*endif*/
break;
case UC_EVENT_DETECTED:
printf("-- Detected on channel %d\n", e->gen.channel);
break;
case UC_EVENT_MOREDIGITS:
printf("-- More digits on channel %d, CRN %d (ANI: %s, DNIS: %s)\n", e->offered.channel, e->offered.crn, e->offered.parms.originating_number, e->offered.parms.destination_number);
break;
case UC_EVENT_ALERTING:
printf("-- Alerting on channel %d\n", e->gen.channel);
/* This is just a notification of call progress. We need take no action at this point. */
break;
case UC_EVENT_FARDISCONNECTED:
printf("-- Far end disconnected on channel %d\n", e->fardisconnected.channel);
/* Kill any outstanding audio processing */
uc_set_channel_read_callback(uc, 0, NULL, 0);
uc_set_channel_write_callback(uc, 0, NULL, 0);
if (uc_call_control(uc, UC_OP_DROPCALL, e->fardisconnected.crn, (void *) UC_CAUSE_NORMAL_CLEARING))
fprintf(stderr, "C Drop Call failed\n");
/*endif*/
break;
case UC_EVENT_DROPCALL:
printf("-- Drop call on channel %d\n", e->gen.channel);
if (uc_call_control(uc, UC_OP_RELEASECALL, e->gen.crn, NULL))
fprintf(stderr, "uc_ReleaseCall failed\n");
/*endif*/
break;
case UC_EVENT_RELEASECALL:
printf("-- Released on channel %d\n", e->gen.channel);
if (caller_mode)
initiate_call(uc, chan, e);
/*endif*/
break;
case UC_EVENT_OFFERED:
printf("-- Offered on channel %d, CRN %d (ANI: %s, DNIS: %s)\n", e->offered.channel, e->offered.crn, e->offered.parms.originating_number, e->offered.parms.destination_number);
if (!caller_mode)
{
switch (chan_stuff[chan].cause)
{
case 0:
if (uc_call_control(uc, UC_OP_ACCEPTCALL, e->offered.crn, (void *) -1))
fprintf(stderr, "uc_AcceptCall failed\n");
/*endif*/
chan_stuff[chan].crn = e->offered.crn;
break;
case 1:
if (uc_call_control(uc, UC_OP_ANSWERCALL, e->offered.crn, (void *) -1))
fprintf(stderr, "uc_AnswerCall failed\n");
/*endif*/
chan_stuff[chan].crn = e->offered.crn;
break;
case 2:
if (uc_call_control(uc, UC_OP_DROPCALL, e->offered.crn, (void *) UC_CAUSE_USER_BUSY))
fprintf(stderr, "E Drop Call failed\n");
/*endif*/
break;
case 3:
if (uc_call_control(uc, UC_OP_DROPCALL, e->offered.crn, (void *) UC_CAUSE_UNASSIGNED_NUMBER))
fprintf(stderr, "F Drop Call failed\n");
/*endif*/
break;
case 4:
if (uc_call_control(uc, UC_OP_DROPCALL, e->offered.crn, (void *) UC_CAUSE_NETWORK_CONGESTION))
fprintf(stderr, "G Drop Call failed\n");
/*endif*/
break;
case 5:
if (uc_call_control(uc, UC_OP_DROPCALL, e->offered.crn, (void *) UC_CAUSE_DEST_OUT_OF_ORDER))
fprintf(stderr, "H Drop Call failed\n");
/*endif*/
break;
}
/*endswitch*/
if (++chan_stuff[chan].cause > 5)
chan_stuff[chan].cause = 0;
/*endif*/
}
/*endif*/
break;
case UC_EVENT_ANSWERED:
printf("-- Answered on channel %d\n", e->gen.channel);
uc_set_channel_read_callback(uc, 0, channel_read_fax_channel, (void *) chan);
printf("XXX read callback set\n");
uc_set_channel_write_callback(uc, 0, channel_write_fax_channel, (void *) chan);
printf("XXX write callback set\n");
t30_init(&(chan_stuff[chan].fax), FALSE, uc);
t30_set_local_ident(&(chan_stuff[chan].fax), "12345678");
t30_set_tx_file(&(chan_stuff[chan].fax), "tx.tif");
//t30_set_rx_file(&(chan_stuff[chan].fax), "rx.tif");
t30_set_phase_b_handler(&(chan_stuff[chan].fax), phase_b_handler, &(chan_stuff[chan]));
t30_set_phase_d_handler(&(chan_stuff[chan].fax), phase_d_handler, &(chan_stuff[chan]));
t30_set_phase_e_handler(&(chan_stuff[chan].fax), phase_e_handler, &(chan_stuff[chan]));
t30_set_flush_handler(&(chan_stuff[chan].fax), flush_handler, &(chan_stuff[chan]));
printf("XXX FAX inited\n");
dtmf_rx_init(&chan_stuff[chan].dtmf_state, NULL, NULL);
printf("XXX DTMF inited\n");
break;
case UC_EVENT_CONNECTED:
printf("-- Connected on channel %d\n", e->gen.channel);
uc_set_channel_read_callback(uc, 0, channel_read_fax_channel, (void *) chan);
printf("XXX read callback set\n");
uc_set_channel_write_callback(uc, 0, channel_write_fax_channel, (void *) chan);
printf("XXX write callback set\n");
t30_init(&(chan_stuff[chan].fax), TRUE, uc);
t30_set_local_ident(&(chan_stuff[chan].fax), "87654321");
t30_set_tx_file(&(chan_stuff[chan].fax), "tx.tif");
//t30_set_rx_file(&(chan_stuff[chan].fax), "rx.tif");
t30_set_phase_b_handler(&(chan_stuff[chan].fax), phase_b_handler, &(chan_stuff[chan]));
t30_set_phase_d_handler(&(chan_stuff[chan].fax), phase_d_handler, &(chan_stuff[chan]));
t30_set_phase_e_handler(&(chan_stuff[chan].fax), phase_e_handler, &(chan_stuff[chan]));
printf("XXX FAX inited\n");
#if 0
if (uc_call_control(uc, UC_OP_DROPCALL, e->offered.crn, (void *) UC_CAUSE_NORMAL_CLEARING))
printf ("I Drop Call failed\n");
/*endif*/
#endif
break;
default:
fprintf(stderr, "--!! Unknown signaling event %d\n", e->e);
break;
}
/*endswitch*/
}
fax_state_t *fax_init(fax_state_t *s, int calling_party)
{
if (s == NULL)
{
if ((s = (fax_state_t *) malloc(sizeof(*s))) == NULL)
return NULL;
}
memset(s, 0, sizeof(*s));
span_log_init(&s->logging, SPAN_LOG_NONE, NULL);
span_log_set_protocol(&s->logging, "FAX");
t30_init(&(s->t30_state),
calling_party,
fax_set_rx_type,
(void *) s,
fax_set_tx_type,
(void *) s,
fax_send_hdlc,
(void *) s);
t30_set_supported_modems(&(s->t30_state),
T30_SUPPORT_V27TER | T30_SUPPORT_V29);
hdlc_rx_init(&(s->hdlcrx), FALSE, FALSE, 5, t30_hdlc_accept, &(s->t30_state));
fsk_rx_init(&(s->v21rx), &preset_fsk_specs[FSK_V21CH2], TRUE, (put_bit_func_t) hdlc_rx_put_bit, &(s->hdlcrx));
fsk_rx_signal_cutoff(&(s->v21rx), -45.5);
hdlc_tx_init(&(s->hdlctx), FALSE, 2, FALSE, hdlc_underflow_handler, &(s->t30_state));
s->first_tx_hdlc_frame = TRUE;
fsk_tx_init(&(s->v21tx), &preset_fsk_specs[FSK_V21CH2], (get_bit_func_t) hdlc_tx_get_bit, &(s->hdlctx));
v17_rx_init(&(s->v17rx), 14400, t30_non_ecm_put_bit, &(s->t30_state));
v17_tx_init(&(s->v17tx), 14400, s->use_tep, t30_non_ecm_get_bit, &(s->t30_state));
v29_rx_init(&(s->v29rx), 9600, t30_non_ecm_put_bit, &(s->t30_state));
v29_rx_signal_cutoff(&(s->v29rx), -45.5);
v29_tx_init(&(s->v29tx), 9600, s->use_tep, t30_non_ecm_get_bit, &(s->t30_state));
v27ter_rx_init(&(s->v27ter_rx), 4800, t30_non_ecm_put_bit, &(s->t30_state));
v27ter_tx_init(&(s->v27ter_tx), 4800, s->use_tep, t30_non_ecm_get_bit, &(s->t30_state));
silence_gen_init(&(s->silence_gen), 0);
dc_restore_init(&(s->dc_restore));
t30_restart(&(s->t30_state));
#if defined(LOG_FAX_AUDIO)
{
char buf[100 + 1];
struct tm *tm;
time_t now;
time(&now);
tm = localtime(&now);
sprintf(buf,
"/tmp/fax-rx-audio-%x-%02d%02d%02d%02d%02d%02d",
s,
tm->tm_year%100,
tm->tm_mon + 1,
tm->tm_mday,
tm->tm_hour,
tm->tm_min,
tm->tm_sec);
s->fax_audio_rx_log = open(buf, O_CREAT | O_TRUNC | O_WRONLY, 0666);
sprintf(buf,
"/tmp/fax-tx-audio-%x-%02d%02d%02d%02d%02d%02d",
s,
tm->tm_year%100,
tm->tm_mon + 1,
tm->tm_mday,
tm->tm_hour,
tm->tm_min,
tm->tm_sec);
s->fax_audio_tx_log = open(buf, O_CREAT | O_TRUNC | O_WRONLY, 0666);
}
#endif
return s;
}
