** **
\*****************************************************************************/
+/* HOW TO audio?
+
+Audio flow has two ways:
+
+* from channel to the upper layer
+ -> sound from mISDN channel
+ -> announcement from vbox channel
+
+* from the upper layer to the channel
+ -> sound from remote channel
+ -> sound from asterisk
+
+Audio is required:
+
+ -> if local or remote channel is not mISDN
+ -> if endpoint is linked to asterisk
+ -> if call is recorded (vbox)
+
+
+Functions:
+
+* PmISDN::txfromup
+ -> audio from upper layer is buffered for later transmission to channel
+* PmISDN::handler
+ -> buffered audio from upper layer or tones are transmitted via system clock
+* mISDN_handler
+ -> rx-data from port to record() and upper layer
+ -> tx-data from port (dsp) to record()
+* VboxPort::handler
+ -> streaming announcement to upper layer
+ -> recording announcement
+* VboxPort::message_epoint
+ -> recording audio message from upper layer
+
+
+
+*/
+
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <errno.h>
#include "main.h"
-#define BETTERDELAY
-
-//#define MIXER_DEBUG /* debug mixer buffer overflow and underrun */
-
class Port *port_first = NULL;
unsigned long port_serial = 1; /* must be 1, because 0== no port */
/* free */
PDEBUG(DEBUG_EPOINT, "PORT(%d) removed epoint from port\n", p_serial);
- memset(temp, 0, sizeof(struct epoint_list));
- free(temp);
+ FREE(temp, sizeof(struct epoint_list));
ememuse--;
}
}
if (temp == 0)
{
- PERROR("epoint_id not in port's list, exitting.\n");
+ PERROR("epoint_id not in port's list.\n");
return;
}
/* detach */
/* free */
PDEBUG(DEBUG_EPOINT, "PORT(%d) removed epoint from port\n", p_serial);
- memset(temp, 0, sizeof(struct epoint_list));
- free(temp);
+ FREE(temp, sizeof(struct epoint_list));
ememuse--;
}
struct epoint_list *epointlist, **epointlistpointer;
/* epointlist structure */
- epointlist = (struct epoint_list *)calloc(1, sizeof(struct epoint_list));
+ epointlist = (struct epoint_list *)MALLOC(sizeof(struct epoint_list));
if (!epointlist)
- {
- PERROR("no mem for allocating epoint_list\n");
- return(0);
- }
+ FATAL("No memory for epointlist\n");
ememuse++;
PDEBUG(DEBUG_EPOINT, "PORT(%d) allocating epoint_list.\n", p_serial);
- memset(epointlist, 0, sizeof(struct epoint_list));
/* add epoint_list to chain */
epointlist->next = NULL;
}
SCPY(p_name, portname);
SCPY(p_tone_dir, p_settings.tones_dir); // just to be sure
- p_last_tv_sec = 0;
- p_last_tv_msec = 0;
p_type = type;
p_serial = port_serial++;
- p_debug_nothingtosend = 0;
p_tone_fh = -1;
p_tone_fetched = NULL;
p_tone_name[0] = '\0';
-// p_knock_fh = -1;
-// p_knock_fetched = NULL;
p_state = PORT_STATE_IDLE;
p_epointlist = NULL;
memset(&p_callerinfo, 0, sizeof(p_callerinfo));
memset(&p_connectinfo, 0, sizeof(p_connectinfo));
memset(&p_redirinfo, 0, sizeof(p_redirinfo));
memset(&p_capainfo, 0, sizeof(p_capainfo));
- memset(p_mixer_buffer, 0, sizeof(p_mixer_buffer));
- memset(p_record_buffer, 0, sizeof(p_record_buffer));
- memset(p_stereo_buffer, 0, sizeof(p_stereo_buffer));
- p_mixer_rel = NULL;
- p_mixer_readp = 0;
p_echotest = 0;
- next = NULL;
+
+ /* call recording */
p_record = NULL;
p_record_type = 0;
p_record_length = 0;
+ p_record_skip = 0;
p_record_filename[0] = '\0';
+ p_record_buffer_readp = 0;
+ p_record_buffer_writep = 0;
+ p_record_buffer_dir = 0;
/* append port to chain */
+ next = NULL;
temp = port_first;
tempp = &port_first;
while(temp)
*/
Port::~Port(void)
{
- struct mixer_relation *relation, *rtemp;
class Port *temp, **tempp;
struct message *message;
PDEBUG(DEBUG_PORT, "removing port of type %d, name '%s'\n", p_type, p_name);
- /* free mixer relation chain */
- relation = p_mixer_rel;
- while(relation)
- {
- rtemp = relation;
- relation = relation->next;
- memset(rtemp, 0, sizeof(struct mixer_relation));
- free(rtemp);
- pmemuse--;
- }
- p_mixer_rel = NULL; /* beeing paranoid */
-
/* disconnect port from endpoint */
while(p_epointlist)
{
temp = temp->next;
}
if (temp == NULL)
- {
- PERROR("PORT(%s) port not in port's list.\n", p_name);
- exit(-1);
- }
+ FATAL("PORT(%s) port not in port's list.\n", p_name);
/* detach */
*tempp=this->next;
/*
* read from the given file as specified in port_set_tone and return sample data
- * silence is appended if sample ends, but only the number of samples with tones are returned
+ * if the tone ends, the result may be less samples than requested
*/
int Port::read_audio(unsigned char *buffer, int length)
{
int l,len;
- int readp;
int nodata=0; /* to detect 0-length files and avoid endless reopen */
char filename[128];
int tone_left_before; /* temp variable to determine the change in p_tone_left */
return(0);
len = length;
- codec_in = p_tone_codec;
/* if there is no tone set, use silence */
- if (p_tone_name[0] == 0)
- {
-rest_is_silence:
- memset(buffer, (options.law=='a')?0x2a:0xff, len); /* silence */
- goto done;
- }
+ if (!p_tone_name[0])
+ return(0);
/* if the file pointer is not open, we open it */
if (p_tone_fh<0 && p_tone_fetched==NULL)
}
if (len==0)
- goto done;
+ return(length-len);
if (p_tone_fh >= 0)
{
PDEBUG(DEBUG_PORT, "PORT(%s) 0-length loop: %s\n", p_name, filename);
p_tone_name[0]=0;
p_tone_dir[0]=0;
- goto rest_is_silence;
+ return(length-len);
}
/* if eof is reached, or if the normal file cannot be opened, continue with the loop file if possible */
PDEBUG(DEBUG_PORT, "PORT(%s) no tone loop: %s\n",p_name, filename);
p_tone_dir[0] = '\0';
p_tone_name[0] = '\0';
- // codec_in = CODEC_LAW;
- goto rest_is_silence;
+ return(length-len);
}
fhuse++;
}
PDEBUG(DEBUG_PORT, "PORT(%s) no tone loop: %s\n",p_name, filename);
p_tone_dir[0] = '\0';
p_tone_name[0] = '\0';
- // codec_in = CODEC_LAW;
- goto rest_is_silence;
+ return(length-len);
}
fhuse++;
}
/* now we have opened the loop */
goto read_more;
-
-done:
- return(length-len);
-}
-
-
-/*
- * dummy for transmit function, since this must be inherited
- */
-void Port::transmit(unsigned char *buffer, int length, int tonelength)
-{
}
set_tone(param->tone.dir,param->tone.name);
return(1);
- case MESSAGE_DATA: /* tx-data from upper layer */
- fromup(param->data.data, param->data.len);
- return(1);
-
case MESSAGE_VBOX_TONE: /* play tone of answering machine */
PDEBUG(DEBUG_PORT, "PORT(%s) set answering machine tone '%s' '%s'\n", p_name, param->tone.dir, param->tone.name);
set_vbox_tone(param->tone.dir, param->tone.name);
}
-/*
- * special function generate individual isdn debug logs
- */
-void Port::printisdn(char *fmt, ...)
-{
- char buffer[4096];
- char name[128];
- va_list args;
- FILE *fp;
-
- va_start(args,fmt);
- VUNPRINT(buffer,sizeof(buffer)-1,fmt,args);
- buffer[sizeof(buffer)-1]=0;
- va_end(args);
-
- PDEBUG_RUNTIME(NULL, 0, DEBUG_PORT, "PORT(%s serial=%ld): %s\n", p_name, p_serial, buffer);
- if (options.deb & DEBUG_LOG)
- {
- SPRINT(name, "%s/debug_%s.log", INSTALL_DATA, p_name);
- if (!(fp = fopen(name, "a")))
- return;
-
- fprintf(fp, "%04d.%02d.%02d %02d:%02d:%02d %s(%ld): %s", now_tm->tm_year+1900, now_tm->tm_mon+1, now_tm->tm_mday, now_tm->tm_hour, now_tm->tm_min, now_tm->tm_sec, p_name, p_serial, buffer);
- fclose(fp);
- }
-}
-
-
/* wave header structure */
struct fmt {
unsigned short stereo; /* 1 = mono, 2 = stereo */
if (!p_record)
return;
+ PDEBUG(DEBUG_PORT, "data still in record buffer: %d (dir %d)\n", (p_record_buffer_writep - p_record_buffer_readp) & RECORD_BUFFER_MASK, p_record_buffer_dir);
memcpy(&callerinfo, &p_callerinfo, sizeof(struct caller_info));
- apply_callerid_restriction(p_record_anon_ignore, -1, callerinfo.id, &callerinfo.ntype, &callerinfo.present, &callerinfo.screen, callerinfo.voip, callerinfo.intern, callerinfo.name);
+ apply_callerid_restriction(p_record_anon_ignore, callerinfo.id, &callerinfo.ntype, &callerinfo.present, &callerinfo.screen, callerinfo.extension, callerinfo.name);
- SCPY(number, p_dialinginfo.number);
+ SCPY(number, p_dialinginfo.id);
SCPY(callerid, numberrize_callerinfo(callerinfo.id, callerinfo.ntype));
if (callerid[0] == '\0')
{
/* send email with sample*/
if (p_record_vbox_email[0])
{
- send_mail(p_record_vbox_email_file?filename:(char *)"", callerid, callerinfo.intern, callerinfo.name, p_record_vbox_email, p_record_vbox_year, p_record_vbox_mon, p_record_vbox_mday, p_record_vbox_hour, p_record_vbox_min, p_record_extension);
+ send_mail(p_record_vbox_email_file?filename:(char *)"", callerid, callerinfo.extension, callerinfo.name, p_record_vbox_email, p_record_vbox_year, p_record_vbox_mon, p_record_vbox_mday, p_record_vbox_hour, p_record_vbox_min, p_record_extension);
}
}
}
*
* If one stream (dir) received packets, they are stored to a
* buffer to wait for the other stream (dir), so both streams can
- * be combined. If the buffer is full, it's read pointer is written
- * without mixing stream.
+ * be combined. If the buffer is full, it's content is written
+ * without mixing stream. (assuming only one stram (dir) exists.)
* A flag is used to indicate what stream is currently in buffer.
*
* NOTE: First stereo sample (odd) is from down, second is from up.
*/
-alle buffer initialisieren
-record nur aufrufen, wenn recorded wird.
-restlicher buffer wegschreiben beim schliessen
-void Port::record(char *data, int length, int dir_fromup)
+void Port::record(unsigned char *data, int length, int dir_fromup)
{
unsigned char write_buffer[1024], *d;
signed short *s;
- int r, w;
+ int free, i, ii;
signed long sample;
/* no recording */
if (!p_record || !length)
return;
+ /* skip */
+ if (dir_fromup)
+ {
+ /* more than we have */
+ if (p_record_skip > length)
+ {
+ p_record_skip -= length;
+ return;
+ }
+ data += p_record_skip;
+ length -= p_record_skip;
+ }
+
free = ((p_record_buffer_readp - p_record_buffer_writep - 1) & RECORD_BUFFER_MASK);
/* the buffer stores the same data stream */
/* first write what we can to the buffer */
while(free && length)
{
- p_record_buffer[p_record_buffer_writep] = audio_law_to_s32(*data++);
+ p_record_buffer[p_record_buffer_writep] = audio_law_to_s32[*data++];
p_record_buffer_writep = (p_record_buffer_writep + 1) & RECORD_BUFFER_MASK;
free--;
length--;
free += sizeof(write_buffer);
goto same_again;
}
-
- /* the buffer store the other stream */
- different_again:
+ /* the buffer stores the other stream */
/* if buffer empty, change it */
if (p_record_buffer_readp == p_record_buffer_writep)
while(i < ii)
{
sample = p_record_buffer[p_record_buffer_readp]
- + audio_law_to_s32(*data++);
+ + audio_law_to_s32[*data++];
p_record_buffer_readp = (p_record_buffer_readp + 1) & RECORD_BUFFER_MASK;
if (sample < 32767)
sample = -32767;
i = 0;
while(i < ii)
{
- *s++ = audio_law_to_s32(*data++);
+ *s++ = audio_law_to_s32[*data++];
*s++ = p_record_buffer[p_record_buffer_readp];
p_record_buffer_readp = (p_record_buffer_readp + 1) & RECORD_BUFFER_MASK;
i++;
while(i < ii)
{
*s++ = p_record_buffer[p_record_buffer_readp];
- *s++ = audio_law_to_s32(*data++);
+ *s++ = audio_law_to_s32[*data++];
i++;
}
}
while(i < ii)
{
sample = p_record_buffer[p_record_buffer_readp]
- + audio_law_to_s32(*data++);
+ + audio_law_to_s32[*data++];
p_record_buffer_readp = (p_record_buffer_readp + 1) & RECORD_BUFFER_MASK;
if (sample < 32767)
sample = -32767;
while(i < ii)
{
sample = p_record_buffer[p_record_buffer_readp]
- + audio_law_to_s32(*data++);
+ + audio_law_to_s32[*data++];
p_record_buffer_readp = (p_record_buffer_readp + 1) & RECORD_BUFFER_MASK;
if (sample < 32767)
sample = -32767;
}
-/*
- * enque data from upper buffer
- */
-iniialisieren der werte
-void Port::txfromup(unsigned char *data, int length)
-{
-
- /* no recording */
- if (!length)
- return;
-
- /* get free samples in buffer */
- free = ((p_fromup_buffer_readp - p_fromup_buffer_writep - 1) & FROMUP_BUFFER_MASK);
- if (free < length)
- {
- PDEBUG(DEBUG_PORT, "Port(%d): fromup_buffer overflows, this shall not happen under normal conditions\n", p_serial);
- return;
- }
-
- /* write data to buffer and return */
- while(length)
- {
- p_fromup_buffer[p_fromup_buffer_writep] = *data++;
- p_fromup_buffer_writep = (p_fromup_buffer_writep + 1) & FROMUP_BUFFER_MASK;
- length--;
- }
- return; // must return, because length is 0
-}
-