Sun Oct 16 2011 08:43:08

Asterisk developer's documentation


sig_pri.c File Reference

PRI signaling module. More...

#include "asterisk.h"
#include <errno.h>
#include <ctype.h>
#include <signal.h>
#include "asterisk/utils.h"
#include "asterisk/options.h"
#include "asterisk/pbx.h"
#include "asterisk/app.h"
#include "asterisk/file.h"
#include "asterisk/callerid.h"
#include "asterisk/say.h"
#include "asterisk/manager.h"
#include "asterisk/astdb.h"
#include "asterisk/causes.h"
#include "asterisk/musiconhold.h"
#include "asterisk/cli.h"
#include "asterisk/transcap.h"
#include "asterisk/features.h"
#include "asterisk/aoc.h"
#include "sig_pri.h"
Include dependency graph for sig_pri.c:

Go to the source code of this file.

Defines

#define DCHAN_AVAILABLE   (DCHAN_NOTINALARM | DCHAN_UP)
#define DCHAN_NOTINALARM   (1 << 0)
#define DCHAN_UP   (1 << 1)
#define FORCE_RESTART_UNAVAIL_CHANS   1
#define PRI_CHANNEL(p)   ((p) & 0xff)
#define PRI_CIS_CALL   (1 << 17)
#define PRI_DEADLOCK_AVOIDANCE(p)
#define PRI_EXPLICIT   (1 << 16)
#define PRI_HELD_CALL   (1 << 18)
#define PRI_SPAN(p)   (((p) >> 8) & 0xff)
#define SIG_PRI_SC_HEADER   "%-4s %4s %-4s %-4s %-10s %-4s %s\n"
#define SIG_PRI_SC_LINE   "%4d %4d %-4s %-4s %-10s %-4s %s"

Enumerations

enum  SIG_PRI_CALL_OPT_ARGS { OPT_ARG_KEYPAD = 0, OPT_ARG_AOC_REQUEST, OPT_ARG_ARRAY_SIZE }
enum  SIG_PRI_CALL_OPT_FLAGS { OPT_KEYPAD = (1 << 0), OPT_REVERSE_CHARGE = (1 << 1), OPT_AOC_REQUEST = (1 << 2) }

Functions

static void apply_plan_to_number (char *buf, size_t size, const struct sig_pri_span *pri, const char *number, const int plan)
static int ast_to_pri_char_set (enum AST_PARTY_CHAR_SET ast_char_set)
static int ast_to_pri_presentation (int ast_presentation)
static int ast_to_pri_reason (enum AST_REDIRECTING_REASON ast_reason)
static void build_status (char *s, size_t len, int status, int active)
static char * dialplan2str (int dialplan)
static void * do_idle_thread (void *v_pvt)
static int pri_active_dchan_index (struct sig_pri_span *pri)
static void pri_check_restart (struct sig_pri_span *pri)
static void * pri_dchannel (void *vpri)
void pri_event_alarm (struct sig_pri_span *pri, int index, int before_start_pri)
void pri_event_noalarm (struct sig_pri_span *pri, int index, int before_start_pri)
static int pri_find_dchan (struct sig_pri_span *pri)
static int pri_find_empty_chan (struct sig_pri_span *pri, int backwards)
static int pri_find_fixup_principle (struct sig_pri_span *pri, int channel, q931_call *call)
static int pri_find_principle (struct sig_pri_span *pri, int channel, q931_call *call)
static int pri_find_principle_by_call (struct sig_pri_span *pri, q931_call *call)
static int pri_fixup_principle (struct sig_pri_span *pri, int principle, q931_call *call)
static int pri_grab (struct sig_pri_chan *p, struct sig_pri_span *pri)
int pri_is_up (struct sig_pri_span *pri)
static char * pri_order (int level)
static void pri_queue_control (struct sig_pri_span *pri, int chanpos, int subclass)
static void pri_queue_frame (struct sig_pri_span *pri, int chanpos, struct ast_frame *frame)
static void pri_rel (struct sig_pri_span *pri)
int pri_send_callrerouting_facility_exec (struct sig_pri_chan *p, enum ast_channel_state chanstate, const char *destination, const char *original, const char *reason)
int pri_send_keypad_facility_exec (struct sig_pri_chan *p, const char *digits)
static void * pri_ss_thread (void *data)
static enum AST_PARTY_CHAR_SET pri_to_ast_char_set (int pri_char_set)
static int pri_to_ast_presentation (int pri_presentation)
static enum AST_REDIRECTING_REASON pri_to_ast_reason (int pri_reason)
static unsigned int PVT_TO_CHANNEL (struct sig_pri_chan *p)
static char * redirectingreason2str (int redirectingreason)
static void sig_pri_ami_channel_event (struct sig_pri_chan *p)
int sig_pri_answer (struct sig_pri_chan *p, struct ast_channel *ast)
int sig_pri_available (struct sig_pri_chan **pvt, int is_specific_channel)
static int sig_pri_available_check (struct sig_pri_chan *pvt)
int sig_pri_call (struct sig_pri_chan *p, struct ast_channel *ast, char *rdest, int timeout, int layer1)
static const char * sig_pri_call_level2str (enum sig_pri_call_level level)
static void sig_pri_cc_generic_check (struct sig_pri_span *pri, int chanpos, enum ast_cc_service_type service)
void sig_pri_chan_alarm_notify (struct sig_pri_chan *p, int noalarm)
 Notify new alarm status.
void sig_pri_chan_delete (struct sig_pri_chan *doomed)
 Delete the sig_pri private channel structure.
struct sig_pri_chansig_pri_chan_new (void *pvt_data, struct sig_pri_callback *callback, struct sig_pri_span *pri, int logicalspan, int channo, int trunkgroup)
void sig_pri_cli_show_channels (int fd, struct sig_pri_span *pri)
void sig_pri_cli_show_channels_header (int fd)
void sig_pri_cli_show_span (int fd, int *dchannels, struct sig_pri_span *pri)
void sig_pri_cli_show_spans (int fd, int span, struct sig_pri_span *pri)
static int sig_pri_cmp_pri_chans (const void *left, const void *right)
int sig_pri_digit_begin (struct sig_pri_chan *pvt, struct ast_channel *ast, char digit)
static void sig_pri_dsp_reset_and_flush_digits (struct sig_pri_chan *p)
void sig_pri_extract_called_num_subaddr (struct sig_pri_chan *p, const char *rdest, char *called, size_t called_buff_size)
 Extract the called number and subaddress from the dial string.
void sig_pri_fixup (struct ast_channel *oldchan, struct ast_channel *newchan, struct sig_pri_chan *pchan)
static void sig_pri_fixup_chans (struct sig_pri_chan *old_chan, struct sig_pri_chan *new_chan)
static const char * sig_pri_get_orig_dialstring (struct sig_pri_chan *p)
static void sig_pri_handle_cis_subcmds (struct sig_pri_span *pri, int event_id, const struct pri_subcommands *subcmds, q931_call *call_rsp)
static void sig_pri_handle_dchan_exception (struct sig_pri_span *pri, int index)
static void sig_pri_handle_subcmds (struct sig_pri_span *pri, int chanpos, int event_id, int channel, const struct pri_subcommands *subcmds, q931_call *call_rsp)
int sig_pri_hangup (struct sig_pri_chan *p, struct ast_channel *ast)
int sig_pri_indicate (struct sig_pri_chan *p, struct ast_channel *chan, int condition, const void *data, size_t datalen)
void sig_pri_init_pri (struct sig_pri_span *pri)
int sig_pri_is_chan_available (struct sig_pri_chan *pvt)
 Determine if a private channel structure is available.
static int sig_pri_is_chan_in_use (struct sig_pri_chan *pvt)
static int sig_pri_is_cis_call (int channel)
static void sig_pri_kill_call (struct sig_pri_span *pri, q931_call *call, int cause)
int sig_pri_load (const char *cc_type_name)
 Load the sig_pri submodule.
static void sig_pri_lock_owner (struct sig_pri_span *pri, int chanpos)
static void sig_pri_lock_private (struct sig_pri_chan *p)
static int sig_pri_msn_match (const char *msn_patterns, const char *exten)
static struct ast_channelsig_pri_new_ast_channel (struct sig_pri_chan *p, int state, int ulaw, int transfercapability, char *exten, const struct ast_channel *requestor)
static void sig_pri_open_media (struct sig_pri_chan *p)
static void sig_pri_party_id_convert (struct ast_party_id *ast_id, const struct pri_party_id *pri_id, struct sig_pri_span *pri)
static void sig_pri_party_id_from_ast (struct pri_party_id *pri_id, const struct ast_party_id *ast_id)
static void sig_pri_party_name_convert (struct ast_party_name *ast_name, const struct pri_party_name *pri_name)
static void sig_pri_party_name_from_ast (struct pri_party_name *pri_name, const struct ast_party_name *ast_name)
static void sig_pri_party_number_convert (struct ast_party_number *ast_number, const struct pri_party_number *pri_number, struct sig_pri_span *pri)
static void sig_pri_party_number_from_ast (struct pri_party_number *pri_number, const struct ast_party_number *ast_number)
static int sig_pri_play_tone (struct sig_pri_chan *p, enum sig_pri_tone tone)
static void sig_pri_redirecting_convert (struct ast_party_redirecting *ast_redirecting, const struct pri_party_redirecting *pri_redirecting, const struct ast_party_redirecting *ast_guide, struct sig_pri_span *pri)
static void sig_pri_redirecting_update (struct sig_pri_chan *pvt, struct ast_channel *ast)
struct ast_channelsig_pri_request (struct sig_pri_chan *p, enum sig_pri_law law, const struct ast_channel *requestor, int transfercapability)
void sig_pri_set_alarm (struct sig_pri_chan *p, int in_alarm)
static void sig_pri_set_caller_id (struct sig_pri_chan *p)
static void sig_pri_set_dialing (struct sig_pri_chan *p, int is_dialing)
static void sig_pri_set_digital (struct sig_pri_chan *p, int is_digital)
static void sig_pri_set_dnid (struct sig_pri_chan *p, const char *dnid)
static int sig_pri_set_echocanceller (struct sig_pri_chan *p, int enable)
static void sig_pri_set_rdnis (struct sig_pri_chan *p, const char *rdnis)
static void sig_pri_sort_pri_chans (struct sig_pri_span *pri)
static void sig_pri_span_devstate_changed (struct sig_pri_span *pri)
int sig_pri_start_pri (struct sig_pri_span *pri)
void sig_pri_stop_pri (struct sig_pri_span *pri)
 Stop PRI span.
void sig_pri_unload (void)
 Unload the sig_pri submodule.
static void sig_pri_unlock_private (struct sig_pri_chan *p)

Variables

static int pri_gendigittimeout = 8000
static int pri_matchdigittimeout = 3000
static struct ast_app_option sig_pri_call_opts [128] = { [ 'K' ] = { .flag = OPT_KEYPAD , .arg_index = OPT_ARG_KEYPAD + 1 }, [ 'R' ] = { .flag = OPT_REVERSE_CHARGE }, [ 'A' ] = { .flag = OPT_AOC_REQUEST , .arg_index = OPT_ARG_AOC_REQUEST + 1 }, }

Detailed Description

PRI signaling module.

Author:
Matthew Fredrickson <creslin@digium.com>

Definition in file sig_pri.c.


Define Documentation

#define DCHAN_AVAILABLE   (DCHAN_NOTINALARM | DCHAN_UP)

Definition at line 116 of file sig_pri.c.

Referenced by pri_is_up(), and pri_find_dchan().

#define DCHAN_NOTINALARM   (1 << 0)

Definition at line 105 of file sig_pri.c.

Referenced by pri_event_alarm(), pri_event_noalarm(), and build_status().

#define DCHAN_UP   (1 << 1)

Definition at line 106 of file sig_pri.c.

Referenced by pri_event_alarm(), pri_dchannel(), and build_status().

#define FORCE_RESTART_UNAVAIL_CHANS   1

Define to make always pick a channel if allowed. Useful for testing channel shifting.

Define to force a RESTART on a channel that returns a cause code of PRI_CAUSE_REQUESTED_CHAN_UNAVAIL(44). If the cause is because of a stuck channel on the peer and the channel is always the next channel we pick for an outgoing call then this can help.

Definition at line 72 of file sig_pri.c.

#define PRI_CHANNEL (   p)    ((p) & 0xff)
#define PRI_CIS_CALL   (1 << 17)

Definition at line 112 of file sig_pri.c.

Referenced by sig_pri_is_cis_call().

#define PRI_DEADLOCK_AVOIDANCE (   p)
Value:
do { \
      sig_pri_unlock_private(p); \
      usleep(1); \
      sig_pri_lock_private(p); \
   } while (0)

Definition at line 118 of file sig_pri.c.

Referenced by pri_grab(), and sig_pri_lock_owner().

#define PRI_EXPLICIT   (1 << 16)

Definition at line 111 of file sig_pri.c.

Referenced by PVT_TO_CHANNEL(), and pri_find_principle().

#define PRI_HELD_CALL   (1 << 18)

Definition at line 113 of file sig_pri.c.

Referenced by pri_find_principle().

#define PRI_SPAN (   p)    (((p) >> 8) & 0xff)
#define SIG_PRI_SC_HEADER   "%-4s %4s %-4s %-4s %-10s %-4s %s\n"

Definition at line 7670 of file sig_pri.c.

Referenced by sig_pri_cli_show_channels_header().

#define SIG_PRI_SC_LINE   "%4d %4d %-4s %-4s %-10s %-4s %s"

Definition at line 7671 of file sig_pri.c.

Referenced by sig_pri_cli_show_channels().


Enumeration Type Documentation

Enumerator:
OPT_ARG_KEYPAD 
OPT_ARG_AOC_REQUEST 
OPT_ARG_ARRAY_SIZE 

Definition at line 6385 of file sig_pri.c.

                           {
   OPT_ARG_KEYPAD = 0,
   OPT_ARG_AOC_REQUEST,

   /* note: this entry _MUST_ be the last one in the enum */
   OPT_ARG_ARRAY_SIZE,
};
Enumerator:
OPT_KEYPAD 
OPT_REVERSE_CHARGE 
OPT_AOC_REQUEST 

Definition at line 6380 of file sig_pri.c.

                            {
   OPT_KEYPAD =         (1 << 0),
   OPT_REVERSE_CHARGE = (1 << 1),   /* Collect call */
   OPT_AOC_REQUEST =    (1 << 2),   /* AOC Request */
};

Function Documentation

static void apply_plan_to_number ( char *  buf,
size_t  size,
const struct sig_pri_span pri,
const char *  number,
const int  plan 
) [static]

Definition at line 1544 of file sig_pri.c.

References sig_pri_span::internationalprefix, sig_pri_span::nationalprefix, sig_pri_span::localprefix, sig_pri_span::privateprefix, and sig_pri_span::unknownprefix.

Referenced by sig_pri_party_number_convert(), and pri_dchannel().

{
   switch (plan) {
   case PRI_INTERNATIONAL_ISDN:     /* Q.931 dialplan == 0x11 international dialplan => prepend international prefix digits */
      snprintf(buf, size, "%s%s", pri->internationalprefix, number);
      break;
   case PRI_NATIONAL_ISDN:       /* Q.931 dialplan == 0x21 national dialplan => prepend national prefix digits */
      snprintf(buf, size, "%s%s", pri->nationalprefix, number);
      break;
   case PRI_LOCAL_ISDN:       /* Q.931 dialplan == 0x41 local dialplan => prepend local prefix digits */
      snprintf(buf, size, "%s%s", pri->localprefix, number);
      break;
   case PRI_PRIVATE:       /* Q.931 dialplan == 0x49 private dialplan => prepend private prefix digits */
      snprintf(buf, size, "%s%s", pri->privateprefix, number);
      break;
   case PRI_UNKNOWN:       /* Q.931 dialplan == 0x00 unknown dialplan => prepend unknown prefix digits */
      snprintf(buf, size, "%s%s", pri->unknownprefix, number);
      break;
   default:          /* other Q.931 dialplan => don't twiddle with callingnum */
      snprintf(buf, size, "%s", number);
      break;
   }
}
static int ast_to_pri_char_set ( enum AST_PARTY_CHAR_SET  ast_char_set) [static]

Definition at line 566 of file sig_pri.c.

References AST_PARTY_CHAR_SET_UNKNOWN, AST_PARTY_CHAR_SET_ISO8859_1, AST_PARTY_CHAR_SET_WITHDRAWN, AST_PARTY_CHAR_SET_ISO8859_2, AST_PARTY_CHAR_SET_ISO8859_3, AST_PARTY_CHAR_SET_ISO8859_4, AST_PARTY_CHAR_SET_ISO8859_5, AST_PARTY_CHAR_SET_ISO8859_7, AST_PARTY_CHAR_SET_ISO10646_BMPSTRING, and AST_PARTY_CHAR_SET_ISO10646_UTF_8STRING.

Referenced by sig_pri_party_name_from_ast().

{
   int pri_char_set;

   switch (ast_char_set) {
   default:
   case AST_PARTY_CHAR_SET_UNKNOWN:
      pri_char_set = PRI_CHAR_SET_UNKNOWN;
      break;
   case AST_PARTY_CHAR_SET_ISO8859_1:
      pri_char_set = PRI_CHAR_SET_ISO8859_1;
      break;
   case AST_PARTY_CHAR_SET_WITHDRAWN:
      pri_char_set = PRI_CHAR_SET_WITHDRAWN;
      break;
   case AST_PARTY_CHAR_SET_ISO8859_2:
      pri_char_set = PRI_CHAR_SET_ISO8859_2;
      break;
   case AST_PARTY_CHAR_SET_ISO8859_3:
      pri_char_set = PRI_CHAR_SET_ISO8859_3;
      break;
   case AST_PARTY_CHAR_SET_ISO8859_4:
      pri_char_set = PRI_CHAR_SET_ISO8859_4;
      break;
   case AST_PARTY_CHAR_SET_ISO8859_5:
      pri_char_set = PRI_CHAR_SET_ISO8859_5;
      break;
   case AST_PARTY_CHAR_SET_ISO8859_7:
      pri_char_set = PRI_CHAR_SET_ISO8859_7;
      break;
   case AST_PARTY_CHAR_SET_ISO10646_BMPSTRING:
      pri_char_set = PRI_CHAR_SET_ISO10646_BMPSTRING;
      break;
   case AST_PARTY_CHAR_SET_ISO10646_UTF_8STRING:
      pri_char_set = PRI_CHAR_SET_ISO10646_UTF_8STRING;
      break;
   }

   return pri_char_set;
}
static int ast_to_pri_presentation ( int  ast_presentation) [static]

Definition at line 467 of file sig_pri.c.

References AST_PRES_ALLOWED_USER_NUMBER_NOT_SCREENED, AST_PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN, AST_PRES_ALLOWED_USER_NUMBER_FAILED_SCREEN, AST_PRES_ALLOWED_NETWORK_NUMBER, AST_PRES_PROHIB_USER_NUMBER_NOT_SCREENED, AST_PRES_PROHIB_USER_NUMBER_PASSED_SCREEN, AST_PRES_PROHIB_USER_NUMBER_FAILED_SCREEN, AST_PRES_PROHIB_NETWORK_NUMBER, and AST_PRES_NUMBER_NOT_AVAILABLE.

Referenced by sig_pri_party_name_from_ast(), and sig_pri_party_number_from_ast().

{
   int pri_presentation;

   switch (ast_presentation) {
   case AST_PRES_ALLOWED_USER_NUMBER_NOT_SCREENED:
      pri_presentation = PRES_ALLOWED_USER_NUMBER_NOT_SCREENED;
      break;
   case AST_PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN:
      pri_presentation = PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN;
      break;
   case AST_PRES_ALLOWED_USER_NUMBER_FAILED_SCREEN:
      pri_presentation = PRES_ALLOWED_USER_NUMBER_FAILED_SCREEN;
      break;
   case AST_PRES_ALLOWED_NETWORK_NUMBER:
      pri_presentation = PRES_ALLOWED_NETWORK_NUMBER;
      break;
   case AST_PRES_PROHIB_USER_NUMBER_NOT_SCREENED:
      pri_presentation = PRES_PROHIB_USER_NUMBER_NOT_SCREENED;
      break;
   case AST_PRES_PROHIB_USER_NUMBER_PASSED_SCREEN:
      pri_presentation = PRES_PROHIB_USER_NUMBER_PASSED_SCREEN;
      break;
   case AST_PRES_PROHIB_USER_NUMBER_FAILED_SCREEN:
      pri_presentation = PRES_PROHIB_USER_NUMBER_FAILED_SCREEN;
      break;
   case AST_PRES_PROHIB_NETWORK_NUMBER:
      pri_presentation = PRES_PROHIB_NETWORK_NUMBER;
      break;
   case AST_PRES_NUMBER_NOT_AVAILABLE:
      pri_presentation = PRES_NUMBER_NOT_AVAILABLE;
      break;
   default:
      pri_presentation = PRES_PROHIB_USER_NUMBER_NOT_SCREENED;
      break;
   }

   return pri_presentation;
}
static int ast_to_pri_reason ( enum AST_REDIRECTING_REASON  ast_reason) [static]

Definition at line 383 of file sig_pri.c.

References AST_REDIRECTING_REASON_USER_BUSY, AST_REDIRECTING_REASON_NO_ANSWER, AST_REDIRECTING_REASON_UNCONDITIONAL, AST_REDIRECTING_REASON_DEFLECTION, and AST_REDIRECTING_REASON_UNKNOWN.

Referenced by sig_pri_redirecting_update().

{
   int pri_reason;

   switch (ast_reason) {
   case AST_REDIRECTING_REASON_USER_BUSY:
      pri_reason = PRI_REDIR_FORWARD_ON_BUSY;
      break;
   case AST_REDIRECTING_REASON_NO_ANSWER:
      pri_reason = PRI_REDIR_FORWARD_ON_NO_REPLY;
      break;
   case AST_REDIRECTING_REASON_UNCONDITIONAL:
      pri_reason = PRI_REDIR_UNCONDITIONAL;
      break;
   case AST_REDIRECTING_REASON_DEFLECTION:
      pri_reason = PRI_REDIR_DEFLECTION;
      break;
   case AST_REDIRECTING_REASON_UNKNOWN:
   default:
      pri_reason = PRI_REDIR_UNKNOWN;
      break;
   }

   return pri_reason;
}
static void build_status ( char *  s,
size_t  len,
int  status,
int  active 
) [static]

Definition at line 7719 of file sig_pri.c.

References DCHAN_NOTINALARM, and DCHAN_UP.

Referenced by sig_pri_cli_show_spans(), and sig_pri_cli_show_span().

{
   if (!s || len < 1) {
      return;
   }
   s[0] = '\0';
   if (!(status & DCHAN_NOTINALARM))
      strncat(s, "In Alarm, ", len - strlen(s) - 1);
   if (status & DCHAN_UP)
      strncat(s, "Up", len - strlen(s) - 1);
   else
      strncat(s, "Down", len - strlen(s) - 1);
   if (active)
      strncat(s, ", Active", len - strlen(s) - 1);
   else
      strncat(s, ", Standby", len - strlen(s) - 1);
   s[len - 1] = '\0';
}
static char* dialplan2str ( int  dialplan) [static]

Definition at line 1536 of file sig_pri.c.

Referenced by sig_pri_call().

{
   if (dialplan == -1) {
      return("Dynamically set dialplan in ISDN");
   }
   return (pri_plan2str(dialplan));
}
static void* do_idle_thread ( void *  v_pvt) [static]

Definition at line 1720 of file sig_pri.c.

References sig_pri_chan::owner, f, ast_verb, ast_channel::name, sig_pri_chan::channel, sig_pri_chan::pri, sig_pri_span::idledial, ast_call(), ast_log(), LOG_WARNING, ast_hangup(), ast_waitfor(), ast_read(), ast_frame::frametype, AST_FRAME_CONTROL, ast_frame::subclass, ast_frame_subclass::integer, AST_CONTROL_ANSWER, ast_copy_string(), ast_channel::exten, sig_pri_span::idleext, ast_channel::context, sig_pri_span::idlecontext, ast_channel::priority, ast_pbx_run(), AST_CONTROL_BUSY, AST_CONTROL_CONGESTION, and ast_frfree.

Referenced by pri_dchannel().

{
   struct sig_pri_chan *pvt = v_pvt;
   struct ast_channel *chan = pvt->owner;
   struct ast_frame *f;
   char ex[80];
   /* Wait up to 30 seconds for an answer */
   int newms, ms = 30000;

   ast_verb(3, "Initiating idle call on channel %s\n", chan->name);
   snprintf(ex, sizeof(ex), "%d/%s", pvt->channel, pvt->pri->idledial);
   if (ast_call(chan, ex, 0)) {
      ast_log(LOG_WARNING, "Idle dial failed on '%s' to '%s'\n", chan->name, ex);
      ast_hangup(chan);
      return NULL;
   }
   while ((newms = ast_waitfor(chan, ms)) > 0) {
      f = ast_read(chan);
      if (!f) {
         /* Got hangup */
         break;
      }
      if (f->frametype == AST_FRAME_CONTROL) {
         switch (f->subclass.integer) {
         case AST_CONTROL_ANSWER:
            /* Launch the PBX */
            ast_copy_string(chan->exten, pvt->pri->idleext, sizeof(chan->exten));
            ast_copy_string(chan->context, pvt->pri->idlecontext, sizeof(chan->context));
            chan->priority = 1;
            ast_verb(4, "Idle channel '%s' answered, sending to %s@%s\n", chan->name, chan->exten, chan->context);
            ast_pbx_run(chan);
            /* It's already hungup, return immediately */
            return NULL;
         case AST_CONTROL_BUSY:
            ast_verb(4, "Idle channel '%s' busy, waiting...\n", chan->name);
            break;
         case AST_CONTROL_CONGESTION:
            ast_verb(4, "Idle channel '%s' congested, waiting...\n", chan->name);
            break;
         };
      }
      ast_frfree(f);
      ms = newms;
   }
   /* Hangup the channel since nothing happend */
   ast_hangup(chan);
   return NULL;
}
static int pri_active_dchan_index ( struct sig_pri_span pri) [static]

Definition at line 1022 of file sig_pri.c.

References SIG_PRI_NUM_DCHANS, sig_pri_span::dchans, sig_pri_span::pri, ast_log(), and LOG_WARNING.

Referenced by pri_find_principle().

{
   int x;

   for (x = 0; x < SIG_PRI_NUM_DCHANS; x++) {
      if ((pri->dchans[x] == pri->pri))
         return x;
   }

   ast_log(LOG_WARNING, "No active dchan found!\n");
   return -1;
}
static void pri_check_restart ( struct sig_pri_span pri) [static]

Definition at line 1578 of file sig_pri.c.

References sig_pri_span::resetpos, sig_pri_span::numchans, sig_pri_span::pvts, sig_pri_chan::no_b_channel, sig_pri_is_chan_in_use(), ast_log(), LOG_NOTICE, sig_pri_span::span, sig_pri_chan::channel, sig_pri_chan::resetting, sig_pri_span::pri, PVT_TO_CHANNEL(), sig_pri_span::resetting, sig_pri_span::lastreset, and sig_pri_span_devstate_changed().

Referenced by pri_dchannel().

{
#if defined(HAVE_PRI_SERVICE_MESSAGES)
   unsigned why;
#endif   /* defined(HAVE_PRI_SERVICE_MESSAGES) */

   for (++pri->resetpos; pri->resetpos < pri->numchans; ++pri->resetpos) {
      if (!pri->pvts[pri->resetpos]
         || pri->pvts[pri->resetpos]->no_b_channel
         || sig_pri_is_chan_in_use(pri->pvts[pri->resetpos])) {
         continue;
      }
#if defined(HAVE_PRI_SERVICE_MESSAGES)
      why = pri->pvts[pri->resetpos]->service_status;
      if (why) {
         ast_log(LOG_NOTICE,
            "Span %d: channel %d out-of-service (reason: %s), not sending RESTART\n",
            pri->span, pri->pvts[pri->resetpos]->channel,
            (why & SRVST_FAREND) ? (why & SRVST_NEAREND) ? "both ends" : "far end" : "near end");
         continue;
      }
#endif   /* defined(HAVE_PRI_SERVICE_MESSAGES) */
      break;
   }
   if (pri->resetpos < pri->numchans) {
      /* Mark the channel as resetting and restart it */
      pri->pvts[pri->resetpos]->resetting = 1;
      pri_reset(pri->pri, PVT_TO_CHANNEL(pri->pvts[pri->resetpos]));
   } else {
      pri->resetting = 0;
      time(&pri->lastreset);
      sig_pri_span_devstate_changed(pri);
   }
}
static void* pri_dchannel ( void *  vpri) [static]

Definition at line 4478 of file sig_pri.c.

References AST_MAX_EXTENSION, len(), ast_strlen_zero(), sig_pri_span::idledial, sig_pri_span::idleext, ast_copy_string(), sig_pri_span::idlecontext, ast_exists_extension(), ast_log(), LOG_WARNING, SIG_PRI_NUM_DCHANS, sig_pri_span::dchans, sig_pri_span::fds, ast_mutex_lock, sig_pri_span::lock, sig_pri_span::switchtype, sig_pri_span::sig, SIG_BRI_PTMP, sig_pri_span::resetinterval, sig_pri_span::resetting, pri_is_up(), sig_pri_span::resetpos, pri_check_restart(), sig_pri_span_devstate_changed(), sig_pri_span::lastreset, sig_pri_span::numchans, sig_pri_span::pvts, sig_pri_chan::no_b_channel, sig_pri_is_chan_available(), sig_pri_chan::owner, sig_pri_chan::isidlecall, ast_tvdiff_ms(), ast_tvnow(), sig_pri_chan::channel, sig_pri_chan::allocated, ast_mutex_unlock, sig_pri_lock_private(), sig_pri_unlock_private(), sig_pri_request(), AST_FORMAT_ULAW, ast_pthread_create_background, do_idle_thread(), ast_channel::name, ast_hangup(), sig_pri_span::minidle, ast_channel::_softhangup, AST_SOFTHANGUP_DEV, sig_pri_span::minunused, ast_tv(), ast_tvsub(), ast_tvcmp(), sig_pri_handle_dchan_exception(), errno, sig_pri_span::debug, ast_verbose(), sig_pri_span::span, sig_pri_span::dchanavail, DCHAN_UP, ast_verb, pri_order(), sig_pri_span::pri, sig_pri_span::no_d_channels, pri_find_dchan(), sig_pri_set_alarm(), sig_pri_chan::pri, sig_pri_chan::call, PRI_CHANNEL, pri_find_principle(), PRI_SPAN, LOG_NOTICE, sig_pri_is_cis_call(), sig_pri_handle_cis_subcmds(), pri_find_principle_by_call(), sig_pri_handle_subcmds(), sig_pri_span::overlapdial, DAHDI_OVERLAPDIAL_INCOMING, AST_FRAME_DTMF, pri_queue_frame(), ast_db_del(), ast_db_put(), LOG_ERROR, ast_debug, sig_pri_span::msn_list, sig_pri_msn_match(), pri_find_empty_chan(), ring(), apply_plan_to_number(), sig_pri_set_rdnis(), sig_pri_chan::cid_ani2, sig_pri_chan::use_callerid, ast_shrink_phone_number(), sig_pri_chan::cid_num, sig_pri_chan::cid_ani, sig_pri_chan::cid_subaddr, ast_party_subaddress_init(), ast_party_subaddress::str, ast_party_subaddress_free(), sig_pri_chan::cid_name, sig_pri_chan::cid_ton, sig_pri_chan::callingpres, sig_pri_span::append_msn_to_user_tag, sig_pri_chan::user_tag, sig_pri_span::initial_user_tag, sig_pri_span::nodetype, sig_pri_set_caller_id(), sig_pri_set_dnid(), sig_pri_chan::immediate, sig_pri_chan::exten, ast_canmatch_extension(), sig_pri_chan::context, SIG_PRI_ALAW, SIG_PRI_ULAW, SIG_PRI_DEFLAW, sig_pri_chan::call_level, SIG_PRI_CALL_LEVEL_PROCEEDING, PVT_TO_CHANNEL(), SIG_PRI_CALL_LEVEL_CONNECT, SIG_PRI_CALL_LEVEL_OVERLAP, ast_matchmore_extension(), sig_pri_new_ast_channel(), AST_STATE_RESERVED, sig_pri_lock_owner(), ast_channel::caller, ast_party_caller::id, ast_party_id::subaddress, pbx_builtin_setvar_helper(), ast_channel::data, ast_channel_unlock, ast_channel::dialed, ast_party_dialed::subaddress, redirectingreason2str(), sig_pri_chan::digital, sig_pri_chan::progress, ast_pthread_create_detached, pri_ss_thread(), S_OR, sig_pri_chan::logicalspan, sig_pri_chan::prioffset, AST_STATE_RING, ast_pbx_start(), sig_pri_set_echocanceller(), pri_find_fixup_principle(), sig_pri_cc_generic_check(), AST_CC_CCNR, ast_setstate(), AST_STATE_RINGING, pri_queue_control(), AST_CONTROL_RINGING, SIG_PRI_CALL_LEVEL_ALERTING, AST_CONTROL_PROGRESS, sig_pri_set_dialing(), sig_pri_open_media(), AST_CAUSE_USER_BUSY, ast_channel::hangupcause, AST_CONTROL_BUSY, AST_CONTROL_PROCEEDING, pri_fixup_principle(), AST_CC_CCBS, ast_channel::_state, AST_STATE_BUSY, AST_STATE_UP, ast_softhangup_nolock(), AST_CONTROL_CONGESTION, ast_atomic_fetchadd_int(), AST_CONTROL_ANSWER, sig_pri_chan::alreadyhungup, sig_pri_chan::outgoing, AST_CONTROL_HANGUP, sig_pri_chan::resetting, ast_bridged_channel(), sig_pri_chan::dialdest, DAHDI_OVERLAPDIAL_OUTGOING, sig_pri_span::discardremoteholdretrieval, AST_CONTROL_HOLD, and AST_CONTROL_UNHOLD.

