Sat Nov 1 06:28:50 2008

Asterisk developer's documentation

---

callerid.c File Reference

CallerID Generation support. More...

#include "asterisk.h"
#include <time.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <math.h>
#include <ctype.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/options.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, const char *name, const char *number, int callwaiting, int codec)
int	ast_callerid_callwaiting_generate (unsigned char *buf, const char *name, const 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, const char *name, const 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)
	Destructively parse inbuf into name and location (or number) Parses callerid stream from inbuf and changes into useable form, outputed in name and location.
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_is_shrinkable_phonenumber (const char *exten)
	Check if a string consists only of digits and and + # ( ) - . (meaning it can be cleaned with ast_shrink_phone_number).
static int	ast_is_valid_string (const char *exten, const char *valid)
	Checks if phone number consists of valid characters.
int	ast_isphonenumber (const char *n)
	Check if a string consists only of digits 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...
static unsigned short	calc_crc (unsigned short crc, unsigned char data)
int	callerid_feed (struct callerid_state *cid, unsigned char *ubuf, int len, int codec)
	Read samples into the state machine.
int	callerid_feed_jp (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, const char *number, const 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, const char *number, const 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)
	CallerID Initialization.
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 []
	Translation table for Caller ID Presentation settings.
float	sasdi
float	sasdr

---

Detailed Description

CallerID Generation support.

Author:

Mark Spencer <markster@digium.com>

Definition in file callerid.c.

---

Define Documentation

#define AST_CALLERID_UNKNOWN   "<unknown>"

Definition at line 78 of file callerid.c.

#define CALLERID_MARK   1200.0

1200 hz for "1"

Definition at line 73 of file callerid.c.

Referenced by callerid_init().

#define CALLERID_SPACE   2200.0

2200 hz for "0"

Definition at line 72 of file callerid.c.

Referenced by callerid_init().

#define CAS_FREQ1   2130.0

Definition at line 75 of file callerid.c.

Referenced by callerid_init().

#define CAS_FREQ2   2750.0

Definition at line 76 of file callerid.c.

Referenced by callerid_init().

#define SAS_FREQ   440.0

Definition at line 74 of file callerid.c.

Referenced by callerid_init().

---

Function Documentation

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

Definition at line 1008 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,
		const char *	name,
		const 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 1022 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,
		const char *	name,
		const 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 1017 of file callerid.c.

References __ast_callerid_generate().

Referenced by dahdi_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 1027 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
	)

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:

always returns 0, as the code always returns something.

Note:

XXX 'name' is not parsed consistently e.g. we have input location name " foo bar " <123> 123 ' foo bar ' (with spaces around) " foo bar " NULL 'foo bar' (without spaces around) " foo bar <123>" 123 '" foo bar' The parsing of leading and trailing space/quotes should be more consistent.

Definition at line 970 of file callerid.c.

References ast_isphonenumber(), and ast_shrink_phone_number().

Referenced by action_originate(), advanced_options(), ast_callerid_split(), ast_privacy_check(), ast_privacy_set(), handle_setcallerid(), misdn_new(), play_message_callerid(), rpt_call(), and write_metadata().

{
   char *ns, *ne, *ls, *le;

   /* Try "name" <location> format or name <location> format */
   if ((ls = strchr(instr, '<')) && (le = strchr(ls, '>'))) {
      *ls = *le = '\0'; /* location found, trim off the brackets */
      *location = ls + 1;  /* and this is the result */
      if ((ns = strchr(instr, '"')) && (ne = strchr(ns + 1, '"'))) {
         *ns = *ne = '\0'; /* trim off the quotes */
         *name = ns + 1;      /* and this is the name */
      } else { /* no quotes, trim off leading and trailing spaces */
         *name = ast_skip_blanks(instr);
         ast_trim_blanks(*name);
      }
   } else { /* no valid brackets */
      char tmp[256];

      ast_copy_string(tmp, instr, sizeof(tmp));
      ast_shrink_phone_number(tmp);
      if (ast_isphonenumber(tmp)) { /* Assume it's just a location */
         *name = NULL;
         strcpy(instr, tmp); /* safe, because tmp will always be the same size or smaller than instr */
         *location = instr;
      } else { /* Assume it's just a name. */
         *location = NULL;
         if ((ns = strchr(instr, '"')) && (ne = strchr(ns + 1, '"'))) {
            *ns = *ne = '\0'; /* trim off the quotes */
            *name = ns + 1;      /* and this is the name */
         } else { /* no quotes, trim off leading and trailing spaces */
            *name = ast_skip_blanks(instr);
            ast_trim_blanks(*name);
         }
      }
   }
   return 0;
}

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

Definition at line 1042 of file callerid.c.

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

Referenced by apply_outgoing(), build_device(), build_gateway(), build_peer(), build_user(), callerid_read(), callerid_write(), disa_exec(), load_module(), process_dahdi(), setcallerid_exec(), store_callerid(), and update_common_options().

{
   char *tmp;
   char *l = NULL, *n = NULL;

   tmp = ast_strdupa(buf);
   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 1099 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
	)

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 235 of file callerid.c.

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

