callerid.c File Reference

CallerID Generation support. More...

#include <time.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <math.h>
#include <ctype.h>
#include "asterisk.h"
#include "asterisk/ulaw.h"
#include "asterisk/alaw.h"
#include "asterisk/frame.h"
#include "asterisk/channel.h"
#include "asterisk/callerid.h"
#include "asterisk/logger.h"
#include "asterisk/fskmodem.h"
#include "asterisk/utils.h"

Include dependency graph for callerid.c:

Go to the source code of this file.

Data Structures
struct	callerid_state
Defines
#define	AST_CALLERID_UNKNOWN   "<unknown>"
#define	CALLERID_MARK   1200.0
#define	CALLERID_SPACE   2200.0
#define	CAS_FREQ1   2130.0
#define	CAS_FREQ2   2750.0
#define	SAS_FREQ   440.0
Functions
static int	__ast_callerid_generate (unsigned char *buf, char *name, char *number, int callwaiting, int codec)
int	ast_callerid_callwaiting_generate (unsigned char *buf, char *name, char *number, int codec)
	Generate Caller-ID spill but in a format suitable for Call Waiting(tm)'s Caller*ID(tm) See ast_callerid_generate() for other details.
int	ast_callerid_generate (unsigned char *buf, char *name, char *number, int codec)
	Generate Caller-ID spill from the "callerid" field of asterisk (in e-mail address like format).
char *	ast_callerid_merge (char *buf, int bufsiz, const char *name, const char *num, const char *unknown)
int	ast_callerid_parse (char *instr, char **name, char **location)
	parse string for caller id information
int	ast_callerid_split (const char *buf, char *name, int namelen, char *num, int numlen)
const char *	ast_describe_caller_presentation (int data)
	Convert caller ID pres value to explanatory string.
int	ast_gen_cas (unsigned char *outbuf, int sendsas, int len, int codec)
int	ast_isphonenumber (char *n)
	checks if string consists only of digits and * # and +
int	ast_parse_caller_presentation (const char *data)
	Convert caller ID text code to value used in config file parsing.