Referenced by sig_pri_start_pri().

{
   struct sig_pri_span *pri = vpri;
   pri_event *e;
   struct pollfd fds[SIG_PRI_NUM_DCHANS];
   int res;
   int chanpos = 0;
   int x;
   int law;
   struct ast_channel *c;
   struct timeval tv, lowest, *next;
   int doidling=0;
   char *cc;
   time_t t;
   int i, which=-1;
   int numdchans;
   pthread_t threadid;
   char ani2str[6];
   char plancallingnum[AST_MAX_EXTENSION];
   char plancallingani[AST_MAX_EXTENSION];
   char calledtonstr[10];
   struct timeval lastidle = { 0, 0 };
   pthread_t p;
   struct ast_channel *idle;
   char idlen[80];
   int nextidle = -1;
   int haveidles;
   int activeidles;
   unsigned int len;

   gettimeofday(&lastidle, NULL);
   pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, NULL);

   if (!ast_strlen_zero(pri->idledial) && !ast_strlen_zero(pri->idleext)) {
      /* Need to do idle dialing, check to be sure though */
      cc = strchr(pri->idleext, '@');
      if (cc) {
         *cc = '\0';
         cc++;
         ast_copy_string(pri->idlecontext, cc, sizeof(pri->idlecontext));
#if 0
         /* Extensions may not be loaded yet */
         if (!ast_exists_extension(NULL, pri->idlecontext, pri->idleext, 1, NULL))
            ast_log(LOG_WARNING, "Extension '%s @ %s' does not exist\n", pri->idleext, pri->idlecontext);
         else
#endif
            doidling = 1;
      } else
         ast_log(LOG_WARNING, "Idle dial string '%s' lacks '@context'\n", pri->idleext);
   }
   for (;;) {
      for (i = 0; i < SIG_PRI_NUM_DCHANS; i++) {
         if (!pri->dchans[i])
            break;
         fds[i].fd = pri->fds[i];
         fds[i].events = POLLIN | POLLPRI;
         fds[i].revents = 0;
      }
      numdchans = i;
      time(&t);
      ast_mutex_lock(&pri->lock);
      if (pri->switchtype != PRI_SWITCH_GR303_TMC && (pri->sig != SIG_BRI_PTMP) && (pri->resetinterval > 0)) {
         if (pri->resetting && pri_is_up(pri)) {
            if (pri->resetpos < 0) {
               pri_check_restart(pri);
               if (pri->resetting) {
                  sig_pri_span_devstate_changed(pri);
               }
            }
         } else {
            if (!pri->resetting  && (t - pri->lastreset) >= pri->resetinterval) {
               pri->resetting = 1;
               pri->resetpos = -1;
            }
         }
      }
      /* Look for any idle channels if appropriate */
      if (doidling && pri_is_up(pri)) {
         nextidle = -1;
         haveidles = 0;
         activeidles = 0;
         for (x = pri->numchans; x >= 0; x--) {
            if (pri->pvts[x] && !pri->pvts[x]->no_b_channel) {
               if (sig_pri_is_chan_available(pri->pvts[x])) {
                  if (haveidles < pri->minunused) {
                     haveidles++;
                  } else {
                     nextidle = x;
                     break;
                  }
               } else if (pri->pvts[x]->owner && pri->pvts[x]->isidlecall) {
                  activeidles++;
               }
            }
         }
         if (nextidle > -1) {
            if (ast_tvdiff_ms(ast_tvnow(), lastidle) > 1000) {
               /* Don't create a new idle call more than once per second */
               snprintf(idlen, sizeof(idlen), "%d/%s", pri->pvts[nextidle]->channel, pri->idledial);
               pri->pvts[nextidle]->allocated = 1;
               /*
                * Release the PRI lock while we create the channel so other
                * threads can send D channel messages.
                */
               ast_mutex_unlock(&pri->lock);
               /*
                * We already have the B channel reserved for this call.  We
                * just need to make sure that sig_pri_hangup() has completed
                * cleaning up before continuing.
                */
               sig_pri_lock_private(pri->pvts[nextidle]);
               sig_pri_unlock_private(pri->pvts[nextidle]);
               idle = sig_pri_request(pri->pvts[nextidle], AST_FORMAT_ULAW, NULL, 0);
               ast_mutex_lock(&pri->lock);
               if (idle) {
                  pri->pvts[nextidle]->isidlecall = 1;
                  if (ast_pthread_create_background(&p, NULL, do_idle_thread, pri->pvts[nextidle])) {
                     ast_log(LOG_WARNING, "Unable to start new thread for idle channel '%s'\n", idle->name);
                     ast_mutex_unlock(&pri->lock);
                     ast_hangup(idle);
                     ast_mutex_lock(&pri->lock);
                  }
               } else {
                  pri->pvts[nextidle]->allocated = 0;
                  ast_log(LOG_WARNING, "Unable to request channel 'DAHDI/%s' for idle call\n", idlen);
               }
               gettimeofday(&lastidle, NULL);
            }
         } else if ((haveidles < pri->minunused) &&
            (activeidles > pri->minidle)) {
            /* Mark something for hangup if there is something
               that can be hungup */
            for (x = pri->numchans; x >= 0; x--) {
               /* find a candidate channel */
               if (pri->pvts[x] && pri->pvts[x]->owner && pri->pvts[x]->isidlecall) {
                  pri->pvts[x]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
                  haveidles++;
                  /* Stop if we have enough idle channels or
                    can't spare any more active idle ones */
                  if ((haveidles >= pri->minunused) ||
                     (activeidles <= pri->minidle))
                     break;
               }
            }
         }
      }
      /* Start with reasonable max */
      if (doidling || pri->resetting) {
         /*
          * Make sure we stop at least once per second if we're
          * monitoring idle channels
          */
         lowest = ast_tv(1, 0);
      } else {
         /* Don't poll for more than 60 seconds */
         lowest = ast_tv(60, 0);
      }
      for (i = 0; i < SIG_PRI_NUM_DCHANS; i++) {
         if (!pri->dchans[i]) {
            /* We scanned all D channels on this span. */
            break;
         }
         next = pri_schedule_next(pri->dchans[i]);
         if (next) {
            /* We need relative time here */
            tv = ast_tvsub(*next, ast_tvnow());
            if (tv.tv_sec < 0) {
               /*
                * A timer has already expired.
                * By definition zero time is the lowest so we can quit early.
                */
               lowest = ast_tv(0, 0);
               break;
            }
            if (ast_tvcmp(tv, lowest) < 0) {
               lowest = tv;
            }
         }
      }
      ast_mutex_unlock(&pri->lock);

      pthread_setcancelstate(PTHREAD_CANCEL_ENABLE, NULL);
      pthread_testcancel();
      e = NULL;
      res = poll(fds, numdchans, lowest.tv_sec * 1000 + lowest.tv_usec / 1000);
      pthread_testcancel();
      pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, NULL);

      ast_mutex_lock(&pri->lock);
      if (!res) {
         for (which = 0; which < SIG_PRI_NUM_DCHANS; which++) {
            if (!pri->dchans[which])
               break;
            /* Just a timeout, run the scheduler */
            e = pri_schedule_run(pri->dchans[which]);
            if (e)
               break;
         }
      } else if (res > -1) {
         for (which = 0; which < SIG_PRI_NUM_DCHANS; which++) {
            if (!pri->dchans[which])
               break;
            if (fds[which].revents & POLLPRI) {
               sig_pri_handle_dchan_exception(pri, which);
            } else if (fds[which].revents & POLLIN) {
               e = pri_check_event(pri->dchans[which]);
            }
            if (e)
               break;
         }
      } else if (errno != EINTR)
         ast_log(LOG_WARNING, "pri_event returned error %d (%s)\n", errno, strerror(errno));

      if (e) {
         if (pri->debug) {
            ast_verbose("Span: %d Processing event: %s\n",
               pri->span, pri_event2str(e->e));
         }

         if (e->e != PRI_EVENT_DCHAN_DOWN) {
            if (!(pri->dchanavail[which] & DCHAN_UP)) {
               ast_verb(2, "%s D-Channel on span %d up\n", pri_order(which), pri->span);
            }
            pri->dchanavail[which] |= DCHAN_UP;
         } else {
            if (pri->dchanavail[which] & DCHAN_UP) {
               ast_verb(2, "%s D-Channel on span %d down\n", pri_order(which), pri->span);
            }
            pri->dchanavail[which] &= ~DCHAN_UP;
         }

         if ((e->e != PRI_EVENT_DCHAN_UP) && (e->e != PRI_EVENT_DCHAN_DOWN) && (pri->pri != pri->dchans[which]))
            /* Must be an NFAS group that has the secondary dchan active */
            pri->pri = pri->dchans[which];

         switch (e->e) {
         case PRI_EVENT_DCHAN_UP:
            pri->no_d_channels = 0;
            if (!pri->pri) pri_find_dchan(pri);

            /* Note presense of D-channel */
            time(&pri->lastreset);

            /* Restart in 5 seconds */
            if (pri->resetinterval > -1) {
               pri->lastreset -= pri->resetinterval;
               pri->lastreset += 5;
            }
            /* Take the channels from inalarm condition */
            pri->resetting = 0;
            for (i = 0; i < pri->numchans; i++) {
               if (pri->pvts[i]) {
                  sig_pri_set_alarm(pri->pvts[i], 0);
               }
            }
            sig_pri_span_devstate_changed(pri);
            break;
         case PRI_EVENT_DCHAN_DOWN:
            pri_find_dchan(pri);
            if (!pri_is_up(pri)) {
               if (pri->sig == SIG_BRI_PTMP) {
                  /* For PTMP connections with non persistent layer 2 we want
                   * to *not* declare inalarm unless there actually is an alarm */
                  break;
               }
               /* Hangup active channels and put them in alarm mode */
               pri->resetting = 0;
               for (i = 0; i < pri->numchans; i++) {
                  struct sig_pri_chan *p = pri->pvts[i];

                  if (p) {
                     if (pri_get_timer(p->pri->pri, PRI_TIMER_T309) < 0) {
                        /* T309 is not enabled : destroy calls when alarm occurs */
                        if (p->call) {
                           pri_destroycall(p->pri->pri, p->call);
                           p->call = NULL;
                        }
                        if (p->owner)
                           p->owner->_softhangup |= AST_SOFTHANGUP_DEV;
                     }
                     sig_pri_set_alarm(p, 1);
                  }
               }
               sig_pri_span_devstate_changed(pri);
            }
            break;
         case PRI_EVENT_RESTART:
            if (e->restart.channel > -1 && PRI_CHANNEL(e->ring.channel) != 0xFF) {
               chanpos = pri_find_principle(pri, e->restart.channel, NULL);
               if (chanpos < 0)
                  ast_log(LOG_WARNING,
                     "Span %d: Restart requested on odd/unavailable channel number %d/%d\n",
                     pri->span, PRI_SPAN(e->restart.channel),
                     PRI_CHANNEL(e->restart.channel));
               else {
                  int skipit = 0;
#if defined(HAVE_PRI_SERVICE_MESSAGES)
                  unsigned why;

                  why = pri->pvts[chanpos]->service_status;
                  if (why) {
                     ast_log(LOG_NOTICE,
                        "Span %d: Channel %d/%d out-of-service (reason: %s), ignoring RESTART\n",
                        pri->span, PRI_SPAN(e->restart.channel),
                        PRI_CHANNEL(e->restart.channel),
                        (why & SRVST_FAREND) ? (why & SRVST_NEAREND) ? "both ends" : "far end" : "near end");
                     skipit = 1;
                  }
#endif   /* defined(HAVE_PRI_SERVICE_MESSAGES) */
                  sig_pri_lock_private(pri->pvts[chanpos]);
                  if (!skipit) {
                     ast_verb(3, "Span %d: Channel %d/%d restarted\n", pri->span,
                        PRI_SPAN(e->restart.channel),
                        PRI_CHANNEL(e->restart.channel));
                     if (pri->pvts[chanpos]->call) {
                        pri_destroycall(pri->pri, pri->pvts[chanpos]->call);
                        pri->pvts[chanpos]->call = NULL;
                     }
                  }
                  /* Force soft hangup if appropriate */
                  if (pri->pvts[chanpos]->owner)
                     pri->pvts[chanpos]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
                  sig_pri_unlock_private(pri->pvts[chanpos]);
               }
            } else {
               ast_verb(3, "Restart requested on entire span %d\n", pri->span);
               for (x = 0; x < pri->numchans; x++)
                  if (pri->pvts[x]) {
                     sig_pri_lock_private(pri->pvts[x]);
                     if (pri->pvts[x]->call) {
                        pri_destroycall(pri->pri, pri->pvts[x]->call);
                        pri->pvts[x]->call = NULL;
                     }
                     if (pri->pvts[x]->owner)
                        pri->pvts[x]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
                     sig_pri_unlock_private(pri->pvts[x]);
                  }
            }
            sig_pri_span_devstate_changed(pri);
            break;
         case PRI_EVENT_KEYPAD_DIGIT:
            if (sig_pri_is_cis_call(e->digit.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->digit.subcmds,
                  e->digit.call);
               break;
            }
            chanpos = pri_find_principle_by_call(pri, e->digit.call);
            if (chanpos < 0) {
               ast_log(LOG_WARNING,
                  "Span %d: Received keypad digits for unknown call.\n", pri->span);
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->digit.channel,
               e->digit.subcmds, e->digit.call);
            /* queue DTMF frame if the PBX for this call was already started (we're forwarding KEYPAD_DIGITs further on */
            if ((pri->overlapdial & DAHDI_OVERLAPDIAL_INCOMING)
               && pri->pvts[chanpos]->owner) {
               /* how to do that */
               int digitlen = strlen(e->digit.digits);
               int i;

               for (i = 0; i < digitlen; i++) {
                  struct ast_frame f = { AST_FRAME_DTMF, .subclass.integer = e->digit.digits[i], };

                  pri_queue_frame(pri, chanpos, &f);
               }
            }
            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;

         case PRI_EVENT_INFO_RECEIVED:
            if (sig_pri_is_cis_call(e->ring.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->ring.subcmds,
                  e->ring.call);
               break;
            }
            chanpos = pri_find_principle_by_call(pri, e->ring.call);
            if (chanpos < 0) {
               ast_log(LOG_WARNING,
                  "Span %d: Received INFORMATION for unknown call.\n", pri->span);
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->ring.channel,
               e->ring.subcmds, e->ring.call);
            /* queue DTMF frame if the PBX for this call was already started (we're forwarding INFORMATION further on */
            if ((pri->overlapdial & DAHDI_OVERLAPDIAL_INCOMING)
               && pri->pvts[chanpos]->owner) {
               /* how to do that */
               int digitlen = strlen(e->ring.callednum);
               int i;

               for (i = 0; i < digitlen; i++) {
                  struct ast_frame f = { AST_FRAME_DTMF, .subclass.integer = e->ring.callednum[i], };

                  pri_queue_frame(pri, chanpos, &f);
               }
            }
            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
#if defined(HAVE_PRI_SERVICE_MESSAGES)
         case PRI_EVENT_SERVICE:
            chanpos = pri_find_principle(pri, e->service.channel, NULL);
            if (chanpos < 0) {
               ast_log(LOG_WARNING, "Received service change status %d on unconfigured channel %d/%d span %d\n",
                  e->service_ack.changestatus, PRI_SPAN(e->service_ack.channel), PRI_CHANNEL(e->service_ack.channel), pri->span);
            } else {
               char db_chan_name[20];
               char db_answer[5];
               int ch;
               unsigned *why;

               ch = pri->pvts[chanpos]->channel;
               snprintf(db_chan_name, sizeof(db_chan_name), "%s/%d:%d", dahdi_db, pri->span, ch);
               why = &pri->pvts[chanpos]->service_status;
               switch (e->service.changestatus) {
               case 0: /* in-service */
                  /* Far end wants to be in service now. */
                  ast_db_del(db_chan_name, SRVST_DBKEY);
                  *why &= ~SRVST_FAREND;
                  if (*why) {
                     snprintf(db_answer, sizeof(db_answer), "%s:%u",
                        SRVST_TYPE_OOS, *why);
                     ast_db_put(db_chan_name, SRVST_DBKEY, db_answer);
                  } else {
                     sig_pri_span_devstate_changed(pri);
                  }
                  break;
               case 2: /* out-of-service */
                  /* Far end wants to be out-of-service now. */
                  ast_db_del(db_chan_name, SRVST_DBKEY);
                  *why |= SRVST_FAREND;
                  snprintf(db_answer, sizeof(db_answer), "%s:%u", SRVST_TYPE_OOS,
                     *why);
                  ast_db_put(db_chan_name, SRVST_DBKEY, db_answer);
                  sig_pri_span_devstate_changed(pri);
                  break;
               default:
                  ast_log(LOG_ERROR, "Huh?  changestatus is: %d\n", e->service.changestatus);
                  break;
               }
               ast_log(LOG_NOTICE, "Channel %d/%d span %d (logical: %d) received a change of service message, status '%d'\n",
                  PRI_SPAN(e->service.channel), PRI_CHANNEL(e->service.channel), pri->span, ch, e->service.changestatus);
            }
            break;
         case PRI_EVENT_SERVICE_ACK:
            chanpos = pri_find_principle(pri, e->service_ack.channel, NULL);
            if (chanpos < 0) {
               ast_log(LOG_WARNING, "Received service acknowledge change status '%d' on unconfigured channel %d/%d span %d\n",
                  e->service_ack.changestatus, PRI_SPAN(e->service_ack.channel), PRI_CHANNEL(e->service_ack.channel), pri->span);
            } else {
               ast_debug(2, "Channel %d/%d span %d received a change os service acknowledgement message, status '%d'\n",
                  PRI_SPAN(e->service_ack.channel), PRI_CHANNEL(e->service_ack.channel), pri->span, e->service_ack.changestatus);
            }
            break;
#endif   /* defined(HAVE_PRI_SERVICE_MESSAGES) */
         case PRI_EVENT_RING:
            if (!ast_strlen_zero(pri->msn_list)
               && !sig_pri_msn_match(pri->msn_list, e->ring.callednum)) {
               /* The call is not for us so ignore it. */
               ast_verb(3,
                  "Ignoring call to '%s' on span %d.  Its not in the MSN list: %s\n",
                  e->ring.callednum, pri->span, pri->msn_list);
               pri_destroycall(pri->pri, e->ring.call);
               break;
            }
            if (sig_pri_is_cis_call(e->ring.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->ring.subcmds,
                  e->ring.call);
               break;
            }
            chanpos = pri_find_principle_by_call(pri, e->ring.call);
            if (-1 < chanpos) {
               /* Libpri has already filtered out duplicate SETUPs. */
               ast_log(LOG_WARNING,
                  "Span %d: Got SETUP with duplicate call ptr.  Dropping call.\n",
                  pri->span);
               pri_hangup(pri->pri, e->ring.call, PRI_CAUSE_NORMAL_TEMPORARY_FAILURE);
               break;
            }
            if (e->ring.channel == -1 || PRI_CHANNEL(e->ring.channel) == 0xFF) {
               /* Any channel requested. */
               chanpos = pri_find_empty_chan(pri, 1);
            } else if (PRI_CHANNEL(e->ring.channel) == 0x00) {
               /* No channel specified. */
#if defined(HAVE_PRI_CALL_WAITING)
               if (!pri->allow_call_waiting_calls)
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
               {
                  /* We will not accept incoming call waiting calls. */
                  pri_hangup(pri->pri, e->ring.call, PRI_CAUSE_INCOMPATIBLE_DESTINATION);
                  break;
               }
#if defined(HAVE_PRI_CALL_WAITING)
               chanpos = pri_find_empty_nobch(pri);
               if (chanpos < 0) {
                  /* We could not find/create a call interface. */
                  pri_hangup(pri->pri, e->ring.call, PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION);
                  break;
               }
               /* Setup the call interface to use. */
               sig_pri_init_config(pri->pvts[chanpos], pri);
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
            } else {
               /* A channel is specified. */
               chanpos = pri_find_principle(pri, e->ring.channel, e->ring.call);
               if (chanpos < 0) {
                  ast_log(LOG_WARNING,
                     "Span %d: SETUP on unconfigured channel %d/%d\n",
                     pri->span, PRI_SPAN(e->ring.channel),
                     PRI_CHANNEL(e->ring.channel));
               } else if (!sig_pri_is_chan_available(pri->pvts[chanpos])) {
                  /* This is where we handle initial glare */
                  ast_debug(1,
                     "Span %d: SETUP requested unavailable channel %d/%d.  Attempting to renegotiate.\n",
                     pri->span, PRI_SPAN(e->ring.channel),
                     PRI_CHANNEL(e->ring.channel));
                  chanpos = -1;
               }
#if defined(ALWAYS_PICK_CHANNEL)
               if (e->ring.flexible) {
                  chanpos = -1;
               }
#endif   /* defined(ALWAYS_PICK_CHANNEL) */
               if (chanpos < 0 && e->ring.flexible) {
                  /* We can try to pick another channel. */
                  chanpos = pri_find_empty_chan(pri, 1);
               }
            }
            if (chanpos < 0) {
               if (e->ring.flexible) {
                  pri_hangup(pri->pri, e->ring.call, PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION);
               } else {
                  pri_hangup(pri->pri, e->ring.call, PRI_CAUSE_REQUESTED_CHAN_UNAVAIL);
               }
               break;
            }

            sig_pri_lock_private(pri->pvts[chanpos]);

            /* Mark channel as in use so noone else will steal it. */
            pri->pvts[chanpos]->call = e->ring.call;

            /* Use plancallingnum as a scratch buffer since it is initialized next. */
            apply_plan_to_number(plancallingnum, sizeof(plancallingnum), pri,
               e->ring.redirectingnum, e->ring.callingplanrdnis);
            sig_pri_set_rdnis(pri->pvts[chanpos], plancallingnum);

            /* Setup caller-id info */
            apply_plan_to_number(plancallingnum, sizeof(plancallingnum), pri, e->ring.callingnum, e->ring.callingplan);
            pri->pvts[chanpos]->cid_ani2 = 0;
            if (pri->pvts[chanpos]->use_callerid) {
               ast_shrink_phone_number(plancallingnum);
               ast_copy_string(pri->pvts[chanpos]->cid_num, plancallingnum, sizeof(pri->pvts[chanpos]->cid_num));
#ifdef PRI_ANI
               if (!ast_strlen_zero(e->ring.callingani)) {
                  apply_plan_to_number(plancallingani, sizeof(plancallingani), pri, e->ring.callingani, e->ring.callingplanani);
                  ast_shrink_phone_number(plancallingani);
                  ast_copy_string(pri->pvts[chanpos]->cid_ani, plancallingani, sizeof(pri->pvts[chanpos]->cid_ani));
               } else {
                  pri->pvts[chanpos]->cid_ani[0] = '\0';
               }
#endif
               pri->pvts[chanpos]->cid_subaddr[0] = '\0';
#if defined(HAVE_PRI_SUBADDR)
               if (e->ring.calling.subaddress.valid) {
                  struct ast_party_subaddress calling_subaddress;

                  ast_party_subaddress_init(&calling_subaddress);
                  sig_pri_set_subaddress(&calling_subaddress,
                     &e->ring.calling.subaddress);
                  if (calling_subaddress.str) {
                     ast_copy_string(pri->pvts[chanpos]->cid_subaddr,
                        calling_subaddress.str,
                        sizeof(pri->pvts[chanpos]->cid_subaddr));
                  }
                  ast_party_subaddress_free(&calling_subaddress);
               }
#endif /* defined(HAVE_PRI_SUBADDR) */
               ast_copy_string(pri->pvts[chanpos]->cid_name, e->ring.callingname, sizeof(pri->pvts[chanpos]->cid_name));
               pri->pvts[chanpos]->cid_ton = e->ring.callingplan; /* this is the callingplan (TON/NPI), e->ring.callingplan>>4 would be the TON */
               pri->pvts[chanpos]->callingpres = e->ring.callingpres;
               if (e->ring.ani2 >= 0) {
                  pri->pvts[chanpos]->cid_ani2 = e->ring.ani2;
               }
            } else {
               pri->pvts[chanpos]->cid_num[0] = '\0';
               pri->pvts[chanpos]->cid_subaddr[0] = '\0';
               pri->pvts[chanpos]->cid_ani[0] = '\0';
               pri->pvts[chanpos]->cid_name[0] = '\0';
               pri->pvts[chanpos]->cid_ton = 0;
               pri->pvts[chanpos]->callingpres = 0;
            }

            /* Setup the user tag for party id's from this device for this call. */
            if (pri->append_msn_to_user_tag) {
               snprintf(pri->pvts[chanpos]->user_tag,
                  sizeof(pri->pvts[chanpos]->user_tag), "%s_%s",
                  pri->initial_user_tag,
                  pri->nodetype == PRI_NETWORK
                     ? plancallingnum : e->ring.callednum);
            } else {
               ast_copy_string(pri->pvts[chanpos]->user_tag,
                  pri->initial_user_tag, sizeof(pri->pvts[chanpos]->user_tag));
            }

            sig_pri_set_caller_id(pri->pvts[chanpos]);

            /* Set DNID on all incoming calls -- even immediate */
            sig_pri_set_dnid(pri->pvts[chanpos], e->ring.callednum);

            /* If immediate=yes go to s|1 */
            if (pri->pvts[chanpos]->immediate) {
               ast_verb(3, "Going to extension s|1 because of immediate=yes\n");
               pri->pvts[chanpos]->exten[0] = 's';
               pri->pvts[chanpos]->exten[1] = '\0';
            }
            /* Get called number */
            else if (!ast_strlen_zero(e->ring.callednum)) {
               ast_copy_string(pri->pvts[chanpos]->exten, e->ring.callednum, sizeof(pri->pvts[chanpos]->exten));
            } else if (pri->overlapdial)
               pri->pvts[chanpos]->exten[0] = '\0';
            else {
               /* Some PRI circuits are set up to send _no_ digits.  Handle them as 's'. */
               pri->pvts[chanpos]->exten[0] = 's';
               pri->pvts[chanpos]->exten[1] = '\0';
            }
            /* No number yet, but received "sending complete"? */
            if (e->ring.complete && (ast_strlen_zero(e->ring.callednum))) {
               ast_verb(3, "Going to extension s|1 because of Complete received\n");
               pri->pvts[chanpos]->exten[0] = 's';
               pri->pvts[chanpos]->exten[1] = '\0';
            }

            /* Make sure extension exists (or in overlap dial mode, can exist) */
            if (((pri->overlapdial & DAHDI_OVERLAPDIAL_INCOMING) && ast_canmatch_extension(NULL, pri->pvts[chanpos]->context, pri->pvts[chanpos]->exten, 1, pri->pvts[chanpos]->cid_num)) ||
               ast_exists_extension(NULL, pri->pvts[chanpos]->context, pri->pvts[chanpos]->exten, 1, pri->pvts[chanpos]->cid_num)) {
               /* Select audio companding mode. */
               switch (e->ring.layer1) {
               case PRI_LAYER_1_ALAW:
                  law = SIG_PRI_ALAW;
                  break;
               case PRI_LAYER_1_ULAW:
                  law = SIG_PRI_ULAW;
                  break;
               default:
                  /* This is a data call to us. */
                  law = SIG_PRI_DEFLAW;
                  break;
               }

               if (e->ring.complete || !(pri->overlapdial & DAHDI_OVERLAPDIAL_INCOMING)) {
                  /* Just announce proceeding */
                  pri->pvts[chanpos]->call_level = SIG_PRI_CALL_LEVEL_PROCEEDING;
                  pri_proceeding(pri->pri, e->ring.call, PVT_TO_CHANNEL(pri->pvts[chanpos]), 0);
               } else if (pri->switchtype == PRI_SWITCH_GR303_TMC) {
                  pri->pvts[chanpos]->call_level = SIG_PRI_CALL_LEVEL_CONNECT;
                  pri_answer(pri->pri, e->ring.call, PVT_TO_CHANNEL(pri->pvts[chanpos]), 1);
               } else {
                  pri->pvts[chanpos]->call_level = SIG_PRI_CALL_LEVEL_OVERLAP;
                  pri_need_more_info(pri->pri, e->ring.call, PVT_TO_CHANNEL(pri->pvts[chanpos]), 1);
               }

               /* Start PBX */
               if (!e->ring.complete
                  && (pri->overlapdial & DAHDI_OVERLAPDIAL_INCOMING)
                  && ast_matchmore_extension(NULL, pri->pvts[chanpos]->context, pri->pvts[chanpos]->exten, 1, pri->pvts[chanpos]->cid_num)) {
                  /*
                   * Release the PRI lock while we create the channel so other
                   * threads can send D channel messages.  We must also release
                   * the private lock to prevent deadlock while creating the
                   * channel.
                   */
                  sig_pri_unlock_private(pri->pvts[chanpos]);
                  ast_mutex_unlock(&pri->lock);
                  c = sig_pri_new_ast_channel(pri->pvts[chanpos],
                     AST_STATE_RESERVED, law, e->ring.ctype,
                     pri->pvts[chanpos]->exten, NULL);
                  ast_mutex_lock(&pri->lock);
                  sig_pri_lock_private(pri->pvts[chanpos]);
                  if (c) {
#if defined(HAVE_PRI_SUBADDR)
                     if (e->ring.calling.subaddress.valid) {
                        /* Set Calling Subaddress */
                        sig_pri_lock_owner(pri, chanpos);
                        sig_pri_set_subaddress(
                           &pri->pvts[chanpos]->owner->caller.id.subaddress,
                           &e->ring.calling.subaddress);
                        if (!e->ring.calling.subaddress.type
                           && !ast_strlen_zero(
                              (char *) e->ring.calling.subaddress.data)) {
                           /* NSAP */
                           pbx_builtin_setvar_helper(c, "CALLINGSUBADDR",
                              (char *) e->ring.calling.subaddress.data);
                        }
                        ast_channel_unlock(c);
                     }
                     if (e->ring.called_subaddress.valid) {
                        /* Set Called Subaddress */
                        sig_pri_lock_owner(pri, chanpos);
                        sig_pri_set_subaddress(
                           &pri->pvts[chanpos]->owner->dialed.subaddress,
                           &e->ring.called_subaddress);
                        if (!e->ring.called_subaddress.type
                           && !ast_strlen_zero(
                              (char *) e->ring.called_subaddress.data)) {
                           /* NSAP */
                           pbx_builtin_setvar_helper(c, "CALLEDSUBADDR",
                              (char *) e->ring.called_subaddress.data);
                        }
                        ast_channel_unlock(c);
                     }
#else
                     if (!ast_strlen_zero(e->ring.callingsubaddr)) {
                        pbx_builtin_setvar_helper(c, "CALLINGSUBADDR", e->ring.callingsubaddr);
                     }
#endif /* !defined(HAVE_PRI_SUBADDR) */
                     if (e->ring.ani2 >= 0) {
                        snprintf(ani2str, sizeof(ani2str), "%d", e->ring.ani2);
                        pbx_builtin_setvar_helper(c, "ANI2", ani2str);
                     }

#ifdef SUPPORT_USERUSER
                     if (!ast_strlen_zero(e->ring.useruserinfo)) {
                        pbx_builtin_setvar_helper(c, "USERUSERINFO", e->ring.useruserinfo);
                     }
#endif

                     snprintf(calledtonstr, sizeof(calledtonstr), "%d", e->ring.calledplan);
                     pbx_builtin_setvar_helper(c, "CALLEDTON", calledtonstr);
                     if (e->ring.redirectingreason >= 0) {
                        /* This is now just a status variable.  Use REDIRECTING() dialplan function. */
                        pbx_builtin_setvar_helper(c, "PRIREDIRECTREASON", redirectingreason2str(e->ring.redirectingreason));
                     }
#if defined(HAVE_PRI_REVERSE_CHARGE)
                     pri->pvts[chanpos]->reverse_charging_indication = e->ring.reversecharge;
#endif
#if defined(HAVE_PRI_SETUP_KEYPAD)
                     ast_copy_string(pri->pvts[chanpos]->keypad_digits,
                        e->ring.keypad_digits,
                        sizeof(pri->pvts[chanpos]->keypad_digits));
#endif   /* defined(HAVE_PRI_SETUP_KEYPAD) */

                     sig_pri_handle_subcmds(pri, chanpos, e->e, e->ring.channel,
                        e->ring.subcmds, e->ring.call);

                     if (!pri->pvts[chanpos]->digital
                        && !pri->pvts[chanpos]->no_b_channel) {
                        /*
                         * Call has a channel.
                         * Indicate that we are providing dialtone.
                         */
                        pri->pvts[chanpos]->progress = 1;/* No need to send plain PROGRESS again. */
#ifdef HAVE_PRI_PROG_W_CAUSE
                        pri_progress_with_cause(pri->pri, e->ring.call,
                           PVT_TO_CHANNEL(pri->pvts[chanpos]), 1, -1);/* no cause at all */
#else
                        pri_progress(pri->pri, e->ring.call,
                           PVT_TO_CHANNEL(pri->pvts[chanpos]), 1);
#endif
                     }
                  }
                  if (c && !ast_pthread_create_detached(&threadid, NULL, pri_ss_thread, pri->pvts[chanpos])) {
                     ast_verb(3, "Accepting overlap call from '%s' to '%s' on channel %d/%d, span %d\n",
                        plancallingnum, S_OR(pri->pvts[chanpos]->exten, "<unspecified>"),
                        pri->pvts[chanpos]->logicalspan, pri->pvts[chanpos]->prioffset, pri->span);
                  } else {
                     ast_log(LOG_WARNING, "Unable to start PBX on channel %d/%d, span %d\n",
                        pri->pvts[chanpos]->logicalspan, pri->pvts[chanpos]->prioffset, pri->span);
                     if (c) {
                        /* Avoid deadlock while destroying channel */
                        sig_pri_unlock_private(pri->pvts[chanpos]);
                        ast_mutex_unlock(&pri->lock);
                        ast_hangup(c);
                        ast_mutex_lock(&pri->lock);
                     } else {
                        pri_hangup(pri->pri, e->ring.call, PRI_CAUSE_SWITCH_CONGESTION);
                        pri->pvts[chanpos]->call = NULL;
                        sig_pri_unlock_private(pri->pvts[chanpos]);
                        sig_pri_span_devstate_changed(pri);
                     }
                     break;
                  }
               } else {
                  /*
                   * Release the PRI lock while we create the channel so other
                   * threads can send D channel messages.  We must also release
                   * the private lock to prevent deadlock while creating the
                   * channel.
                   */
                  sig_pri_unlock_private(pri->pvts[chanpos]);
                  ast_mutex_unlock(&pri->lock);
                  c = sig_pri_new_ast_channel(pri->pvts[chanpos],
                     AST_STATE_RING, law, e->ring.ctype,
                     pri->pvts[chanpos]->exten, NULL);
                  ast_mutex_lock(&pri->lock);
                  sig_pri_lock_private(pri->pvts[chanpos]);
                  if (c) {
                     /*
                      * It is reasonably safe to set the following
                      * channel variables while the PRI and DAHDI private
                      * structures are locked.  The PBX has not been
                      * started yet and it is unlikely that any other task
                      * will do anything with the channel we have just
                      * created.
                      */
#if defined(HAVE_PRI_SUBADDR)
                     if (e->ring.calling.subaddress.valid) {
                        /* Set Calling Subaddress */
                        sig_pri_lock_owner(pri, chanpos);
                        sig_pri_set_subaddress(
                           &pri->pvts[chanpos]->owner->caller.id.subaddress,
                           &e->ring.calling.subaddress);
                        if (!e->ring.calling.subaddress.type
                           && !ast_strlen_zero(
                              (char *) e->ring.calling.subaddress.data)) {
                           /* NSAP */
                           pbx_builtin_setvar_helper(c, "CALLINGSUBADDR",
                              (char *) e->ring.calling.subaddress.data);
                        }
                        ast_channel_unlock(c);
                     }
                     if (e->ring.called_subaddress.valid) {
                        /* Set Called Subaddress */
                        sig_pri_lock_owner(pri, chanpos);
                        sig_pri_set_subaddress(
                           &pri->pvts[chanpos]->owner->dialed.subaddress,
                           &e->ring.called_subaddress);
                        if (!e->ring.called_subaddress.type
                           && !ast_strlen_zero(
                              (char *) e->ring.called_subaddress.data)) {
                           /* NSAP */
                           pbx_builtin_setvar_helper(c, "CALLEDSUBADDR",
                              (char *) e->ring.called_subaddress.data);
                        }
                        ast_channel_unlock(c);
                     }
#else
                     if (!ast_strlen_zero(e->ring.callingsubaddr)) {
                        pbx_builtin_setvar_helper(c, "CALLINGSUBADDR", e->ring.callingsubaddr);
                     }
#endif /* !defined(HAVE_PRI_SUBADDR) */
                     if (e->ring.ani2 >= 0) {
                        snprintf(ani2str, sizeof(ani2str), "%d", e->ring.ani2);
                        pbx_builtin_setvar_helper(c, "ANI2", ani2str);
                     }

#ifdef SUPPORT_USERUSER
                     if (!ast_strlen_zero(e->ring.useruserinfo)) {
                        pbx_builtin_setvar_helper(c, "USERUSERINFO", e->ring.useruserinfo);
                     }
#endif

                     if (e->ring.redirectingreason >= 0) {
                        /* This is now just a status variable.  Use REDIRECTING() dialplan function. */
                        pbx_builtin_setvar_helper(c, "PRIREDIRECTREASON", redirectingreason2str(e->ring.redirectingreason));
                     }
#if defined(HAVE_PRI_REVERSE_CHARGE)
                     pri->pvts[chanpos]->reverse_charging_indication = e->ring.reversecharge;
#endif
#if defined(HAVE_PRI_SETUP_KEYPAD)
                     ast_copy_string(pri->pvts[chanpos]->keypad_digits,
                        e->ring.keypad_digits,
                        sizeof(pri->pvts[chanpos]->keypad_digits));
#endif   /* defined(HAVE_PRI_SETUP_KEYPAD) */

                     snprintf(calledtonstr, sizeof(calledtonstr), "%d", e->ring.calledplan);
                     pbx_builtin_setvar_helper(c, "CALLEDTON", calledtonstr);

                     sig_pri_handle_subcmds(pri, chanpos, e->e, e->ring.channel,
                        e->ring.subcmds, e->ring.call);

                  }
                  if (c && !ast_pbx_start(c)) {
                     ast_verb(3, "Accepting call from '%s' to '%s' on channel %d/%d, span %d\n",
                        plancallingnum, pri->pvts[chanpos]->exten,
                        pri->pvts[chanpos]->logicalspan, pri->pvts[chanpos]->prioffset, pri->span);
                     sig_pri_set_echocanceller(pri->pvts[chanpos], 1);
                  } else {
                     ast_log(LOG_WARNING, "Unable to start PBX on channel %d/%d, span %d\n",
                        pri->pvts[chanpos]->logicalspan, pri->pvts[chanpos]->prioffset, pri->span);
                     if (c) {
                        /* Avoid deadlock while destroying channel */
                        sig_pri_unlock_private(pri->pvts[chanpos]);
                        ast_mutex_unlock(&pri->lock);
                        ast_hangup(c);
                        ast_mutex_lock(&pri->lock);
                     } else {
                        pri_hangup(pri->pri, e->ring.call, PRI_CAUSE_SWITCH_CONGESTION);
                        pri->pvts[chanpos]->call = NULL;
                        sig_pri_unlock_private(pri->pvts[chanpos]);
                        sig_pri_span_devstate_changed(pri);
                     }
                     break;
                  }
               }
            } else {
               ast_verb(3,
                  "Span %d: Extension %s@%s does not exist.  Rejecting call from '%s'.\n",
                  pri->span, pri->pvts[chanpos]->exten, pri->pvts[chanpos]->context,
                  pri->pvts[chanpos]->cid_num);
               pri_hangup(pri->pri, e->ring.call, PRI_CAUSE_UNALLOCATED);
               pri->pvts[chanpos]->call = NULL;
               pri->pvts[chanpos]->exten[0] = '\0';
               sig_pri_unlock_private(pri->pvts[chanpos]);
               sig_pri_span_devstate_changed(pri);
               break;
            }
            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
         case PRI_EVENT_RINGING:
            if (sig_pri_is_cis_call(e->ringing.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->ringing.subcmds,
                  e->ringing.call);
               break;
            }
            chanpos = pri_find_fixup_principle(pri, e->ringing.channel,
               e->ringing.call);
            if (chanpos < 0) {
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);

            sig_pri_handle_subcmds(pri, chanpos, e->e, e->ringing.channel,
               e->ringing.subcmds, e->ringing.call);
            sig_pri_cc_generic_check(pri, chanpos, AST_CC_CCNR);
            sig_pri_set_echocanceller(pri->pvts[chanpos], 1);
            sig_pri_lock_owner(pri, chanpos);
            if (pri->pvts[chanpos]->owner) {
               ast_setstate(pri->pvts[chanpos]->owner, AST_STATE_RINGING);
               ast_channel_unlock(pri->pvts[chanpos]->owner);
            }
            pri_queue_control(pri, chanpos, AST_CONTROL_RINGING);
            if (pri->pvts[chanpos]->call_level < SIG_PRI_CALL_LEVEL_ALERTING) {
               pri->pvts[chanpos]->call_level = SIG_PRI_CALL_LEVEL_ALERTING;
            }

            if (!pri->pvts[chanpos]->progress
               && !pri->pvts[chanpos]->no_b_channel
#ifdef PRI_PROGRESS_MASK
               && (e->ringing.progressmask
                  & (PRI_PROG_CALL_NOT_E2E_ISDN | PRI_PROG_INBAND_AVAILABLE))
#else
               && e->ringing.progress == 8
#endif
               ) {
               /* Bring voice path up */
               pri_queue_control(pri, chanpos, AST_CONTROL_PROGRESS);
               pri->pvts[chanpos]->progress = 1;
               sig_pri_set_dialing(pri->pvts[chanpos], 0);
               sig_pri_open_media(pri->pvts[chanpos]);
            }

#ifdef SUPPORT_USERUSER
            if (!ast_strlen_zero(e->ringing.useruserinfo)) {
               struct ast_channel *owner;

               sig_pri_lock_owner(pri, chanpos);
               owner = pri->pvts[chanpos]->owner;
               if (owner) {
                  pbx_builtin_setvar_helper(owner, "USERUSERINFO",
                     e->ringing.useruserinfo);
                  ast_channel_unlock(owner);
               }
            }
#endif

            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
         case PRI_EVENT_PROGRESS:
            if (sig_pri_is_cis_call(e->proceeding.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->proceeding.subcmds,
                  e->proceeding.call);
               break;
            }
            chanpos = pri_find_fixup_principle(pri, e->proceeding.channel,
               e->proceeding.call);
            if (chanpos < 0) {
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->proceeding.channel,
               e->proceeding.subcmds, e->proceeding.call);

            if (e->proceeding.cause > -1) {
               ast_verb(3, "PROGRESS with cause code %d received\n", e->proceeding.cause);

               /* Work around broken, out of spec USER_BUSY cause in a progress message */
               if (e->proceeding.cause == AST_CAUSE_USER_BUSY) {
                  if (pri->pvts[chanpos]->owner) {
                     ast_verb(3, "PROGRESS with 'user busy' received, signaling AST_CONTROL_BUSY instead of AST_CONTROL_PROGRESS\n");

                     pri->pvts[chanpos]->owner->hangupcause = e->proceeding.cause;
                     pri_queue_control(pri, chanpos, AST_CONTROL_BUSY);
                  }
               }
            }

            if (!pri->pvts[chanpos]->progress
               && !pri->pvts[chanpos]->no_b_channel
#ifdef PRI_PROGRESS_MASK
               && (e->proceeding.progressmask
                  & (PRI_PROG_CALL_NOT_E2E_ISDN | PRI_PROG_INBAND_AVAILABLE))
#else
               && e->proceeding.progress == 8
#endif
               ) {
               /* Bring voice path up */
               ast_debug(1,
                  "Queuing frame from PRI_EVENT_PROGRESS on channel %d/%d span %d\n",
                  pri->pvts[chanpos]->logicalspan, pri->pvts[chanpos]->prioffset,
                  pri->span);
               pri_queue_control(pri, chanpos, AST_CONTROL_PROGRESS);
               pri->pvts[chanpos]->progress = 1;
               sig_pri_set_dialing(pri->pvts[chanpos], 0);
               sig_pri_open_media(pri->pvts[chanpos]);
            }
            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
         case PRI_EVENT_PROCEEDING:
            if (sig_pri_is_cis_call(e->proceeding.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->proceeding.subcmds,
                  e->proceeding.call);
               break;
            }
            chanpos = pri_find_fixup_principle(pri, e->proceeding.channel,
               e->proceeding.call);
            if (chanpos < 0) {
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->proceeding.channel,
               e->proceeding.subcmds, e->proceeding.call);
            if (pri->pvts[chanpos]->call_level < SIG_PRI_CALL_LEVEL_PROCEEDING) {
               pri->pvts[chanpos]->call_level = SIG_PRI_CALL_LEVEL_PROCEEDING;
               ast_debug(1,
                  "Queuing frame from PRI_EVENT_PROCEEDING on channel %d/%d span %d\n",
                  pri->pvts[chanpos]->logicalspan, pri->pvts[chanpos]->prioffset,
                  pri->span);
               pri_queue_control(pri, chanpos, AST_CONTROL_PROCEEDING);
            }
            if (!pri->pvts[chanpos]->progress
               && !pri->pvts[chanpos]->no_b_channel
#ifdef PRI_PROGRESS_MASK
               && (e->proceeding.progressmask
                  & (PRI_PROG_CALL_NOT_E2E_ISDN | PRI_PROG_INBAND_AVAILABLE))
#else
               && e->proceeding.progress == 8
#endif
               ) {
               /* Bring voice path up */
               pri_queue_control(pri, chanpos, AST_CONTROL_PROGRESS);
               pri->pvts[chanpos]->progress = 1;
               sig_pri_open_media(pri->pvts[chanpos]);
            }
            sig_pri_set_dialing(pri->pvts[chanpos], 0);
            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
         case PRI_EVENT_FACILITY:
            if (!e->facility.call || sig_pri_is_cis_call(e->facility.channel)) {
               /* Event came in on the dummy channel or a CIS call. */
#if defined(HAVE_PRI_CALL_REROUTING)
               sig_pri_handle_cis_subcmds(pri, e->e, e->facility.subcmds,
                  e->facility.subcall);
#else
               sig_pri_handle_cis_subcmds(pri, e->e, e->facility.subcmds,
                  e->facility.call);
#endif   /* !defined(HAVE_PRI_CALL_REROUTING) */
               break;
            }
            chanpos = pri_find_principle_by_call(pri, e->facility.call);
            if (chanpos < 0) {
               ast_log(LOG_WARNING, "Span %d: Received facility for unknown call.\n",
                  pri->span);
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
#if defined(HAVE_PRI_CALL_REROUTING)
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->facility.channel,
               e->facility.subcmds, e->facility.subcall);
#else
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->facility.channel,
               e->facility.subcmds, e->facility.call);
#endif   /* !defined(HAVE_PRI_CALL_REROUTING) */
            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
         case PRI_EVENT_ANSWER:
            if (sig_pri_is_cis_call(e->answer.channel)) {
#if defined(HAVE_PRI_CALL_WAITING)
               /* Call is CIS so do normal CONNECT_ACKNOWLEDGE. */
               pri_connect_ack(pri->pri, e->answer.call, 0);
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
               sig_pri_handle_cis_subcmds(pri, e->e, e->answer.subcmds,
                  e->answer.call);
               break;
            }
            chanpos = pri_find_fixup_principle(pri, e->answer.channel, e->answer.call);
            if (chanpos < 0) {
               break;
            }
#if defined(HAVE_PRI_CALL_WAITING)
            if (pri->pvts[chanpos]->is_call_waiting) {
               if (pri->pvts[chanpos]->no_b_channel) {
                  int new_chanpos;

                  /*
                   * Need to find a free channel now or
                   * kill the call with PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION.
                   */
                  new_chanpos = pri_find_empty_chan(pri, 1);
                  if (0 <= new_chanpos) {
                     new_chanpos = pri_fixup_principle(pri, new_chanpos,
                        e->answer.call);
                  }
                  if (new_chanpos < 0) {
                     /*
                      * Either no channel was available or someone stole
                      * the channel!
                      */
                     ast_verb(3,
                        "Span %d: Channel not available for call waiting call.\n",
                        pri->span);
                     sig_pri_lock_private(pri->pvts[chanpos]);
                     sig_pri_handle_subcmds(pri, chanpos, e->e, e->answer.channel,
                        e->answer.subcmds, e->answer.call);
                     sig_pri_cc_generic_check(pri, chanpos, AST_CC_CCBS);
                     sig_pri_lock_owner(pri, chanpos);
                     if (pri->pvts[chanpos]->owner) {
                        pri->pvts[chanpos]->owner->hangupcause = PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION;
                        switch (pri->pvts[chanpos]->owner->_state) {
                        case AST_STATE_BUSY:
                        case AST_STATE_UP:
                           ast_softhangup_nolock(pri->pvts[chanpos]->owner, AST_SOFTHANGUP_DEV);
                           break;
                        default:
                           pri_queue_control(pri, chanpos, AST_CONTROL_CONGESTION);
                           break;
                        }
                        ast_channel_unlock(pri->pvts[chanpos]->owner);
                     } else {
                        pri->pvts[chanpos]->is_call_waiting = 0;
                        ast_atomic_fetchadd_int(&pri->num_call_waiting_calls, -1);
                        pri_hangup(pri->pri, e->answer.call, PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION);
                        pri->pvts[chanpos]->call = NULL;
                     }
                     sig_pri_unlock_private(pri->pvts[chanpos]);
                     sig_pri_span_devstate_changed(pri);
                     break;
                  }
                  chanpos = new_chanpos;
               }
               pri_connect_ack(pri->pri, e->answer.call, PVT_TO_CHANNEL(pri->pvts[chanpos]));
               sig_pri_span_devstate_changed(pri);
            } else {
               /* Call is normal so do normal CONNECT_ACKNOWLEDGE. */
               pri_connect_ack(pri->pri, e->answer.call, 0);
            }
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
            sig_pri_lock_private(pri->pvts[chanpos]);

#if defined(HAVE_PRI_CALL_WAITING)
            if (pri->pvts[chanpos]->is_call_waiting) {
               pri->pvts[chanpos]->is_call_waiting = 0;
               ast_atomic_fetchadd_int(&pri->num_call_waiting_calls, -1);
            }
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->answer.channel,
               e->answer.subcmds, e->answer.call);
            if (pri->pvts[chanpos]->call_level < SIG_PRI_CALL_LEVEL_CONNECT) {
               pri->pvts[chanpos]->call_level = SIG_PRI_CALL_LEVEL_CONNECT;
            }
            sig_pri_open_media(pri->pvts[chanpos]);
            pri_queue_control(pri, chanpos, AST_CONTROL_ANSWER);
            /* Enable echo cancellation if it's not on already */
            sig_pri_set_dialing(pri->pvts[chanpos], 0);
            sig_pri_set_echocanceller(pri->pvts[chanpos], 1);