Referenced by __adsi_transmit_messages(), and dahdi_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_is_shrinkable_phonenumber

(

const char *

exten

)

Check if a string consists only of digits and and + # ( ) - . (meaning it can be cleaned with ast_shrink_phone_number).

Returns:

1 if string is valid AST shrinkable phone number

0 if not

Definition at line 955 of file callerid.c.

References ast_is_valid_string().

Referenced by check_user_full().

{
   return ast_is_valid_string(exten, "0123456789*#+()-.");
}

static int ast_is_valid_string	(	const char *	exten,
		const char *	valid
	)			[static]

Checks if phone number consists of valid characters.

Parameters:

	exten	String that needs to be checked
	valid	Valid characters in string

Returns:

1 if valid string, 0 if string contains invalid characters

Definition at line 929 of file callerid.c.

References ast_strlen_zero().

Referenced by ast_is_shrinkable_phonenumber(), and ast_isphonenumber().

{
   int x;

   if (ast_strlen_zero(exten))
      return 0;
   for (x=0; exten[x]; x++)
      if (!strchr(valid, exten[x]))
         return 0;
   return 1;
}

int ast_isphonenumber

(

const char *

n

)

Check if a string consists only of digits and + #.

Returns:

1 if string is valid AST phone number

0 if not

Definition at line 945 of file callerid.c.

References ast_is_valid_string().

Referenced by ast_callerid_parse().

{
   return ast_is_valid_string(n, "0123456789*#+");
}

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 1083 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 893 of file callerid.c.

Referenced by action_originate(), ast_callerid_parse(), ast_callerid_split(), ast_privacy_check(), ast_privacy_set(), check_access(), check_user_full(), handle_setcallerid(), pbx_load_config(), 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';
}

static unsigned short calc_crc	(	unsigned short	crc,
		unsigned char	data
	)			[static]

Definition at line 256 of file callerid.c.

References org.

Referenced by callerid_feed_jp().

{
   unsigned int i, j, org, dst;
   org = data;
   dst = 0;

   for (i=0; i < CHAR_BIT; i++) {
      org <<= 1;
      dst >>= 1;
      if (org & 0x100) {
         dst |= 0x80;
      }
   }
   data = (unsigned char)dst;
   crc ^= (unsigned int)data << (16 - CHAR_BIT);
   for ( j=0; j<CHAR_BIT; j++ ) {
      if ( crc & 0x8000U )
         crc = (crc << 1) ^ 0x1021U ;
      else
         crc <<= 1 ;
   }
      return crc;
}

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 540 of file callerid.c.

References ast_calloc, 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, 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 ss_thread().

{
   int mylen = len;
   int olen;
   int b = 'X';
   int res;
   int x;
   short *buf;
   short *obuf;

   if (!(buf = ast_calloc(1, 2 * len + cid->oldlen))) {
      return -1;
   }

   obuf = buf;
   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, "No start bit found in fsk data.\n");
         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]);
                  }
                  res = cid->rawdata[x];
                  if (0 > res){  /* Negative offset in the CID Spill */
                     ast_log(LOG_NOTICE, "IE %d has bad field length of %d at offset %d\n", cid->rawdata[x-1], cid->rawdata[x], x);
                     /* Try again */
                     cid->sawflag = 0;
                     break;   /* Exit the loop */
                  }
                  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;
}