void	ast_shrink_phone_number (char *n)
	Shrink a phone number in place to just digits (more accurately it just removes ()'s, .'s, and -'s...
int	callerid_feed (struct callerid_state *cid, unsigned char *ubuf, int len, int codec)
	Read samples into the state machine.
void	callerid_free (struct callerid_state *cid)
	Free a callerID state.
int	callerid_generate (unsigned char *buf, char *number, char *name, int flags, int callwaiting, int codec)
	Generates a CallerID FSK stream in ulaw format suitable for transmission.
static int	callerid_genmsg (char *msg, int size, char *number, char *name, int flags)
void	callerid_get (struct callerid_state *cid, char **name, char **number, int *flags)
	Extract info out of callerID state machine. Flags are listed above.
void	callerid_get_dtmf (char *cidstring, char *number, int *flags)
void	callerid_init (void)
	Initialize stuff for inverse FFT.
struct callerid_state *	callerid_new (int cid_signalling)
	Create a callerID state machine.
static void	gen_tone (unsigned char *buf, int len, int codec, float ddr1, float ddi1, float *cr1, float *ci1)
static void	gen_tones (unsigned char *buf, int len, int codec, float ddr1, float ddi1, float ddr2, float ddi2, float *cr1, float *ci1, float *cr2, float *ci2)
int	vmwi_generate (unsigned char *buf, int active, int mdmf, int codec)
	Generate message waiting indicator (stutter tone).
Variables
float	casdi1
float	casdi2
float	casdr1
float	casdr2
float	cid_di [4]
float	cid_dr [4]
float	clidsb = 8000.0 / 1200.0
struct {
char *   description
char *   name
int   val
}	pres_types []
float	sasdi
float	sasdr

---

Detailed Description

CallerID Generation support.

Definition in file callerid.c.

---

Define Documentation

#define AST_CALLERID_UNKNOWN   "<unknown>"

Definition at line 73 of file callerid.c.

#define CALLERID_MARK   1200.0

1200 hz for "1"

Definition at line 68 of file callerid.c.

Referenced by callerid_init().

#define CALLERID_SPACE   2200.0

2200 hz for "0"

Definition at line 67 of file callerid.c.

Referenced by callerid_init().

#define CAS_FREQ1   2130.0

Definition at line 70 of file callerid.c.

Referenced by callerid_init().

#define CAS_FREQ2   2750.0

Definition at line 71 of file callerid.c.

Referenced by callerid_init().

#define SAS_FREQ   440.0

Definition at line 69 of file callerid.c.

Referenced by callerid_init().

---

Function Documentation

static int __ast_callerid_generate	(	unsigned char *	buf,
		char *	name,
		char *	number,
		int	callwaiting,
		int	codec
	)			[static]

Definition at line 688 of file callerid.c.

References ast_strlen_zero(), and callerid_generate().

Referenced by ast_callerid_callwaiting_generate(), and ast_callerid_generate().

{
   if (ast_strlen_zero(name))
      name = NULL;
   if (ast_strlen_zero(number))
      number = NULL;
   return callerid_generate(buf, number, name, 0, callwaiting, codec);
}

int ast_callerid_callwaiting_generate	(	unsigned char *	buf,
		char *	name,
		char *	number,
		int	codec
	)

Generate Caller-ID spill but in a format suitable for Call Waiting(tm)'s Caller*ID(tm) See ast_callerid_generate() for other details.

Definition at line 702 of file callerid.c.

References __ast_callerid_generate().

Referenced by send_cwcidspill().

{
   return __ast_callerid_generate(buf, name, number, 1, codec);
}

int ast_callerid_generate	(	unsigned char *	buf,
		char *	name,
		char *	number,
		int	codec
	)

Generate Caller-ID spill from the "callerid" field of asterisk (in e-mail address like format).

Parameters:

	buf	buffer for output samples. See callerid_generate() for details regarding buffer.
	name	Caller-ID Name
	number	Caller-ID Number
	codec	Asterisk codec (either AST_FORMAT_ALAW or AST_FORMAT_ULAW)

Acts like callerid_generate except uses an asterisk format callerid string.

Definition at line 697 of file callerid.c.

References __ast_callerid_generate().

Referenced by zt_call().

{
   return __ast_callerid_generate(buf, name, number, 0, codec);
}

char* ast_callerid_merge	(	char *	buf,
		int	bufsiz,
		const char *	name,
		const char *	num,
		const char *	unknown
	)

Definition at line 707 of file callerid.c.

Referenced by _sip_show_peer(), iax2_show_peer(), leave_voicemail(), prep_email_sub_vars(), and sip_show_user().

{
   if (!unknown)
      unknown = "<unknown>";
   if (name && num)
      snprintf(buf, bufsiz, "\"%s\" <%s>", name, num);
   else if (name) 
      ast_copy_string(buf, name, bufsiz);
   else if (num)
      ast_copy_string(buf, num, bufsiz);
   else
      ast_copy_string(buf, unknown, bufsiz);
   return buf;
}

int ast_callerid_parse	(	char *	instr,
		char **	name,
		char **	location
	)

parse string for caller id information

Destructively parse inbuf into name and location (or number) Parses callerid stream from inbuf and changes into useable form, outputed in name and location.

Returns:

returns -1 on failure, otherwise 0

Definition at line 641 of file callerid.c.

References ast_isphonenumber(), ast_shrink_phone_number(), and ast_strlen_zero().

Referenced by action_originate(), adsi_message(), advanced_options(), ast_callerid_split(), ast_osp_lookup(), ast_osp_validate(), ast_privacy_check(), ast_privacy_set(), handle_setcallerid(), misdn_new(), play_message_callerid(), rpt_call(), rpt_exec(), setrdnis_exec(), and write_metadata().

{
   char *ns, *ne;
   char *ls, *le;
   char tmp[256];
   /* Try for "name" <location> format or 
      name <location> format */
   if ((ls = strchr(instr, '<')) && (le = strchr(ls, '>'))) {
      /* Found the location */
      *le = '\0';
      *ls = '\0';
      *location = ls + 1;
      if ((ns = strchr(instr, '\"')) && (ne = strchr(ns + 1, '\"'))) {
         /* Get name out of quotes */
         *ns = '\0';
         *ne = '\0';
         *name = ns + 1;
         return 0;
      } else {
         /* Just trim off any trailing spaces */
         *name = instr;
         while(!ast_strlen_zero(instr) && (instr[strlen(instr) - 1] < 33))
            instr[strlen(instr) - 1] = '\0';
         /* And leading spaces */
         *name = ast_skip_blanks(*name);
         return 0;
      }
   } else {
      ast_copy_string(tmp, instr, sizeof(tmp));
      ast_shrink_phone_number(tmp);
      if (ast_isphonenumber(tmp)) {
         /* Assume it's just a location */
         *name = NULL;
         *location = instr;
      } else {
         /* Assume it's just a name.  Make sure it's not quoted though */
         *name = instr;
         while(*(*name) && ((*(*name) < 33) || (*(*name) == '\"'))) (*name)++;
         ne = *name + strlen(*name) - 1;
         while((ne > *name) && ((*ne < 33) || (*ne == '\"'))) { *ne = '\0'; ne--; }
         *location = NULL;
      }
      return 0;
   }
   return -1;
}

int ast_callerid_split	(	const char *	buf,
		char *	name,
		int	namelen,
		char *	num,
		int	numlen
	)

Definition at line 722 of file callerid.c.

References ast_callerid_parse(), ast_shrink_phone_number(), ast_strdupa, and n.

Referenced by apply_outgoing(), build_device(), build_gateway(), build_peer(), build_user(), callerid_write(), disa_exec(), load_module(), monitor_handle_notowned(), setcallerid_exec(), setup_zap(), and vpb_new().

{
   char *tmp;
   char *l = NULL, *n = NULL;
   tmp = ast_strdupa(buf);
   if (!tmp) {
      name[0] = '\0';
      num[0] = '\0';
      return -1;
   }
   ast_callerid_parse(tmp, &n, &l);
   if (n)
      ast_copy_string(name, n, namelen);
   else
      name[0] = '\0';
   if (l) {
      ast_shrink_phone_number(l);
      ast_copy_string(num, l, numlen);
   } else
      num[0] = '\0';
   return 0;
}

const char* ast_describe_caller_presentation

(

int

data

)

Convert caller ID pres value to explanatory string.

Parameters:

data

value (see callerid.h AST_PRES_ )

Returns:

string for human presentation

Definition at line 782 of file callerid.c.

References pres_types.

Referenced by _sip_show_peer(), ast_set_callerid(), and sip_show_user().

{
   int i;

   for (i = 0; i < ((sizeof(pres_types) / sizeof(pres_types[0]))); i++) {
      if (pres_types[i].val == data)
         return pres_types[i].description;
   }

   return "unknown";
}

int ast_gen_cas	(	unsigned char *	outbuf,
		int	sas,
		int	len,
		int	codec
	)

Generate a CAS (CPE Alert Signal) tone for 'n' samples

Parameters:

	outbuf	Allocated buffer for data. Must be at least 2400 bytes unless no SAS is desired
	sas	Non-zero if CAS should be preceeded by SAS
	len	How many samples to generate.
	codec	Which codec (AST_FORMAT_ALAW or AST_FORMAT_ULAW)

Returns:

Returns -1 on error (if len is less than 2400), 0 on success.

Definition at line 233 of file callerid.c.

References gen_tone(), gen_tones(), and callerid_state::pos.

Referenced by __adsi_transmit_messages(), and zt_callwait().

{
   int pos = 0;
   int saslen=2400;
   float cr1 = 1.0;
   float ci1 = 0.0;
   float cr2 = 1.0;
   float ci2 = 0.0;
   if (sendsas) {
      if (len < saslen)
         return -1;
      gen_tone(outbuf, saslen, codec, sasdr, sasdi, &cr1, &ci1);
      len -= saslen;
      pos += saslen;
      cr2 = cr1;
      ci2 = ci1;
   }
   gen_tones(outbuf + pos, len, codec, casdr1, casdi1, casdr2, casdi2, &cr1, &ci1, &cr2, &ci2);
   return 0;
}

int ast_isphonenumber

(

char *

n

)

checks if string consists only of digits and * # and +

Check if a string consists only of digits.

Returns:

1 if string is valid AST phone number

0 if not

Definition at line 627 of file callerid.c.

References ast_strlen_zero().

Referenced by ast_callerid_parse(), ast_osp_lookup(), and ast_osp_validate().

{
   int x;
   if (ast_strlen_zero(n))
      return 0;
   for (x=0;n[x];x++)
      if (!strchr("0123456789*#+", n[x]))
         return 0;
   return 1;
}

int ast_parse_caller_presentation

(

const char *

data

)

Convert caller ID text code to value used in config file parsing.

Parameters:

data

text string

Returns:

value AST_PRES_ from callerid.h

Definition at line 766 of file callerid.c.

References name, and pres_types.

Referenced by build_peer(), build_user(), and setcallerid_pres_exec().

{
   int i;

   for (i = 0; i < ((sizeof(pres_types) / sizeof(pres_types[0]))); i++) {
      if (!strcasecmp(pres_types[i].name, data))
         return pres_types[i].val;
   }

   return -1;
}

void ast_shrink_phone_number

(

char *

n

)

Shrink a phone number in place to just digits (more accurately it just removes ()'s, .'s, and -'s...

Parameters:

n

The number to be stripped/shrunk

Returns:

Returns nothing important

Definition at line 593 of file callerid.c.

Referenced by action_originate(), ast_callerid_parse(), ast_callerid_split(), ast_osp_lookup(), ast_osp_validate(), ast_privacy_check(), ast_privacy_set(), check_access(), check_user_full(), dial_exec_full(), get_callerid_ast(), handle_setcallerid(), pbx_load_module(), rpt_exec(), setrdnis_exec(), ss_thread(), and write_metadata().

{
   int x,y=0;
   int bracketed=0;
   for (x=0;n[x];x++) {
      switch(n[x]) {
      case '[':
         bracketed++;
         n[y++] = n[x];
         break;
      case ']':
         bracketed--;
         n[y++] = n[x];
         break;
      case '-':
         if (bracketed)
            n[y++] = n[x];
         break;
      case '.':
         if (!n[x+1])
            n[y++] = n[x];
         break;
      default:
         if (!strchr("( )", n[x]))
            n[y++] = n[x];
      }
   }
   n[y] = '\0';
}

int callerid_feed	(	struct callerid_state *	cid,
		unsigned char *	ubuf,
		int	samples,
		int	codec
	)

Read samples into the state machine.

Parameters:

	cid	Which state machine to act upon
	ubuf	containing your samples
	samples	number of samples contained within the buffer.
	codec	which codec (AST_FORMAT_ALAW or AST_FORMAT_ULAW)

Send received audio to the Caller*ID demodulator.

Returns:

Returns -1 on error, 0 for "needs more samples", and 1 if the CallerID spill reception is complete.

Definition at line 254 of file callerid.c.

References ast_log(), ast_strlen_zero(), AST_XLAW, CID_PRIVATE_NAME, CID_PRIVATE_NUMBER, CID_UNKNOWN_NAME, CID_UNKNOWN_NUMBER, callerid_state::cksum, callerid_state::flags, free, fsk_serie(), callerid_state::fskd, callerid_state::len, LOG_ERROR, LOG_NOTICE, LOG_WARNING, malloc, callerid_state::name, callerid_state::number, callerid_state::oldlen, callerid_state::oldstuff, callerid_state::pos, callerid_state::rawdata, callerid_state::sawflag, and callerid_state::type.

Referenced by get_callerid_ast(), and ss_thread().

{
   int mylen = len;
   int olen;
   int b = 'X';
   int res;
   int x;
   short *buf = malloc(2 * len + cid->oldlen);
   short *obuf = buf;
   if (!buf) {
      ast_log(LOG_WARNING, "Out of memory\n");
      return -1;
   }
   memset(buf, 0, 2 * len + cid->oldlen);
   memcpy(buf, cid->oldstuff, cid->oldlen);
   mylen += cid->oldlen/2;
   for (x=0;x<len;x++) 
      buf[x+cid->oldlen/2] = AST_XLAW(ubuf[x]);
   while(mylen >= 160) {
      olen = mylen;
      res = fsk_serie(&cid->fskd, buf, &mylen, &b);
      if (mylen < 0) {
         ast_log(LOG_ERROR, "fsk_serie made mylen < 0 (%d)\n", mylen);
         free(obuf);
         return -1;
      }
      buf += (olen - mylen);
      if (res < 0) {
         ast_log(LOG_NOTICE, "fsk_serie failed\n");
         free(obuf);
         return -1;
      }
      if (res == 1) {
         /* Ignore invalid bytes */
         if (b > 0xff)
            continue;
         switch(cid->sawflag) {
         case 0: /* Look for flag */
            if (b == 'U')
               cid->sawflag = 2;
            break;
         case 2: /* Get lead-in */
            if ((b == 0x04) || (b == 0x80)) {
               cid->type = b;
               cid->sawflag = 3;
               cid->cksum = b;
            }
            break;
         case 3:  /* Get length */
            /* Not a lead in.  We're ready  */
            cid->sawflag = 4;
            cid->len = b;
            cid->pos = 0;
            cid->cksum += b;
            break;
         case 4: /* Retrieve message */
            if (cid->pos >= 128) {
               ast_log(LOG_WARNING, "Caller ID too long???\n");
               free(obuf);
               return -1;
            }
            cid->rawdata[cid->pos++] = b;
            cid->len--;
            cid->cksum += b;
            if (!cid->len) {
               cid->rawdata[cid->pos] = '\0';
               cid->sawflag = 5;
            }
            break;
         case 5: /* Check checksum */
            if (b != (256 - (cid->cksum & 0xff))) {
               ast_log(LOG_NOTICE, "Caller*ID failed checksum\n");
               /* Try again */
               cid->sawflag = 0;
               break;
            }
      
            cid->number[0] = '\0';
            cid->name[0] = '\0';
            /* If we get this far we're fine.  */
            if (cid->type == 0x80) {
               /* MDMF */
               /* Go through each element and process */
               for (x=0;x< cid->pos;) {
                  switch(cid->rawdata[x++]) {
                  case 1:
                     /* Date */
                     break;
                  case 2: /* Number */
                  case 3: /* Number (for Zebble) */
                  case 4: /* Number */
                     res = cid->rawdata[x];
                     if (res > 32) {
                        ast_log(LOG_NOTICE, "Truncating long caller ID number from %d bytes to 32\n", cid->rawdata[x]);
                        res = 32; 
                     }
                     if (ast_strlen_zero(cid->number)) {
                        memcpy(cid->number, cid->rawdata + x + 1, res);
                        /* Null terminate */
                        cid->number[res] = '\0';
                     }
                     break;
                  case 6: /* Stentor Call Qualifier (ie. Long Distance call) */
                     break;
                  case 7: /* Name */
                  case 8: /* Name */
                     res = cid->rawdata[x];
                     if (res > 32) {
                        ast_log(LOG_NOTICE, "Truncating long caller ID name from %d bytes to 32\n", cid->rawdata[x]);
                        res = 32; 
                     }
                     memcpy(cid->name, cid->rawdata + x + 1, res);
                     cid->name[res] = '\0';
                     break;
                  case 17: /* UK: Call type, 1=Voice Call, 2=Ringback when free, 129=Message waiting  */
                  case 19: /* UK: Network message system status (Number of messages waiting) */
                  case 22: /* Something French */
                     break;
                  default:
                     ast_log(LOG_NOTICE, "Unknown IE %d\n", cid->rawdata[x-1]);
                  }
                  x += cid->rawdata[x];
                  x++;
               }
            } else {
               /* SDMF */
               ast_copy_string(cid->number, cid->rawdata + 8, sizeof(cid->number));
            }
            /* Update flags */
            cid->flags = 0;
            if (!strcmp(cid->number, "P")) {
               strcpy(cid->number, "");
               cid->flags |= CID_PRIVATE_NUMBER;
            } else if (!strcmp(cid->number, "O") || ast_strlen_zero(cid->number)) {
               strcpy(cid->number, "");
               cid->flags |= CID_UNKNOWN_NUMBER;
            }
            if (!strcmp(cid->name, "P")) {
               strcpy(cid->name, "");
               cid->flags |= CID_PRIVATE_NAME;
            } else if (!strcmp(cid->name, "O") || ast_strlen_zero(cid->name)) {
               strcpy(cid->name, "");
               cid->flags |= CID_UNKNOWN_NAME;
            }
            free(obuf);
            return 1;
            break;
         default:
            ast_log(LOG_ERROR, "Dunno what to do with a digit in sawflag %d\n", cid->sawflag);
         }
      }
   }
   if (mylen) {
      memcpy(cid->oldstuff, buf, mylen * 2);
      cid->oldlen = mylen * 2;
   } else
      cid->oldlen = 0;
   free(obuf);
   return 0;
}

void callerid_free

(

struct callerid_state *

cid

)

Free a callerID state.

Parameters:

cid

This is the callerid_state state machine to free This function frees callerid_state cid.

Definition at line 415 of file callerid.c.

References free.

Referenced by get_callerid_ast(), and ss_thread().

{
   free(cid);
}

int callerid_generate	(	unsigned char *	buf,
		char *	number,
		char *	name,
		int	flags,
		int	callwaiting,
		int	codec
	)

Generates a CallerID FSK stream in ulaw format suitable for transmission.

Parameters:

	buf	Buffer to use. If "buf" is supplied, it will use that buffer instead of allocating its own. "buf" must be at least 32000 bytes in size of you want to be sure you don't have an overrun.
	number	Use NULL for no number or "P" for "private"
	name	name to be used
	flags	passed flags
	callwaiting	callwaiting flag
	codec	-- either AST_FORMAT_ULAW or AST_FORMAT_ALAW This function creates a stream of callerid (a callerid spill) data in ulaw format.

Returns:

It returns the size (in bytes) of the data (if it returns a size of 0, there is probably an error)

Definition at line 551 of file callerid.c.

References callerid_genmsg(), PUT_BYTE, PUT_CLID, and PUT_CLID_MARKMS.

Referenced by __ast_callerid_generate().

{
   int bytes=0;
   int x, sum;
   int len;
   /* Initial carriers (real/imaginary) */
   float cr = 1.0;
   float ci = 0.0;
   float scont = 0.0;
   char msg[256];
   len = callerid_genmsg(msg, sizeof(msg), number, name, flags);
   if (!callwaiting) {
      /* Wait a half a second */
      for (x=0;x<4000;x++)
         PUT_BYTE(0x7f);
      /* Transmit 30 0x55's (looks like a square wave) for channel seizure */
      for (x=0;x<30;x++)
         PUT_CLID(0x55);
   }
   /* Send 150ms of callerid marks */
   for (x=0;x<150;x++)
      PUT_CLID_MARKMS;
   /* Send 0x80 indicating MDMF format */
   PUT_CLID(0x80);
   /* Put length of whole message */
   PUT_CLID(len);
   sum = 0x80 + strlen(msg);
   /* Put each character of message and update checksum */
   for (x=0;x<len; x++) {
      PUT_CLID(msg[x]);
      sum += msg[x];
   }
   /* Send 2's compliment of sum */
   PUT_CLID(256 - (sum & 255));

   /* Send 50 more ms of marks */
   for (x=0;x<50;x++)
      PUT_CLID_MARKMS;
   
   return bytes;
}

static int callerid_genmsg	(	char *	msg,
		int	size,
		char *	number,
		char *	name,
		int	flags
	)			[static]

Definition at line 420 of file callerid.c.

References ast_strlen_zero(), CID_PRIVATE_NAME, CID_PRIVATE_NUMBER, CID_UNKNOWN_NAME, CID_UNKNOWN_NUMBER, and t.

Referenced by callerid_generate().

{
   time_t t;
   struct tm tm;
   char *ptr;
   int res;
   int i,x;
   /* Get the time */
   time(&t);
   localtime_r(&t,&tm);
   
   ptr = msg;
   
   /* Format time and message header */
   res = snprintf(ptr, size, "\001\010%02d%02d%02d%02d", tm.tm_mon + 1,
            tm.tm_mday, tm.tm_hour, tm.tm_min);
   size -= res;
   ptr += res;
   if (ast_strlen_zero(number) || (flags & CID_UNKNOWN_NUMBER)) {
      /* Indicate number not known */
      res = snprintf(ptr, size, "\004\001O");
      size -= res;
      ptr += res;
   } else if (flags & CID_PRIVATE_NUMBER) {
      /* Indicate number is private */
      res = snprintf(ptr, size, "\004\001P");
      size -= res;
      ptr += res;
   } else {
      /* Send up to 16 digits of number MAX */
      i = strlen(number);
      if (i > 16) i = 16;
      res = snprintf(ptr, size, "\002%c", i);
      size -= res;
      ptr += res;
      for (x=0;x<i;x++)
         ptr[x] = number[x];
      ptr[i] = '\0';
      ptr += i;
      size -= i;
   }

   if (ast_strlen_zero(name) || (flags & CID_UNKNOWN_NAME)) {
      /* Indicate name not known */
      res = snprintf(ptr, size, "\010\001O");
      size -= res;
      ptr += res;
   } else if (flags & CID_PRIVATE_NAME) {
      /* Indicate name is private */
      res = snprintf(ptr, size, "\010\001P");
      size -= res;
      ptr += res;
   } else {
      /* Send up to 16 digits of name MAX */
      i = strlen(name);
      if (i > 16) i = 16;
      res = snprintf(ptr, size, "\007%c", i);
      size -= res;
      ptr += res;
      for (x=0;x<i;x++)
         ptr[x] = name[x];
      ptr[i] = '\0';
      ptr += i;
      size -= i;
   }
   return (ptr - msg);
   
}

void callerid_get	(	struct callerid_state *	cid,
		char **	number,
		char **	name,
		int *	flags
	)

Extract info out of callerID state machine. Flags are listed above.

Parameters:

	cid	Callerid state machine to act upon
	number	Pass the address of a pointer-to-char (will contain the phone number)
	name	Pass the address of a pointer-to-char (will contain the name)
	flags	Pass the address of an int variable(will contain the various callerid flags)

This function extracts a callerid string out of a callerid_state state machine. If no number is found, *number will be set to NULL. Likewise for the name. Flags can contain any of the following:

Returns:

Returns nothing.

Definition at line 159 of file callerid.c.

References CID_PRIVATE_NUMBER, CID_UNKNOWN_NAME, CID_UNKNOWN_NUMBER, callerid_state::flags, callerid_state::name, and callerid_state::number.

Referenced by get_callerid_ast(), and ss_thread().

{
   *flags = cid->flags;
   if (cid->flags & (CID_UNKNOWN_NAME | CID_PRIVATE_NUMBER))
      *name = NULL;
   else
      *name = cid->name;
   if (cid->flags & (CID_UNKNOWN_NUMBER | CID_PRIVATE_NUMBER))
      *number = NULL;
   else
      *number = cid->number;
}

void callerid_get_dtmf	(	char *	cidstring,
		char *	number,
		int *	flags
	)

Get and parse DTMF-based callerid

Parameters:

	cidstring	The actual transmitted string.
	number	The cid number is returned here.
	flags	The cid flags are returned here. This function parses DTMF callerid.

Definition at line 172 of file callerid.c.

References ast_log(), CID_PRIVATE_NUMBER, CID_UNKNOWN_NUMBER, LOG_DEBUG, and LOG_WARNING.

Referenced by ss_thread().

{
   int i;
   int code;

   /* "Clear" the number-buffer. */
   number[0] = 0;

   if (strlen(cidstring) < 2) {
      ast_log(LOG_DEBUG, "No cid detected\n");
      *flags = CID_UNKNOWN_NUMBER;
      return;
   }
   
   /* Detect protocol and special types */
   if (cidstring[0] == 'B') {
      /* Handle special codes */
      code = atoi(&cidstring[1]);
      if (code == 0)
         *flags = CID_UNKNOWN_NUMBER;
      else if (code == 10) 
         *flags = CID_PRIVATE_NUMBER;
      else
         ast_log(LOG_DEBUG, "Unknown DTMF code %d\n", code);
   } else if (cidstring[0] == 'D' && cidstring[2] == '#') {
      /* .DK special code */
      if (cidstring[1] == '1')
         *flags = CID_PRIVATE_NUMBER;
      if (cidstring[1] == '2' || cidstring[1] == '3')
         *flags = CID_UNKNOWN_NUMBER;
   } else if (cidstring[0] == 'D' || cidstring[0] == 'A') {
      /* "Standard" callerid */
      for (i = 1; i < strlen(cidstring); i++ ) {
         if (cidstring[i] == 'C' || cidstring[i] == '#')
            break;
         if (isdigit(cidstring[i]))
            number[i-1] = cidstring[i];
         else
            ast_log(LOG_DEBUG, "Unknown CID digit '%c'\n",
               cidstring[i]);
      }
      number[i-1] = 0;
   } else if (isdigit(cidstring[0])) {
      /* It begins with a digit, so we parse it as a number and hope
       * for the best */
      ast_log(LOG_WARNING, "Couldn't detect start-character. CID "
         "parsing might be unreliable\n");
      for (i = 0; i < strlen(cidstring); i++) {
         if (isdigit(cidstring[i]))
                                number[i] = cidstring[i];
         else
            break;
      }
      number[i] = 0;
   } else {
      ast_log(LOG_DEBUG, "Unknown CID protocol, start digit '%c'\n", 
         cidstring[0]);
      *flags = CID_UNKNOWN_NUMBER;
   }
}

void callerid_init

(

void

)

Initialize stuff for inverse FFT.

CallerID Initialization.

Definition at line 113 of file callerid.c.

References CALLERID_MARK, CALLERID_SPACE, CAS_FREQ1, CAS_FREQ2, and SAS_FREQ.

Referenced by main().

{
   cid_dr[0] = cos(CALLERID_SPACE * 2.0 * M_PI / 8000.0);
   cid_di[0] = sin(CALLERID_SPACE * 2.0 * M_PI / 8000.0);
   cid_dr[1] = cos(CALLERID_MARK * 2.0 * M_PI / 8000.0);
   cid_di[1] = sin(CALLERID_MARK * 2.0 * M_PI / 8000.0);
   sasdr = cos(SAS_FREQ * 2.0 * M_PI / 8000.0);
   sasdi = sin(SAS_FREQ * 2.0 * M_PI / 8000.0);
   casdr1 = cos(CAS_FREQ1 * 2.0 * M_PI / 8000.0);
   casdi1 = sin(CAS_FREQ1 * 2.0 * M_PI / 8000.0);
   casdr2 = cos(CAS_FREQ2 * 2.0 * M_PI / 8000.0);
   casdi2 = sin(CAS_FREQ2 * 2.0 * M_PI / 8000.0);
}

struct callerid_state* callerid_new

(

int

cid_signalling

)

[read]

Create a callerID state machine.

Parameters:

cid_signalling

Type of signalling in use

This function returns a malloc'd instance of the callerid_state data structure.

Returns:

Returns a pointer to a malloc'd callerid_state structure, or NULL on error.

Definition at line 127 of file callerid.c.

References ast_log(), fsk_data::bw, CID_UNKNOWN_NAME, CID_UNKNOWN_NUMBER, fsk_data::cont, fsk_data::f_mark_idx, fsk_data::f_space_idx, callerid_state::flags, callerid_state::fskd, fsk_data::hdlc, LOG_WARNING, malloc, callerid_state::name, fsk_data::nbit, fsk_data::nstop, callerid_state::number, fsk_data::paridad, fsk_data::pcola, callerid_state::pos, fsk_data::spb, fsk_data::state, and fsk_data::x0.

Referenced by get_callerid_ast(), and ss_thread().

{
   struct callerid_state *cid;
   cid = malloc(sizeof(struct callerid_state));
   if (cid) {
      memset(cid, 0, sizeof(struct callerid_state));
      cid->fskd.spb = 7;      /* 1200 baud */
      cid->fskd.hdlc = 0;     /* Async */
      cid->fskd.nbit = 8;     /* 8 bits */
      cid->fskd.nstop = 1; /* 1 stop bit */
      cid->fskd.paridad = 0;  /* No parity */
      cid->fskd.bw=1;         /* Filter 800 Hz */
      if (cid_signalling == 2) { /* v23 signalling */
         cid->fskd.f_mark_idx =  4; /* 1300 Hz */
         cid->fskd.f_space_idx = 5; /* 2100 Hz */
      } else { /* Bell 202 signalling as default */ 
         cid->fskd.f_mark_idx =  2; /* 1200 Hz */
         cid->fskd.f_space_idx = 3; /* 2200 Hz */
      }
      cid->fskd.pcola = 0;    /* No clue */
      cid->fskd.cont = 0;        /* Digital PLL reset */
      cid->fskd.x0 = 0.0;
      cid->fskd.state = 0;
      memset(cid->name, 0, sizeof(cid->name));
      memset(cid->number, 0, sizeof(cid->number));
      cid->flags = CID_UNKNOWN_NAME | CID_UNKNOWN_NUMBER;
      cid->pos = 0;
   } else
      ast_log(LOG_WARNING, "Out of memory\n");
   return cid;
}

static void gen_tone	(	unsigned char *	buf,
		int	len,
		int	codec,
		float	ddr1,
		float	ddi1,
		float *	cr1,
		float *	ci1
	)			[inline, static]

Definition at line 97 of file callerid.c.

References AST_LIN2X, and t.

Referenced by ast_gen_cas().

{
   int x;
   float t;
   for (x=0;x<len;x++) {
      t = *cr1 * ddr1 - *ci1 * ddi1;
      *ci1 = *cr1 * ddi1 + *ci1 * ddr1;
      *cr1 = t;
      t = 2.0 - (*cr1 * *cr1 + *ci1 * *ci1);
      *cr1 *= t;
      *ci1 *= t;  
      buf[x] = AST_LIN2X(*cr1 * 8192.0);
   }
}

static void gen_tones	(	unsigned char *	buf,
		int	len,
		int	codec,
		float	ddr1,
		float	ddi1,
		float	ddr2,
		float	ddi2,
		float *	cr1,
		float *	ci1,
		float *	cr2,
		float *	ci2
	)			[inline, static]

Definition at line 75 of file callerid.c.

References AST_LIN2X, and t.

Referenced by ast_gen_cas().

{
   int x;
   float t;
   for (x=0;x<len;x++) {
      t = *cr1 * ddr1 - *ci1 * ddi1;
      *ci1 = *cr1 * ddi1 + *ci1 * ddr1;
      *cr1 = t;
      t = 2.0 - (*cr1 * *cr1 + *ci1 * *ci1);
      *cr1 *= t;
      *ci1 *= t;  

      t = *cr2 * ddr2 - *ci2 * ddi2;
      *ci2 = *cr2 * ddi2 + *ci2 * ddr2;
      *cr2 = t;
      t = 2.0 - (*cr2 * *cr2 + *ci2 * *ci2);
      *cr2 *= t;
      *ci2 *= t;  
      buf[x] = AST_LIN2X((*cr1 + *cr2) * 2048.0);
   }
}

int vmwi_generate	(	unsigned char *	buf,
		int	active,
		int	mdmf,
		int	codec
	)

Generate message waiting indicator (stutter tone).

Definition at line 489 of file callerid.c.

References PUT_BYTE, PUT_CLID, and PUT_CLID_MARKMS.

Referenced by do_monitor().

{
   unsigned char msg[256];
   int len=0;
   int sum;
   int x;
   int bytes = 0;
   float cr = 1.0;
   float ci = 0.0;
   float scont = 0.0;
   if (mdmf) {
      /* MDMF Message waiting */
      msg[len++] = 0x82;
      /* Length is 3 */
      msg[len++] = 3;
      /* IE is "Message Waiting Parameter" */
      msg[len++] = 0xb;
      /* Length of IE is one */
      msg[len++] = 1;
      /* Active or not */
      if (active)
         msg[len++] = 0xff;
      else
         msg[len++] = 0x00;
   } else {
      /* SDMF Message waiting */
      msg[len++] = 0x6;
      /* Length is 3 */
      msg[len++] = 3;
      if (active) {
         msg[len++] = 0x42;
         msg[len++] = 0x42;
         msg[len++] = 0x42;
      } else {
         msg[len++] = 0x6f;
         msg[len++] = 0x6f;
         msg[len++] = 0x6f;
      }
   }
   sum = 0;
   for (x=0;x<len;x++)
      sum += msg[x];
   sum = (256 - (sum & 255));
   msg[len++] = sum;
   /* Wait a half a second */
   for (x=0;x<4000;x++)
      PUT_BYTE(0x7f);
   /* Transmit 30 0x55's (looks like a square wave) for channel seizure */
   for (x=0;x<30;x++)
      PUT_CLID(0x55);
   /* Send 170ms of callerid marks */
   for (x=0;x<170;x++)
      PUT_CLID_MARKMS;
   for (x=0;x<len;x++) {
      PUT_CLID(msg[x]);
   }
   /* Send 50 more ms of marks */
   for (x=0;x<50;x++)
      PUT_CLID_MARKMS;
   return bytes;
}

---

Variable Documentation

float casdi1

Definition at line 65 of file callerid.c.

float casdi2

Definition at line 65 of file callerid.c.

float casdr1

Definition at line 65 of file callerid.c.

float casdr2

Definition at line 65 of file callerid.c.

float cid_di[4]

Definition at line 62 of file callerid.c.

Referenced by callerid_getcarrier().

float cid_dr[4]

Definition at line 62 of file callerid.c.

Referenced by callerid_getcarrier().

float clidsb = 8000.0 / 1200.0

Definition at line 63 of file callerid.c.

char* description

Definition at line 748 of file callerid.c.

Referenced by handle_show_application(), handle_show_function(), and load_pbx().

char* name

Definition at line 747 of file callerid.c.

Referenced by __iax2_show_peers(), _sip_show_peers(), action_getvar(), action_hangup(), action_originate(), action_redirect(), action_setvar(), action_status(), action_timeout(), add_agent(), adsi_load(), adsi_message(), advanced_options(), ast_channel_free(), ast_dsp_set_call_progress_zone(), ast_getformatname_multiple(), ast_monitor_change_fname(), ast_monitor_start(), ast_monitor_stop(), ast_parse_caller_presentation(), ast_rtp_lookup_mime_multiple(), ast_var_name(), bestdata_handle_escape(), callerid_write(), change_monitor_action(), channel_spy(), chanspy_exec(), complete_agent_logoff_cmd(), dlclose(), do_directory(), dump_ies(), dump_prov_ies(), find_peer(), get_callerid_ast(), get_zap_channel_locked(), handle_context(), handle_macro(), handle_message(), handle_showchan(), iax_provflags2str(), iax_str2flags(), load_pbx(), misdn_cfg_get_config_string(), pbx_builtin_importvar(), pbx_builtin_setglobalvar(), pbx_builtin_setvar(), phone_request(), play_message_callerid(), process_opcode(), process_returncode(), register_verify(), rpt_call(), rpt_exec(), rpt_master(), setcallerid_exec(), settransfercapability_exec(), sip_prune_realtime(), softhangup_exec(), ss_thread(), start_monitor_action(), stop_monitor_action(), strat2int(), unload_module(), update_call_counter(), and vpb_request().

struct { ... } pres_types[] [static]

Referenced by ast_describe_caller_presentation(), and ast_parse_caller_presentation().

float sasdi

Definition at line 64 of file callerid.c.

float sasdr

Definition at line 64 of file callerid.c.

int val

Definition at line 746 of file callerid.c.