#ifdef SUPPORT_USERUSER
            if (!ast_strlen_zero(e->answer.useruserinfo)) {
               struct ast_channel *owner;

               sig_pri_lock_owner(pri, chanpos);
               owner = pri->pvts[chanpos]->owner;
               if (owner) {
                  pbx_builtin_setvar_helper(owner, "USERUSERINFO",
                     e->answer.useruserinfo);
                  ast_channel_unlock(owner);
               }
            }
#endif

            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
#if defined(HAVE_PRI_CALL_WAITING)
         case PRI_EVENT_CONNECT_ACK:
            if (sig_pri_is_cis_call(e->connect_ack.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->connect_ack.subcmds,
                  e->connect_ack.call);
               break;
            }
            chanpos = pri_find_fixup_principle(pri, e->connect_ack.channel,
               e->connect_ack.call);
            if (chanpos < 0) {
               break;
            }

            sig_pri_lock_private(pri->pvts[chanpos]);
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->connect_ack.channel,
               e->connect_ack.subcmds, e->connect_ack.call);
            sig_pri_open_media(pri->pvts[chanpos]);
            sig_pri_unlock_private(pri->pvts[chanpos]);
            sig_pri_span_devstate_changed(pri);
            break;
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
         case PRI_EVENT_HANGUP:
            if (sig_pri_is_cis_call(e->hangup.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->hangup.subcmds,
                  e->hangup.call);
               pri_hangup(pri->pri, e->hangup.call, e->hangup.cause);
               break;
            }
            chanpos = pri_find_principle_by_call(pri, e->hangup.call);
            if (chanpos < 0) {
               /*
                * Continue hanging up the call even though
                * we do not remember it (if we ever did).
                */
               pri_hangup(pri->pri, e->hangup.call, e->hangup.cause);
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->hangup.channel,
               e->hangup.subcmds, e->hangup.call);
            switch (e->hangup.cause) {
            case PRI_CAUSE_INVALID_CALL_REFERENCE:
               /*
                * The peer denies the existence of this call so we must
                * continue hanging it up and forget about it.
                */
               pri_hangup(pri->pri, e->hangup.call, e->hangup.cause);
               pri->pvts[chanpos]->call = NULL;
               break;
            default:
               break;
            }
            if (!pri->pvts[chanpos]->alreadyhungup) {
               /* we're calling here dahdi_hangup so once we get there we need to clear p->call after calling pri_hangup */
               pri->pvts[chanpos]->alreadyhungup = 1;
               switch (e->hangup.cause) {
               case PRI_CAUSE_USER_BUSY:
               case PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION:
                  sig_pri_cc_generic_check(pri, chanpos, AST_CC_CCBS);
                  break;
               default:
                  break;
               }
               if (pri->pvts[chanpos]->owner) {
                  int do_hangup = 0;

                  /* Queue a BUSY instead of a hangup if our cause is appropriate */
                  pri->pvts[chanpos]->owner->hangupcause = e->hangup.cause;
                  switch (pri->pvts[chanpos]->owner->_state) {
                  case AST_STATE_BUSY:
                  case AST_STATE_UP:
                     do_hangup = 1;
                     break;
                  default:
                     if (!pri->pvts[chanpos]->outgoing) {
                        /*
                         * The incoming call leg hung up before getting
                         * connected so just hangup the call.
                         */
                        do_hangup = 1;
                        break;
                     }
                     switch (e->hangup.cause) {
                     case PRI_CAUSE_USER_BUSY:
                        pri_queue_control(pri, chanpos, AST_CONTROL_BUSY);
                        break;
                     case PRI_CAUSE_CALL_REJECTED:
                     case PRI_CAUSE_NETWORK_OUT_OF_ORDER:
                     case PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION:
                     case PRI_CAUSE_SWITCH_CONGESTION:
                     case PRI_CAUSE_DESTINATION_OUT_OF_ORDER:
                     case PRI_CAUSE_NORMAL_TEMPORARY_FAILURE:
                        pri_queue_control(pri, chanpos, AST_CONTROL_CONGESTION);
                        break;
                     default:
                        do_hangup = 1;
                        break;
                     }
                     break;
                  }

                  if (do_hangup) {
#if defined(HAVE_PRI_AOC_EVENTS)
                     if (detect_aoc_e_subcmd(e->hangup.subcmds)) {
                        /* If a AOC-E msg was sent during the release, we must use a
                         * AST_CONTROL_HANGUP frame to guarantee that frame gets read before hangup */
                        pri_queue_control(pri, chanpos, AST_CONTROL_HANGUP);
                     } else {
                        pri->pvts[chanpos]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
                     }
#else
                     pri->pvts[chanpos]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
                  }
               } else {
                  /*
                   * Continue hanging up the call even though
                   * we do not have an owner.
                   */
                  pri_hangup(pri->pri, pri->pvts[chanpos]->call, e->hangup.cause);
                  pri->pvts[chanpos]->call = NULL;
               }
               ast_verb(3, "Span %d: Channel %d/%d got hangup, cause %d\n",
                  pri->span, pri->pvts[chanpos]->logicalspan,
                  pri->pvts[chanpos]->prioffset, e->hangup.cause);
            } else {
               /* Continue hanging up the call. */
               pri_hangup(pri->pri, pri->pvts[chanpos]->call, e->hangup.cause);
               pri->pvts[chanpos]->call = NULL;
            }
#if defined(FORCE_RESTART_UNAVAIL_CHANS)
            if (e->hangup.cause == PRI_CAUSE_REQUESTED_CHAN_UNAVAIL
               && pri->sig != SIG_BRI_PTMP && !pri->resetting
               && !pri->pvts[chanpos]->resetting) {
               ast_verb(3,
                  "Span %d: Forcing restart of channel %d/%d since channel reported in use\n",
                  pri->span, pri->pvts[chanpos]->logicalspan,
                  pri->pvts[chanpos]->prioffset);
               pri->pvts[chanpos]->resetting = 1;
               pri_reset(pri->pri, PVT_TO_CHANNEL(pri->pvts[chanpos]));
            }
#endif   /* defined(FORCE_RESTART_UNAVAIL_CHANS) */
            if (e->hangup.aoc_units > -1)
               ast_verb(3, "Channel %d/%d, span %d received AOC-E charging %d unit%s\n",
                  pri->pvts[chanpos]->logicalspan, pri->pvts[chanpos]->prioffset, pri->span, (int)e->hangup.aoc_units, (e->hangup.aoc_units == 1) ? "" : "s");

#ifdef SUPPORT_USERUSER
            if (!ast_strlen_zero(e->hangup.useruserinfo)) {
               struct ast_channel *owner;

               sig_pri_lock_owner(pri, chanpos);
               owner = pri->pvts[chanpos]->owner;
               if (owner) {
                  pbx_builtin_setvar_helper(owner, "USERUSERINFO",
                     e->hangup.useruserinfo);
                  ast_channel_unlock(owner);
               }
            }
#endif

            sig_pri_unlock_private(pri->pvts[chanpos]);
            sig_pri_span_devstate_changed(pri);
            break;
         case PRI_EVENT_HANGUP_REQ:
            if (sig_pri_is_cis_call(e->hangup.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->hangup.subcmds,
                  e->hangup.call);
               pri_hangup(pri->pri, e->hangup.call, e->hangup.cause);
               break;
            }
            chanpos = pri_find_principle_by_call(pri, e->hangup.call);
            if (chanpos < 0) {
               /*
                * Continue hanging up the call even though
                * we do not remember it (if we ever did).
                */
               pri_hangup(pri->pri, e->hangup.call, e->hangup.cause);
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->hangup.channel,
               e->hangup.subcmds, e->hangup.call);
#if defined(HAVE_PRI_CALL_HOLD)
            if (e->hangup.call_active && e->hangup.call_held
               && pri->hold_disconnect_transfer) {
               /* We are to transfer the call instead of simply hanging up. */
               sig_pri_unlock_private(pri->pvts[chanpos]);
               if (!sig_pri_attempt_transfer(pri, e->hangup.call_held, 1,
                  e->hangup.call_active, 0, NULL, NULL)) {
                  break;
               }
               sig_pri_lock_private(pri->pvts[chanpos]);
            }
#endif   /* defined(HAVE_PRI_CALL_HOLD) */
            switch (e->hangup.cause) {
            case PRI_CAUSE_USER_BUSY:
            case PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION:
               sig_pri_cc_generic_check(pri, chanpos, AST_CC_CCBS);
               break;
            case PRI_CAUSE_INVALID_CALL_REFERENCE:
               /*
                * The peer denies the existence of this call so we must
                * continue hanging it up and forget about it.  We should not
                * get this cause here, but for completeness we will handle it
                * anyway.
                */
               pri_hangup(pri->pri, e->hangup.call, e->hangup.cause);
               pri->pvts[chanpos]->call = NULL;
               break;
            default:
               break;
            }
            if (pri->pvts[chanpos]->owner) {
               int do_hangup = 0;

               pri->pvts[chanpos]->owner->hangupcause = e->hangup.cause;
               switch (pri->pvts[chanpos]->owner->_state) {
               case AST_STATE_BUSY:
               case AST_STATE_UP:
                  do_hangup = 1;
                  break;
               default:
                  if (!pri->pvts[chanpos]->outgoing) {
                     /*
                      * The incoming call leg hung up before getting
                      * connected so just hangup the call.
                      */
                     do_hangup = 1;
                     break;
                  }
                  switch (e->hangup.cause) {
                  case PRI_CAUSE_USER_BUSY:
                     pri_queue_control(pri, chanpos, AST_CONTROL_BUSY);
                     break;
                  case PRI_CAUSE_CALL_REJECTED:
                  case PRI_CAUSE_NETWORK_OUT_OF_ORDER:
                  case PRI_CAUSE_NORMAL_CIRCUIT_CONGESTION:
                  case PRI_CAUSE_SWITCH_CONGESTION:
                  case PRI_CAUSE_DESTINATION_OUT_OF_ORDER:
                  case PRI_CAUSE_NORMAL_TEMPORARY_FAILURE:
                     pri_queue_control(pri, chanpos, AST_CONTROL_CONGESTION);
                     break;
                  default:
                     do_hangup = 1;
                     break;
                  }
                  break;
               }

               if (do_hangup) {
#if defined(HAVE_PRI_AOC_EVENTS)
                  if (!pri->pvts[chanpos]->holding_aoce
                     && pri->aoce_delayhangup
                     && ast_bridged_channel(pri->pvts[chanpos]->owner)) {
                     sig_pri_send_aoce_termination_request(pri, chanpos,
                        pri_get_timer(pri->pri, PRI_TIMER_T305) / 2);
                  } else if (detect_aoc_e_subcmd(e->hangup.subcmds)) {
                     /* If a AOC-E msg was sent during the Disconnect, we must use a AST_CONTROL_HANGUP frame
                      * to guarantee that frame gets read before hangup */
                     pri_queue_control(pri, chanpos, AST_CONTROL_HANGUP);
                  } else {
                     pri->pvts[chanpos]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
                  }
#else
                  pri->pvts[chanpos]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
               }
               ast_verb(3, "Span %d: Channel %d/%d got hangup request, cause %d\n",
                  pri->span, pri->pvts[chanpos]->logicalspan,
                  pri->pvts[chanpos]->prioffset, e->hangup.cause);
            } else {
               /*
                * Continue hanging up the call even though
                * we do not have an owner.
                */
               pri_hangup(pri->pri, pri->pvts[chanpos]->call, e->hangup.cause);
               pri->pvts[chanpos]->call = NULL;
            }