int callerid_feed_jp	(	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 (for japanese style lines).

Returns:

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

Definition at line 280 of file callerid.c.

References ast_calloc, ast_log(), AST_XLAW, calc_crc(), CID_UNKNOWN_NUMBER, callerid_state::crc, callerid_state::flags, free, fsk_serie(), callerid_state::fskd, callerid_state::len, LOG_DEBUG, LOG_ERROR, LOG_NOTICE, LOG_WARNING, callerid_state::name, callerid_state::number, callerid_state::oldlen, callerid_state::oldstuff, option_debug, callerid_state::pos, callerid_state::rawdata, callerid_state::sawflag, and callerid_state::skipflag.

Referenced by ss_thread().

{
   int mylen = len;
   int olen;
   int b = 'X';
   int b2 ;
   int res;
   int x;
   short *buf;
   short *obuf;

   if (!(buf = ast_calloc(1, 2 * len + cid->oldlen))) {
      return -1;
   }

   obuf = buf;
   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) {
      b = b2 = 0;
      olen = mylen;
      res = fsk_serie(&cid->fskd, buf, &mylen, &b);

      if (mylen < 0) {
         ast_log(LOG_ERROR, "No start bit found in fsk data.\n");
         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) {

         b2 = b ;
         b  = b & 0x7f ;

         /* crc checksum calculation */
         if ( cid->sawflag > 1 ) {
            cid->crc = calc_crc(cid->crc, (unsigned char)b2);
         }

         /* Ignore invalid bytes */
         if (b > 0xff) {
            continue;
         }

         /* skip DLE if needed */
         if ( cid->sawflag > 0 ) {
            if ( cid->sawflag != 5 && cid->skipflag == 0 && b == 0x10 ) {
               cid->skipflag = 1 ;
               continue ;
            }
         }
         if ( cid->skipflag == 1 ) {
            cid->skipflag = 0 ;
         }

         /* caller id retrieval */
         switch(cid->sawflag) {
            case 0: /* DLE */
               if (b == 0x10) {
                  cid->sawflag = 1;
                  cid->skipflag = 0;
                  cid->crc = 0;
               }
               break;
            case 1: /* SOH */
               if (b == 0x01) {
                  cid->sawflag = 2;
               }
               break ;
            case 2: /* HEADER */
               if (b == 0x07) {
                  cid->sawflag = 3;
               }
               break;
            case 3: /* STX */
               if (b == 0x02) {
                  cid->sawflag = 4;
               }
               break;
            case 4: /* SERVICE TYPE */
               if (b == 0x40) {
                  cid->sawflag = 5;
               }
               break;
            case 5: /* Frame Length */
               cid->sawflag = 6;
               break;   
            case 6: /* NUMBER TYPE */
               cid->sawflag = 7;
               cid->pos = 0;
               cid->rawdata[cid->pos++] = b;
               break;
            case 7:  /* NUMBER LENGTH */
               cid->sawflag = 8;
               cid->len = b;
               if ( (cid->len+2) >= sizeof( cid->rawdata ) ) {
                  ast_log(LOG_WARNING, "too long caller id string\n" ) ;
                  free(obuf);
                  return -1;
               }
               cid->rawdata[cid->pos++] = b;
               break;
            case 8:  /* Retrieve message */
               cid->rawdata[cid->pos++] = b;
               cid->len--;
               if (cid->len<=0) {
                  cid->rawdata[cid->pos] = '\0';
                  cid->sawflag = 9;
               }
               break;
            case 9:  /* ETX */
               cid->sawflag = 10;
               break;
            case 10: /* CRC Checksum 1 */
               cid->sawflag = 11;
               break;
            case 11: /* CRC Checksum 2 */
               cid->sawflag = 12;
               if ( cid->crc != 0 ) {
                  ast_log(LOG_WARNING, "crc checksum error\n" ) ;
                  free(obuf);
                  return -1;
               } 
               /* extract caller id data */
               for (x=0; x<cid->pos; ) {
                  switch (cid->rawdata[x++]) {
                  case 0x02: /* caller id  number */
                     cid->number[0] = '\0';
                     cid->name[0] = '\0';
                     cid->flags = 0;
                     res = cid->rawdata[x++];
                     ast_copy_string(cid->number, &cid->rawdata[x], res+1 );
                     x += res;
                     break;
                  case 0x21: /* additional information */
                     /* length */
                     x++; 
                     /* number type */
                                       switch (cid->rawdata[x]) { 
                     case 0x00: /* unknown */
                     case 0x01: /* international number */
                     case 0x02: /* domestic number */
                     case 0x03: /* network */
                     case 0x04: /* local call */
                     case 0x06: /* short dial number */
                     case 0x07: /* reserved */
                     default:   /* reserved */
                        if (option_debug > 1)
                           ast_log(LOG_DEBUG, "cid info:#1=%X\n", cid->rawdata[x]);
                        break ;
                     }
                     x++; 
                     /* numbering plan octed 4 */
                     x++; 
                     /* numbering plan octed 5 */
                     switch (cid->rawdata[x]) { 
                     case 0x00: /* unknown */
                     case 0x01: /* recommendation E.164 ISDN */
                     case 0x03: /* recommendation X.121 */
                     case 0x04: /* telex dial plan */
                     case 0x08: /* domestic dial plan */
                     case 0x09: /* private dial plan */
                     case 0x05: /* reserved */
                     default:   /* reserved */
                        if (option_debug > 1)
                           ast_log(LOG_DEBUG, "cid info:#2=%X\n", cid->rawdata[x]);
                        break ;
                     }
                     x++; 
                     break ;
                  case 0x04: /* no callerid reason */
                     /* length */
                     x++; 
                     /* no callerid reason code */
                     switch (cid->rawdata[x]) {
                     case 'P': /* caller id denied by user */
                     case 'O': /* service not available */
                     case 'C': /* pay phone */
                     case 'S': /* service congested */
                                    cid->flags |= CID_UNKNOWN_NUMBER;
                        if (option_debug > 1)
                           ast_log(LOG_DEBUG, "no cid reason:%c\n",cid->rawdata[x]);
                        break ;
                     }
                     x++; 
                     break ;
                  case 0x09: /* dialed number */
                     /* length */
                     res = cid->rawdata[x++];
                     /* dialed number */
                     x += res;
                     break ;
                  case 0x22: /* dialed number additional information */
                     /* length */
                     x++;
                     /* number type */
                     switch (cid->rawdata[x]) {
                     case 0x00: /* unknown */
                     case 0x01: /* international number */
                     case 0x02: /* domestic number */
                     case 0x03: /* network */
                     case 0x04: /* local call */
                     case 0x06: /* short dial number */
                     case 0x07: /* reserved */
                     default</