#if defined(FORCE_RESTART_UNAVAIL_CHANS)
            if (e->hangup.cause == PRI_CAUSE_REQUESTED_CHAN_UNAVAIL
               && pri->sig != SIG_BRI_PTMP && !pri->resetting
               && !pri->pvts[chanpos]->resetting) {
               ast_verb(3,
                  "Span %d: Forcing restart of channel %d/%d since channel reported in use\n",
                  pri->span, pri->pvts[chanpos]->logicalspan,
                  pri->pvts[chanpos]->prioffset);
               pri->pvts[chanpos]->resetting = 1;
               pri_reset(pri->pri, PVT_TO_CHANNEL(pri->pvts[chanpos]));
            }
#endif   /* defined(FORCE_RESTART_UNAVAIL_CHANS) */

#ifdef SUPPORT_USERUSER
            if (!ast_strlen_zero(e->hangup.useruserinfo)) {
               struct ast_channel *owner;

               sig_pri_lock_owner(pri, chanpos);
               owner = pri->pvts[chanpos]->owner;
               if (owner) {
                  pbx_builtin_setvar_helper(owner, "USERUSERINFO",
                     e->hangup.useruserinfo);
                  ast_channel_unlock(owner);
               }
            }
#endif

            sig_pri_unlock_private(pri->pvts[chanpos]);
            sig_pri_span_devstate_changed(pri);
            break;
         case PRI_EVENT_HANGUP_ACK:
            if (sig_pri_is_cis_call(e->hangup.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->hangup.subcmds,
                  e->hangup.call);
               break;
            }
            chanpos = pri_find_principle_by_call(pri, e->hangup.call);
            if (chanpos < 0) {
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
            pri->pvts[chanpos]->call = NULL;
            if (pri->pvts[chanpos]->owner) {
               ast_verb(3, "Span %d: Channel %d/%d got hangup ACK\n", pri->span,
                  pri->pvts[chanpos]->logicalspan, pri->pvts[chanpos]->prioffset);
            }
#ifdef SUPPORT_USERUSER
            if (!ast_strlen_zero(e->hangup.useruserinfo)) {
               struct ast_channel *owner;

               sig_pri_lock_owner(pri, chanpos);
               owner = pri->pvts[chanpos]->owner;
               if (owner) {
                  pbx_builtin_setvar_helper(owner, "USERUSERINFO",
                     e->hangup.useruserinfo);
                  ast_channel_unlock(owner);
               }
            }
#endif
            sig_pri_unlock_private(pri->pvts[chanpos]);
            sig_pri_span_devstate_changed(pri);
            break;
         case PRI_EVENT_CONFIG_ERR:
            ast_log(LOG_WARNING, "PRI Error on span %d: %s\n", pri->span, e->err.err);
            break;
         case PRI_EVENT_RESTART_ACK:
            chanpos = pri_find_principle(pri, e->restartack.channel, NULL);
            if (chanpos < 0) {
               /* Sometime switches (e.g. I421 / British Telecom) don't give us the
                  channel number, so we have to figure it out...  This must be why
                  everybody resets exactly a channel at a time. */
               for (x = 0; x < pri->numchans; x++) {
                  if (pri->pvts[x] && pri->pvts[x]->resetting) {
                     chanpos = x;
                     sig_pri_lock_private(pri->pvts[chanpos]);
                     ast_debug(1,
                        "Span %d: Assuming restart ack is for channel %d/%d\n",
                        pri->span, pri->pvts[chanpos]->logicalspan,
                        pri->pvts[chanpos]->prioffset);
                     if (pri->pvts[chanpos]->owner) {
                        ast_log(LOG_WARNING,
                           "Span %d: Got restart ack on channel %d/%d with owner\n",
                           pri->span, pri->pvts[chanpos]->logicalspan,
                           pri->pvts[chanpos]->prioffset);
                        pri->pvts[chanpos]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
                     }
                     pri->pvts[chanpos]->resetting = 0;
                     ast_verb(3,
                        "Span %d: Channel %d/%d successfully restarted\n",
                        pri->span, pri->pvts[chanpos]->logicalspan,
                        pri->pvts[chanpos]->prioffset);
                     sig_pri_unlock_private(pri->pvts[chanpos]);
                     if (pri->resetting)
                        pri_check_restart(pri);
                     break;
                  }
               }
               if (chanpos < 0) {
                  ast_log(LOG_WARNING,
                     "Span %d: Restart ACK on strange channel %d/%d\n",
                     pri->span, PRI_SPAN(e->restartack.channel),
                     PRI_CHANNEL(e->restartack.channel));
               }
            } else {
               sig_pri_lock_private(pri->pvts[chanpos]);
               if (pri->pvts[chanpos]->owner) {
                  ast_log(LOG_WARNING,
                     "Span %d: Got restart ack on channel %d/%d with owner\n",
                     pri->span, pri->pvts[chanpos]->logicalspan,
                     pri->pvts[chanpos]->prioffset);
                  pri->pvts[chanpos]->owner->_softhangup |= AST_SOFTHANGUP_DEV;
               }
               pri->pvts[chanpos]->resetting = 0;
               ast_verb(3,
                  "Span %d: Channel %d/%d successfully restarted\n",
                  pri->span, pri->pvts[chanpos]->logicalspan,
                  pri->pvts[chanpos]->prioffset);
               sig_pri_unlock_private(pri->pvts[chanpos]);
               if (pri->resetting)
                  pri_check_restart(pri);
            }
            break;
         case PRI_EVENT_SETUP_ACK:
            if (sig_pri_is_cis_call(e->setup_ack.channel)) {
               sig_pri_handle_cis_subcmds(pri, e->e, e->setup_ack.subcmds,
                  e->setup_ack.call);
               break;
            }
            chanpos = pri_find_fixup_principle(pri, e->setup_ack.channel,
               e->setup_ack.call);
            if (chanpos < 0) {
               break;
            }
            sig_pri_lock_private(pri->pvts[chanpos]);
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->setup_ack.channel,
               e->setup_ack.subcmds, e->setup_ack.call);
            if (pri->pvts[chanpos]->call_level < SIG_PRI_CALL_LEVEL_OVERLAP) {
               pri->pvts[chanpos]->call_level = SIG_PRI_CALL_LEVEL_OVERLAP;
            }

            /* Send any queued digits */
            len = strlen(pri->pvts[chanpos]->dialdest);
            for (x = 0; x < len; ++x) {
               ast_debug(1, "Sending pending digit '%c'\n", pri->pvts[chanpos]->dialdest[x]);
               pri_information(pri->pri, pri->pvts[chanpos]->call,
                  pri->pvts[chanpos]->dialdest[x]);
            }

            if (!pri->pvts[chanpos]->progress
               && (pri->overlapdial & DAHDI_OVERLAPDIAL_OUTGOING)
               && !pri->pvts[chanpos]->digital
               && !pri->pvts[chanpos]->no_b_channel) {
               /*
                * Call has a channel.
                * Indicate for overlap dialing that dialtone may be present.
                */
               pri_queue_control(pri, chanpos, AST_CONTROL_PROGRESS);
               pri->pvts[chanpos]->progress = 1;/* Claim to have seen inband-information */
               sig_pri_set_dialing(pri->pvts[chanpos], 0);
               sig_pri_open_media(pri->pvts[chanpos]);
            }
            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
         case PRI_EVENT_NOTIFY:
            if (sig_pri_is_cis_call(e->notify.channel)) {
#if defined(HAVE_PRI_CALL_HOLD)
               sig_pri_handle_cis_subcmds(pri, e->e, e->notify.subcmds,
                  e->notify.call);
#else
               sig_pri_handle_cis_subcmds(pri, e->e, e->notify.subcmds, NULL);
#endif   /* !defined(HAVE_PRI_CALL_HOLD) */
               break;
            }
#if defined(HAVE_PRI_CALL_HOLD)
            chanpos = pri_find_principle_by_call(pri, e->notify.call);
            if (chanpos < 0) {
               ast_log(LOG_WARNING, "Span %d: Received NOTIFY for unknown call.\n",
                  pri->span);
               break;
            }
#else
            /*
             * This version of libpri does not supply a call pointer for
             * this message.  We are just going to have to trust that the
             * correct principle is found.
             */
            chanpos = pri_find_principle(pri, e->notify.channel, NULL);
            if (chanpos < 0) {
               ast_log(LOG_WARNING, "Received NOTIFY on unconfigured channel %d/%d span %d\n",
                  PRI_SPAN(e->notify.channel), PRI_CHANNEL(e->notify.channel), pri->span);
               break;
            }
#endif   /* !defined(HAVE_PRI_CALL_HOLD) */
            sig_pri_lock_private(pri->pvts[chanpos]);
#if defined(HAVE_PRI_CALL_HOLD)
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->notify.channel,
               e->notify.subcmds, e->notify.call);
#else
            sig_pri_handle_subcmds(pri, chanpos, e->e, e->notify.channel,
               e->notify.subcmds, NULL);
#endif   /* !defined(HAVE_PRI_CALL_HOLD) */
            switch (e->notify.info) {
            case PRI_NOTIFY_REMOTE_HOLD:
               if (!pri->discardremoteholdretrieval) {
                  pri_queue_control(pri, chanpos, AST_CONTROL_HOLD);
               }
               break;
            case PRI_NOTIFY_REMOTE_RETRIEVAL:
               if (!pri->discardremoteholdretrieval) {
                  pri_queue_control(pri, chanpos, AST_CONTROL_UNHOLD);
               }
               break;
            }
            sig_pri_unlock_private(pri->pvts[chanpos]);
            break;
#if defined(HAVE_PRI_CALL_HOLD)
         case PRI_EVENT_HOLD:
            /* We should not be getting any CIS calls with this message type. */
            if (sig_pri_handle_hold(pri, e)) {
               pri_hold_rej(pri->pri, e->hold.call,
                  PRI_CAUSE_RESOURCE_UNAVAIL_UNSPECIFIED);
            } else {
               pri_hold_ack(pri->pri, e->hold.call);
            }
            break;
#endif   /* defined(HAVE_PRI_CALL_HOLD) */
#if defined(HAVE_PRI_CALL_HOLD)
         case PRI_EVENT_HOLD_ACK:
            ast_debug(1, "Event: HOLD_ACK\n");
            break;
#endif   /* defined(HAVE_PRI_CALL_HOLD) */
#if defined(HAVE_PRI_CALL_HOLD)
         case PRI_EVENT_HOLD_REJ:
            ast_debug(1, "Event: HOLD_REJ\n");
            break;
#endif   /* defined(HAVE_PRI_CALL_HOLD) */
#if defined(HAVE_PRI_CALL_HOLD)
         case PRI_EVENT_RETRIEVE:
            /* We should not be getting any CIS calls with this message type. */
            sig_pri_handle_retrieve(pri, e);
            break;
#endif   /* defined(HAVE_PRI_CALL_HOLD) */
#if defined(HAVE_PRI_CALL_HOLD)
         case PRI_EVENT_RETRIEVE_ACK:
            ast_debug(1, "Event: RETRIEVE_ACK\n");
            break;
#endif   /* defined(HAVE_PRI_CALL_HOLD) */
#if defined(HAVE_PRI_CALL_HOLD)
         case PRI_EVENT_RETRIEVE_REJ:
            ast_debug(1, "Event: RETRIEVE_REJ\n");
            break;
#endif   /* defined(HAVE_PRI_CALL_HOLD) */
         default:
            ast_debug(1, "Event: %d\n", e->e);
            break;
         }
      }
      ast_mutex_unlock(&pri->lock);
   }
   /* Never reached */
   return NULL;
}
void pri_event_alarm ( struct sig_pri_span pri,
int  index,
int  before_start_pri 
)

Definition at line 1897 of file sig_pri.c.

References sig_pri_span::dchanavail, DCHAN_NOTINALARM, DCHAN_UP, and pri_find_dchan().

Referenced by my_handle_dchan_exception(), and prepare_pri().

{
   pri->dchanavail[index] &= ~(DCHAN_NOTINALARM | DCHAN_UP);
   if (!before_start_pri)
      pri_find_dchan(pri);
}
void pri_event_noalarm ( struct sig_pri_span pri,
int  index,
int  before_start_pri 
)

Definition at line 1904 of file sig_pri.c.

References sig_pri_span::dchanavail, DCHAN_NOTINALARM, and sig_pri_span::dchans.

Referenced by my_handle_dchan_exception(), and prepare_pri().

{
   pri->dchanavail[index] |= DCHAN_NOTINALARM;
   if (!before_start_pri)
      pri_restart(pri->dchans[index]);
}
static int pri_find_dchan ( struct sig_pri_span pri) [static]

Definition at line 1035 of file sig_pri.c.

References sig_pri_span::pri, SIG_PRI_NUM_DCHANS, sig_pri_span::dchanavail, DCHAN_AVAILABLE, sig_pri_span::dchans, sig_pri_span::sig, SIG_BRI_PTMP, sig_pri_span::no_d_channels, ast_log(), LOG_WARNING, sig_pri_span::span, LOG_NOTICE, and sig_pri_span::fds.

Referenced by pri_event_alarm(), and pri_dchannel().

{
   int oldslot = -1;
   struct pri *old;
   int newslot = -1;
   int x;
   old = pri->pri;
   for (x = 0; x < SIG_PRI_NUM_DCHANS; x++) {
      if ((pri->dchanavail[x] == DCHAN_AVAILABLE) && (newslot < 0))
         newslot = x;
      if (pri->dchans[x] == old) {
         oldslot = x;
      }
   }
   if (newslot < 0) {
      newslot = 0;
      /* This is annoying to see on non persistent layer 2 connections.  Let's not complain in that case */
      if (pri->sig != SIG_BRI_PTMP && !pri->no_d_channels) {
         pri->no_d_channels = 1;
         ast_log(LOG_WARNING,
            "Span %d: No D-channels available!  Using Primary channel as D-channel anyway!\n",
            pri->span);
      }
   } else {
      pri->no_d_channels = 0;
   }
   if (old && (oldslot != newslot))
      ast_log(LOG_NOTICE, "Switching from d-channel fd %d to fd %d!\n",
         pri->fds[oldslot], pri->fds[newslot]);
   pri->pri = pri->dchans[newslot];
   return 0;
}
static int pri_find_empty_chan ( struct sig_pri_span pri,
int  backwards 
) [static]

Definition at line 1657 of file sig_pri.c.

References sig_pri_span::numchans, sig_pri_span::pvts, sig_pri_chan::no_b_channel, sig_pri_is_chan_available(), ast_debug, sig_pri_chan::logicalspan, and sig_pri_chan::prioffset.

Referenced by pri_dchannel().

{
   int x;
   if (backwards)
      x = pri->numchans;
   else
      x = 0;
   for (;;) {
      if (backwards && (x < 0))
         break;
      if (!backwards && (x >= pri->numchans))
         break;
      if (pri->pvts[x]
         && !pri->pvts[x]->no_b_channel
         && sig_pri_is_chan_available(pri->pvts[x])) {
         ast_debug(1, "Found empty available channel %d/%d\n",
            pri->pvts[x]->logicalspan, pri->pvts[x]->prioffset);
         return x;
      }
      if (backwards)
         x--;
      else
         x++;
   }
   return -1;
}
static int pri_find_fixup_principle ( struct sig_pri_span pri,
int  channel,
q931_call *  call 
) [static]

Definition at line 1492 of file sig_pri.c.

References pri_find_principle(), ast_log(), LOG_WARNING, sig_pri_span::span, PRI_SPAN, PRI_CHANNEL, sig_pri_kill_call(), and pri_fixup_principle().

Referenced by pri_dchannel().

{
   int chanpos;

   chanpos = pri_find_principle(pri, channel, call);
   if (chanpos < 0) {
      ast_log(LOG_WARNING, "Span %d: PRI requested channel %d/%d is unconfigured.\n",
         pri->span, PRI_SPAN(channel), PRI_CHANNEL(channel));
      sig_pri_kill_call(pri, call, PRI_CAUSE_IDENTIFIED_CHANNEL_NOTEXIST);
      return -1;
   }
   chanpos = pri_fixup_principle(pri, chanpos, call);
   if (chanpos < 0) {
      ast_log(LOG_WARNING, "Span %d: PRI requested channel %d/%d is not available.\n",
         pri->span, PRI_SPAN(channel), PRI_CHANNEL(channel));
      /*
       * Using Q.931 section 5.2.3.1 b) as the reason for picking
       * PRI_CAUSE_CHANNEL_UNACCEPTABLE.  Receiving a
       * PRI_CAUSE_REQUESTED_CHAN_UNAVAIL would cause us to restart
       * that channel (which is not specified by Q.931) and kill some
       * other call which would be bad.
       */
      sig_pri_kill_call(pri, call, PRI_CAUSE_CHANNEL_UNACCEPTABLE);
      return -1;
   }
   return chanpos;
}
static int pri_find_principle ( struct sig_pri_span pri,
int  channel,
q931_call *  call 
) [static]

Definition at line 1259 of file sig_pri.c.

References sig_pri_chan::prioffset, PRI_CHANNEL, PRI_HELD_CALL, sig_pri_span::numchans, sig_pri_span::pvts, sig_pri_chan::call, PRI_SPAN, PRI_EXPLICIT, pri_active_dchan_index(), sig_pri_span::dchan_logical_span, sig_pri_chan::logicalspan, and sig_pri_chan::no_b_channel.

Referenced by pri_find_fixup_principle(), and pri_dchannel().

{
   int x;
   int span;
   int principle;
   int prioffset;

   if (channel < 0) {
      /* Channel is not picked yet. */
      return -1;
   }

   prioffset = PRI_CHANNEL(channel);
   if (!prioffset || (channel & PRI_HELD_CALL)) {
      if (!call) {
         /* Cannot find a call waiting call or held call without a call. */
         return -1;
      }
      principle = -1;
      for (x = 0; x < pri->numchans; ++x) {
         if (pri->pvts[x]
            && pri->pvts[x]->call == call) {
            principle = x;
            break;
         }
      }
      return principle;
   }

   span = PRI_SPAN(channel);
   if (!(channel & PRI_EXPLICIT)) {
      int index;

      index = pri_active_dchan_index(pri);
      if (index == -1) {
         return -1;
      }
      span = pri->dchan_logical_span[index];
   }

   principle = -1;
   for (x = 0; x < pri->numchans; x++) {
      if (pri->pvts[x]
         && pri->pvts[x]->prioffset == prioffset
         && pri->pvts[x]->logicalspan == span
         && !pri->pvts[x]->no_b_channel) {
         principle = x;
         break;
      }
   }

   return principle;
}
static int pri_find_principle_by_call ( struct sig_pri_span pri,
q931_call *  call 
) [static]

Definition at line 1194 of file sig_pri.c.

References sig_pri_span::numchans, sig_pri_span::pvts, and sig_pri_chan::call.

Referenced by sig_pri_kill_call(), and pri_dchannel().

{
   int idx;

   if (!call) {
      /* Cannot find a call without a call. */
      return -1;
   }
   for (idx = 0; idx < pri->numchans; ++idx) {
      if (pri->pvts[idx] && pri->pvts[idx]->call == call) {
         /* Found the principle */
         return idx;
      }
   }
   return -1;
}
static int pri_fixup_principle ( struct sig_pri_span pri,
int  principle,
q931_call *  call 
) [static]

Definition at line 1326 of file sig_pri.c.

References sig_pri_span::pvts, sig_pri_chan::call, sig_pri_span::numchans, sig_pri_lock_private(), sig_pri_lock_owner(), ast_verb, sig_pri_chan::owner, ast_channel::name, sig_pri_chan::channel, sig_pri_is_chan_available(), ast_log(), LOG_WARNING, sig_pri_unlock_private(), ast_channel_unlock, sig_pri_fixup_chans(), sig_pri_chan::alreadyhungup, sig_pri_chan::isidlecall, sig_pri_chan::progress, sig_pri_chan::allocated, sig_pri_chan::outgoing, sig_pri_chan::digital, sig_pri_chan::call_level, SIG_PRI_CALL_LEVEL_IDLE, sig_pri_chan::user_tag, sig_pri_chan::no_b_channel, sig_pri_chan::hidecallerid, sig_pri_chan::hidecalleridname, sig_pri_chan::immediate, sig_pri_chan::priexclusive, sig_pri_chan::priindication_oob, sig_pri_chan::use_callerid, sig_pri_chan::use_callingpres, sig_pri_chan::stripmsd, sig_pri_chan::context, sig_pri_chan::mohinterpret, sig_pri_chan::logicalspan, sig_pri_chan::mastertrunkgroup, sig_pri_open_media(), and sig_pri_ami_channel_event().

Referenced by pri_find_fixup_principle(), and pri_dchannel().

{
   int x;

   if (principle < 0 || pri->numchans <= principle) {
      /* Out of rannge */
      return -1;
   }
   if (!call) {
      /* No call */
      return principle;
   }
   if (pri->pvts[principle] && pri->pvts[principle]->call == call) {
      /* Call is already on the specified principle. */
      return principle;
   }

   /* Find the old principle location. */
   for (x = 0; x < pri->numchans; x++) {
      struct sig_pri_chan *new_chan;
      struct sig_pri_chan *old_chan;

      if (!pri->pvts[x] || pri->pvts[x]->call != call) {
         continue;
      }

      /* Found our call */
      new_chan = pri->pvts[principle];
      old_chan = pri->pvts[x];

      /* Get locks to safely move to the new private structure. */
      sig_pri_lock_private(old_chan);
      sig_pri_lock_owner(pri, x);
      sig_pri_lock_private(new_chan);

      ast_verb(3, "Moving call (%s) from channel %d to %d.\n",
         old_chan->owner ? old_chan->owner->name : "",
         old_chan->channel, new_chan->channel);
      if (!sig_pri_is_chan_available(new_chan)) {
         ast_log(LOG_WARNING,
            "Can't move call (%s) from channel %d to %d.  It is already in use.\n",
            old_chan->owner ? old_chan->owner->name : "",
            old_chan->channel, new_chan->channel);
         sig_pri_unlock_private(new_chan);
         if (old_chan->owner) {
            ast_channel_unlock(old_chan->owner);
         }
         sig_pri_unlock_private(old_chan);
         return -1;
      }

      sig_pri_fixup_chans(old_chan, new_chan);

      /* Fix it all up now */
      new_chan->owner = old_chan->owner;
      old_chan->owner = NULL;

      new_chan->call = old_chan->call;
      old_chan->call = NULL;

      /* Transfer flags from the old channel. */
#if defined(HAVE_PRI_AOC_EVENTS)
      new_chan->aoc_s_request_invoke_id_valid = old_chan->aoc_s_request_invoke_id_valid;
      new_chan->waiting_for_aoce = old_chan->waiting_for_aoce;
      new_chan->holding_aoce = old_chan->holding_aoce;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
      new_chan->alreadyhungup = old_chan->alreadyhungup;
      new_chan->isidlecall = old_chan->isidlecall;
      new_chan->progress = old_chan->progress;
      new_chan->allocated = old_chan->allocated;
      new_chan->outgoing = old_chan->outgoing;
      new_chan->digital = old_chan->digital;
#if defined(HAVE_PRI_CALL_WAITING)
      new_chan->is_call_waiting = old_chan->is_call_waiting;
#endif   /* defined(HAVE_PRI_CALL_WAITING) */

#if defined(HAVE_PRI_AOC_EVENTS)
      old_chan->aoc_s_request_invoke_id_valid = 0;
      old_chan->waiting_for_aoce = 0;
      old_chan->holding_aoce = 0;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
      old_chan->alreadyhungup = 0;
      old_chan->isidlecall = 0;
      old_chan->progress = 0;
      old_chan->allocated = 0;
      old_chan->outgoing = 0;
      old_chan->digital = 0;
#if defined(HAVE_PRI_CALL_WAITING)
      old_chan->is_call_waiting = 0;
#endif   /* defined(HAVE_PRI_CALL_WAITING) */

      /* More stuff to transfer to the new channel. */
      new_chan->call_level = old_chan->call_level;
      old_chan->call_level = SIG_PRI_CALL_LEVEL_IDLE;
#if defined(HAVE_PRI_REVERSE_CHARGE)
      new_chan->reverse_charging_indication = old_chan->reverse_charging_indication;
#endif   /* defined(HAVE_PRI_REVERSE_CHARGE) */
#if defined(HAVE_PRI_SETUP_KEYPAD)
      strcpy(new_chan->keypad_digits, old_chan->keypad_digits);
#endif   /* defined(HAVE_PRI_SETUP_KEYPAD) */
#if defined(HAVE_PRI_AOC_EVENTS)
      new_chan->aoc_s_request_invoke_id = old_chan->aoc_s_request_invoke_id;
      new_chan->aoc_e = old_chan->aoc_e;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
      strcpy(new_chan->user_tag, old_chan->user_tag);

      if (new_chan->no_b_channel) {
         /* Copy the real channel configuration to the no B channel interface. */
         new_chan->hidecallerid = old_chan->hidecallerid;
         new_chan->hidecalleridname = old_chan->hidecalleridname;
         new_chan->immediate = old_chan->immediate;
         new_chan->priexclusive = old_chan->priexclusive;
         new_chan->priindication_oob = old_chan->priindication_oob;
         new_chan->use_callerid = old_chan->use_callerid;
         new_chan->use_callingpres = old_chan->use_callingpres;
         new_chan->stripmsd = old_chan->stripmsd;
         strcpy(new_chan->context, old_chan->context);
         strcpy(new_chan->mohinterpret, old_chan->mohinterpret);

         /* Become a member of the old channel span/trunk-group. */
         new_chan->logicalspan = old_chan->logicalspan;
         new_chan->mastertrunkgroup = old_chan->mastertrunkgroup;
      } else if (old_chan->no_b_channel) {
         /*
          * We are transitioning from a held/call-waiting channel to a
          * real channel so we need to make sure that the media path is
          * open.  (Needed especially if the channel is natively
          * bridged.)
          */
         sig_pri_open_media(new_chan);
      }

      if (new_chan->owner) {
         sig_pri_ami_channel_event(new_chan);
      }

      sig_pri_unlock_private(old_chan);
      if (new_chan->owner) {
         ast_channel_unlock(new_chan->owner);
      }
      sig_pri_unlock_private(new_chan);

      return principle;
   }
   ast_verb(3, "Call specified, but not found.\n");
   return -1;
}
static int pri_grab ( struct sig_pri_chan p,
struct sig_pri_span pri 
) [inline, static]

Definition at line 324 of file sig_pri.c.

References ast_mutex_trylock, sig_pri_span::lock, PRI_DEADLOCK_AVOIDANCE, and sig_pri_span::master.

Referenced by pri_ss_thread(), sig_pri_hangup(), sig_pri_call(), sig_pri_indicate(), sig_pri_answer(), sig_pri_digit_begin(), sig_pri_chan_alarm_notify(), pri_send_keypad_facility_exec(), and pri_send_callrerouting_facility_exec().

{
   int res;
   /* Grab the lock first */
   do {
      res = ast_mutex_trylock(&pri->lock);
      if (res) {
         PRI_DEADLOCK_AVOIDANCE(p);
      }
   } while (res);
   /* Then break the poll */
   pthread_kill(pri->master, SIGURG);
   return 0;
}
int pri_is_up ( struct sig_pri_span pri)

Definition at line 995 of file sig_pri.c.

References SIG_PRI_NUM_DCHANS, sig_pri_span::dchanavail, and DCHAN_AVAILABLE.

Referenced by pri_dchannel().

{
   int x;
   for (x = 0; x < SIG_PRI_NUM_DCHANS; x++) {
      if (pri->dchanavail[x] == DCHAN_AVAILABLE)
         return 1;
   }
   return 0;
}
static char* pri_order ( int  level) [static]

Definition at line 1005 of file sig_pri.c.

Referenced by pri_dchannel(), and sig_pri_cli_show_span().

{
   switch (level) {
   case 0:
      return "Primary";
   case 1:
      return "Secondary";
   case 2:
      return "Tertiary";
   case 3:
      return "Quaternary";
   default:
      return "<Unknown>";
   }
}
static void pri_queue_control ( struct sig_pri_span pri,
int  chanpos,
int  subclass 
) [static]
static void pri_queue_frame ( struct sig_pri_span pri,
int  chanpos,
struct ast_frame frame 
) [static]

Definition at line 1145 of file sig_pri.c.

References sig_pri_lock_owner(), sig_pri_span::pvts, sig_pri_chan::owner, ast_queue_frame(), and ast_channel_unlock.

Referenced by pri_queue_control(), and pri_dchannel().

{
   sig_pri_lock_owner(pri, chanpos);
   if (pri->pvts[chanpos]->owner) {
      ast_queue_frame(pri->pvts[chanpos]->owner, frame);
      ast_channel_unlock(pri->pvts[chanpos]->owner);
   }
}
int pri_send_callrerouting_facility_exec ( struct sig_pri_chan p,
enum ast_channel_state  chanstate,
const char *  destination,
const char *  original,
const char *  reason 
)

Definition at line 7804 of file sig_pri.c.

References sig_pri_lock_private(), sig_pri_chan::pri, sig_pri_chan::call, ast_log(), LOG_DEBUG, sig_pri_unlock_private(), pri_grab(), sig_pri_span::pri, pri_rel(), and sig_pri_span::span.

{
   int res = -1;

   sig_pri_lock_private(p);

   if (!p->pri || !p->call) {
      ast_log(LOG_DEBUG, "Unable to find pri or call on channel!\n");
      sig_pri_unlock_private(p);
      return -1;
   }

   if (!pri_grab(p, p->pri)) {
      res = pri_callrerouting_facility(p->pri->pri, p->call, destination, original, reason);
      pri_rel(p->pri);
   } else {
      ast_log(LOG_DEBUG, "Unable to grab pri to send callrerouting facility on span %d!\n", p->pri->span);
   }

   sig_pri_unlock_private(p);

   return res;
}
int pri_send_keypad_facility_exec ( struct sig_pri_chan p,
const char *  digits 
)

Definition at line 7780 of file sig_pri.c.

References sig_pri_lock_private(), sig_pri_chan::pri, sig_pri_chan::call, ast_debug, sig_pri_unlock_private(), pri_grab(), sig_pri_span::pri, and pri_rel().

Referenced by dahdi_send_keypad_facility_exec().

{
   sig_pri_lock_private(p);

   if (!p->pri || !p->call) {
      ast_debug(1, "Unable to find pri or call on channel!\n");
      sig_pri_unlock_private(p);
      return -1;
   }

   if (!pri_grab(p, p->pri)) {
      pri_keypad_facility(p->pri->pri, p->call, digits);
      pri_rel(p->pri);
   } else {
      ast_debug(1, "Unable to grab pri to send keypad facility!\n");
      sig_pri_unlock_private(p);
      return -1;
   }

   sig_pri_unlock_private(p);

   return 0;
}
static void* pri_ss_thread ( void *  data) [static]

Definition at line 1769 of file sig_pri.c.

References sig_pri_chan::owner, exten, AST_MAX_EXTENSION, len(), ast_channel::tech_pvt, ast_log(), LOG_WARNING, ast_channel::name, ast_hangup(), ast_verb, sig_pri_dsp_reset_and_flush_digits(), ast_copy_string(), sig_pri_chan::exten, ast_matchmore_extension(), ast_channel::context, sig_pri_chan::cid_num, ast_ignore_pattern(), sig_pri_play_tone(), SIG_PRI_TONE_DIALTONE, ast_exists_extension(), pri_matchdigittimeout, pri_gendigittimeout, ast_waitfordigit(), LOG_DEBUG, ast_strlen_zero(), ast_free, ast_channel::dialed, ast_party_dialed::number, ast_party_dialed::str, ast_strdup, sig_pri_chan::pri, sig_pri_span::append_msn_to_user_tag, sig_pri_span::nodetype, sig_pri_chan::user_tag, sig_pri_span::initial_user_tag, ast_channel::caller, ast_party_caller::id, ast_party_id::tag, ast_channel::exten, sig_pri_span::overlapdial, DAHDI_OVERLAPDIAL_INCOMING, sig_pri_lock_private(), sig_pri_span::pri, pri_grab(), sig_pri_chan::call_level, SIG_PRI_CALL_LEVEL_PROCEEDING, sig_pri_chan::call, PVT_TO_CHANNEL(), pri_rel(), sig_pri_span::span, sig_pri_unlock_private(), sig_pri_set_echocanceller(), ast_setstate(), AST_STATE_RING, ast_pbx_run(), ast_channel::hangupcause, AST_CAUSE_UNALLOCATED, ast_mutex_lock, sig_pri_span::lock, sig_pri_span_devstate_changed(), and ast_mutex_unlock.

Referenced by pri_dchannel().

{
   struct sig_pri_chan *p = data;
   struct ast_channel *chan = p->owner;
   char exten[AST_MAX_EXTENSION];
   int res;
   int len;
   int timeout;

   if (!chan) {
      /* We lost the owner before we could get started. */
      return NULL;
   }

   /*
    * In the bizarre case where the channel has become a zombie before we
    * even get started here, abort safely.
    */
   if (!chan->tech_pvt) {
      ast_log(LOG_WARNING, "Channel became a zombie before simple switch could be started (%s)\n", chan->name);
      ast_hangup(chan);
      return NULL;
   }

   ast_verb(3, "Starting simple switch on '%s'\n", chan->name);

   sig_pri_dsp_reset_and_flush_digits(p);

   /* Now loop looking for an extension */
   ast_copy_string(exten, p->exten, sizeof(exten));
   len = strlen(exten);
   res = 0;
   while ((len < AST_MAX_EXTENSION-1) && ast_matchmore_extension(chan, chan->context, exten, 1, p->cid_num)) {
      if (len && !ast_ignore_pattern(chan->context, exten))
         sig_pri_play_tone(p, -1);
      else
         sig_pri_play_tone(p, SIG_PRI_TONE_DIALTONE);
      if (ast_exists_extension(chan, chan->context, exten, 1, p->cid_num))
         timeout = pri_matchdigittimeout;
      else
         timeout = pri_gendigittimeout;
      res = ast_waitfordigit(chan, timeout);
      if (res < 0) {
         ast_log(LOG_DEBUG, "waitfordigit returned < 0...\n");
         ast_hangup(chan);
         return NULL;
      } else if (res) {
         exten[len++] = res;
         exten[len] = '\0';
      } else
         break;
   }
   /* if no extension was received ('unspecified') on overlap call, use the 's' extension */
   if (ast_strlen_zero(exten)) {
      ast_verb(3, "Going to extension s|1 because of empty extension received on overlap call\n");
      exten[0] = 's';
      exten[1] = '\0';
   } else {
      ast_free(chan->dialed.number.str);
      chan->dialed.number.str = ast_strdup(exten);

      if (p->pri->append_msn_to_user_tag && p->pri->nodetype != PRI_NETWORK) {
         /*
          * Update the user tag for party id's from this device for this call
          * now that we have a complete MSN from the network.
          */
         snprintf(p->user_tag, sizeof(p->user_tag), "%s_%s", p->pri->initial_user_tag,
            exten);
         ast_free(chan->caller.id.tag);
         chan->caller.id.tag = ast_strdup(p->user_tag);
      }
   }
   sig_pri_play_tone(p, -1);
   if (ast_exists_extension(chan, chan->context, exten, 1, p->cid_num)) {
      /* Start the real PBX */
      ast_copy_string(chan->exten, exten, sizeof(chan->exten));
      sig_pri_dsp_reset_and_flush_digits(p);
#if defined(ISSUE_16789)
      /*
       * Conditionaled out this code to effectively revert the Mantis
       * issue 16789 change.  It breaks overlap dialing through
       * Asterisk.  There is not enough information available at this
       * point to know if dialing is complete.  The
       * ast_exists_extension(), ast_matchmore_extension(), and
       * ast_canmatch_extension() calls are not adequate to detect a
       * dial through extension pattern of "_9!".
       *
       * Workaround is to use the dialplan Proceeding() application
       * early on non-dial through extensions.
       */
      if ((p->pri->overlapdial & DAHDI_OVERLAPDIAL_INCOMING)
         && !ast_matchmore_extension(chan, chan->context, exten, 1, p->cid_num)) {
         sig_pri_lock_private(p);
         if (p->pri->pri) {
            if (!pri_grab(p, p->pri)) {
               if (p->call_level < SIG_PRI_CALL_LEVEL_PROCEEDING) {
                  p->call_level = SIG_PRI_CALL_LEVEL_PROCEEDING;
               }
               pri_proceeding(p->pri->pri, p->call, PVT_TO_CHANNEL(p), 0);
               pri_rel(p->pri);
            } else {
               ast_log(LOG_WARNING, "Unable to grab PRI on span %d\n", p->pri->span);
            }
         }
         sig_pri_unlock_private(p);
      }
#endif   /* defined(ISSUE_16789) */

      sig_pri_set_echocanceller(p, 1);
      ast_setstate(chan, AST_STATE_RING);
      res = ast_pbx_run(chan);
      if (res) {
         ast_log(LOG_WARNING, "PBX exited non-zero!\n");
      }
   } else {
      ast_log(LOG_DEBUG, "No such possible extension '%s' in context '%s'\n", exten, chan->context);
      chan->hangupcause = AST_CAUSE_UNALLOCATED;
      ast_hangup(chan);
      p->exten[0] = '\0';
      /* Since we send release complete here, we won't get one */
      p->call = NULL;
      ast_mutex_lock(&p->pri->lock);
      sig_pri_span_devstate_changed(p->pri);
      ast_mutex_unlock(&p->pri->lock);
   }
   return NULL;
}
static enum AST_PARTY_CHAR_SET pri_to_ast_char_set ( int  pri_char_set) [static]

Definition at line 516 of file sig_pri.c.

References AST_PARTY_CHAR_SET_UNKNOWN, AST_PARTY_CHAR_SET_ISO8859_1, AST_PARTY_CHAR_SET_WITHDRAWN, AST_PARTY_CHAR_SET_ISO8859_2, AST_PARTY_CHAR_SET_ISO8859_3, AST_PARTY_CHAR_SET_ISO8859_4, AST_PARTY_CHAR_SET_ISO8859_5, AST_PARTY_CHAR_SET_ISO8859_7, AST_PARTY_CHAR_SET_ISO10646_BMPSTRING, and AST_PARTY_CHAR_SET_ISO10646_UTF_8STRING.

Referenced by sig_pri_party_name_convert().

{
   enum AST_PARTY_CHAR_SET ast_char_set;

   switch (pri_char_set) {
   default:
   case PRI_CHAR_SET_UNKNOWN:
      ast_char_set = AST_PARTY_CHAR_SET_UNKNOWN;
      break;
   case PRI_CHAR_SET_ISO8859_1:
      ast_char_set = AST_PARTY_CHAR_SET_ISO8859_1;
      break;
   case PRI_CHAR_SET_WITHDRAWN:
      ast_char_set = AST_PARTY_CHAR_SET_WITHDRAWN;
      break;
   case PRI_CHAR_SET_ISO8859_2:
      ast_char_set = AST_PARTY_CHAR_SET_ISO8859_2;
      break;
   case PRI_CHAR_SET_ISO8859_3:
      ast_char_set = AST_PARTY_CHAR_SET_ISO8859_3;
      break;
   case PRI_CHAR_SET_ISO8859_4:
      ast_char_set = AST_PARTY_CHAR_SET_ISO8859_4;
      break;
   case PRI_CHAR_SET_ISO8859_5:
      ast_char_set = AST_PARTY_CHAR_SET_ISO8859_5;
      break;
   case PRI_CHAR_SET_ISO8859_7:
      ast_char_set = AST_PARTY_CHAR_SET_ISO8859_7;
      break;
   case PRI_CHAR_SET_ISO10646_BMPSTRING:
      ast_char_set = AST_PARTY_CHAR_SET_ISO10646_BMPSTRING;
      break;
   case PRI_CHAR_SET_ISO10646_UTF_8STRING:
      ast_char_set = AST_PARTY_CHAR_SET_ISO10646_UTF_8STRING;
      break;
   }

   return ast_char_set;
}
static int pri_to_ast_presentation ( int  pri_presentation) [static]

Definition at line 418 of file sig_pri.c.

References AST_PRES_ALLOWED_USER_NUMBER_NOT_SCREENED, AST_PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN, AST_PRES_ALLOWED_USER_NUMBER_FAILED_SCREEN, AST_PRES_ALLOWED_NETWORK_NUMBER, AST_PRES_PROHIB_USER_NUMBER_NOT_SCREENED, AST_PRES_PROHIB_USER_NUMBER_PASSED_SCREEN, AST_PRES_PROHIB_USER_NUMBER_FAILED_SCREEN, AST_PRES_PROHIB_NETWORK_NUMBER, and AST_PRES_NUMBER_NOT_AVAILABLE.

Referenced by sig_pri_party_name_convert(), and sig_pri_party_number_convert().

{
   int ast_presentation;

   switch (pri_presentation) {
   case PRES_ALLOWED_USER_NUMBER_NOT_SCREENED:
      ast_presentation = AST_PRES_ALLOWED_USER_NUMBER_NOT_SCREENED;
      break;
   case PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN:
      ast_presentation = AST_PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN;
      break;
   case PRES_ALLOWED_USER_NUMBER_FAILED_SCREEN:
      ast_presentation = AST_PRES_ALLOWED_USER_NUMBER_FAILED_SCREEN;
      break;
   case PRES_ALLOWED_NETWORK_NUMBER:
      ast_presentation = AST_PRES_ALLOWED_NETWORK_NUMBER;
      break;
   case PRES_PROHIB_USER_NUMBER_NOT_SCREENED:
      ast_presentation = AST_PRES_PROHIB_USER_NUMBER_NOT_SCREENED;
      break;
   case PRES_PROHIB_USER_NUMBER_PASSED_SCREEN:
      ast_presentation = AST_PRES_PROHIB_USER_NUMBER_PASSED_SCREEN;
      break;
   case PRES_PROHIB_USER_NUMBER_FAILED_SCREEN:
      ast_presentation = AST_PRES_PROHIB_USER_NUMBER_FAILED_SCREEN;
      break;
   case PRES_PROHIB_NETWORK_NUMBER:
      ast_presentation = AST_PRES_PROHIB_NETWORK_NUMBER;
      break;
   case PRES_NUMBER_NOT_AVAILABLE:
      ast_presentation = AST_PRES_NUMBER_NOT_AVAILABLE;
      break;
   default:
      ast_presentation = AST_PRES_PROHIB_USER_NUMBER_NOT_SCREENED;
      break;
   }

   return ast_presentation;
}
static enum AST_REDIRECTING_REASON pri_to_ast_reason ( int  pri_reason) [static]

Definition at line 348 of file sig_pri.c.

References AST_REDIRECTING_REASON_USER_BUSY, AST_REDIRECTING_REASON_NO_ANSWER, AST_REDIRECTING_REASON_DEFLECTION, AST_REDIRECTING_REASON_UNCONDITIONAL, and AST_REDIRECTING_REASON_UNKNOWN.

Referenced by sig_pri_redirecting_convert().

{
   enum AST_REDIRECTING_REASON ast_reason;

   switch (pri_reason) {
   case PRI_REDIR_FORWARD_ON_BUSY:
      ast_reason = AST_REDIRECTING_REASON_USER_BUSY;
      break;
   case PRI_REDIR_FORWARD_ON_NO_REPLY:
      ast_reason = AST_REDIRECTING_REASON_NO_ANSWER;
      break;
   case PRI_REDIR_DEFLECTION:
      ast_reason = AST_REDIRECTING_REASON_DEFLECTION;
      break;
   case PRI_REDIR_UNCONDITIONAL:
      ast_reason = AST_REDIRECTING_REASON_UNCONDITIONAL;
      break;
   case PRI_REDIR_UNKNOWN:
   default:
      ast_reason = AST_REDIRECTING_REASON_UNKNOWN;
      break;
   }

   return ast_reason;
}
static unsigned int PVT_TO_CHANNEL ( struct sig_pri_chan p) [static]

Definition at line 151 of file sig_pri.c.

References sig_pri_chan::mastertrunkgroup, PRI_EXPLICIT, ast_debug, sig_pri_chan::prioffset, and sig_pri_chan::logicalspan.

Referenced by pri_check_restart(), pri_ss_thread(), pri_dchannel(), sig_pri_call(), and sig_pri_indicate().

{
   int res = (((p)->prioffset) | ((p)->logicalspan << 8) | (p->mastertrunkgroup ? PRI_EXPLICIT : 0));
   ast_debug(5, "prioffset: %d mastertrunkgroup: %d logicalspan: %d result: %d\n",
      p->prioffset, p->mastertrunkgroup, p->logicalspan, res);

   return res;
}
static char* redirectingreason2str ( int  redirectingreason) [static]

Definition at line 1520 of file sig_pri.c.

Referenced by pri_dchannel().

{
   switch (redirectingreason) {
   case 0:
      return "UNKNOWN";
   case 1:
      return "BUSY";
   case 2:
      return "NO_REPLY";
   case 0xF:
      return "UNCONDITIONAL";
   default:
      return "NOREDIRECT";
   }
}
static void sig_pri_ami_channel_event ( struct sig_pri_chan p) [static]
int sig_pri_answer ( struct sig_pri_chan p,
struct ast_channel ast 
)

Definition at line 7070 of file sig_pri.c.

References pri_grab(), sig_pri_chan::pri, sig_pri_span::pri, sig_pri_chan::call, sig_pri_chan::call_level, SIG_PRI_CALL_LEVEL_CONNECT, sig_pri_set_dialing(), sig_pri_open_media(), sig_pri_chan::digital, pri_rel(), ast_setstate(), and AST_STATE_UP.

Referenced by dahdi_answer().

{
   int res = 0;
   /* Send a pri acknowledge */
   if (!pri_grab(p, p->pri)) {
#if defined(HAVE_PRI_AOC_EVENTS)
      if (p->aoc_s_request_invoke_id_valid) {
         /* if AOC-S was requested and the invoke id is still present on answer.  That means
          * no AOC-S rate list was provided, so send a NULL response which will indicate that
          * AOC-S is not available */
         pri_aoc_s_request_response_send(p->pri->pri, p->call,
            p->aoc_s_request_invoke_id, NULL);
         p->aoc_s_request_invoke_id_valid = 0;
      }
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
      if (p->call_level < SIG_PRI_CALL_LEVEL_CONNECT) {
         p->call_level = SIG_PRI_CALL_LEVEL_CONNECT;
      }
      sig_pri_set_dialing(p, 0);
      sig_pri_open_media(p);
      res = pri_answer(p->pri->pri, p->call, 0, !p->digital);
      pri_rel(p->pri);
   } else {
      res = -1;
   }
   ast_setstate(ast, AST_STATE_UP);
   return res;
}
int sig_pri_available ( struct sig_pri_chan **  pvt,
int  is_specific_channel 
)

Definition at line 7167 of file sig_pri.c.

References sig_pri_span::pri, sig_pri_chan::pri, ast_mutex_lock, sig_pri_span::lock, sig_pri_available_check(), sig_pri_chan::allocated, and ast_mutex_unlock.

Referenced by available().

{
   struct sig_pri_chan *p = *pvt;
   struct sig_pri_span *pri;

   if (!p->pri) {
      /* Something is wrong here.  A PRI channel without the pri pointer? */
      return 0;
   }
   pri = p->pri;

   ast_mutex_lock(&pri->lock);
   if (
#if defined(HAVE_PRI_CALL_WAITING)
      /*
       * Only do call waiting calls if we have any
       * call waiting call outstanding.  We do not
       * want new calls to steal a B channel
       * freed for an earlier call waiting call.
       */
      !pri->num_call_waiting_calls &&
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
      sig_pri_available_check(p)) {
      p->allocated = 1;
      ast_mutex_unlock(&pri->lock);
      return 1;
   }

#if defined(HAVE_PRI_CALL_WAITING)
   if (!is_specific_channel) {
      struct sig_pri_chan *cw;

      cw = sig_pri_cw_available(pri);
      if (cw) {
         /* We have a call waiting interface to use instead. */
         cw->allocated = 1;
         *pvt = cw;
         ast_mutex_unlock(&pri->lock);
         return 1;
      }
   }
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
   ast_mutex_unlock(&pri->lock);
   return 0;
}
static int sig_pri_available_check ( struct sig_pri_chan pvt) [static]

Definition at line 7109 of file sig_pri.c.

References sig_pri_chan::no_b_channel, and sig_pri_is_chan_available().

Referenced by sig_pri_available().

{
   /*
    * If interface has a B channel and is available for use
    * then the channel is available.
    */
   if (!pvt->no_b_channel && sig_pri_is_chan_available(pvt)) {
      return 1;
   }
   return 0;
}
int sig_pri_call ( struct sig_pri_chan p,
struct ast_channel ast,
char *  rdest,
int  timeout,
int  layer1 
)
Note:
Parsing must remain in sync with sig_pri_extract_called_num_subaddr().

Definition at line 6400 of file sig_pri.c.

References AST_DECLARE_APP_ARGS, args, AST_APP_ARG, ext, OPT_ARG_ARRAY_SIZE, ast_log(), LOG_DEBUG, S_COR, ast_channel::connected, ast_party_connected_line::id, ast_party_id::name, ast_party_name::valid, ast_party_name::str, ast_party_id::number, ast_party_number::valid, ast_party_number::str, sig_pri_chan::pri, LOG_ERROR, sig_pri_chan::channel, ast_channel::_state, AST_STATE_DOWN, AST_STATE_RESERVED, LOG_WARNING, ast_channel::name, sig_pri_chan::dialdest, sig_pri_chan::outgoing, ast_copy_string(), AST_NONSTANDARD_APP_ARGS, ast_app_parse_options(), sig_pri_call_opts, ast_party_subaddress_init(), ast_party_subaddress::type, ast_party_subaddress::str, ast_party_subaddress::valid, sig_pri_chan::hidecallerid, sig_pri_chan::hidecalleridname, sig_pri_chan::stripmsd, pri_grab(), sig_pri_chan::call, sig_pri_span::pri, pri_rel(), sig_pri_set_digital(), IS_DIGITAL, ast_channel::transfercapability, sig_pri_chan::priexclusive, sig_pri_span::nodetype, PVT_TO_CHANNEL(), sig_pri_chan::digital, PRI_TRANS_CAP_DIGITAL, sig_pri_span::facilityenable, ast_verb, ast_transfercapability2str(), sig_pri_span::dialplan, sig_pri_span::internationalprefix, sig_pri_span::nationalprefix, ast_test_flag, OPT_KEYPAD, ast_strlen_zero(), OPT_ARG_KEYPAD, OPT_REVERSE_CHARGE, OPT_AOC_REQUEST, OPT_ARG_AOC_REQUEST, sig_pri_span::append_msn_to_user_tag, sig_pri_chan::user_tag, sig_pri_span::initial_user_tag, ast_free, ast_channel::caller, ast_party_caller::id, ast_party_id::tag, ast_strdup, sig_pri_span::localdialplan, sig_pri_chan::use_callingpres, ast_party_number::presentation, ast_party_id::subaddress, sig_pri_redirecting_update(), pbx_builtin_getvar_helper(), sig_pri_chan::owner, ast_cc_is_recall(), monitor, AST_CHANNEL_NAME, ast_channel_get_device_name(), ast_cc_get_monitor_by_recall_core_id(), ast_cc_monitor::private_data, ast_assert, ao2_ref, dialplan2str(), sig_pri_chan::call_level, SIG_PRI_CALL_LEVEL_SETUP, ast_setstate(), AST_STATE_DIALING, and sig_pri_set_dialing().

Referenced by dahdi_call().

{
   char dest[256]; /* must be same length as p->dialdest */
   struct ast_party_subaddress dialed_subaddress; /* Called subaddress */
   struct pri_sr *sr;
   char *c, *l, *n, *s;
#ifdef SUPPORT_USERUSER
   const char *useruser;
#endif
   int core_id;
   int pridialplan;
   int dp_strip;
   int prilocaldialplan;
   int ldp_strip;
   int exclusive;
#if defined(HAVE_PRI_SETUP_KEYPAD)
   const char *keypad;
#endif   /* defined(HAVE_PRI_SETUP_KEYPAD) */
   AST_DECLARE_APP_ARGS(args,
      AST_APP_ARG(group);  /* channel/group token */
      AST_APP_ARG(ext); /* extension token */
      AST_APP_ARG(opts);   /* options token */
      AST_APP_ARG(other);  /* Any remining unused arguments */
   );
   struct ast_flags opts;
   char *opt_args[OPT_ARG_ARRAY_SIZE];

   ast_log(LOG_DEBUG, "CALLER NAME: %s NUM: %s\n",
      S_COR(ast->connected.id.name.valid, ast->connected.id.name.str, ""),
      S_COR(ast->connected.id.number.valid, ast->connected.id.number.str, ""));

   if (!p->pri) {
      ast_log(LOG_ERROR, "Could not find pri on channel %d\n", p->channel);
      return -1;
   }

   if ((ast->_state != AST_STATE_DOWN) && (ast->_state != AST_STATE_RESERVED)) {
      ast_log(LOG_WARNING, "sig_pri_call called on %s, neither down nor reserved\n", ast->name);
      return -1;
   }

   p->dialdest[0] = '\0';
   p->outgoing = 1;

   ast_copy_string(dest, rdest, sizeof(dest));
   AST_NONSTANDARD_APP_ARGS(args, dest, '/');
   if (ast_app_parse_options(sig_pri_call_opts, &opts, opt_args, args.opts)) {
      /* General invalid option syntax. */
      return -1;
   }

   c = args.ext;
   if (!c) {
      c = "";
   }

   /* setup dialed_subaddress if found */
   ast_party_subaddress_init(&dialed_subaddress);
   s = strchr(c, ':');
   if (s) {
      *s = '\0';
      s++;
      /* prefix */
      /* 'n' = NSAP */
      /* 'u' = User Specified */
      /* Default = NSAP */
      switch (*s) {
      case 'U':
      case 'u':
         s++;
         dialed_subaddress.type = 2;
         break;
      case 'N':
      case 'n':
         s++;
         /* default already covered with ast_party_subaddress_init */
         break;
      }
      dialed_subaddress.str = s;
      dialed_subaddress.valid = 1;
      s = NULL;
   }

   l = NULL;
   n = NULL;
   if (!p->hidecallerid) {
      if (ast->connected.id.number.valid) {
         /* If we get to the end of this loop without breaking, there's no
          * calleridnum.  This is done instead of testing for "unknown" or
          * the thousands of other ways that the calleridnum could be
          * invalid. */
         for (l = ast->connected.id.number.str; l && *l; l++) {
            if (strchr("0123456789", *l)) {
               l = ast->connected.id.number.str;
               break;
            }
         }
      } else {
         l = NULL;
      }
      if (!p->hidecalleridname) {
         n = ast->connected.id.name.valid ? ast->connected.id.name.str : NULL;
      }
   }

   if (strlen(c) < p->stripmsd) {
      ast_log(LOG_WARNING, "Number '%s' is shorter than stripmsd (%d)\n", c, p->stripmsd);
      return -1;
   }
   if (pri_grab(p, p->pri)) {
      ast_log(LOG_WARNING, "Failed to grab PRI!\n");
      return -1;
   }
   if (!(p->call = pri_new_call(p->pri->pri))) {
      ast_log(LOG_WARNING, "Unable to create call on channel %d\n", p->channel);
      pri_rel(p->pri);
      return -1;
   }
   if (!(sr = pri_sr_new())) {
      ast_log(LOG_WARNING, "Failed to allocate setup request channel %d\n", p->channel);
      pri_destroycall(p->pri->pri, p->call);
      p->call = NULL;
      pri_rel(p->pri);
      return -1;
   }

   sig_pri_set_digital(p, IS_DIGITAL(ast->transfercapability));   /* push up to parent for EC */

#if defined(HAVE_PRI_CALL_WAITING)
   if (p->is_call_waiting) {
      /*
       * Indicate that this is a call waiting call.
       * i.e., Normal call but with no B channel.
       */
      pri_sr_set_channel(sr, 0, 0, 1);
   } else
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
   {
      /* Should the picked channel be used exclusively? */
      if (p->priexclusive || p->pri->nodetype == PRI_NETWORK) {
         exclusive = 1;
      } else {
         exclusive = 0;
      }
      pri_sr_set_channel(sr, PVT_TO_CHANNEL(p), exclusive, 1);
   }

   pri_sr_set_bearer(sr, p->digital ? PRI_TRANS_CAP_DIGITAL : ast->transfercapability,
      (p->digital ? -1 : layer1));

   if (p->pri->facilityenable)
      pri_facility_enable(p->pri->pri);

   ast_verb(3, "Requested transfer capability: 0x%.2x - %s\n", ast->transfercapability, ast_transfercapability2str(ast->transfercapability));
   dp_strip = 0;
   pridialplan = p->pri->dialplan - 1;
   if (pridialplan == -2 || pridialplan == -3) { /* compute dynamically */
      if (strncmp(c + p->stripmsd, p->pri->internationalprefix, strlen(p->pri->internationalprefix)) == 0) {
         if (pridialplan == -2) {
            dp_strip = strlen(p->pri->internationalprefix);
         }
         pridialplan = PRI_INTERNATIONAL_ISDN;
      } else if (strncmp(c + p->stripmsd, p->pri->nationalprefix, strlen(p->pri->nationalprefix)) == 0) {
         if (pridialplan == -2) {
            dp_strip = strlen(p->pri->nationalprefix);
         }
         pridialplan = PRI_NATIONAL_ISDN;
      } else {
         pridialplan = PRI_LOCAL_ISDN;
      }
   }
   while (c[p->stripmsd] > '9' && c[p->stripmsd] != '*' && c[p->stripmsd] != '#') {
      switch (c[p->stripmsd]) {
      case 'U':
         pridialplan = (PRI_TON_UNKNOWN << 4) | (pridialplan & 0xf);
         break;
      case 'I':
         pridialplan = (PRI_TON_INTERNATIONAL << 4) | (pridialplan & 0xf);
         break;
      case 'N':
         pridialplan = (PRI_TON_NATIONAL << 4) | (pridialplan & 0xf);
         break;
      case 'L':
         pridialplan = (PRI_TON_NET_SPECIFIC << 4) | (pridialplan & 0xf);
         break;
      case 'S':
         pridialplan = (PRI_TON_SUBSCRIBER << 4) | (pridialplan & 0xf);
         break;
      case 'V':
         pridialplan = (PRI_TON_ABBREVIATED << 4) | (pridialplan & 0xf);
         break;
      case 'R':
         pridialplan = (PRI_TON_RESERVED << 4) | (pridialplan & 0xf);
         break;
      case 'u':
         pridialplan = PRI_NPI_UNKNOWN | (pridialplan & 0xf0);
         break;
      case 'e':
         pridialplan = PRI_NPI_E163_E164 | (pridialplan & 0xf0);
         break;
      case 'x':
         pridialplan = PRI_NPI_X121 | (pridialplan & 0xf0);
         break;
      case 'f':
         pridialplan = PRI_NPI_F69 | (pridialplan & 0xf0);
         break;
      case 'n':
         pridialplan = PRI_NPI_NATIONAL | (pridialplan & 0xf0);
         break;
      case 'p':
         pridialplan = PRI_NPI_PRIVATE | (pridialplan & 0xf0);
         break;
      case 'r':
         pridialplan = PRI_NPI_RESERVED | (pridialplan & 0xf0);
         break;
      default:
         if (isalpha(c[p->stripmsd])) {
            ast_log(LOG_WARNING, "Unrecognized pridialplan %s modifier: %c\n",
               c[p->stripmsd] > 'Z' ? "NPI" : "TON", c[p->stripmsd]);
         }
         break;
      }
      c++;
   }
#if defined(HAVE_PRI_SETUP_KEYPAD)
   if (ast_test_flag(&opts, OPT_KEYPAD)
      && !ast_strlen_zero(opt_args[OPT_ARG_KEYPAD])) {
      /* We have a keypad facility digits option with digits. */
      keypad = opt_args[OPT_ARG_KEYPAD];
      pri_sr_set_keypad_digits(sr, keypad);
   } else {
      keypad = NULL;
   }
   if (!keypad || !ast_strlen_zero(c + p->stripmsd + dp_strip))
#endif   /* defined(HAVE_PRI_SETUP_KEYPAD) */
   {
      pri_sr_set_called(sr, c + p->stripmsd + dp_strip, pridialplan, s ? 1 : 0);
   }

#if defined(HAVE_PRI_SUBADDR)
   if (dialed_subaddress.valid) {
      struct pri_party_subaddress subaddress;

      memset(&subaddress, 0, sizeof(subaddress));
      sig_pri_party_subaddress_from_ast(&subaddress, &dialed_subaddress);
      pri_sr_set_called_subaddress(sr, &subaddress);
   }
#endif   /* defined(HAVE_PRI_SUBADDR) */
#if defined(HAVE_PRI_REVERSE_CHARGE)
   if (ast_test_flag(&opts, OPT_REVERSE_CHARGE)) {
      pri_sr_set_reversecharge(sr, PRI_REVERSECHARGE_REQUESTED);
   }
#endif   /* defined(HAVE_PRI_REVERSE_CHARGE) */
#if defined(HAVE_PRI_AOC_EVENTS)
   if (ast_test_flag(&opts, OPT_AOC_REQUEST)
      && !ast_strlen_zero(opt_args[OPT_ARG_AOC_REQUEST])) {
      if (strchr(opt_args[OPT_ARG_AOC_REQUEST], 's')) {
         pri_sr_set_aoc_charging_request(sr, PRI_AOC_REQUEST_S);
      }
      if (strchr(opt_args[OPT_ARG_AOC_REQUEST], 'd')) {
         pri_sr_set_aoc_charging_request(sr, PRI_AOC_REQUEST_D);
      }
      if (strchr(opt_args[OPT_ARG_AOC_REQUEST], 'e')) {
         pri_sr_set_aoc_charging_request(sr, PRI_AOC_REQUEST_E);
      }
   }
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */

   /* Setup the user tag for party id's from this device for this call. */
   if (p->pri->append_msn_to_user_tag) {
      snprintf(p->user_tag, sizeof(p->user_tag), "%s_%s", p->pri->initial_user_tag,
         p->pri->nodetype == PRI_NETWORK
            ? c + p->stripmsd + dp_strip
            : S_COR(ast->connected.id.number.valid,
               ast->connected.id.number.str, ""));
   } else {
      ast_copy_string(p->user_tag, p->pri->initial_user_tag, sizeof(p->user_tag));
   }

   /*
    * Replace the caller id tag from the channel creation
    * with the actual tag value.
    */
   ast_free(ast->caller.id.tag);
   ast->caller.id.tag = ast_strdup(p->user_tag);

   ldp_strip = 0;
   prilocaldialplan = p->pri->localdialplan - 1;
   if ((l != NULL) && (prilocaldialplan == -2 || prilocaldialplan == -3)) { /* compute dynamically */
      if (strncmp(l, p->pri->internationalprefix, strlen(p->pri->internationalprefix)) == 0) {
         if (prilocaldialplan == -2) {
            ldp_strip = strlen(p->pri->internationalprefix);
         }
         prilocaldialplan = PRI_INTERNATIONAL_ISDN;
      } else if (strncmp(l, p->pri->nationalprefix, strlen(p->pri->nationalprefix)) == 0) {
         if (prilocaldialplan == -2) {
            ldp_strip = strlen(p->pri->nationalprefix);
         }
         prilocaldialplan = PRI_NATIONAL_ISDN;
      } else {
         prilocaldialplan = PRI_LOCAL_ISDN;
      }
   }
   if (l != NULL) {
      while (*l > '9' && *l != '*' && *l != '#') {
         switch (*l) {
         case 'U':
            prilocaldialplan = (PRI_TON_UNKNOWN << 4) | (prilocaldialplan & 0xf);
            break;
         case 'I':
            prilocaldialplan = (PRI_TON_INTERNATIONAL << 4) | (prilocaldialplan & 0xf);
            break;
         case 'N':
            prilocaldialplan = (PRI_TON_NATIONAL << 4) | (prilocaldialplan & 0xf);
            break;
         case 'L':
            prilocaldialplan = (PRI_TON_NET_SPECIFIC << 4) | (prilocaldialplan & 0xf);
            break;
         case 'S':
            prilocaldialplan = (PRI_TON_SUBSCRIBER << 4) | (prilocaldialplan & 0xf);
            break;
         case 'V':
            prilocaldialplan = (PRI_TON_ABBREVIATED << 4) | (prilocaldialplan & 0xf);
            break;
         case 'R':
            prilocaldialplan = (PRI_TON_RESERVED << 4) | (prilocaldialplan & 0xf);
            break;
         case 'u':
            prilocaldialplan = PRI_NPI_UNKNOWN | (prilocaldialplan & 0xf0);
            break;
         case 'e':
            prilocaldialplan = PRI_NPI_E163_E164 | (prilocaldialplan & 0xf0);
            break;
         case 'x':
            prilocaldialplan = PRI_NPI_X121 | (prilocaldialplan & 0xf0);
            break;
         case 'f':
            prilocaldialplan = PRI_NPI_F69 | (prilocaldialplan & 0xf0);
            break;
         case 'n':
            prilocaldialplan = PRI_NPI_NATIONAL | (prilocaldialplan & 0xf0);
            break;
         case 'p':
            prilocaldialplan = PRI_NPI_PRIVATE | (prilocaldialplan & 0xf0);
            break;
         case 'r':
            prilocaldialplan = PRI_NPI_RESERVED | (prilocaldialplan & 0xf0);
            break;
         default:
            if (isalpha(*l)) {
               ast_log(LOG_WARNING,
                  "Unrecognized prilocaldialplan %s modifier: %c\n",
                  *l > 'Z' ? "NPI" : "TON", *l);
            }
            break;
         }
         l++;
      }
   }
   pri_sr_set_caller(sr, l ? (l + ldp_strip) : NULL, n, prilocaldialplan,
      p->use_callingpres ? ast->connected.id.number.presentation : (l ? PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN : PRES_NUMBER_NOT_AVAILABLE));

#if defined(HAVE_PRI_SUBADDR)
   if (ast->connected.id.subaddress.valid) {
      struct pri_party_subaddress subaddress;

      memset(&subaddress, 0, sizeof(subaddress));
      sig_pri_party_subaddress_from_ast(&subaddress, &ast->connected.id.subaddress);
      pri_sr_set_caller_subaddress(sr, &subaddress);
   }
#endif   /* defined(HAVE_PRI_SUBADDR) */

   sig_pri_redirecting_update(p, ast);

#ifdef SUPPORT_USERUSER
   /* User-user info */
   useruser = pbx_builtin_getvar_helper(p->owner, "USERUSERINFO");
   if (useruser)
      pri_sr_set_useruser(sr, useruser);
#endif

#if defined(HAVE_PRI_CCSS)
   if (ast_cc_is_recall(ast, &core_id, sig_pri_cc_type_name)) {
      struct ast_cc_monitor *monitor;
      char device_name[AST_CHANNEL_NAME];

      /* This is a CC recall call. */
      ast_channel_get_device_name(ast, device_name, sizeof(device_name));
      monitor = ast_cc_get_monitor_by_recall_core_id(core_id, device_name);
      if (monitor) {
         struct sig_pri_cc_monitor_instance *instance;

         instance = monitor->private_data;

         /* If this fails then we have monitor instance ambiguity. */
         ast_assert(p->pri == instance->pri);

         if (pri_cc_call(p->pri->pri, instance->cc_id, p->call, sr)) {
            /* The CC recall call failed for some reason. */
            ast_log(LOG_WARNING, "Unable to setup CC recall call to device %s\n",
               device_name);
            ao2_ref(monitor, -1);
            pri_destroycall(p->pri->pri, p->call);
            p->call = NULL;
            pri_rel(p->pri);
            pri_sr_free(sr);
            return -1;
         }
         ao2_ref(monitor, -1);
      } else {
         core_id = -1;
      }
   } else
#endif   /* defined(HAVE_PRI_CCSS) */
   {
      core_id = -1;
   }
   if (core_id == -1 && pri_setup(p->pri->pri, p->call, sr)) {
      ast_log(LOG_WARNING, "Unable to setup call to %s (using %s)\n",
         c + p->stripmsd + dp_strip, dialplan2str(p->pri->dialplan));
      pri_destroycall(p->pri->pri, p->call);
      p->call = NULL;
      pri_rel(p->pri);
      pri_sr_free(sr);
      return -1;
   }
   p->call_level = SIG_PRI_CALL_LEVEL_SETUP;
   pri_sr_free(sr);
   ast_setstate(ast, AST_STATE_DIALING);
   sig_pri_set_dialing(p, 1);
   pri_rel(p->pri);
   return 0;
}
static const char* sig_pri_call_level2str ( enum sig_pri_call_level  level) [static]

Definition at line 127 of file sig_pri.c.

References SIG_PRI_CALL_LEVEL_IDLE, SIG_PRI_CALL_LEVEL_SETUP, SIG_PRI_CALL_LEVEL_OVERLAP, SIG_PRI_CALL_LEVEL_PROCEEDING, SIG_PRI_CALL_LEVEL_ALERTING, and SIG_PRI_CALL_LEVEL_CONNECT.

Referenced by sig_pri_digit_begin(), and sig_pri_cli_show_channels().

{
   switch (level) {
   case SIG_PRI_CALL_LEVEL_IDLE:
      return "Idle";
   case SIG_PRI_CALL_LEVEL_SETUP:
      return "Setup";
   case SIG_PRI_CALL_LEVEL_OVERLAP:
      return "Overlap";
   case SIG_PRI_CALL_LEVEL_PROCEEDING:
      return "Proceeding";
   case SIG_PRI_CALL_LEVEL_ALERTING:
      return "Alerting";
   case SIG_PRI_CALL_LEVEL_CONNECT:
      return "Connect";
   }
   return "Unknown";
}
static void sig_pri_cc_generic_check ( struct sig_pri_span pri,
int  chanpos,
enum ast_cc_service_type  service 
) [static]

Definition at line 2633 of file sig_pri.c.

References monitor, AST_CHANNEL_NAME, ast_cc_monitor::core_id, sig_pri_span::pvts, sig_pri_chan::outgoing, sig_pri_lock_owner(), sig_pri_chan::owner, ast_cc_get_current_core_id(), ast_channel_get_cc_config_params(), ast_channel_get_device_name(), ast_cc_get_monitor_by_recall_core_id(), ao2_ref, ast_get_cc_monitor_policy(), AST_CC_MONITOR_NEVER, AST_CC_MONITOR_NATIVE, sig_pri_span::sig, SIG_BRI_PTMP, sig_pri_span::nodetype, ast_queue_cc_frame(), AST_CC_GENERIC_MONITOR_TYPE, sig_pri_get_orig_dialstring(), AST_CC_MONITOR_ALWAYS, AST_CC_MONITOR_GENERIC, and ast_channel_unlock.

Referenced by pri_dchannel().

{
   struct ast_channel *owner;
   struct ast_cc_config_params *cc_params;
#if defined(HAVE_PRI_CCSS)
   struct ast_cc_monitor *monitor;
   char device_name[AST_CHANNEL_NAME];
#endif   /* defined(HAVE_PRI_CCSS) */
   enum ast_cc_monitor_policies monitor_policy;
   int core_id;

   if (!pri->pvts[chanpos]->outgoing) {
      /* This is not an outgoing call so it cannot be CC monitor. */
      return;
   }

   sig_pri_lock_owner(pri, chanpos);
   owner = pri->pvts[chanpos]->owner;
   if (!owner) {
      return;
   }
   core_id = ast_cc_get_current_core_id(owner);
   if (core_id == -1) {
      /* No CC core setup */
      goto done;
   }

   cc_params = ast_channel_get_cc_config_params(owner);
   if (!cc_params) {
      /* Could not get CC config parameters. */
      goto done;
   }

#if defined(HAVE_PRI_CCSS)
   ast_channel_get_device_name(owner, device_name, sizeof(device_name));
   monitor = ast_cc_get_monitor_by_recall_core_id(core_id, device_name);
   if (monitor) {
      /* CC monitor is already present so no need for generic CC. */
      ao2_ref(monitor, -1);
      goto done;
   }
#endif   /* defined(HAVE_PRI_CCSS) */

   monitor_policy = ast_get_cc_monitor_policy(cc_params);
   switch (monitor_policy) {
   case AST_CC_MONITOR_NEVER:
      /* CCSS is not enabled. */
      break;
   case AST_CC_MONITOR_NATIVE:
      if (pri->sig == SIG_BRI_PTMP && pri->nodetype == PRI_NETWORK) {
         /* Request generic CC monitor. */
         ast_queue_cc_frame(owner, AST_CC_GENERIC_MONITOR_TYPE,
            sig_pri_get_orig_dialstring(pri->pvts[chanpos]), service, NULL);
      }
      break;
   case AST_CC_MONITOR_ALWAYS:
      if (pri->sig == SIG_BRI_PTMP && pri->nodetype != PRI_NETWORK) {
         /*
          * Cannot monitor PTMP TE side since this is not defined.
          * We are playing the roll of a phone in this case and
          * a phone cannot monitor a party over the network without
          * protocol help.
          */
         break;
      }
      /*
       * We are either falling back or this is a PTMP NT span.
       * Request generic CC monitor.
       */
      ast_queue_cc_frame(owner, AST_CC_GENERIC_MONITOR_TYPE,
         sig_pri_get_orig_dialstring(pri->pvts[chanpos]), service, NULL);
      break;
   case AST_CC_MONITOR_GENERIC:
      if (pri->sig == SIG_BRI_PTMP && pri->nodetype == PRI_NETWORK) {
         /* Request generic CC monitor. */
         ast_queue_cc_frame(owner, AST_CC_GENERIC_MONITOR_TYPE,
            sig_pri_get_orig_dialstring(pri->pvts[chanpos]), service, NULL);
      }
      break;
   }

done:
   ast_channel_unlock(owner);
}
void sig_pri_chan_alarm_notify ( struct sig_pri_chan p,
int  noalarm 
)

Notify new alarm status.

Parameters:
pChannel private pointer.
noalarmNon-zero if not in alarm mode.
Note:
Assumes the sig_pri_lock_private(p) is already obtained.
Returns:
Nothing

Definition at line 7618 of file sig_pri.c.

References pri_grab(), sig_pri_chan::pri, sig_pri_set_alarm(), sig_pri_span::pri, sig_pri_chan::call, sig_pri_chan::owner, ast_channel::_softhangup, AST_SOFTHANGUP_DEV, sig_pri_span_devstate_changed(), and pri_rel().

Referenced by dahdi_handle_event(), and handle_init_event().

{
   pri_grab(p, p->pri);
   sig_pri_set_alarm(p, !noalarm);
   if (!noalarm) {
      if (pri_get_timer(p->pri->pri, PRI_TIMER_T309) < 0) {
         /* T309 is not enabled : destroy calls when alarm occurs */
         if (p->call) {
            pri_destroycall(p->pri->pri, p->call);
            p->call = NULL;
         }
         if (p->owner)
            p->owner->_softhangup |= AST_SOFTHANGUP_DEV;
      }
   }
   sig_pri_span_devstate_changed(p->pri);
   pri_rel(p->pri);
}
void sig_pri_chan_delete ( struct sig_pri_chan doomed)

Delete the sig_pri private channel structure.

Since:
1.8
Parameters:
doomedsig_pri private channel structure to delete.
Returns:
Nothing

Definition at line 7665 of file sig_pri.c.

References ast_free.

Referenced by destroy_dahdi_pvt().

{
   ast_free(doomed);
}
struct sig_pri_chan* sig_pri_chan_new ( void *  pvt_data,
struct sig_pri_callback callback,
struct sig_pri_span pri,
int  logicalspan,
int  channo,
int  trunkgroup 
) [read]

Definition at line 7637 of file sig_pri.c.

References ast_calloc, sig_pri_chan::logicalspan, sig_pri_chan::prioffset, sig_pri_chan::mastertrunkgroup, sig_pri_chan::calls, sig_pri_chan::chan_pvt, and sig_pri_chan::pri.

Referenced by mkintf(), and dahdi_new_pri_nobch_channel().

{
   struct sig_pri_chan *p;

   p = ast_calloc(1, sizeof(*p));
   if (!p)
      return p;

   p->logicalspan = logicalspan;
   p->prioffset = channo;
   p->mastertrunkgroup = trunkgroup;

   p->calls = callback;
   p->chan_pvt = pvt_data;

   p->pri = pri;

   return p;
}
void sig_pri_cli_show_channels ( int  fd,
struct sig_pri_span pri 
)

Definition at line 7678 of file sig_pri.c.

References ast_mutex_lock, sig_pri_span::lock, sig_pri_span::numchans, sig_pri_span::pvts, sig_pri_lock_private(), sig_pri_lock_owner(), sig_pri_chan::no_b_channel, sig_pri_is_chan_available(), sig_pri_unlock_private(), SIG_PRI_SC_LINE, sig_pri_span::span, sig_pri_chan::channel, sig_pri_call_level2str(), sig_pri_chan::call_level, sig_pri_chan::call, sig_pri_chan::owner, ast_channel::name, ast_channel_unlock, ast_mutex_unlock, and ast_cli().

Referenced by handle_pri_show_channels().

{
   char line[256];
   int idx;
   struct sig_pri_chan *pvt;

   ast_mutex_lock(&pri->lock);
   for (idx = 0; idx < pri->numchans; ++idx) {
      if (!pri->pvts[idx]) {
         continue;
      }
      pvt = pri->pvts[idx];
      sig_pri_lock_private(pvt);
      sig_pri_lock_owner(pri, idx);
      if (pvt->no_b_channel && sig_pri_is_chan_available(pvt)) {
         /* Don't show held/call-waiting channels if they are not in use. */
         sig_pri_unlock_private(pvt);
         continue;
      }

      snprintf(line, sizeof(line), SIG_PRI_SC_LINE,
         pri->span,
         pvt->channel,
         pvt->no_b_channel ? "No" : "Yes",/* Has media */
         sig_pri_is_chan_available(pvt) ? "Yes" : "No",
         sig_pri_call_level2str(pvt->call_level),
         pvt->call ? "Yes" : "No",
         pvt->owner ? pvt->owner->name : "");

      if (pvt->owner) {
         ast_channel_unlock(pvt->owner);
      }
      sig_pri_unlock_private(pvt);

      ast_mutex_unlock(&pri->lock);
      ast_cli(fd, "%s\n", line);
      ast_mutex_lock(&pri->lock);
   }
   ast_mutex_unlock(&pri->lock);
}
void sig_pri_cli_show_channels_header ( int  fd)

Definition at line 7672 of file sig_pri.c.

References ast_cli(), and SIG_PRI_SC_HEADER.

Referenced by handle_pri_show_channels().

{
   ast_cli(fd, SIG_PRI_SC_HEADER, "PRI",  "",     "B",    "Chan", "Call",  "PRI",  "Channel");
   ast_cli(fd, SIG_PRI_SC_HEADER, "Span", "Chan", "Chan", "Idle", "Level", "Call", "Name");
}
void sig_pri_cli_show_span ( int  fd,
int *  dchannels,
struct sig_pri_span pri 
)

Definition at line 7750 of file sig_pri.c.

References status, SIG_PRI_NUM_DCHANS, sig_pri_span::dchans, ast_cli(), pri_order(), build_status(), sig_pri_span::dchanavail, sig_pri_span::pri, ast_mutex_lock, sig_pri_span::lock, free, ast_mutex_unlock, sig_pri_span::overlapdial, and DAHDI_OVERLAPDIAL_INCOMING.

Referenced by handle_pri_show_span().

{
   int x;
   char status[256];

   for (x = 0; x < SIG_PRI_NUM_DCHANS; x++) {
      if (pri->dchans[x]) {
#ifdef PRI_DUMP_INFO_STR
         char *info_str = NULL;
#endif
         ast_cli(fd, "%s D-channel: %d\n", pri_order(x), dchannels[x]);
         build_status(status, sizeof(status), pri->dchanavail[x], pri->dchans[x] == pri->pri);
         ast_cli(fd, "Status: %s\n", status);
         ast_mutex_lock(&pri->lock);
#ifdef PRI_DUMP_INFO_STR
         info_str = pri_dump_info_str(pri->pri);
         if (info_str) {
            ast_cli(fd, "%s", info_str);
            free(info_str);
         }
#else
         pri_dump_info(pri->pri);
#endif
         ast_mutex_unlock(&pri->lock);
         ast_cli(fd, "Overlap Recv: %s\n\n", (pri->overlapdial & DAHDI_OVERLAPDIAL_INCOMING)?"Yes":"No");
         ast_cli(fd, "\n");
      }
   }
}
void sig_pri_cli_show_spans ( int  fd,
int  span,
struct sig_pri_span pri 
)

Definition at line 7738 of file sig_pri.c.

References status, SIG_PRI_NUM_DCHANS, sig_pri_span::dchans, build_status(), sig_pri_span::dchanavail, sig_pri_span::pri, and ast_cli().

Referenced by handle_pri_show_spans().

{
   char status[256];
   int x;
   for (x = 0; x < SIG_PRI_NUM_DCHANS; x++) {
      if (pri->dchans[x]) {
         build_status(status, sizeof(status), pri->dchanavail[x], pri->dchans[x] == pri->pri);
         ast_cli(fd, "PRI span %d/%d: %s\n", span, x, status);
      }
   }
}
static int sig_pri_cmp_pri_chans ( const void *  left,
const void *  right 
) [static]

Definition at line 7389 of file sig_pri.c.

References sig_pri_chan::channel.

Referenced by sig_pri_sort_pri_chans().

{
   const struct sig_pri_chan *pvt_left;
   const struct sig_pri_chan *pvt_right;

   pvt_left = *(struct sig_pri_chan **) left;
   pvt_right = *(struct sig_pri_chan **) right;
   if (!pvt_left) {
      if (!pvt_right) {
         return 0;
      }
      return 1;
   }
   if (!pvt_right) {
      return -1;
   }

   return pvt_left->channel - pvt_right->channel;
}
int sig_pri_digit_begin ( struct sig_pri_chan pvt,
struct ast_channel ast,
char  digit 
)

Definition at line 7215 of file sig_pri.c.

References ast_channel::_state, AST_STATE_DIALING, sig_pri_chan::call_level, SIG_PRI_CALL_LEVEL_OVERLAP, len(), sig_pri_chan::dialdest, ast_debug, ast_log(), LOG_WARNING, sig_pri_chan::pri, sig_pri_span::span, SIG_PRI_CALL_LEVEL_PROCEEDING, pri_grab(), sig_pri_span::pri, sig_pri_chan::call, pri_rel(), SIG_PRI_CALL_LEVEL_CONNECT, and sig_pri_call_level2str().

Referenced by dahdi_digit_begin().

{
   if (ast->_state == AST_STATE_DIALING) {
      if (pvt->call_level < SIG_PRI_CALL_LEVEL_OVERLAP) {
         unsigned int len;

         len = strlen(pvt->dialdest);
         if (len < sizeof(pvt->dialdest) - 1) {
            ast_debug(1, "Queueing digit '%c' since setup_ack not yet received\n",
               digit);
            pvt->dialdest[len++] = digit;
            pvt->dialdest[len] = '\0';
         } else {
            ast_log(LOG_WARNING,
               "Span %d: Deferred digit buffer overflow for digit '%c'.\n",
               pvt->pri->span, digit);
         }
         return 0;
      }
      if (pvt->call_level < SIG_PRI_CALL_LEVEL_PROCEEDING) {
         if (!pri_grab(pvt, pvt->pri)) {
            pri_information(pvt->pri->pri, pvt->call, digit);
            pri_rel(pvt->pri);
         } else {
            ast_log(LOG_WARNING, "Unable to grab PRI on span %d\n", pvt->pri->span);
         }
         return 0;
      }
      if (pvt->call_level < SIG_PRI_CALL_LEVEL_CONNECT) {
         ast_log(LOG_WARNING,
            "Span %d: Digit '%c' may be ignored by peer. (Call level:%d(%s))\n",
            pvt->pri->span, digit, pvt->call_level,
            sig_pri_call_level2str(pvt->call_level));
      }
   }
   return 1;
}
static void sig_pri_dsp_reset_and_flush_digits ( struct sig_pri_chan p) [static]
void sig_pri_extract_called_num_subaddr ( struct sig_pri_chan p,
const char *  rdest,
char *  called,
size_t  called_buff_size 
)

Extract the called number and subaddress from the dial string.

Since:
1.8
Parameters:
psig_pri channel structure.
rdestDial string buffer to extract called number and subaddress.
calledBuffer to fill with extracted <number>[:<subaddress>]
called_buff_sizeSize of buffer to fill.
Note:
Parsing must remain in sync with sig_pri_call().
Returns:
Nothing

Definition at line 6321 of file sig_pri.c.

References AST_DECLARE_APP_ARGS, args, AST_APP_ARG, ext, ast_strdupa, AST_NONSTANDARD_APP_ARGS, sig_pri_chan::stripmsd, and ast_strlen_zero().

Referenced by dahdi_request().

{
   char *dial;
   char *number;
   char *subaddr;
   AST_DECLARE_APP_ARGS(args,
      AST_APP_ARG(group);  /* channel/group token */
      AST_APP_ARG(ext); /* extension token */
      //AST_APP_ARG(opts); /* options token */
      AST_APP_ARG(other);  /* Any remining unused arguments */
   );

   /* Get private copy of dial string and break it up. */
   dial = ast_strdupa(rdest);
   AST_NONSTANDARD_APP_ARGS(args, dial, '/');

   number = args.ext;
   if (!number) {
      number = "";
   }

   /* Find and extract dialed_subaddress */
   subaddr = strchr(number, ':');
   if (subaddr) {
      *subaddr++ = '\0';

      /* Skip subaddress type prefix. */
      switch (*subaddr) {
      case 'U':
      case 'u':
      case 'N':
      case 'n':
         ++subaddr;
         break;
      default:
         break;
      }
   }

   /* Skip type-of-number/dial-plan prefix characters. */
   if (strlen(number) < p->stripmsd) {
      number = "";
   } else {
      number += p->stripmsd;
      while (isalpha(*number)) {
         ++number;
      }
   }

   /* Fill buffer with extracted number and subaddress. */
   if (ast_strlen_zero(subaddr)) {
      /* Put in called number only since there is no subaddress. */
      snprintf(called, called_buff_size, "%s", number);
   } else {
      /* Put in called number and subaddress. */
      snprintf(called, called_buff_size, "%s:%s", number, subaddr);
   }
}
void sig_pri_fixup ( struct ast_channel oldchan,
struct ast_channel newchan,
struct sig_pri_chan pchan 
)

Definition at line 7838 of file sig_pri.c.

References sig_pri_chan::owner.

Referenced by dahdi_fixup().

{
   if (pchan->owner == oldchan) {
      pchan->owner = newchan;
   }
}
static void sig_pri_fixup_chans ( struct sig_pri_chan old_chan,
struct sig_pri_chan new_chan 
) [static]

Definition at line 897 of file sig_pri.c.

References sig_pri_chan::calls, sig_pri_callback::fixup_chans, and sig_pri_chan::chan_pvt.

Referenced by pri_fixup_principle().

{
   if (old_chan->calls->fixup_chans)
      old_chan->calls->fixup_chans(old_chan->chan_pvt, new_chan->chan_pvt);
}
static const char* sig_pri_get_orig_dialstring ( struct sig_pri_chan p) [static]

Definition at line 196 of file sig_pri.c.

References sig_pri_chan::calls, sig_pri_callback::get_orig_dialstring, sig_pri_chan::chan_pvt, ast_log(), and LOG_ERROR.

Referenced by sig_pri_cc_generic_check().

{
   if (p->calls->get_orig_dialstring) {
      return p->calls->get_orig_dialstring(p->chan_pvt);
   }
   ast_log(LOG_ERROR, "get_orig_dialstring callback not defined\n");
   return "";
}
static void sig_pri_handle_cis_subcmds ( struct sig_pri_span pri,
int  event_id,
const struct pri_subcommands *  subcmds,
q931_call *  call_rsp 
) [static]

Definition at line 3732 of file sig_pri.c.

References monitor, sig_pri_span::pri, ast_cc_request_is_within_limits(), ast_cc_failed(), ast_cc_agent::core_id, ao2_ref, ast_cc_agent::private_data, ast_cc_agent_accept_request(), ast_cc_monitor_request_acked(), ast_verb, ast_cc_monitor_failed(), ast_cc_monitor_callee_available(), ast_cc_monitor_party_b_free(), ast_cc_monitor_status_request(), ast_cc_agent_status_response(), AST_DEVICE_INUSE, AST_DEVICE_NOT_INUSE, ast_cc_agent_caller_busy(), ast_cc_agent_caller_available(), ast_cc_monitor_stop_ringing(), ast_debug, and sig_pri_span::span.

Referenced by pri_dchannel().

{
   int index;
#if defined(HAVE_PRI_CCSS)
   struct ast_cc_agent *agent;
   struct sig_pri_cc_agent_prv *agent_prv;
   struct sig_pri_cc_monitor_instance *monitor;
#endif   /* defined(HAVE_PRI_CCSS) */

   if (!subcmds) {
      return;
   }
   for (index = 0; index < subcmds->counter_subcmd; ++index) {
      const struct pri_subcommand *subcmd = &subcmds->subcmd[index];

      switch (subcmd->cmd) {
#if defined(STATUS_REQUEST_PLACE_HOLDER)
      case PRI_SUBCMD_STATUS_REQ:
      case PRI_SUBCMD_STATUS_REQ_RSP:
         /* Ignore for now. */
         break;
#endif   /* defined(STATUS_REQUEST_PLACE_HOLDER) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_REQ:
         agent = sig_pri_find_cc_agent_by_cc_id(pri, subcmd->u.cc_request.cc_id);
         if (!agent) {
            pri_cc_cancel(pri->pri, subcmd->u.cc_request.cc_id);
            break;
         }
         if (!ast_cc_request_is_within_limits()) {
            if (pri_cc_req_rsp(pri->pri, subcmd->u.cc_request.cc_id,
               5/* queue_full */)) {
               pri_cc_cancel(pri->pri, subcmd->u.cc_request.cc_id);
            }
            ast_cc_failed(agent->core_id, "%s agent system CC queue full",
               sig_pri_cc_type_name);
            ao2_ref(agent, -1);
            break;
         }
         agent_prv = agent->private_data;
         agent_prv->cc_request_response_pending = 1;
         if (ast_cc_agent_accept_request(agent->core_id,
            "%s caller accepted CC offer.", sig_pri_cc_type_name)) {
            agent_prv->cc_request_response_pending = 0;
            if (pri_cc_req_rsp(pri->pri, subcmd->u.cc_request.cc_id,
               2/* short_term_denial */)) {
               pri_cc_cancel(pri->pri, subcmd->u.cc_request.cc_id);
            }
            ast_cc_failed(agent->core_id, "%s agent CC core request accept failed",
               sig_pri_cc_type_name);
         }
         ao2_ref(agent, -1);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_REQ_RSP:
         monitor = sig_pri_find_cc_monitor_by_cc_id(pri,
            subcmd->u.cc_request_rsp.cc_id);
         if (!monitor) {
            pri_cc_cancel(pri->pri, subcmd->u.cc_request_rsp.cc_id);
            break;
         }
         switch (subcmd->u.cc_request_rsp.status) {
         case 0:/* success */
            ast_cc_monitor_request_acked(monitor->core_id,
               "%s far end accepted CC request", sig_pri_cc_type_name);
            break;
         case 1:/* timeout */
            ast_verb(2, "core_id:%d %s CC request timeout\n", monitor->core_id,
               sig_pri_cc_type_name);
            ast_cc_monitor_failed(monitor->core_id, monitor->name,
               "%s CC request timeout", sig_pri_cc_type_name);
            break;
         case 2:/* error */
            ast_verb(2, "core_id:%d %s CC request error: %s\n", monitor->core_id,
               sig_pri_cc_type_name,
               pri_facility_error2str(subcmd->u.cc_request_rsp.fail_code));
            ast_cc_monitor_failed(monitor->core_id, monitor->name,
               "%s CC request error", sig_pri_cc_type_name);
            break;
         case 3:/* reject */
            ast_verb(2, "core_id:%d %s CC request reject: %s\n", monitor->core_id,
               sig_pri_cc_type_name,
               pri_facility_reject2str(subcmd->u.cc_request_rsp.fail_code));
            ast_cc_monitor_failed(monitor->core_id, monitor->name,
               "%s CC request reject", sig_pri_cc_type_name);
            break;
         default:
            ast_verb(2, "core_id:%d %s CC request unknown status %d\n",
               monitor->core_id, sig_pri_cc_type_name,
               subcmd->u.cc_request_rsp.status);
            ast_cc_monitor_failed(monitor->core_id, monitor->name,
               "%s CC request unknown status", sig_pri_cc_type_name);
            break;
         }
         ao2_ref(monitor, -1);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_REMOTE_USER_FREE:
         monitor = sig_pri_find_cc_monitor_by_cc_id(pri,
            subcmd->u.cc_remote_user_free.cc_id);
         if (!monitor) {
            pri_cc_cancel(pri->pri, subcmd->u.cc_remote_user_free.cc_id);
            break;
         }
         ast_cc_monitor_callee_available(monitor->core_id,
            "%s callee has become available", sig_pri_cc_type_name);
         ao2_ref(monitor, -1);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_B_FREE:
         monitor = sig_pri_find_cc_monitor_by_cc_id(pri,
            subcmd->u.cc_b_free.cc_id);
         if (!monitor) {
            pri_cc_cancel(pri->pri, subcmd->u.cc_b_free.cc_id);
            break;
         }
         ast_cc_monitor_party_b_free(monitor->core_id);
         ao2_ref(monitor, -1);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_STATUS_REQ:
         monitor = sig_pri_find_cc_monitor_by_cc_id(pri,
            subcmd->u.cc_status_req.cc_id);
         if (!monitor) {
            pri_cc_cancel(pri->pri, subcmd->u.cc_status_req.cc_id);
            break;
         }
         ast_cc_monitor_status_request(monitor->core_id);
         ao2_ref(monitor, -1);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_STATUS_REQ_RSP:
         agent = sig_pri_find_cc_agent_by_cc_id(pri, subcmd->u.cc_status_req_rsp.cc_id);
         if (!agent) {
            pri_cc_cancel(pri->pri, subcmd->u.cc_status_req_rsp.cc_id);
            break;
         }
         ast_cc_agent_status_response(agent->core_id,
            subcmd->u.cc_status_req_rsp.status ? AST_DEVICE_INUSE
            : AST_DEVICE_NOT_INUSE);
         ao2_ref(agent, -1);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_STATUS:
         agent = sig_pri_find_cc_agent_by_cc_id(pri, subcmd->u.cc_status.cc_id);
         if (!agent) {
            pri_cc_cancel(pri->pri, subcmd->u.cc_status.cc_id);
            break;
         }
         if (subcmd->u.cc_status.status) {
            ast_cc_agent_caller_busy(agent->core_id, "%s agent caller is busy",
               sig_pri_cc_type_name);
         } else {
            ast_cc_agent_caller_available(agent->core_id,
               "%s agent caller is available", sig_pri_cc_type_name);
         }
         ao2_ref(agent, -1);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_CANCEL:
         sig_pri_cc_link_canceled(pri, subcmd->u.cc_cancel.cc_id,
            subcmd->u.cc_cancel.is_agent);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_STOP_ALERTING:
         monitor = sig_pri_find_cc_monitor_by_cc_id(pri,
            subcmd->u.cc_stop_alerting.cc_id);
         if (!monitor) {
            pri_cc_cancel(pri->pri, subcmd->u.cc_stop_alerting.cc_id);
            break;
         }
         ast_cc_monitor_stop_ringing(monitor->core_id);
         ao2_ref(monitor, -1);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_AOC_EVENTS)
      case PRI_SUBCMD_AOC_E:
         /* Queue AST_CONTROL_AOC frame */
         sig_pri_aoc_e_from_pri(&subcmd->u.aoc_e, NULL, 0);
         break;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
      default:
         ast_debug(2,
            "Unknown CIS subcommand(%d) in %s event on span %d.\n",
            subcmd->cmd, pri_event2str(event_id), pri->span);
         break;
      }
   }
}
static void sig_pri_handle_dchan_exception ( struct sig_pri_span pri,
int  index 
) [static]

Definition at line 160 of file sig_pri.c.

References sig_pri_span::calls, and sig_pri_callback::handle_dchan_exception.

Referenced by pri_dchannel().

{
   if (pri->calls->handle_dchan_exception)
      pri->calls->handle_dchan_exception(pri, index);
}
static void sig_pri_handle_subcmds ( struct sig_pri_span pri,
int  chanpos,
int  event_id,
int  channel,
const struct pri_subcommands *  subcmds,
q931_call *  call_rsp 
) [static]
Todo:
XXX Original called data can be put in a channel data store that is inherited.

Definition at line 3988 of file sig_pri.c.

References sig_pri_lock_owner(), sig_pri_span::pvts, sig_pri_chan::owner, ast_party_connected_line_init(), sig_pri_party_id_convert(), ast_party_connected_line::id, ast_party_id::tag, ast_strdup, sig_pri_chan::user_tag, ast_party_id::name, ast_party_name::str, ast_copy_string(), sig_pri_chan::cid_name, ast_party_id::number, ast_party_number::str, sig_pri_chan::cid_num, sig_pri_chan::cid_ton, ast_party_number::plan, ast_party_connected_line::source, AST_CONNECTED_LINE_UPDATE_SOURCE_ANSWER, sig_pri_chan::cid_subaddr, ast_party_id::subaddress, ast_party_subaddress::valid, ast_party_subaddress_set(), ast_channel::caller, ast_party_caller::id, ast_party_subaddress::str, sig_pri_chan::callingpres, ast_party_id_presentation(), sig_pri_set_caller_id(), ast_party_caller_set_init(), ast_party_caller::ani, ast_channel_set_caller_event(), ast_channel_queue_connected_line_update(), ast_party_connected_line_free(), ast_channel_unlock, sig_pri_redirecting_convert(), ast_channel::redirecting, ast_party_redirecting::from, ast_party_redirecting::to, ast_channel_set_redirecting(), ast_channel_queue_redirecting_update(), ast_party_redirecting_free(), ast_log(), LOG_WARNING, sig_pri_span::span, ast_channel::name, ast_strlen_zero(), sig_pri_span::pri, ast_verb, ast_string_field_set, ast_queue_frame(), ast_null_frame, service, AST_CC_CCNR, AST_CC_CCBS, AST_CC_NONE, ast_setup_cc_recall_datastore(), ast_cc_agent::core_id, ast_cc_agent_set_interfaces_chanvar(), ast_cc_agent_recalling(), ao2_ref, LOG_ERROR, sig_pri_unlock_private(), sig_pri_span::transfer, sig_pri_lock_private(), SIG_PRI_AOC_GRANT_S, SIG_PRI_AOC_GRANT_D, SIG_PRI_AOC_GRANT_E, ast_debug, PRI_SPAN, and PRI_CHANNEL.

Referenced by pri_dchannel().

{
   int index;
   struct ast_channel *owner;
   struct ast_party_redirecting ast_redirecting;
#if defined(HAVE_PRI_TRANSFER)
   struct xfer_rsp_data xfer_rsp;
#endif   /* defined(HAVE_PRI_TRANSFER) */

   if (!subcmds) {
      return;
   }
   for (index = 0; index < subcmds->counter_subcmd; ++index) {
      const struct pri_subcommand *subcmd = &subcmds->subcmd[index];

      switch (subcmd->cmd) {
      case PRI_SUBCMD_CONNECTED_LINE:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         if (owner) {
            struct ast_party_connected_line ast_connected;
            int caller_id_update;

            /* Extract the connected line information */
            ast_party_connected_line_init(&ast_connected);
            sig_pri_party_id_convert(&ast_connected.id, &subcmd->u.connected_line.id,
               pri);
            ast_connected.id.tag = ast_strdup(pri->pvts[chanpos]->user_tag);

            caller_id_update = 0;
            if (ast_connected.id.name.str) {
               /* Save name for Caller-ID update */
               ast_copy_string(pri->pvts[chanpos]->cid_name,
                  ast_connected.id.name.str, sizeof(pri->pvts[chanpos]->cid_name));
               caller_id_update = 1;
            }
            if (ast_connected.id.number.str) {
               /* Save number for Caller-ID update */
               ast_copy_string(pri->pvts[chanpos]->cid_num,
                  ast_connected.id.number.str, sizeof(pri->pvts[chanpos]->cid_num));
               pri->pvts[chanpos]->cid_ton = ast_connected.id.number.plan;
               caller_id_update = 1;
            }
            ast_connected.source = AST_CONNECTED_LINE_UPDATE_SOURCE_ANSWER;

            pri->pvts[chanpos]->cid_subaddr[0] = '\0';
#if defined(HAVE_PRI_SUBADDR)
            if (ast_connected.id.subaddress.valid) {
               ast_party_subaddress_set(&owner->caller.id.subaddress,
                  &ast_connected.id.subaddress);
               if (ast_connected.id.subaddress.str) {
                  ast_copy_string(pri->pvts[chanpos]->cid_subaddr,
                     ast_connected.id.subaddress.str,
                     sizeof(pri->pvts[chanpos]->cid_subaddr));
               }
            }
#endif   /* defined(HAVE_PRI_SUBADDR) */
            if (caller_id_update) {
               struct ast_party_caller ast_caller;

               pri->pvts[chanpos]->callingpres =
                  ast_party_id_presentation(&ast_connected.id);
               sig_pri_set_caller_id(pri->pvts[chanpos]);

               ast_party_caller_set_init(&ast_caller, &owner->caller);
               ast_caller.id = ast_connected.id;
               ast_caller.ani = ast_connected.id;
               ast_channel_set_caller_event(owner, &ast_caller, NULL);
            }

            /* Update the connected line information on the other channel */
            if (event_id != PRI_EVENT_RING) {
               /* This connected_line update was not from a SETUP message. */
               ast_channel_queue_connected_line_update(owner, &ast_connected, NULL);
            }

            ast_party_connected_line_free(&ast_connected);
            ast_channel_unlock(owner);
         }
         break;
      case PRI_SUBCMD_REDIRECTING:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         if (owner) {
            sig_pri_redirecting_convert(&ast_redirecting, &subcmd->u.redirecting,
               &owner->redirecting, pri);
            ast_redirecting.from.tag = ast_strdup(pri->pvts[chanpos]->user_tag);
            ast_redirecting.to.tag = ast_strdup(pri->pvts[chanpos]->user_tag);

/*! \todo XXX Original called data can be put in a channel data store that is inherited. */

            ast_channel_set_redirecting(owner, &ast_redirecting, NULL);
            if (event_id != PRI_EVENT_RING) {
               /* This redirection was not from a SETUP message. */
               ast_channel_queue_redirecting_update(owner, &ast_redirecting, NULL);
            }
            ast_party_redirecting_free(&ast_redirecting);

            ast_channel_unlock(owner);
         }
         break;
#if defined(HAVE_PRI_CALL_REROUTING)
      case PRI_SUBCMD_REROUTING:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         if (owner) {
            struct pri_party_redirecting pri_deflection;

            if (!call_rsp) {
               ast_log(LOG_WARNING,
                  "Span %d: %s tried CallRerouting/CallDeflection to '%s' without call!\n",
                  pri->span, owner->name, subcmd->u.rerouting.deflection.to.number.str);
               ast_channel_unlock(owner);
               break;
            }
            if (ast_strlen_zero(subcmd->u.rerouting.deflection.to.number.str)) {
               ast_log(LOG_WARNING,
                  "Span %d: %s tried CallRerouting/CallDeflection to empty number!\n",
                  pri->span, owner->name);
               pri_rerouting_rsp(pri->pri, call_rsp, subcmd->u.rerouting.invoke_id,
                  PRI_REROUTING_RSP_INVALID_NUMBER);
               ast_channel_unlock(owner);
               break;
            }

            ast_verb(3, "Span %d: %s is CallRerouting/CallDeflection to '%s'.\n",
               pri->span, owner->name, subcmd->u.rerouting.deflection.to.number.str);

            /*
             * Send back positive ACK to CallRerouting/CallDeflection.
             *
             * Note:  This call will be hungup by the core when it processes
             * the call_forward string.
             */
            pri_rerouting_rsp(pri->pri, call_rsp, subcmd->u.rerouting.invoke_id,
               PRI_REROUTING_RSP_OK_CLEAR);

            pri_deflection = subcmd->u.rerouting.deflection;

            /* Adjust the deflecting to number based upon the subscription option. */
            switch (subcmd->u.rerouting.subscription_option) {
            case 0:  /* noNotification */
            case 1:  /* notificationWithoutDivertedToNr */
               /* Delete the number because the far end is not supposed to see it. */
               pri_deflection.to.number.presentation =
                  PRI_PRES_RESTRICTED | PRI_PRES_USER_NUMBER_UNSCREENED;
               pri_deflection.to.number.plan =
                  (PRI_TON_UNKNOWN << 4) | PRI_NPI_E163_E164;
               pri_deflection.to.number.str[0] = '\0';
               break;
            case 2:  /* notificationWithDivertedToNr */
               break;
            case 3:  /* notApplicable */
            default:
               break;
            }
            sig_pri_redirecting_convert(&ast_redirecting, &pri_deflection,
               &owner->redirecting, pri);
            ast_redirecting.from.tag = ast_strdup(pri->pvts[chanpos]->user_tag);
            ast_redirecting.to.tag = ast_strdup(pri->pvts[chanpos]->user_tag);
            ast_channel_set_redirecting(owner, &ast_redirecting, NULL);
            ast_party_redirecting_free(&ast_redirecting);

            /* Request the core to forward to the new number. */
            ast_string_field_set(owner, call_forward,
               subcmd->u.rerouting.deflection.to.number.str);

            /* Wake up the channel. */
            ast_queue_frame(owner, &ast_null_frame);

            ast_channel_unlock(owner);
         }
         break;
#endif   /* defined(HAVE_PRI_CALL_REROUTING) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_AVAILABLE:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         if (owner) {
            enum ast_cc_service_type service;

            switch (event_id) {
            case PRI_EVENT_RINGING:
               service = AST_CC_CCNR;
               break;
            case PRI_EVENT_HANGUP_REQ:
               /* We will assume that the cause was busy/congestion. */
               service = AST_CC_CCBS;
               break;
            default:
               service = AST_CC_NONE;
               break;
            }
            if (service == AST_CC_NONE
               || sig_pri_cc_available(pri, chanpos, subcmd->u.cc_available.cc_id,
               service)) {
               pri_cc_cancel(pri->pri, subcmd->u.cc_available.cc_id);
            }
            ast_channel_unlock(owner);
         } else {
            /* No asterisk channel. */
            pri_cc_cancel(pri->pri, subcmd->u.cc_available.cc_id);
         }
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_CALL:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         if (owner) {
            struct ast_cc_agent *agent;

            agent = sig_pri_find_cc_agent_by_cc_id(pri, subcmd->u.cc_call.cc_id);
            if (agent) {
               ast_setup_cc_recall_datastore(owner, agent->core_id);
               ast_cc_agent_set_interfaces_chanvar(owner);
               ast_cc_agent_recalling(agent->core_id,
                  "%s caller is attempting recall", sig_pri_cc_type_name);
               ao2_ref(agent, -1);
            }

            ast_channel_unlock(owner);
         }
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_CCSS)
      case PRI_SUBCMD_CC_CANCEL:
         sig_pri_cc_link_canceled(pri, subcmd->u.cc_cancel.cc_id,
            subcmd->u.cc_cancel.is_agent);
         break;
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_TRANSFER)
      case PRI_SUBCMD_TRANSFER_CALL:
         if (!call_rsp) {
            /* Should never happen. */
            ast_log(LOG_ERROR,
               "Call transfer subcommand without call to send response!\n");
            break;
         }

         sig_pri_unlock_private(pri->pvts[chanpos]);
         xfer_rsp.pri = pri;
         xfer_rsp.call = call_rsp;
         xfer_rsp.invoke_id = subcmd->u.transfer.invoke_id;
         sig_pri_attempt_transfer(pri,
            subcmd->u.transfer.call_1, subcmd->u.transfer.is_call_1_held,
            subcmd->u.transfer.call_2, subcmd->u.transfer.is_call_2_held,
            sig_pri_transfer_rsp, &xfer_rsp);
         sig_pri_lock_private(pri->pvts[chanpos]);
         break;
#endif   /* defined(HAVE_PRI_TRANSFER) */
#if defined(HAVE_PRI_AOC_EVENTS)
      case PRI_SUBCMD_AOC_S:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         if (owner) {
            sig_pri_aoc_s_from_pri(&subcmd->u.aoc_s, owner,
               (pri->aoc_passthrough_flag & SIG_PRI_AOC_GRANT_S));
            ast_channel_unlock(owner);
         }
         break;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
#if defined(HAVE_PRI_AOC_EVENTS)
      case PRI_SUBCMD_AOC_D:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         if (owner) {
            /* Queue AST_CONTROL_AOC frame on channel */
            sig_pri_aoc_d_from_pri(&subcmd->u.aoc_d, owner,
               (pri->aoc_passthrough_flag & SIG_PRI_AOC_GRANT_D));
            ast_channel_unlock(owner);
         }
         break;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
#if defined(HAVE_PRI_AOC_EVENTS)
      case PRI_SUBCMD_AOC_E:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         /* Queue AST_CONTROL_AOC frame */
         sig_pri_aoc_e_from_pri(&subcmd->u.aoc_e, owner,
            (pri->aoc_passthrough_flag & SIG_PRI_AOC_GRANT_E));
         if (owner) {
            ast_channel_unlock(owner);
         }
         break;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
#if defined(HAVE_PRI_AOC_EVENTS)
      case PRI_SUBCMD_AOC_CHARGING_REQ:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         if (owner) {
            sig_pri_aoc_request_from_pri(&subcmd->u.aoc_request, pri->pvts[chanpos],
               call_rsp);
            ast_channel_unlock(owner);
         }
         break;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
#if defined(HAVE_PRI_AOC_EVENTS)
      case PRI_SUBCMD_AOC_CHARGING_REQ_RSP:
         /*
          * An AOC request response may contain an AOC-S rate list.
          * If this is the case handle this just like we
          * would an incoming AOC-S msg.
          */
         if (subcmd->u.aoc_request_response.valid_aoc_s) {
            sig_pri_lock_owner(pri, chanpos);
            owner = pri->pvts[chanpos]->owner;
            if (owner) {
               sig_pri_aoc_s_from_pri(&subcmd->u.aoc_request_response.aoc_s, owner,
                  (pri->aoc_passthrough_flag & SIG_PRI_AOC_GRANT_S));
               ast_channel_unlock(owner);
            }
         }
         break;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
#if defined(HAVE_PRI_MCID)
      case PRI_SUBCMD_MCID_REQ:
         sig_pri_lock_owner(pri, chanpos);
         owner = pri->pvts[chanpos]->owner;
         sig_pri_mcid_event(pri, &subcmd->u.mcid_req, owner);
         if (owner) {
            ast_channel_unlock(owner);
         }
         break;
#endif   /* defined(HAVE_PRI_MCID) */
#if defined(HAVE_PRI_MCID)
      case PRI_SUBCMD_MCID_RSP:
         /* Ignore for now. */
         break;
#endif   /* defined(HAVE_PRI_MCID) */
      default:
         ast_debug(2,
            "Unknown call subcommand(%d) in %s event on channel %d/%d on span %d.\n",
            subcmd->cmd, pri_event2str(event_id), PRI_SPAN(channel),
            PRI_CHANNEL(channel), pri->span);
         break;
      }
   }
}
int sig_pri_hangup ( struct sig_pri_chan p,
struct ast_channel ast 
)

Definition at line 6226 of file sig_pri.c.

References pbx_builtin_getvar_helper(), ast_log(), LOG_DEBUG, sig_pri_chan::channel, ast_channel::tech_pvt, LOG_WARNING, sig_pri_chan::outgoing, sig_pri_set_digital(), ast_atomic_fetchadd_int(), sig_pri_chan::pri, sig_pri_chan::call_level, SIG_PRI_CALL_LEVEL_IDLE, sig_pri_chan::progress, sig_pri_chan::cid_num, sig_pri_chan::cid_subaddr, sig_pri_chan::cid_name, sig_pri_chan::user_tag, sig_pri_chan::exten, sig_pri_set_dialing(), pri_grab(), sig_pri_chan::call, sig_pri_chan::alreadyhungup, sig_pri_span::pri, cause, ast_channel::hangupcause, sig_pri_chan::allocated, sig_pri_chan::owner, sig_pri_span_devstate_changed(), and pri_rel().

Referenced by dahdi_hangup().

{
#ifdef SUPPORT_USERUSER
   const char *useruser = pbx_builtin_getvar_helper(ast, "USERUSERINFO");
#endif

   ast_log(LOG_DEBUG, "%s %d\n", __FUNCTION__, p->channel);
   if (!ast->tech_pvt) {
      ast_log(LOG_WARNING, "Asked to hangup channel not connected\n");
      return 0;
   }

   p->outgoing = 0;
   sig_pri_set_digital(p, 0); /* push up to parent for EC*/
#if defined(HAVE_PRI_CALL_WAITING)
   if (p->is_call_waiting) {
      p->is_call_waiting = 0;
      ast_atomic_fetchadd_int(&p->pri->num_call_waiting_calls, -1);
   }
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
   p->call_level = SIG_PRI_CALL_LEVEL_IDLE;
   p->progress = 0;
   p->cid_num[0] = '\0';
   p->cid_subaddr[0] = '\0';
   p->cid_name[0] = '\0';
   p->user_tag[0] = '\0';
   p->exten[0] = '\0';
   sig_pri_set_dialing(p, 0);

   /* Make sure we have a call (or REALLY have a call in the case of a PRI) */
   pri_grab(p, p->pri);
   if (p->call) {
      if (p->alreadyhungup) {
         ast_log(LOG_DEBUG, "Already hungup...  Calling hangup once, and clearing call\n");

#ifdef SUPPORT_USERUSER
         pri_call_set_useruser(p->call, useruser);
#endif

#if defined(HAVE_PRI_AOC_EVENTS)
         if (p->holding_aoce) {
            pri_aoc_e_send(p->pri->pri, p->call, &p->aoc_e);
         }
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
         pri_hangup(p->pri->pri, p->call, -1);
         p->call = NULL;
      } else {
         const char *cause = pbx_builtin_getvar_helper(ast,"PRI_CAUSE");
         int icause = ast->hangupcause ? ast->hangupcause : -1;
         ast_log(LOG_DEBUG, "Not yet hungup...  Calling hangup once with icause, and clearing call\n");

#ifdef SUPPORT_USERUSER
         pri_call_set_useruser(p->call, useruser);
#endif

         p->alreadyhungup = 1;
         if (cause) {
            if (atoi(cause))
               icause = atoi(cause);
         }
#if defined(HAVE_PRI_AOC_EVENTS)
         if (p->holding_aoce) {
            pri_aoc_e_send(p->pri->pri, p->call, &p->aoc_e);
         }
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
         pri_hangup(p->pri->pri, p->call, icause);
      }
   }
#if defined(HAVE_PRI_AOC_EVENTS)
   p->aoc_s_request_invoke_id_valid = 0;
   p->holding_aoce = 0;
   p->waiting_for_aoce = 0;
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */

   p->allocated = 0;
   p->owner = NULL;

   sig_pri_span_devstate_changed(p->pri);
   pri_rel(p->pri);
   return 0;
}
int sig_pri_indicate ( struct sig_pri_chan p,
struct ast_channel chan,
int  condition,
const void *  data,
size_t  datalen 
)

Definition at line 6834 of file sig_pri.c.

References AST_CONTROL_BUSY, sig_pri_chan::priindication_oob, sig_pri_chan::no_b_channel, ast_channel::hangupcause, AST_CAUSE_USER_BUSY, ast_channel::_softhangup, AST_SOFTHANGUP_DEV, sig_pri_play_tone(), SIG_PRI_TONE_BUSY, sig_pri_chan::call_level, SIG_PRI_CALL_LEVEL_ALERTING, sig_pri_chan::outgoing, sig_pri_chan::progress, sig_pri_chan::pri, sig_pri_span::pri, pri_grab(), sig_pri_chan::call, PVT_TO_CHANNEL(), pri_rel(), ast_log(), LOG_WARNING, sig_pri_span::span, AST_CONTROL_RINGING, sig_pri_chan::digital, SIG_PRI_TONE_RINGTONE, ast_channel::_state, AST_STATE_UP, AST_STATE_RING, ast_setstate(), AST_STATE_RINGING, AST_CONTROL_PROCEEDING, ast_debug, ast_channel::name, SIG_PRI_CALL_LEVEL_PROCEEDING, sig_pri_set_dialing(), AST_CONTROL_PROGRESS, sig_pri_set_digital(), AST_CONTROL_CONGESTION, AST_CAUSE_NORMAL_CLEARING, AST_CAUSE_SWITCH_CONGESTION, SIG_PRI_TONE_CONGESTION, AST_CONTROL_HOLD, sig_pri_chan::mohinterpret, sig_pri_chan::prioffset, ast_moh_start(), AST_CONTROL_UNHOLD, ast_moh_stop(), AST_CONTROL_SRCUPDATE, AST_CONTROL_CONNECTED_LINE, sig_pri_party_id_from_ast(), ast_channel::connected, ast_party_connected_line::id, AST_CONTROL_REDIRECTING, sig_pri_redirecting_update(), AST_CONTROL_AOC, ast_aoc_decode(), ast_aoc_get_msg_type(), AST_AOC_S, SIG_PRI_AOC_GRANT_S, AST_AOC_D, SIG_PRI_AOC_GRANT_D, AST_AOC_E, SIG_PRI_AOC_GRANT_E, LOG_DEBUG, ast_softhangup_nolock(), AST_AOC_REQUEST, ast_aoc_get_termination_request(), and ast_aoc_destroy_decoded().

Referenced by dahdi_indicate().

{
   int res = -1;

   switch (condition) {
   case AST_CONTROL_BUSY:
      if (p->priindication_oob || p->no_b_channel) {
         chan->hangupcause = AST_CAUSE_USER_BUSY;
         chan->_softhangup |= AST_SOFTHANGUP_DEV;
         res = 0;
         break;
      }
      res = sig_pri_play_tone(p, SIG_PRI_TONE_BUSY);
      if (p->call_level < SIG_PRI_CALL_LEVEL_ALERTING && !p->outgoing) {
         chan->hangupcause = AST_CAUSE_USER_BUSY;
         p->progress = 1;/* No need to send plain PROGRESS after this. */
         if (p->pri && p->pri->pri) {
            if (!pri_grab(p, p->pri)) {
#ifdef HAVE_PRI_PROG_W_CAUSE
               pri_progress_with_cause(p->pri->pri, p->call, PVT_TO_CHANNEL(p), 1, chan->hangupcause);
#else
               pri_progress(p->pri->pri,p->call, PVT_TO_CHANNEL(p), 1);
#endif
               pri_rel(p->pri);
            } else {
               ast_log(LOG_WARNING, "Unable to grab PRI on span %d\n", p->pri->span);
            }
         }
      }
      break;
   case AST_CONTROL_RINGING:
      if (p->call_level < SIG_PRI_CALL_LEVEL_ALERTING && !p->outgoing) {
         p->call_level = SIG_PRI_CALL_LEVEL_ALERTING;
         if (p->pri && p->pri->pri) {
            if (!pri_grab(p, p->pri)) {
               pri_acknowledge(p->pri->pri,p->call, PVT_TO_CHANNEL(p),
                  p->no_b_channel || p->digital ? 0 : 1);
               pri_rel(p->pri);
            } else {
               ast_log(LOG_WARNING, "Unable to grab PRI on span %d\n", p->pri->span);
            }
         }
      }
      res = sig_pri_play_tone(p, SIG_PRI_TONE_RINGTONE);
      if (chan->_state != AST_STATE_UP) {
         if (chan->_state != AST_STATE_RING)
            ast_setstate(chan, AST_STATE_RINGING);
      }
      break;
   case AST_CONTROL_PROCEEDING:
      ast_debug(1,"Received AST_CONTROL_PROCEEDING on %s\n",chan->name);
      if (p->call_level < SIG_PRI_CALL_LEVEL_PROCEEDING && !p->outgoing) {
         p->call_level = SIG_PRI_CALL_LEVEL_PROCEEDING;
         if (p->pri && p->pri->pri) {
            if (!pri_grab(p, p->pri)) {
               pri_proceeding(p->pri->pri,p->call, PVT_TO_CHANNEL(p),
                  p->no_b_channel || p->digital ? 0 : 1);
               if (!p->no_b_channel && !p->digital) {
                  sig_pri_set_dialing(p, 0);
               }
               pri_rel(p->pri);
            } else {
               ast_log(LOG_WARNING, "Unable to grab PRI on span %d\n", p->pri->span);
            }
         }
      }
      /* don't continue in ast_indicate */
      res = 0;
      break;
   case AST_CONTROL_PROGRESS:
      ast_debug(1,"Received AST_CONTROL_PROGRESS on %s\n",chan->name);
      sig_pri_set_digital(p, 0); /* Digital-only calls isn't allowing any inband progress messages */
      if (!p->progress && p->call_level < SIG_PRI_CALL_LEVEL_ALERTING && !p->outgoing
         && !p->no_b_channel) {
         p->progress = 1;/* No need to send plain PROGRESS again. */
         if (p->pri && p->pri->pri) {
            if (!pri_grab(p, p->pri)) {
#ifdef HAVE_PRI_PROG_W_CAUSE
               pri_progress_with_cause(p->pri->pri,p->call, PVT_TO_CHANNEL(p), 1, -1);  /* no cause at all */
#else
               pri_progress(p->pri->pri,p->call, PVT_TO_CHANNEL(p), 1);
#endif
               pri_rel(p->pri);
            } else {
               ast_log(LOG_WARNING, "Unable to grab PRI on span %d\n", p->pri->span);
            }
         }
      }
      /* don't continue in ast_indicate */
      res = 0;
      break;
   case AST_CONTROL_CONGESTION:
      if (p->priindication_oob || p->no_b_channel) {
         /* There are many cause codes that generate an AST_CONTROL_CONGESTION. */
         switch (chan->hangupcause) {
         case AST_CAUSE_USER_BUSY:
         case AST_CAUSE_NORMAL_CLEARING:
         case 0:/* Cause has not been set. */
            /* Supply a more appropriate cause. */
            chan->hangupcause = AST_CAUSE_SWITCH_CONGESTION;
            break;
         default:
            break;
         }
         chan->_softhangup |= AST_SOFTHANGUP_DEV;
         res = 0;
         break;
      }
      res = sig_pri_play_tone(p, SIG_PRI_TONE_CONGESTION);
      if (p->call_level < SIG_PRI_CALL_LEVEL_ALERTING && !p->outgoing) {
         /* There are many cause codes that generate an AST_CONTROL_CONGESTION. */
         switch (chan->hangupcause) {
         case AST_CAUSE_USER_BUSY:
         case AST_CAUSE_NORMAL_CLEARING:
         case 0:/* Cause has not been set. */
            /* Supply a more appropriate cause. */
            chan->hangupcause = AST_CAUSE_SWITCH_CONGESTION;
            break;
         default:
            break;
         }
         p->progress = 1;/* No need to send plain PROGRESS after this. */
         if (p->pri && p->pri->pri) {
            if (!pri_grab(p, p->pri)) {
#ifdef HAVE_PRI_PROG_W_CAUSE
               pri_progress_with_cause(p->pri->pri, p->call, PVT_TO_CHANNEL(p), 1, chan->hangupcause);
#else
               pri_progress(p->pri->pri,p->call, PVT_TO_CHANNEL(p), 1);
#endif
               pri_rel(p->pri);
            } else {
               ast_log(LOG_WARNING, "Unable to grab PRI on span %d\n", p->pri->span);
            }
         }
      }
      break;
   case AST_CONTROL_HOLD:
      if (p->pri && !strcasecmp(p->mohinterpret, "passthrough")) {
         if (!pri_grab(p, p->pri)) {
            res = pri_notify(p->pri->pri, p->call, p->prioffset, PRI_NOTIFY_REMOTE_HOLD);
            pri_rel(p->pri);
         } else {
            ast_log(LOG_WARNING, "Unable to grab PRI on span %d\n", p->pri->span);
         }
      } else
         ast_moh_start(chan, data, p->mohinterpret);
      break;
   case AST_CONTROL_UNHOLD:
      if (p->pri && !strcasecmp(p->mohinterpret, "passthrough")) {
         if (!pri_grab(p, p->pri)) {
            res = pri_notify(p->pri->pri, p->call, p->prioffset, PRI_NOTIFY_REMOTE_RETRIEVAL);
            pri_rel(p->pri);
         }
      } else
         ast_moh_stop(chan);
      break;
   case AST_CONTROL_SRCUPDATE:
      res = 0;
      break;
   case -1:
      res = sig_pri_play_tone(p, -1);
      break;
   case AST_CONTROL_CONNECTED_LINE:
      ast_debug(1, "Received AST_CONTROL_CONNECTED_LINE on %s\n", chan->name);
      if (p->pri && !pri_grab(p, p->pri)) {
         struct pri_party_connected_line connected;

         memset(&connected, 0, sizeof(connected));
         sig_pri_party_id_from_ast(&connected.id, &chan->connected.id);

         pri_connected_line_update(p->pri->pri, p->call, &connected);
         pri_rel(p->pri);
      }
      break;
   case AST_CONTROL_REDIRECTING:
      ast_debug(1, "Received AST_CONTROL_REDIRECTING on %s\n", chan->name);
      if (p->pri && !pri_grab(p, p->pri)) {
         sig_pri_redirecting_update(p, chan);
         pri_rel(p->pri);
      }
      break;
   case AST_CONTROL_AOC:
#if defined(HAVE_PRI_AOC_EVENTS)
      {
         struct ast_aoc_decoded *decoded
            = ast_aoc_decode((struct ast_aoc_encoded *) data, datalen, chan);
         ast_debug(1, "Received AST_CONTROL_AOC on %s\n", chan->name);
         if (decoded && p->pri && !pri_grab(p, p->pri)) {
            switch (ast_aoc_get_msg_type(decoded)) {
            case AST_AOC_S:
               if (p->pri->aoc_passthrough_flag & SIG_PRI_AOC_GRANT_S) {
                  sig_pri_aoc_s_from_ast(p, decoded);
               }
               break;
            case AST_AOC_D:
               if (p->pri->aoc_passthrough_flag & SIG_PRI_AOC_GRANT_D) {
                  sig_pri_aoc_d_from_ast(p, decoded);
               }
               break;
            case AST_AOC_E:
               if (p->pri->aoc_passthrough_flag & SIG_PRI_AOC_GRANT_E) {
                  sig_pri_aoc_e_from_ast(p, decoded);
               }
               /* if hangup was delayed for this AOC-E msg, waiting_for_aoc
                * will be set.  A hangup is already occuring via a timeout during
                * this delay.  Instead of waiting for that timeout to occur, go ahead
                * and initiate the softhangup since the delay is no longer necessary */
               if (p->waiting_for_aoce) {
                  p->waiting_for_aoce = 0;
                  ast_log(LOG_DEBUG,
                     "Received final AOC-E msg, continue with hangup on %s\n",
                     chan->name);
                  ast_softhangup_nolock(chan, AST_SOFTHANGUP_DEV);
               }
               break;
            case AST_AOC_REQUEST:
               /* We do not pass through AOC requests, So unless this
                * is an AOC termination request it will be ignored */
               if (ast_aoc_get_termination_request(decoded)) {
                  pri_hangup(p->pri->pri, p->call, -1);
               }
               break;
            default:
               break;
            }
            pri_rel(p->pri);
         }
         ast_aoc_destroy_decoded(decoded);
      }
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
      break;
   }

   return res;
}
void sig_pri_init_pri ( struct sig_pri_span pri)

Definition at line 6213 of file sig_pri.c.

References ast_mutex_init, sig_pri_span::lock, sig_pri_span::master, AST_PTHREADT_NULL, SIG_PRI_NUM_DCHANS, and sig_pri_span::fds.

Referenced by dahdi_restart(), and load_module().

{
   int i;

   memset(pri, 0, sizeof(*pri));

   ast_mutex_init(&pri->lock);

   pri->master = AST_PTHREADT_NULL;
   for (i = 0; i < SIG_PRI_NUM_DCHANS; i++)
      pri->fds[i] = -1;
}
int sig_pri_is_chan_available ( struct sig_pri_chan pvt)

Determine if a private channel structure is available.

Since:
1.8
Parameters:
pvtChannel to determine if available.
Returns:
TRUE if the channel is available.

Definition at line 1090 of file sig_pri.c.

References sig_pri_is_chan_in_use().

Referenced by dahdi_pri_update_span_devstate(), pri_fixup_principle(), pri_find_empty_chan(), pri_dchannel(), sig_pri_available_check(), and sig_pri_cli_show_channels().

{
   return !sig_pri_is_chan_in_use(pvt)
#if defined(HAVE_PRI_SERVICE_MESSAGES)
      /* And not out-of-service */
      && !pvt->service_status
#endif   /* defined(HAVE_PRI_SERVICE_MESSAGES) */
      ;
}
static int sig_pri_is_chan_in_use ( struct sig_pri_chan pvt) [static]

Definition at line 1077 of file sig_pri.c.

References sig_pri_chan::owner, sig_pri_chan::call, sig_pri_chan::allocated, sig_pri_chan::resetting, and sig_pri_chan::inalarm.

Referenced by sig_pri_is_chan_available(), and pri_check_restart().

{
   return pvt->owner || pvt->call || pvt->allocated || pvt->resetting || pvt->inalarm;
}
static int sig_pri_is_cis_call ( int  channel) [static]

Definition at line 3710 of file sig_pri.c.

References PRI_CIS_CALL.

Referenced by pri_dchannel().

{
   return channel != -1 && (channel & PRI_CIS_CALL);
}
static void sig_pri_kill_call ( struct sig_pri_span pri,
q931_call *  call,
int  cause 
) [static]

Definition at line 1224 of file sig_pri.c.

References pri_find_principle_by_call(), sig_pri_span::pri, sig_pri_lock_private(), sig_pri_span::pvts, sig_pri_chan::owner, sig_pri_chan::call, sig_pri_unlock_private(), sig_pri_span_devstate_changed(), ast_channel::hangupcause, cause, pri_queue_control(), and AST_CONTROL_HANGUP.

Referenced by pri_find_fixup_principle().

{
   int chanpos;

   chanpos = pri_find_principle_by_call(pri, call);
   if (chanpos < 0) {
      pri_hangup(pri->pri, call, cause);
      return;
   }
   sig_pri_lock_private(pri->pvts[chanpos]);
   if (!pri->pvts[chanpos]->owner) {
      pri_hangup(pri->pri, call, cause);
      pri->pvts[chanpos]->call = NULL;
      sig_pri_unlock_private(pri->pvts[chanpos]);
      sig_pri_span_devstate_changed(pri);
      return;
   }
   pri->pvts[chanpos]->owner->hangupcause = cause;
   pri_queue_control(pri, chanpos, AST_CONTROL_HANGUP);
   sig_pri_unlock_private(pri->pvts[chanpos]);
}
int sig_pri_load ( const char *  cc_type_name)

Load the sig_pri submodule.

Since:
1.8
Parameters:
cc_type_nameCC type name to use when looking up agent/monitor.
Return values:
0on success.
-1on error.

Definition at line 8450 of file sig_pri.c.

References ao2_container_alloc.

Referenced by load_module().

{
#if defined(HAVE_PRI_CCSS)
   sig_pri_cc_type_name = cc_type_name;
   sig_pri_cc_monitors = ao2_container_alloc(37, sig_pri_cc_monitor_instance_hash_fn,
      sig_pri_cc_monitor_instance_cmp_fn);
   if (!sig_pri_cc_monitors) {
      return -1;
   }
#endif   /* defined(HAVE_PRI_CCSS) */
   return 0;
}
static void sig_pri_lock_owner ( struct sig_pri_span pri,
int  chanpos 
) [static]

Definition at line 1113 of file sig_pri.c.

References sig_pri_span::pvts, sig_pri_chan::owner, ast_channel_trylock, ast_mutex_unlock, sig_pri_span::lock, PRI_DEADLOCK_AVOIDANCE, and ast_mutex_lock.

Referenced by pri_queue_frame(), pri_fixup_principle(), sig_pri_cc_generic_check(), sig_pri_handle_subcmds(), pri_dchannel(), and sig_pri_cli_show_channels().

{
   for (;;) {
      if (!pri->pvts[chanpos]->owner) {
         /* There is no owner lock to get. */
         break;
      }
      if (!ast_channel_trylock(pri->pvts[chanpos]->owner)) {
         /* We got the lock */
         break;
      }
      /* We must unlock the PRI to avoid the possibility of a deadlock */
      ast_mutex_unlock(&pri->lock);
      PRI_DEADLOCK_AVOIDANCE(pri->pvts[chanpos]);
      ast_mutex_lock(&pri->lock);
   }
}
static int sig_pri_msn_match ( const char *  msn_patterns,
const char *  exten 
) [static]

Definition at line 2025 of file sig_pri.c.

References ast_strdupa, ast_strip(), ast_strlen_zero(), and ast_extension_match().

Referenced by pri_dchannel().

{
   char *pattern;
   char *msn_list;
   char *list_tail;

   msn_list = ast_strdupa(msn_patterns);

   list_tail = NULL;
   pattern = strtok_r(msn_list, ",", &list_tail);
   while (pattern) {
      pattern = ast_strip(pattern);
      if (!ast_strlen_zero(pattern) && ast_extension_match(pattern, exten)) {
         /* Extension matched the pattern. */
         return 1;
      }
      pattern = strtok_r(NULL, ",", &list_tail);
   }
   /* Did not match any pattern in the list. */
   return 0;
}
static struct ast_channel* sig_pri_new_ast_channel ( struct sig_pri_chan p,
int  state,
int  ulaw,
int  transfercapability,
char *  exten,
const struct ast_channel requestor 
) [static, read]
static void sig_pri_open_media ( struct sig_pri_chan p) [static]
static void sig_pri_party_id_convert ( struct ast_party_id ast_id,
const struct pri_party_id *  pri_id,
struct sig_pri_span pri 
) [static]

Definition at line 1971 of file sig_pri.c.

References sig_pri_party_name_convert(), ast_party_id::name, sig_pri_party_number_convert(), ast_party_id::number, and ast_party_id::subaddress.

Referenced by sig_pri_redirecting_convert(), and sig_pri_handle_subcmds().

{
   if (pri_id->name.valid) {
      sig_pri_party_name_convert(&ast_id->name, &pri_id->name);
   }
   if (pri_id->number.valid) {
      sig_pri_party_number_convert(&ast_id->number, &pri_id->number, pri);
   }
#if defined(HAVE_PRI_SUBADDR)
   if (pri_id->subaddress.valid) {
      sig_pri_set_subaddress(&ast_id->subaddress, &pri_id->subaddress);
   }
#endif   /* defined(HAVE_PRI_SUBADDR) */
}
static void sig_pri_party_id_from_ast ( struct pri_party_id *  pri_id,
const struct ast_party_id ast_id 
) [static]

Definition at line 837 of file sig_pri.c.

References sig_pri_party_name_from_ast(), ast_party_id::name, sig_pri_party_number_from_ast(), ast_party_id::number, and ast_party_id::subaddress.

Referenced by sig_pri_redirecting_update(), and sig_pri_indicate().

{
   sig_pri_party_name_from_ast(&pri_id->name, &ast_id->name);
   sig_pri_party_number_from_ast(&pri_id->number, &ast_id->number);
#if defined(HAVE_PRI_SUBADDR)
   sig_pri_party_subaddress_from_ast(&pri_id->subaddress, &ast_id->subaddress);
#endif   /* defined(HAVE_PRI_SUBADDR) */
}
static void sig_pri_party_name_convert ( struct ast_party_name ast_name,
const struct pri_party_name *  pri_name 
) [static]

Definition at line 1924 of file sig_pri.c.

References ast_party_name::str, ast_strdup, ast_party_name::char_set, pri_to_ast_char_set(), ast_party_name::presentation, pri_to_ast_presentation(), and ast_party_name::valid.

Referenced by sig_pri_party_id_convert().

{
   ast_name->str = ast_strdup(pri_name->str);
   ast_name->char_set = pri_to_ast_char_set(pri_name->char_set);
   ast_name->presentation = pri_to_ast_presentation(pri_name->presentation);
   ast_name->valid = 1;
}
static void sig_pri_party_name_from_ast ( struct pri_party_name *  pri_name,
const struct ast_party_name ast_name 
) [static]

Definition at line 787 of file sig_pri.c.

References ast_party_name::valid, ast_to_pri_presentation(), ast_party_name::presentation, ast_to_pri_char_set(), ast_party_name::char_set, ast_strlen_zero(), ast_party_name::str, and ast_copy_string().

Referenced by sig_pri_party_id_from_ast().

{
   if (!ast_name->valid) {
      return;
   }
   pri_name->valid = 1;
   pri_name->presentation = ast_to_pri_presentation(ast_name->presentation);
   pri_name->char_set = ast_to_pri_char_set(ast_name->char_set);
   if (!ast_strlen_zero(ast_name->str)) {
      ast_copy_string(pri_name->str, ast_name->str, sizeof(pri_name->str));
   }
}
static void sig_pri_party_number_convert ( struct ast_party_number ast_number,
const struct pri_party_number *  pri_number,
struct sig_pri_span pri 
) [static]

Definition at line 1946 of file sig_pri.c.

References AST_MAX_EXTENSION, apply_plan_to_number(), ast_party_number::str, ast_strdup, ast_party_number::plan, ast_party_number::presentation, pri_to_ast_presentation(), and ast_party_number::valid.

Referenced by sig_pri_party_id_convert().

{
   char number[AST_MAX_EXTENSION];

   apply_plan_to_number(number, sizeof(number), pri, pri_number->str, pri_number->plan);
   ast_number->str = ast_strdup(number);
   ast_number->plan = pri_number->plan;
   ast_number->presentation = pri_to_ast_presentation(pri_number->presentation);
   ast_number->valid = 1;
}
static void sig_pri_party_number_from_ast ( struct pri_party_number *  pri_number,
const struct ast_party_number ast_number 
) [static]

Definition at line 812 of file sig_pri.c.

References ast_party_number::valid, ast_to_pri_presentation(), ast_party_number::presentation, ast_party_number::plan, ast_strlen_zero(), ast_party_number::str, and ast_copy_string().

Referenced by sig_pri_party_id_from_ast().

{
   if (!ast_number->valid) {
      return;
   }
   pri_number->valid = 1;
   pri_number->presentation = ast_to_pri_presentation(ast_number->presentation);
   pri_number->plan = ast_number->plan;
   if (!ast_strlen_zero(ast_number->str)) {
      ast_copy_string(pri_number->str, ast_number->str, sizeof(pri_number->str));
   }
}
static int sig_pri_play_tone ( struct sig_pri_chan p,
enum sig_pri_tone  tone 
) [static]

Definition at line 903 of file sig_pri.c.

References sig_pri_chan::calls, sig_pri_callback::play_tone, and sig_pri_chan::chan_pvt.

Referenced by pri_ss_thread(), and sig_pri_indicate().

{
   if (p->calls->play_tone)
      return p->calls->play_tone(p->chan_pvt, tone);
   else
      return -1;
}
static void sig_pri_redirecting_convert ( struct ast_party_redirecting ast_redirecting,
const struct pri_party_redirecting *  pri_redirecting,
const struct ast_party_redirecting ast_guide,
struct sig_pri_span pri 
) [static]

Definition at line 2001 of file sig_pri.c.

References ast_party_redirecting_set_init(), sig_pri_party_id_convert(), ast_party_redirecting::from, ast_party_redirecting::to, ast_party_redirecting::count, ast_party_redirecting::reason, and pri_to_ast_reason().

Referenced by sig_pri_handle_subcmds().

{
   ast_party_redirecting_set_init(ast_redirecting, ast_guide);

   sig_pri_party_id_convert(&ast_redirecting->from, &pri_redirecting->from, pri);
   sig_pri_party_id_convert(&ast_redirecting->to, &pri_redirecting->to, pri);
   ast_redirecting->count = pri_redirecting->count;
   ast_redirecting->reason = pri_to_ast_reason(pri_redirecting->reason);
}
static void sig_pri_redirecting_update ( struct sig_pri_chan pvt,
struct ast_channel ast 
) [static]
Todo:
XXX Original called data can be put in a channel data store that is inherited.

Definition at line 858 of file sig_pri.c.

References sig_pri_party_id_from_ast(), ast_channel::redirecting, ast_party_redirecting::from, ast_party_redirecting::to, ast_party_redirecting::count, ast_to_pri_reason(), ast_party_redirecting::reason, sig_pri_chan::pri, sig_pri_span::pri, and sig_pri_chan::call.

Referenced by sig_pri_call(), and sig_pri_indicate().

{
   struct pri_party_redirecting pri_redirecting;

/*! \todo XXX Original called data can be put in a channel data store that is inherited. */

   memset(&pri_redirecting, 0, sizeof(pri_redirecting));
   sig_pri_party_id_from_ast(&pri_redirecting.from, &ast->redirecting.from);
   sig_pri_party_id_from_ast(&pri_redirecting.to, &ast->redirecting.to);
   pri_redirecting.count = ast->redirecting.count;
   pri_redirecting.reason = ast_to_pri_reason(ast->redirecting.reason);

   pri_redirecting_update(pvt->pri->pri, pvt->call, &pri_redirecting);
}
struct ast_channel* sig_pri_request ( struct sig_pri_chan p,
enum sig_pri_law  law,
const struct ast_channel requestor,
int  transfercapability 
) [read]

Definition at line 981 of file sig_pri.c.

References ast_log(), LOG_DEBUG, sig_pri_chan::channel, sig_pri_chan::outgoing, sig_pri_new_ast_channel(), AST_STATE_RESERVED, and sig_pri_chan::exten.

Referenced by dahdi_request(), and pri_dchannel().

{
   struct ast_channel *ast;

   ast_log(LOG_DEBUG, "%s %d\n", __FUNCTION__, p->channel);

   p->outgoing = 1;
   ast = sig_pri_new_ast_channel(p, AST_STATE_RESERVED, law, transfercapability, p->exten, requestor);
   if (!ast) {
      p->outgoing = 0;
   }
   return ast;
}
void sig_pri_set_alarm ( struct sig_pri_chan p,
int  in_alarm 
)

Definition at line 181 of file sig_pri.c.

References sig_pri_chan::resetting, sig_pri_chan::inalarm, sig_pri_chan::calls, sig_pri_callback::set_alarm, and sig_pri_chan::chan_pvt.

Referenced by mkintf(), pri_dchannel(), and sig_pri_chan_alarm_notify().

{
   /*
    * Clear the channel restart flag when the channel alarm changes
    * to prevent the flag from getting stuck when the link goes
    * down.
    */
   p->resetting = 0;

   p->inalarm = in_alarm;
   if (p->calls->set_alarm) {
      p->calls->set_alarm(p->chan_pvt, in_alarm);
   }
}
static void sig_pri_set_caller_id ( struct sig_pri_chan p) [static]

Definition at line 244 of file sig_pri.c.

References sig_pri_chan::calls, sig_pri_callback::set_callerid, ast_party_caller_init(), ast_party_caller::id, ast_party_id::name, ast_party_name::str, sig_pri_chan::cid_name, ast_party_name::presentation, sig_pri_chan::callingpres, ast_party_name::valid, ast_party_id::number, ast_party_number::str, sig_pri_chan::cid_num, ast_party_number::plan, sig_pri_chan::cid_ton, ast_party_number::presentation, ast_party_number::valid, ast_strlen_zero(), sig_pri_chan::cid_subaddr, ast_party_id::subaddress, ast_party_subaddress::valid, ast_party_subaddress::str, ast_party_id::tag, sig_pri_chan::user_tag, ast_party_caller::ani, sig_pri_chan::cid_ani, ast_party_caller::ani2, sig_pri_chan::cid_ani2, and sig_pri_chan::chan_pvt.

Referenced by sig_pri_handle_subcmds(), and pri_dchannel().

{
   struct ast_party_caller caller;

   if (p->calls->set_callerid) {
      ast_party_caller_init(&caller);

      caller.id.name.str = p->cid_name;
      caller.id.name.presentation = p->callingpres;
      caller.id.name.valid = 1;

      caller.id.number.str = p->cid_num;
      caller.id.number.plan = p->cid_ton;
      caller.id.number.presentation = p->callingpres;
      caller.id.number.valid = 1;

      if (!ast_strlen_zero(p->cid_subaddr)) {
         caller.id.subaddress.valid = 1;
         //caller.id.subaddress.type = 0;/* nsap */
         //caller.id.subaddress.odd_even_indicator = 0;
         caller.id.subaddress.str = p->cid_subaddr;
      }
      caller.id.tag = p->user_tag;

      caller.ani.number.str = p->cid_ani;
      //caller.ani.number.plan = p->xxx;
      //caller.ani.number.presentation = p->xxx;
      caller.ani.number.valid = 1;

      caller.ani2 = p->cid_ani2;
      p->calls->set_callerid(p->chan_pvt, &caller);
   }
}
static void sig_pri_set_dialing ( struct sig_pri_chan p,
int  is_dialing 
) [static]
static void sig_pri_set_digital ( struct sig_pri_chan p,
int  is_digital 
) [static]
static void sig_pri_set_dnid ( struct sig_pri_chan p,
const char *  dnid 
) [static]

Definition at line 288 of file sig_pri.c.

References sig_pri_chan::calls, sig_pri_callback::set_dnid, and sig_pri_chan::chan_pvt.

Referenced by pri_dchannel().

{
   if (p->calls->set_dnid) {
      p->calls->set_dnid(p->chan_pvt, dnid);
   }
}
static int sig_pri_set_echocanceller ( struct sig_pri_chan p,
int  enable 
) [static]

Definition at line 889 of file sig_pri.c.

References sig_pri_chan::calls, sig_pri_callback::set_echocanceller, and sig_pri_chan::chan_pvt.

Referenced by pri_ss_thread(), and pri_dchannel().

{
   if (p->calls->set_echocanceller)
      return p->calls->set_echocanceller(p->chan_pvt, enable);
   else
      return -1;
}
static void sig_pri_set_rdnis ( struct sig_pri_chan p,
const char *  rdnis 
) [static]

Definition at line 305 of file sig_pri.c.

References sig_pri_chan::calls, sig_pri_callback::set_rdnis, and sig_pri_chan::chan_pvt.

Referenced by pri_dchannel().

{
   if (p->calls->set_rdnis) {
      p->calls->set_rdnis(p->chan_pvt, rdnis);
   }
}
static void sig_pri_sort_pri_chans ( struct sig_pri_span pri) [static]

Definition at line 7422 of file sig_pri.c.

References sig_pri_span::pvts, sig_pri_span::numchans, and sig_pri_cmp_pri_chans().

Referenced by sig_pri_start_pri().

{
   qsort(&pri->pvts, pri->numchans, sizeof(pri->pvts[0]), sig_pri_cmp_pri_chans);
}
static void sig_pri_span_devstate_changed ( struct sig_pri_span pri) [static]
int sig_pri_start_pri ( struct sig_pri_span pri)

Definition at line 7427 of file sig_pri.c.

References ast_str_alloca, ARRAY_LEN, ast_event_unsubscribe(), ast_mutex_init, sig_pri_span::lock, sig_pri_sort_pri_chans(), strsep(), ast_strip(), ast_strlen_zero(), ast_str_set(), sig_pri_span::span, ast_event_subscribe(), AST_EVENT_MWI, ast_str_buffer(), AST_EVENT_IE_MAILBOX, AST_EVENT_IE_PLTYPE_STR, AST_EVENT_IE_CONTEXT, AST_EVENT_IE_END, ast_log(), LOG_ERROR, SIG_PRI_NUM_DCHANS, sig_pri_span::fds, sig_pri_span::sig, SIG_BRI, sig_pri_span::dchans, sig_pri_span::nodetype, sig_pri_span::switchtype, SIG_BRI_PTMP, sig_pri_span::overlapdial, DAHDI_OVERLAPDIAL_OUTGOING, sig_pri_span::qsigchannelmapping, DAHDI_CHAN_MAPPING_LOGICAL, SIG_PRI_DEBUG_DEFAULT, sig_pri_span::nsf, sig_pri_span::pritimers, sig_pri_span::pri, sig_pri_span::resetpos, ast_pthread_create_background, sig_pri_span::master, pri_dchannel(), and errno.

Referenced by setup_dahdi_int().

{
   int x;
   int i;
#if defined(HAVE_PRI_MWI)
   char *saveptr;
   char *mbox_number;
   char *mbox_context;
   struct ast_str *mwi_description = ast_str_alloca(64);
#endif   /* defined(HAVE_PRI_MWI) */

#if defined(HAVE_PRI_MWI)
   /* Prepare the mbox[] for use. */
   for (i = 0; i < ARRAY_LEN(pri->mbox); ++i) {
      if (pri->mbox[i].sub) {
         pri->mbox[i].sub = ast_event_unsubscribe(pri->mbox[i].sub);
      }
   }
#endif   /* defined(HAVE_PRI_MWI) */

   ast_mutex_init(&pri->lock);
   sig_pri_sort_pri_chans(pri);

#if defined(HAVE_PRI_MWI)
   /*
    * Split the mwi_mailboxes configuration string into the mbox[]:
    * mailbox_number[@context]{,mailbox_number[@context]}
    */
   i = 0;
   saveptr = pri->mwi_mailboxes;
   while (i < ARRAY_LEN(pri->mbox)) {
      mbox_number = strsep(&saveptr, ",");
      if (!mbox_number) {
         break;
      }
      /* Split the mailbox_number and context */
      mbox_context = strchr(mbox_number, '@');
      if (mbox_context) {
         *mbox_context++ = '\0';
         mbox_context = ast_strip(mbox_context);
      }
      mbox_number = ast_strip(mbox_number);
      if (ast_strlen_zero(mbox_number)) {
         /* There is no mailbox number.  Skip it. */
         continue;
      }
      if (ast_strlen_zero(mbox_context)) {
         /* There was no context so use the default. */
         mbox_context = "default";
      }

      /* Fill the mbox[] element. */
      ast_str_set(&mwi_description, -1, "%s span %d[%d] MWI mailbox %s@%s",
         sig_pri_cc_type_name, pri->span, i, mbox_number, mbox_context);
      pri->mbox[i].sub = ast_event_subscribe(AST_EVENT_MWI, sig_pri_mwi_event_cb,
         ast_str_buffer(mwi_description), pri,
         AST_EVENT_IE_MAILBOX, AST_EVENT_IE_PLTYPE_STR, mbox_number,
         AST_EVENT_IE_CONTEXT, AST_EVENT_IE_PLTYPE_STR, mbox_context,
         AST_EVENT_IE_END);
      if (!pri->mbox[i].sub) {
         ast_log(LOG_ERROR, "%s span %d could not subscribe to MWI events for %s@%s.",
            sig_pri_cc_type_name, pri->span, mbox_number, mbox_context);
         continue;
      }
      pri->mbox[i].number = mbox_number;
      pri->mbox[i].context = mbox_context;
      ++i;
   }
#endif   /* defined(HAVE_PRI_MWI) */

   for (i = 0; i < SIG_PRI_NUM_DCHANS; i++) {
      if (pri->fds[i] == -1) {
         break;
      }

      switch (pri->sig) {
      case SIG_BRI:
         pri->dchans[i] = pri_new_bri(pri->fds[i], 1, pri->nodetype, pri->switchtype);
         break;
      case SIG_BRI_PTMP:
         pri->dchans[i] = pri_new_bri(pri->fds[i], 0, pri->nodetype, pri->switchtype);
         break;
      default:
         pri->dchans[i] = pri_new(pri->fds[i], pri->nodetype, pri->switchtype);
#if defined(HAVE_PRI_SERVICE_MESSAGES)
         if (pri->enable_service_message_support) {
            pri_set_service_message_support(pri->dchans[i], 1);
         }
#endif   /* defined(HAVE_PRI_SERVICE_MESSAGES) */
         break;
      }

      pri_set_overlapdial(pri->dchans[i], (pri->overlapdial & DAHDI_OVERLAPDIAL_OUTGOING) ? 1 : 0);
#ifdef HAVE_PRI_PROG_W_CAUSE
      pri_set_chan_mapping_logical(pri->dchans[i], pri->qsigchannelmapping == DAHDI_CHAN_MAPPING_LOGICAL);
#endif
#ifdef HAVE_PRI_INBANDDISCONNECT
      pri_set_inbanddisconnect(pri->dchans[i], pri->inbanddisconnect);
#endif
      /* Enslave to master if appropriate */
      if (i)
         pri_enslave(pri->dchans[0], pri->dchans[i]);
      if (!pri->dchans[i]) {
         if (pri->fds[i] > 0)
            close(pri->fds[i]);
         pri->fds[i] = -1;
         ast_log(LOG_ERROR, "Unable to create PRI structure\n");
         return -1;
      }
      pri_set_debug(pri->dchans[i], SIG_PRI_DEBUG_DEFAULT);
      pri_set_nsf(pri->dchans[i], pri->nsf);
#ifdef PRI_GETSET_TIMERS
      for (x = 0; x < PRI_MAX_TIMERS; x++) {
         if (pri->pritimers[x] != 0)
            pri_set_timer(pri->dchans[i], x, pri->pritimers[x]);
      }
#endif
   }

   /* Assume primary is the one we use */
   pri->pri = pri->dchans[0];

#if defined(HAVE_PRI_CALL_HOLD)
   pri_hold_enable(pri->pri, 1);
#endif   /* defined(HAVE_PRI_CALL_HOLD) */
#if defined(HAVE_PRI_CALL_REROUTING)
   pri_reroute_enable(pri->pri, 1);
#endif   /* defined(HAVE_PRI_CALL_REROUTING) */
#if defined(HAVE_PRI_HANGUP_FIX)
   pri_hangup_fix_enable(pri->pri, 1);
#endif   /* defined(HAVE_PRI_HANGUP_FIX) */
#if defined(HAVE_PRI_CCSS)
   pri_cc_enable(pri->pri, 1);
   pri_cc_recall_mode(pri->pri, pri->cc_ptmp_recall_mode);
   pri_cc_retain_signaling_req(pri->pri, pri->cc_qsig_signaling_link_req);
   pri_cc_retain_signaling_rsp(pri->pri, pri->cc_qsig_signaling_link_rsp);
#endif   /* defined(HAVE_PRI_CCSS) */
#if defined(HAVE_PRI_TRANSFER)
   pri_transfer_enable(pri->pri, 1);
#endif   /* defined(HAVE_PRI_TRANSFER) */
#if defined(HAVE_PRI_AOC_EVENTS)
   pri_aoc_events_enable(pri->pri, 1);
#endif   /* defined(HAVE_PRI_AOC_EVENTS) */
#if defined(HAVE_PRI_CALL_WAITING)
   pri_connect_ack_enable(pri->pri, 1);
#endif   /* defined(HAVE_PRI_CALL_WAITING) */
#if defined(HAVE_PRI_MCID)
   pri_mcid_enable(pri->pri, 1);
#endif   /* defined(HAVE_PRI_MCID) */
#if defined(HAVE_PRI_L2_PERSISTENCE)
   pri_persistent_layer2_option(pri->pri, pri->l2_persistence);
#endif   /* defined(HAVE_PRI_L2_PERSISTENCE) */

   pri->resetpos = -1;
   if (ast_pthread_create_background(&pri->master, NULL, pri_dchannel, pri)) {
      for (i = 0; i < SIG_PRI_NUM_DCHANS; i++) {
         if (!pri->dchans[i])
            break;
         if (pri->fds[i] > 0)
            close(pri->fds[i]);
         pri->fds[i] = -1;
      }
      ast_log(LOG_ERROR, "Unable to spawn D-channel: %s\n", strerror(errno));
      return -1;
   }

#if defined(HAVE_PRI_MWI)
   /*
    * Send the initial MWI indications from the event cache for this span.
    *
    * If we were loaded after app_voicemail the event would already be in
    * the cache.  If we were loaded before app_voicemail the event would not
    * be in the cache yet and app_voicemail will send the event when it
    * gets loaded.
    */
   sig_pri_mwi_cache_update(pri);
#endif   /* defined(HAVE_PRI_MWI) */

   return 0;
}
void sig_pri_stop_pri ( struct sig_pri_span pri)

Stop PRI span.

Since:
1.8
Parameters:
priPRI span control structure.
Returns:
Nothing

Definition at line 7362 of file sig_pri.c.

References ARRAY_LEN, and ast_event_unsubscribe().

Referenced by __unload_module().

{
#if defined(HAVE_PRI_MWI)
   int idx;
#endif   /* defined(HAVE_PRI_MWI) */

#if defined(HAVE_PRI_MWI)
   for (idx = 0; idx < ARRAY_LEN(pri->mbox); ++idx) {
      if (pri->mbox[idx].sub) {
         pri->mbox[idx].sub = ast_event_unsubscribe(pri->mbox[idx].sub);
      }
   }
#endif   /* defined(HAVE_PRI_MWI) */
}
void sig_pri_unload ( void  )

Unload the sig_pri submodule.

Since:
1.8
Returns:
Nothing

Definition at line 8469 of file sig_pri.c.

References ao2_ref.

Referenced by __unload_module().

{
#if defined(HAVE_PRI_CCSS)
   if (sig_pri_cc_monitors) {
      ao2_ref(sig_pri_cc_monitors, -1);
      sig_pri_cc_monitors = NULL;
   }
#endif   /* defined(HAVE_PRI_CCSS) */
}

Variable Documentation

int pri_gendigittimeout = 8000 [static]

Definition at line 103 of file sig_pri.c.

Referenced by pri_ss_thread().

int pri_matchdigittimeout = 3000 [static]

Definition at line 101 of file sig_pri.c.

Referenced by pri_ss_thread().

struct ast_app_option sig_pri_call_opts[128] = { [ 'K' ] = { .flag = OPT_KEYPAD , .arg_index = OPT_ARG_KEYPAD + 1 }, [ 'R' ] = { .flag = OPT_REVERSE_CHARGE }, [ 'A' ] = { .flag = OPT_AOC_REQUEST , .arg_index = OPT_ARG_AOC_REQUEST + 1 }, } [static]

Definition at line 6397 of file sig_pri.c.

Referenced by sig_pri_call().