channels/chan_dahdi.c

   1 /*
   2  * Asterisk -- An open source telephony toolkit.
   3  *
   4  * Copyright (C) 1999 - 2008, Digium, Inc.
   5  *
   6  * Mark Spencer <markster@digium.com>
   7  *
   8  * See http://www.asterisk.org for more information about
   9  * the Asterisk project. Please do not directly contact
  10  * any of the maintainers of this project for assistance;
  11  * the project provides a web site, mailing lists and IRC
  12  * channels for your use.
  13  *
  14  * This program is free software, distributed under the terms of
  15  * the GNU General Public License Version 2. See the LICENSE file
  16  * at the top of the source tree.
  17  */
  18
  19 /*! \file
  20  *
  21  * \brief DAHDI for Pseudo TDM
  22  *
  23  * \author Mark Spencer <markster@digium.com>
  24  *
  25  * Connects to the DAHDI telephony library as well as
  26  * libpri. Libpri is optional and needed only if you are
  27  * going to use ISDN connections.
  28  *
  29  * You need to install libraries before you attempt to compile
  30  * and install the DAHDI channel.
  31  *
  32  * \ingroup channel_drivers
  33  *
  34  * \todo Deprecate the "musiconhold" configuration option post 1.4
  35  */
  36
  37 /*! \li \ref chan_dahdi.c uses the configuration file \ref chan_dahdi.conf
  38  * \addtogroup configuration_file
  39  */
  40
  41 /*! \page chan_dahdi.conf chan_dahdi.conf
  42  * \verbinclude chan_dahdi.conf.sample
  43  */
  44
  45 /*** MODULEINFO
  46         <use type="module">res_smdi</use>
  47         <depend>dahdi</depend>
  48         <depend>tonezone</depend>
  49         <use type="external">pri</use>
  50         <use type="external">ss7</use>
  51         <use type="external">openr2</use>
  52         <support_level>core</support_level>
  53  ***/
  54
  55 #include "asterisk.h"
  56
  57 ASTERISK_REGISTER_FILE()
  58
  59 #if defined(__NetBSD__) || defined(__FreeBSD__)
  60 #include <pthread.h>
  61 #include <signal.h>
  62 #else
  63 #include <sys/signal.h>
  64 #endif
  65 #include <sys/stat.h>
  66 #include <math.h>
  67
  68 #include "sig_analog.h"
  69 /* Analog signaling is currently still present in chan_dahdi for use with
  70  * radio. Sig_analog does not currently handle any radio operations. If
  71  * radio only uses analog signaling, then the radio handling logic could
  72  * be placed in sig_analog and the duplicated code could be removed.
  73  */
  74
  75 #if defined(HAVE_PRI)
  76 #include "sig_pri.h"
  77 #ifndef PRI_RESTART
  78 #error "Upgrade your libpri"
  79 #endif
  80 #endif  /* defined(HAVE_PRI) */
  81
  82 #if defined(HAVE_SS7)
  83 #include "sig_ss7.h"
  84 #if !defined(LIBSS7_ABI_COMPATIBILITY)
  85 #error "Upgrade your libss7"
  86 #elif LIBSS7_ABI_COMPATIBILITY != 2
  87 #error "Your installed libss7 is not compatible"
  88 #endif
  89 #endif  /* defined(HAVE_SS7) */
  90
  91 #if defined(HAVE_OPENR2)
  92 /* put this here until sig_mfcr2 comes along */
  93 #define SIG_MFCR2_MAX_CHANNELS  672             /*!< No more than a DS3 per trunk group */
  94 #endif  /* defined(HAVE_OPENR2) */
  95
  96 #include "asterisk/lock.h"
  97 #include "asterisk/channel.h"
  98 #include "asterisk/config.h"
  99 #include "asterisk/module.h"
 100 #include "asterisk/pbx.h"
 101 #include "asterisk/file.h"
 102 #include "asterisk/ulaw.h"
 103 #include "asterisk/alaw.h"
 104 #include "asterisk/callerid.h"
 105 #include "asterisk/adsi.h"
 106 #include "asterisk/cli.h"
 107 #include "asterisk/pickup.h"
 108 #include "asterisk/features.h"
 109 #include "asterisk/musiconhold.h"
 110 #include "asterisk/say.h"
 111 #include "asterisk/tdd.h"
 112 #include "asterisk/app.h"
 113 #include "asterisk/dsp.h"
 114 #include "asterisk/astdb.h"
 115 #include "asterisk/manager.h"
 116 #include "asterisk/causes.h"
 117 #include "asterisk/term.h"
 118 #include "asterisk/utils.h"
 119 #include "asterisk/transcap.h"
 120 #include "asterisk/stringfields.h"
 121 #include "asterisk/abstract_jb.h"
 122 #include "asterisk/smdi.h"
 123 #include "asterisk/devicestate.h"
 124 #include "asterisk/paths.h"
 125 #include "asterisk/ccss.h"
 126 #include "asterisk/data.h"
 127 #include "asterisk/features_config.h"
 128 #include "asterisk/bridge.h"
 129 #include "asterisk/stasis_channels.h"
 130 #include "asterisk/parking.h"
 131 #include "asterisk/format_cache.h"
 132 #include "chan_dahdi.h"
 133 #include "dahdi/bridge_native_dahdi.h"
 134
 135 /*** DOCUMENTATION
 136         <application name="DAHDISendKeypadFacility" language="en_US">
 137                 <synopsis>
 138                         Send digits out of band over a PRI.
 139                 </synopsis>
 140                 <syntax>
 141                         <parameter name="digits" required="true" />
 142                 </syntax>
 143                 <description>
 144                         <para>This application will send the given string of digits in a Keypad
 145                         Facility IE over the current channel.</para>
 146                 </description>
 147         </application>
 148         <application name="DAHDISendCallreroutingFacility" language="en_US">
 149                 <synopsis>
 150                         Send an ISDN call rerouting/deflection facility message.
 151                 </synopsis>
 152                 <syntax argsep=",">
 153                         <parameter name="destination" required="true">
 154                                 <para>Destination number.</para>
 155                         </parameter>
 156                         <parameter name="original">
 157                                 <para>Original called number.</para>
 158                         </parameter>
 159                         <parameter name="reason">
 160                                 <para>Diversion reason, if not specified defaults to <literal>unknown</literal></para>
 161                         </parameter>
 162                 </syntax>
 163                 <description>
 164                         <para>This application will send an ISDN switch specific call
 165                         rerouting/deflection facility message over the current channel.
 166                         Supported switches depend upon the version of libpri in use.</para>
 167                 </description>
 168         </application>
 169         <application name="DAHDIAcceptR2Call" language="en_US">
 170                 <synopsis>
 171                         Accept an R2 call if its not already accepted (you still need to answer it)
 172                 </synopsis>
 173                 <syntax>
 174                         <parameter name="charge" required="true">
 175                                 <para>Yes or No.</para>
 176                                 <para>Whether you want to accept the call with charge or without charge.</para>
 177                         </parameter>
 178                 </syntax>
 179                 <description>
 180                         <para>This application will Accept the R2 call either with charge or no charge.</para>
 181                 </description>
 182         </application>
 183         <manager name="DAHDITransfer" language="en_US">
 184                 <synopsis>
 185                         Transfer DAHDI Channel.
 186                 </synopsis>
 187                 <syntax>
 188                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 189                         <parameter name="DAHDIChannel" required="true">
 190                                 <para>DAHDI channel number to transfer.</para>
 191                         </parameter>
 192                 </syntax>
 193                 <description>
 194                         <para>Simulate a flash hook event by the user connected to the channel.</para>
 195                         <note><para>Valid only for analog channels.</para></note>
 196                 </description>
 197         </manager>
 198         <manager name="DAHDIHangup" language="en_US">
 199                 <synopsis>
 200                         Hangup DAHDI Channel.
 201                 </synopsis>
 202                 <syntax>
 203                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 204                         <parameter name="DAHDIChannel" required="true">
 205                                 <para>DAHDI channel number to hangup.</para>
 206                         </parameter>
 207                 </syntax>
 208                 <description>
 209                         <para>Simulate an on-hook event by the user connected to the channel.</para>
 210                         <note><para>Valid only for analog channels.</para></note>
 211                 </description>
 212         </manager>
 213         <manager name="DAHDIDialOffhook" language="en_US">
 214                 <synopsis>
 215                         Dial over DAHDI channel while offhook.
 216                 </synopsis>
 217                 <syntax>
 218                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 219                         <parameter name="DAHDIChannel" required="true">
 220                                 <para>DAHDI channel number to dial digits.</para>
 221                         </parameter>
 222                         <parameter name="Number" required="true">
 223                                 <para>Digits to dial.</para>
 224                         </parameter>
 225                 </syntax>
 226                 <description>
 227                         <para>Generate DTMF control frames to the bridged peer.</para>
 228                 </description>
 229         </manager>
 230         <manager name="DAHDIDNDon" language="en_US">
 231                 <synopsis>
 232                         Toggle DAHDI channel Do Not Disturb status ON.
 233                 </synopsis>
 234                 <syntax>
 235                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 236                         <parameter name="DAHDIChannel" required="true">
 237                                 <para>DAHDI channel number to set DND on.</para>
 238                         </parameter>
 239                 </syntax>
 240                 <description>
 241                         <para>Equivalent to the CLI command "dahdi set dnd <variable>channel</variable> on".</para>
 242                         <note><para>Feature only supported by analog channels.</para></note>
 243                 </description>
 244         </manager>
 245         <manager name="DAHDIDNDoff" language="en_US">
 246                 <synopsis>
 247                         Toggle DAHDI channel Do Not Disturb status OFF.
 248                 </synopsis>
 249                 <syntax>
 250                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 251                         <parameter name="DAHDIChannel" required="true">
 252                                 <para>DAHDI channel number to set DND off.</para>
 253                         </parameter>
 254                 </syntax>
 255                 <description>
 256                         <para>Equivalent to the CLI command "dahdi set dnd <variable>channel</variable> off".</para>
 257                         <note><para>Feature only supported by analog channels.</para></note>
 258                 </description>
 259         </manager>
 260         <manager name="DAHDIShowChannels" language="en_US">
 261                 <synopsis>
 262                         Show status of DAHDI channels.
 263                 </synopsis>
 264                 <syntax>
 265                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 266                         <parameter name="DAHDIChannel">
 267                                 <para>Specify the specific channel number to show.  Show all channels if zero or not present.</para>
 268                         </parameter>
 269                 </syntax>
 270                 <description>
 271                         <para>Similar to the CLI command "dahdi show channels".</para>
 272                 </description>
 273         </manager>
 274         <manager name="DAHDIRestart" language="en_US">
 275                 <synopsis>
 276                         Fully Restart DAHDI channels (terminates calls).
 277                 </synopsis>
 278                 <syntax>
 279                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 280                 </syntax>
 281                 <description>
 282                         <para>Equivalent to the CLI command "dahdi restart".</para>
 283                 </description>
 284         </manager>
 285         <manager name="PRIShowSpans" language="en_US">
 286                 <synopsis>
 287                         Show status of PRI spans.
 288                 </synopsis>
 289                 <syntax>
 290                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 291                         <parameter name="Span">
 292                                 <para>Specify the specific span to show.  Show all spans if zero or not present.</para>
 293                         </parameter>
 294                 </syntax>
 295                 <description>
 296                         <para>Similar to the CLI command "pri show spans".</para>
 297                 </description>
 298         </manager>
 299         <manager name="PRIDebugSet" language="en_US">
 300                 <synopsis>
 301                         Set PRI debug levels for a span
 302                 </synopsis>
 303                 <syntax>
 304                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 305                         <parameter name="Span" required="true">
 306                                 <para>Which span to affect.</para>
 307                         </parameter>
 308                         <parameter name="Level" required="true">
 309                                 <para>What debug level to set. May be a numerical value or a text value from the list below</para>
 310                                 <enumlist>
 311                                         <enum name="off" />
 312                                         <enum name="on" />
 313                                         <enum name="hex" />
 314                                         <enum name="intense" />
 315                                 </enumlist>
 316                         </parameter>
 317                 </syntax>
 318                 <description>
 319                         <para>Equivalent to the CLI command "pri set debug &lt;level&gt; span &lt;span&gt;".</para>
 320                 </description>
 321         </manager>
 322         <manager name="PRIDebugFileSet" language="en_US">
 323                 <synopsis>
 324                         Set the file used for PRI debug message output
 325                 </synopsis>
 326                 <syntax>
 327                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 328                         <parameter name="File" required="true">
 329                                 <para>Path of file to write debug output.</para>
 330                         </parameter>
 331                 </syntax>
 332                 <description>
 333                         <para>Equivalent to the CLI command "pri set debug file &lt;output-file&gt;"</para>
 334                 </description>
 335         </manager>
 336         <manager name="PRIDebugFileUnset" language="en_US">
 337                 <synopsis>
 338                         Disables file output for PRI debug messages
 339                 </synopsis>
 340                 <syntax>
 341                         <xi:include xpointer="xpointer(/docs/manager[@name='Login']/syntax/parameter[@name='ActionID'])" />
 342                 </syntax>
 343         </manager>
 344         <managerEvent language="en_US" name="AlarmClear">
 345                 <managerEventInstance class="EVENT_FLAG_SYSTEM">
 346                         <synopsis>Raised when an alarm is cleared on a DAHDI channel.</synopsis>
 347                         <syntax>
 348                                 <parameter name="DAHDIChannel">
 349                                         <para>The DAHDI channel on which the alarm was cleared.</para>
 350                                         <note><para>This is not an Asterisk channel identifier.</para></note>
 351                                 </parameter>
 352                         </syntax>
 353                 </managerEventInstance>
 354         </managerEvent>
 355         <managerEvent language="en_US" name="SpanAlarmClear">
 356                 <managerEventInstance class="EVENT_FLAG_SYSTEM">
 357                         <synopsis>Raised when an alarm is cleared on a DAHDI span.</synopsis>
 358                         <syntax>
 359                                 <parameter name="Span">
 360                                         <para>The span on which the alarm was cleared.</para>
 361                                 </parameter>
 362                         </syntax>
 363                 </managerEventInstance>
 364         </managerEvent>
 365         <managerEvent language="en_US" name="DNDState">
 366                 <managerEventInstance class="EVENT_FLAG_SYSTEM">
 367                         <synopsis>Raised when the Do Not Disturb state is changed on a DAHDI channel.</synopsis>
 368                         <syntax>
 369                                 <parameter name="DAHDIChannel">
 370                                         <para>The DAHDI channel on which DND status changed.</para>
 371                                         <note><para>This is not an Asterisk channel identifier.</para></note>
 372                                 </parameter>
 373                                 <parameter name="Status">
 374                                         <enumlist>
 375                                                 <enum name="enabled"/>
 376                                                 <enum name="disabled"/>
 377                                         </enumlist>
 378                                 </parameter>
 379                         </syntax>
 380                 </managerEventInstance>
 381         </managerEvent>
 382         <managerEvent language="en_US" name="Alarm">
 383                 <managerEventInstance class="EVENT_FLAG_SYSTEM">
 384                         <synopsis>Raised when an alarm is set on a DAHDI channel.</synopsis>
 385                         <syntax>
 386                                 <parameter name="DAHDIChannel">
 387                                         <para>The channel on which the alarm occurred.</para>
 388                                         <note><para>This is not an Asterisk channel identifier.</para></note>
 389                                 </parameter>
 390                                 <parameter name="Alarm">
 391                                         <para>A textual description of the alarm that occurred.</para>
 392                                 </parameter>
 393                         </syntax>
 394                 </managerEventInstance>
 395         </managerEvent>
 396         <managerEvent language="en_US" name="SpanAlarm">
 397                 <managerEventInstance class="EVENT_FLAG_SYSTEM">
 398                         <synopsis>Raised when an alarm is set on a DAHDI span.</synopsis>
 399                         <syntax>
 400                                 <parameter name="Span">
 401                                         <para>The span on which the alarm occurred.</para>
 402                                 </parameter>
 403                                 <parameter name="Alarm">
 404                                         <para>A textual description of the alarm that occurred.</para>
 405                                 </parameter>
 406                         </syntax>
 407                 </managerEventInstance>
 408         </managerEvent>
 409         <managerEvent language="en_US" name="DAHDIChannel">
 410                 <managerEventInstance class="EVENT_FLAG_CALL">
 411                         <synopsis>Raised when a DAHDI channel is created or an underlying technology is associated with a DAHDI channel.</synopsis>
 412                         <syntax>
 413                                 <channel_snapshot/>
 414                                 <parameter name="DAHDISpan">
 415                                         <para>The DAHDI span associated with this channel.</para>
 416                                 </parameter>
 417                                 <parameter name="DAHDIChannel">
 418                                         <para>The DAHDI channel associated with this channel.</para>
 419                                 </parameter>
 420                         </syntax>
 421                 </managerEventInstance>
 422         </managerEvent>
 423  ***/
 424
 425 #define SMDI_MD_WAIT_TIMEOUT 1500 /* 1.5 seconds */
 426
 427 static const char * const lbostr[] = {
 428 "0 db (CSU)/0-133 feet (DSX-1)",
 429 "133-266 feet (DSX-1)",
 430 "266-399 feet (DSX-1)",
 431 "399-533 feet (DSX-1)",
 432 "533-655 feet (DSX-1)",
 433 "-7.5db (CSU)",
 434 "-15db (CSU)",
 435 "-22.5db (CSU)"
 436 };
 437
 438 /*! Global jitterbuffer configuration - by default, jb is disabled
 439  *  \note Values shown here match the defaults shown in chan_dahdi.conf.sample */
 440 static struct ast_jb_conf default_jbconf =
 441 {
 442         .flags = 0,
 443         .max_size = 200,
 444         .resync_threshold = 1000,
 445         .impl = "fixed",
 446         .target_extra = 40,
 447 };
 448 static struct ast_jb_conf global_jbconf;
 449
 450 /*!
 451  * \note Define ZHONE_HACK to cause us to go off hook and then back on hook when
 452  * the user hangs up to reset the state machine so ring works properly.
 453  * This is used to be able to support kewlstart by putting the zhone in
 454  * groundstart mode since their forward disconnect supervision is entirely
 455  * broken even though their documentation says it isn't and their support
 456  * is entirely unwilling to provide any assistance with their channel banks
 457  * even though their web site says they support their products for life.
 458  */
 459 /* #define ZHONE_HACK */
 460
 461 /*! \brief Typically, how many rings before we should send Caller*ID */
 462 #define DEFAULT_CIDRINGS 1
 463
 464 #define AST_LAW(p) (((p)->law == DAHDI_LAW_ALAW) ? ast_format_alaw : ast_format_ulaw)
 465
 466
 467 /*! \brief Signaling types that need to use MF detection should be placed in this macro */
 468 #define NEED_MFDETECT(p) (((p)->sig == SIG_FEATDMF) || ((p)->sig == SIG_FEATDMF_TA) || ((p)->sig == SIG_E911) || ((p)->sig == SIG_FGC_CAMA) || ((p)->sig == SIG_FGC_CAMAMF) || ((p)->sig == SIG_FEATB))
 469
 470 static const char tdesc[] = "DAHDI Telephony"
 471 #if defined(HAVE_PRI) || defined(HAVE_SS7) || defined(HAVE_OPENR2)
 472         " w/"
 473         #if defined(HAVE_PRI)
 474                 "PRI"
 475         #endif  /* defined(HAVE_PRI) */
 476         #if defined(HAVE_SS7)
 477                 #if defined(HAVE_PRI)
 478                 " & "
 479                 #endif  /* defined(HAVE_PRI) */
 480                 "SS7"
 481         #endif  /* defined(HAVE_SS7) */
 482         #if defined(HAVE_OPENR2)
 483                 #if defined(HAVE_PRI) || defined(HAVE_SS7)
 484                 " & "
 485                 #endif  /* defined(HAVE_PRI) || defined(HAVE_SS7) */
 486                 "MFC/R2"
 487         #endif  /* defined(HAVE_OPENR2) */
 488 #endif  /* defined(HAVE_PRI) || defined(HAVE_SS7) || defined(HAVE_OPENR2) */
 489 ;
 490
 491 static const char config[] = "chan_dahdi.conf";
 492
 493 #ifdef LOTS_OF_SPANS
 494 #define NUM_SPANS       DAHDI_MAX_SPANS
 495 #else
 496 #define NUM_SPANS               32
 497 #endif
 498
 499 #define CHAN_PSEUDO     -2
 500
 501 #define CALLPROGRESS_PROGRESS           1
 502 #define CALLPROGRESS_FAX_OUTGOING       2
 503 #define CALLPROGRESS_FAX_INCOMING       4
 504 #define CALLPROGRESS_FAX                (CALLPROGRESS_FAX_INCOMING | CALLPROGRESS_FAX_OUTGOING)
 505
 506 #define NUM_CADENCE_MAX 25
 507 static int num_cadence = 4;
 508 static int user_has_defined_cadences = 0;
 509
 510 static int has_pseudo;
 511
 512 static struct dahdi_ring_cadence cadences[NUM_CADENCE_MAX] = {
 513         { { 125, 125, 2000, 4000 } },                   /*!< Quick chirp followed by normal ring */
 514         { { 250, 250, 500, 1000, 250, 250, 500, 4000 } }, /*!< British style ring */
 515         { { 125, 125, 125, 125, 125, 4000 } },  /*!< Three short bursts */
 516         { { 1000, 500, 2500, 5000 } },  /*!< Long ring */
 517 };
 518
 519 /*! \brief cidrings says in which pause to transmit the cid information, where the first pause
 520  * is 1, the second pause is 2 and so on.
 521  */
 522
 523 static int cidrings[NUM_CADENCE_MAX] = {
 524         2,                                                                              /*!< Right after first long ring */
 525         4,                                                                              /*!< Right after long part */
 526         3,                                                                              /*!< After third chirp */
 527         2,                                                                              /*!< Second spell */
 528 };
 529
 530 /* ETSI EN300 659-1 specifies the ring pulse between 200 and 300 mS */
 531 static struct dahdi_ring_cadence AS_RP_cadence = {{250, 10000}};
 532
 533 #define ISTRUNK(p) ((p->sig == SIG_FXSLS) || (p->sig == SIG_FXSKS) || \
 534                         (p->sig == SIG_FXSGS) || (p->sig == SIG_PRI))
 535
 536 #define CANBUSYDETECT(p) (ISTRUNK(p) || (p->sig & (SIG_EM | SIG_EM_E1 | SIG_SF)) /* || (p->sig & __DAHDI_SIG_FXO) */)
 537 #define CANPROGRESSDETECT(p) (ISTRUNK(p) || (p->sig & (SIG_EM | SIG_EM_E1 | SIG_SF)) /* || (p->sig & __DAHDI_SIG_FXO) */)
 538
 539 static char defaultcic[64] = "";
 540 static char defaultozz[64] = "";
 541
 542 /*! Run this script when the MWI state changes on an FXO line, if mwimonitor is enabled */
 543 static char mwimonitornotify[PATH_MAX] = "";
 544 #ifndef HAVE_DAHDI_LINEREVERSE_VMWI
 545 static int  mwisend_rpas = 0;
 546 #endif
 547
 548 static char progzone[10] = "";
 549
 550 static int usedistinctiveringdetection = 0;
 551 static int distinctiveringaftercid = 0;
 552
 553 static int numbufs = 4;
 554
 555 static int mwilevel = 512;
 556 static int dtmfcid_level = 256;
 557
 558 #define REPORT_CHANNEL_ALARMS 1
 559 #define REPORT_SPAN_ALARMS    2
 560 static int report_alarms = REPORT_CHANNEL_ALARMS;
 561
 562 #ifdef HAVE_PRI
 563 static int pridebugfd = -1;
 564 static char pridebugfilename[1024] = "";
 565 #endif
 566
 567 /*! \brief Wait up to 16 seconds for first digit (FXO logic) */
 568 static int firstdigittimeout = 16000;
 569
 570 /*! \brief How long to wait for following digits (FXO logic) */
 571 static int gendigittimeout = 8000;
 572
 573 /*! \brief How long to wait for an extra digit, if there is an ambiguous match */
 574 static int matchdigittimeout = 3000;
 575
 576 /*! \brief Protect the interface list (of dahdi_pvt's) */
 577 AST_MUTEX_DEFINE_STATIC(iflock);
 578
 579
 580 static int ifcount = 0;
 581
 582 #ifdef HAVE_PRI
 583 AST_MUTEX_DEFINE_STATIC(pridebugfdlock);
 584 #endif
 585
 586 /*! \brief Protect the monitoring thread, so only one process can kill or start it, and not
 587    when it's doing something critical. */
 588 AST_MUTEX_DEFINE_STATIC(monlock);
 589
 590 /*! \brief This is the thread for the monitor which checks for input on the channels
 591    which are not currently in use. */
 592 static pthread_t monitor_thread = AST_PTHREADT_NULL;
 593 static ast_cond_t ss_thread_complete;
 594 AST_MUTEX_DEFINE_STATIC(ss_thread_lock);
 595 AST_MUTEX_DEFINE_STATIC(restart_lock);
 596 static int ss_thread_count = 0;
 597 static int num_restart_pending = 0;
 598
 599 static int restart_monitor(void);
 600
 601 static int dahdi_sendtext(struct ast_channel *c, const char *text);
 602
 603 /*! \brief Avoid the silly dahdi_getevent which ignores a bunch of events */
 604 static inline int dahdi_get_event(int fd)
 605 {
 606         int j;
 607         if (ioctl(fd, DAHDI_GETEVENT, &j) == -1)
 608                 return -1;
 609         return j;
 610 }
 611
 612 /*! \brief Avoid the silly dahdi_waitevent which ignores a bunch of events */
 613 static inline int dahdi_wait_event(int fd)
 614 {
 615         int i, j = 0;
 616         i = DAHDI_IOMUX_SIGEVENT;
 617         if (ioctl(fd, DAHDI_IOMUX, &i) == -1)
 618                 return -1;
 619         if (ioctl(fd, DAHDI_GETEVENT, &j) == -1)
 620                 return -1;
 621         return j;
 622 }
 623
 624 /*! Chunk size to read -- we use 20ms chunks to make things happy. */
 625 #define READ_SIZE 160
 626
 627 #define MASK_AVAIL              (1 << 0)        /*!< Channel available for PRI use */
 628 #define MASK_INUSE              (1 << 1)        /*!< Channel currently in use */
 629
 630 #define CALLWAITING_SILENT_SAMPLES              ((300 * 8) / READ_SIZE) /*!< 300 ms */
 631 #define CALLWAITING_REPEAT_SAMPLES              ((10000 * 8) / READ_SIZE) /*!< 10,000 ms */
 632 #define CALLWAITING_SUPPRESS_SAMPLES    ((100 * 8) / READ_SIZE) /*!< 100 ms */
 633 #define CIDCW_EXPIRE_SAMPLES                    ((500 * 8) / READ_SIZE) /*!< 500 ms */
 634 #define MIN_MS_SINCE_FLASH                              ((2000) )       /*!< 2000 ms */
 635 #define DEFAULT_RINGT                                   ((8000 * 8) / READ_SIZE) /*!< 8,000 ms */
 636 #define DEFAULT_DIALTONE_DETECT_TIMEOUT ((10000 * 8) / READ_SIZE) /*!< 10,000 ms */
 637
 638 /*!
 639  * \brief Configured ring timeout base.
 640  * \note Value computed from "ringtimeout" read in from chan_dahdi.conf if it exists.
 641  */
 642 static int ringt_base = DEFAULT_RINGT;
 643
 644 #if defined(HAVE_SS7)
 645
 646 struct dahdi_ss7 {
 647         struct sig_ss7_linkset ss7;
 648 };
 649
 650 static struct dahdi_ss7 linksets[NUM_SPANS];
 651
 652 static int cur_ss7type = -1;
 653 static int cur_slc = -1;
 654 static int cur_linkset = -1;
 655 static int cur_pointcode = -1;
 656 static int cur_cicbeginswith = -1;
 657 static int cur_adjpointcode = -1;
 658 static int cur_networkindicator = -1;
 659 static int cur_defaultdpc = -1;
 660 #endif  /* defined(HAVE_SS7) */
 661
 662 #ifdef HAVE_OPENR2
 663 struct dahdi_mfcr2_conf {
 664         openr2_variant_t variant;
 665         int mfback_timeout;
 666         int metering_pulse_timeout;
 667         int max_ani;
 668         int max_dnis;
 669 #if defined(OR2_LIB_INTERFACE) && OR2_LIB_INTERFACE > 2
 670         int dtmf_time_on;
 671         int dtmf_time_off;
 672 #endif
 673 #if defined(OR2_LIB_INTERFACE) && OR2_LIB_INTERFACE > 3
 674         int dtmf_end_timeout;
 675 #endif
 676         signed int get_ani_first:2;
 677 #if defined(OR2_LIB_INTERFACE) && OR2_LIB_INTERFACE > 1
 678         signed int skip_category_request:2;
 679 #endif
 680         unsigned int call_files:1;
 681         unsigned int allow_collect_calls:1;
 682         unsigned int charge_calls:1;
 683         unsigned int accept_on_offer:1;
 684         unsigned int forced_release:1;
 685         unsigned int double_answer:1;
 686         signed int immediate_accept:2;
 687 #if defined(OR2_LIB_INTERFACE) && OR2_LIB_INTERFACE > 2
 688         signed int dtmf_dialing:2;
 689         signed int dtmf_detection:2;
 690 #endif
 691         char logdir[OR2_MAX_PATH];
 692         char r2proto_file[OR2_MAX_PATH];
 693         openr2_log_level_t loglevel;
 694         openr2_calling_party_category_t category;
 695 };
 696
 697 /* MFC-R2 pseudo-link structure */
 698 struct dahdi_mfcr2 {
 699         pthread_t r2master;                    /*!< Thread of master */
 700         openr2_context_t *protocol_context;    /*!< OpenR2 context handle */
 701         struct dahdi_pvt *pvts[SIG_MFCR2_MAX_CHANNELS];     /*!< Member channel pvt structs */
 702         int numchans;                          /*!< Number of channels in this R2 block */
 703         struct dahdi_mfcr2_conf conf;         /*!< Configuration used to setup this pseudo-link */
 704 };
 705
 706 /* malloc'd array of malloc'd r2links */
 707 static struct dahdi_mfcr2 **r2links;
 708 /* how many r2links have been malloc'd */
 709 static int r2links_count = 0;
 710
 711 #endif /* HAVE_OPENR2 */
 712
 713 #ifdef HAVE_PRI
 714
 715 struct dahdi_pri {
 716         int dchannels[SIG_PRI_NUM_DCHANS];              /*!< What channel are the dchannels on */
 717         int mastertrunkgroup;                                   /*!< What trunk group is our master */
 718         int prilogicalspan;                                             /*!< Logical span number within trunk group */
 719         struct sig_pri_span pri;
 720 };
 721
 722 static struct dahdi_pri pris[NUM_SPANS];
 723
 724 #if defined(HAVE_PRI_CCSS)
 725 /*! DAHDI PRI CCSS agent and monitor type name. */
 726 static const char dahdi_pri_cc_type[] = "DAHDI/PRI";
 727 #endif  /* defined(HAVE_PRI_CCSS) */
 728
 729 #else
 730 /*! Shut up the compiler */
 731 struct dahdi_pri;
 732 #endif
 733
 734 /* Polarity states */
 735 #define POLARITY_IDLE   0
 736 #define POLARITY_REV    1
 737
 738 const char * const subnames[] = {
 739         "Real",
 740         "Callwait",
 741         "Threeway"
 742 };
 743
 744 #define DATA_EXPORT_DAHDI_PVT(MEMBER)                                   \
 745         MEMBER(dahdi_pvt, cid_rxgain, AST_DATA_DOUBLE)                  \
 746         MEMBER(dahdi_pvt, rxgain, AST_DATA_DOUBLE)                      \
 747         MEMBER(dahdi_pvt, txgain, AST_DATA_DOUBLE)                      \
 748         MEMBER(dahdi_pvt, txdrc, AST_DATA_DOUBLE)                       \
 749         MEMBER(dahdi_pvt, rxdrc, AST_DATA_DOUBLE)                       \
 750         MEMBER(dahdi_pvt, adsi, AST_DATA_BOOLEAN)                       \
 751         MEMBER(dahdi_pvt, answeronpolarityswitch, AST_DATA_BOOLEAN)     \
 752         MEMBER(dahdi_pvt, busydetect, AST_DATA_BOOLEAN)                 \
 753         MEMBER(dahdi_pvt, callreturn, AST_DATA_BOOLEAN)                 \
 754         MEMBER(dahdi_pvt, callwaiting, AST_DATA_BOOLEAN)                \
 755         MEMBER(dahdi_pvt, callwaitingcallerid, AST_DATA_BOOLEAN)        \
 756         MEMBER(dahdi_pvt, cancallforward, AST_DATA_BOOLEAN)             \
 757         MEMBER(dahdi_pvt, canpark, AST_DATA_BOOLEAN)                    \
 758         MEMBER(dahdi_pvt, confirmanswer, AST_DATA_BOOLEAN)              \
 759         MEMBER(dahdi_pvt, destroy, AST_DATA_BOOLEAN)                    \
 760         MEMBER(dahdi_pvt, didtdd, AST_DATA_BOOLEAN)                     \
 761         MEMBER(dahdi_pvt, dialednone, AST_DATA_BOOLEAN)                 \
 762         MEMBER(dahdi_pvt, dialing, AST_DATA_BOOLEAN)                    \
 763         MEMBER(dahdi_pvt, digital, AST_DATA_BOOLEAN)                    \
 764         MEMBER(dahdi_pvt, dnd, AST_DATA_BOOLEAN)                        \
 765         MEMBER(dahdi_pvt, echobreak, AST_DATA_BOOLEAN)                  \
 766         MEMBER(dahdi_pvt, echocanbridged, AST_DATA_BOOLEAN)             \
 767         MEMBER(dahdi_pvt, echocanon, AST_DATA_BOOLEAN)                  \
 768         MEMBER(dahdi_pvt, faxhandled, AST_DATA_BOOLEAN)                 \
 769         MEMBER(dahdi_pvt, usefaxbuffers, AST_DATA_BOOLEAN)              \
 770         MEMBER(dahdi_pvt, bufferoverrideinuse, AST_DATA_BOOLEAN)        \
 771         MEMBER(dahdi_pvt, firstradio, AST_DATA_BOOLEAN)                 \
 772         MEMBER(dahdi_pvt, hanguponpolarityswitch, AST_DATA_BOOLEAN)     \
 773         MEMBER(dahdi_pvt, hardwaredtmf, AST_DATA_BOOLEAN)               \
 774         MEMBER(dahdi_pvt, hidecallerid, AST_DATA_BOOLEAN)               \
 775         MEMBER(dahdi_pvt, hidecalleridname, AST_DATA_BOOLEAN)           \
 776         MEMBER(dahdi_pvt, ignoredtmf, AST_DATA_BOOLEAN)                 \
 777         MEMBER(dahdi_pvt, immediate, AST_DATA_BOOLEAN)                  \
 778         MEMBER(dahdi_pvt, inalarm, AST_DATA_BOOLEAN)                    \
 779         MEMBER(dahdi_pvt, mate, AST_DATA_BOOLEAN)                       \
 780         MEMBER(dahdi_pvt, outgoing, AST_DATA_BOOLEAN)                   \
 781         MEMBER(dahdi_pvt, permcallwaiting, AST_DATA_BOOLEAN)            \
 782         MEMBER(dahdi_pvt, priindication_oob, AST_DATA_BOOLEAN)          \
 783         MEMBER(dahdi_pvt, priexclusive, AST_DATA_BOOLEAN)               \
 784         MEMBER(dahdi_pvt, pulse, AST_DATA_BOOLEAN)                      \
 785         MEMBER(dahdi_pvt, pulsedial, AST_DATA_BOOLEAN)                  \
 786         MEMBER(dahdi_pvt, restartpending, AST_DATA_BOOLEAN)             \
 787         MEMBER(dahdi_pvt, restrictcid, AST_DATA_BOOLEAN)                \
 788         MEMBER(dahdi_pvt, threewaycalling, AST_DATA_BOOLEAN)            \
 789         MEMBER(dahdi_pvt, transfer, AST_DATA_BOOLEAN)                   \
 790         MEMBER(dahdi_pvt, use_callerid, AST_DATA_BOOLEAN)               \
 791         MEMBER(dahdi_pvt, use_callingpres, AST_DATA_BOOLEAN)            \
 792         MEMBER(dahdi_pvt, usedistinctiveringdetection, AST_DATA_BOOLEAN)        \
 793         MEMBER(dahdi_pvt, dahditrcallerid, AST_DATA_BOOLEAN)                    \
 794         MEMBER(dahdi_pvt, transfertobusy, AST_DATA_BOOLEAN)                     \
 795         MEMBER(dahdi_pvt, mwimonitor_neon, AST_DATA_BOOLEAN)                    \
 796         MEMBER(dahdi_pvt, mwimonitor_fsk, AST_DATA_BOOLEAN)                     \
 797         MEMBER(dahdi_pvt, mwimonitor_rpas, AST_DATA_BOOLEAN)                    \
 798         MEMBER(dahdi_pvt, mwimonitoractive, AST_DATA_BOOLEAN)                   \
 799         MEMBER(dahdi_pvt, mwisendactive, AST_DATA_BOOLEAN)                      \
 800         MEMBER(dahdi_pvt, inservice, AST_DATA_BOOLEAN)                          \
 801         MEMBER(dahdi_pvt, locallyblocked, AST_DATA_UNSIGNED_INTEGER)            \
 802         MEMBER(dahdi_pvt, remotelyblocked, AST_DATA_UNSIGNED_INTEGER)           \
 803         MEMBER(dahdi_pvt, manages_span_alarms, AST_DATA_BOOLEAN)                \
 804         MEMBER(dahdi_pvt, use_smdi, AST_DATA_BOOLEAN)                           \
 805         MEMBER(dahdi_pvt, context, AST_DATA_STRING)                             \
 806         MEMBER(dahdi_pvt, defcontext, AST_DATA_STRING)                          \
 807         MEMBER(dahdi_pvt, description, AST_DATA_STRING)                         \
 808         MEMBER(dahdi_pvt, exten, AST_DATA_STRING)                               \
 809         MEMBER(dahdi_pvt, language, AST_DATA_STRING)                            \
 810         MEMBER(dahdi_pvt, mohinterpret, AST_DATA_STRING)                        \
 811         MEMBER(dahdi_pvt, mohsuggest, AST_DATA_STRING)                          \
 812         MEMBER(dahdi_pvt, parkinglot, AST_DATA_STRING)
 813
 814 AST_DATA_STRUCTURE(dahdi_pvt, DATA_EXPORT_DAHDI_PVT);
 815
 816 static struct dahdi_pvt *iflist = NULL; /*!< Main interface list start */
 817 static struct dahdi_pvt *ifend = NULL;  /*!< Main interface list end */
 818
 819 #if defined(HAVE_PRI)
 820 struct doomed_pri {
 821         struct sig_pri_span *pri;
 822         AST_LIST_ENTRY(doomed_pri) list;
 823 };
 824 static AST_LIST_HEAD_STATIC(doomed_pris, doomed_pri);
 825
 826 static void pri_destroy_span(struct sig_pri_span *pri);
 827
 828 static struct dahdi_parms_pseudo {
 829         int buf_no;                                     /*!< Number of buffers */
 830         int buf_policy;                         /*!< Buffer policy */
 831         int faxbuf_no;              /*!< Number of Fax buffers */
 832         int faxbuf_policy;          /*!< Fax buffer policy */
 833 } dahdi_pseudo_parms;
 834 #endif  /* defined(HAVE_PRI) */
 835
 836 /*! \brief Channel configuration from chan_dahdi.conf .
 837  * This struct is used for parsing the [channels] section of chan_dahdi.conf.
 838  * Generally there is a field here for every possible configuration item.
 839  *
 840  * The state of fields is saved along the parsing and whenever a 'channel'
 841  * statement is reached, the current dahdi_chan_conf is used to configure the
 842  * channel (struct dahdi_pvt)
 843  *
 844  * \see dahdi_chan_init for the default values.
 845  */
 846 struct dahdi_chan_conf {
 847         struct dahdi_pvt chan;
 848 #ifdef HAVE_PRI
 849         struct dahdi_pri pri;
 850 #endif
 851
 852 #if defined(HAVE_SS7)
 853         struct dahdi_ss7 ss7;
 854 #endif  /* defined(HAVE_SS7) */
 855
 856 #ifdef HAVE_OPENR2
 857         struct dahdi_mfcr2_conf mfcr2;
 858 #endif
 859         struct dahdi_params timing;
 860         int is_sig_auto; /*!< Use channel signalling from DAHDI? */
 861         /*! Continue configuration even if a channel is not there. */
 862         int ignore_failed_channels;
 863
 864         /*!
 865          * \brief The serial port to listen for SMDI data on
 866          * \note Set from the "smdiport" string read in from chan_dahdi.conf
 867          */
 868         char smdi_port[SMDI_MAX_FILENAME_LEN];
 869
 870         /*!
 871          * \brief Don't create channels below this number
 872          * \note by default is 0 (no limit)
 873          */
 874         int wanted_channels_start;
 875
 876         /*!
 877          * \brief Don't create channels above this number (infinity by default)
 878          * \note by default is 0 (special value that means "no limit").
 879          */
 880         int wanted_channels_end;
 881 };
 882
 883 /*! returns a new dahdi_chan_conf with default values (by-value) */
 884 static struct dahdi_chan_conf dahdi_chan_conf_default(void)
 885 {
 886         /* recall that if a field is not included here it is initialized
 887          * to 0 or equivalent
 888          */
 889         struct dahdi_chan_conf conf = {
 890 #ifdef HAVE_PRI
 891                 .pri.pri = {
 892                         .nsf = PRI_NSF_NONE,
 893                         .switchtype = PRI_SWITCH_NI2,
 894                         .dialplan = PRI_UNKNOWN + 1,
 895                         .localdialplan = PRI_NATIONAL_ISDN + 1,
 896                         .nodetype = PRI_CPE,
 897                         .qsigchannelmapping = DAHDI_CHAN_MAPPING_PHYSICAL,
 898
 899 #if defined(HAVE_PRI_CCSS)
 900                         .cc_ptmp_recall_mode = 1,/* specificRecall */
 901                         .cc_qsig_signaling_link_req = 1,/* retain */
 902                         .cc_qsig_signaling_link_rsp = 1,/* retain */
 903 #endif  /* defined(HAVE_PRI_CCSS) */
 904
 905                         .minunused = 2,
 906                         .idleext = "",
 907                         .idledial = "",
 908                         .internationalprefix = "",
 909                         .nationalprefix = "",
 910                         .localprefix = "",
 911                         .privateprefix = "",
 912                         .unknownprefix = "",
 913                         .colp_send = SIG_PRI_COLP_UPDATE,
 914                         .resetinterval = -1,
 915                 },
 916 #endif
 917 #if defined(HAVE_SS7)
 918                 .ss7.ss7 = {
 919                         .called_nai = SS7_NAI_NATIONAL,
 920                         .calling_nai = SS7_NAI_NATIONAL,
 921                         .internationalprefix = "",
 922                         .nationalprefix = "",
 923                         .subscriberprefix = "",
 924                         .unknownprefix = "",
 925                         .networkroutedprefix = ""
 926                 },
 927 #endif  /* defined(HAVE_SS7) */
 928 #ifdef HAVE_OPENR2
 929                 .mfcr2 = {
 930                         .variant = OR2_VAR_ITU,
 931                         .mfback_timeout = -1,
 932                         .metering_pulse_timeout = -1,
 933                         .max_ani = 10,
 934                         .max_dnis = 4,
 935                         .get_ani_first = -1,
 936 #if defined(OR2_LIB_INTERFACE) && OR2_LIB_INTERFACE > 1
 937                         .skip_category_request = -1,
 938 #endif
 939                         .call_files = 0,
 940                         .allow_collect_calls = 0,
 941                         .charge_calls = 1,
 942                         .accept_on_offer = 1,
 943                         .forced_release = 0,
 944                         .double_answer = 0,
 945                         .immediate_accept = -1,
 946 #if defined(OR2_LIB_INTERFACE) && OR2_LIB_INTERFACE > 2
 947                         .dtmf_dialing = -1,
 948                         .dtmf_detection = -1,
 949                         .dtmf_time_on = OR2_DEFAULT_DTMF_ON,
 950                         .dtmf_time_off = OR2_DEFAULT_DTMF_OFF,
 951 #endif
 952 #if defined(OR2_LIB_INTERFACE) && OR2_LIB_INTERFACE > 3
 953                         .dtmf_end_timeout = -1,
 954 #endif
 955                         .logdir = "",
 956                         .r2proto_file = "",
 957                         .loglevel = OR2_LOG_ERROR | OR2_LOG_WARNING,
 958                         .category = OR2_CALLING_PARTY_CATEGORY_NATIONAL_SUBSCRIBER
 959                 },
 960 #endif
 961                 .chan = {
 962                         .context = "default",
 963                         .cid_num = "",
 964                         .cid_name = "",
 965                         .cid_tag = "",
 966                         .mohinterpret = "default",
 967                         .mohsuggest = "",
 968                         .parkinglot = "",
 969                         .transfertobusy = 1,
 970
 971                         .cid_signalling = CID_SIG_BELL,
 972                         .cid_start = CID_START_RING,
 973                         .dahditrcallerid = 0,
 974                         .use_callerid = 1,
 975                         .sig = -1,
 976                         .outsigmod = -1,
 977
 978                         .cid_rxgain = +5.0,
 979
 980                         .tonezone = -1,
 981
 982                         .echocancel.head.tap_length = 1,
 983
 984                         .busycount = 3,
 985
 986                         .accountcode = "",
 987
 988                         .mailbox = "",
 989
 990 #ifdef HAVE_DAHDI_LINEREVERSE_VMWI
 991                         .mwisend_fsk = 1,
 992 #endif
 993                         .polarityonanswerdelay = 600,
 994
 995                         .sendcalleridafter = DEFAULT_CIDRINGS,
 996
 997                         .buf_policy = DAHDI_POLICY_IMMEDIATE,
 998                         .buf_no = numbufs,
 999                         .usefaxbuffers = 0,
1000                         .cc_params = ast_cc_config_params_init(),
1001                 },
1002                 .timing = {
1003                         .prewinktime = -1,
1004                         .preflashtime = -1,
1005                         .winktime = -1,
1006                         .flashtime = -1,
1007                         .starttime = -1,
1008                         .rxwinktime = -1,
1009                         .rxflashtime = -1,
1010                         .debouncetime = -1
1011                 },
1012                 .is_sig_auto = 1,
1013                 .ignore_failed_channels = 1,
1014                 .smdi_port = "/dev/ttyS0",
1015         };
1016
1017         return conf;
1018 }
1019
1020
1021 static struct ast_channel *dahdi_request(const char *type, struct ast_format_cap *cap,
1022         const struct ast_assigned_ids *assignedids, const struct ast_channel *requestor,
1023         const char *data, int *cause);
1024 static int dahdi_digit_begin(struct ast_channel *ast, char digit);
1025 static int dahdi_digit_end(struct ast_channel *ast, char digit, unsigned int duration);
1026 static int dahdi_sendtext(struct ast_channel *c, const char *text);
1027 static int dahdi_call(struct ast_channel *ast, const char *rdest, int timeout);
1028 static int dahdi_hangup(struct ast_channel *ast);
1029 static int dahdi_answer(struct ast_channel *ast);
1030 static struct ast_frame *dahdi_read(struct ast_channel *ast);
1031 static int dahdi_write(struct ast_channel *ast, struct ast_frame *frame);
1032 static struct ast_frame *dahdi_exception(struct ast_channel *ast);
1033 static int dahdi_indicate(struct ast_channel *chan, int condition, const void *data, size_t datalen);
1034 static int dahdi_fixup(struct ast_channel *oldchan, struct ast_channel *newchan);
1035 static int dahdi_setoption(struct ast_channel *chan, int option, void *data, int datalen);
1036 static int dahdi_queryoption(struct ast_channel *chan, int option, void *data, int *datalen);
1037 static int dahdi_func_read(struct ast_channel *chan, const char *function, char *data, char *buf, size_t len);
1038 static int dahdi_func_write(struct ast_channel *chan, const char *function, char *data, const char *value);
1039 static int dahdi_devicestate(const char *data);
1040 static int dahdi_cc_callback(struct ast_channel *inbound, const char *dest, ast_cc_callback_fn callback);
1041
1042 static struct ast_channel_tech dahdi_tech = {
1043         .type = "DAHDI",
1044         .description = tdesc,
1045         .requester = dahdi_request,
1046         .send_digit_begin = dahdi_digit_begin,
1047         .send_digit_end = dahdi_digit_end,
1048         .send_text = dahdi_sendtext,
1049         .call = dahdi_call,
1050         .hangup = dahdi_hangup,
1051         .answer = dahdi_answer,
1052         .read = dahdi_read,
1053         .write = dahdi_write,
1054         .exception = dahdi_exception,
1055         .indicate = dahdi_indicate,
1056         .fixup = dahdi_fixup,
1057         .setoption = dahdi_setoption,
1058         .queryoption = dahdi_queryoption,
1059         .func_channel_read = dahdi_func_read,
1060         .func_channel_write = dahdi_func_write,
1061         .devicestate = dahdi_devicestate,
1062         .cc_callback = dahdi_cc_callback,
1063 };
1064
1065 #define GET_CHANNEL(p) ((p)->channel)
1066
1067 static enum analog_sigtype dahdisig_to_analogsig(int sig)
1068 {
1069         switch (sig) {
1070         case SIG_FXOLS:
1071                 return ANALOG_SIG_FXOLS;
1072         case SIG_FXOGS:
1073                 return ANALOG_SIG_FXOGS;
1074         case SIG_FXOKS:
1075                 return ANALOG_SIG_FXOKS;
1076         case SIG_FXSLS:
1077                 return ANALOG_SIG_FXSLS;
1078         case SIG_FXSGS:
1079                 return ANALOG_SIG_FXSGS;
1080         case SIG_FXSKS:
1081                 return ANALOG_SIG_FXSKS;
1082         case SIG_EMWINK:
1083                 return ANALOG_SIG_EMWINK;
1084         case SIG_EM:
1085                 return ANALOG_SIG_EM;
1086         case SIG_EM_E1:
1087                 return ANALOG_SIG_EM_E1;
1088         case SIG_FEATD:
1089                 return ANALOG_SIG_FEATD;
1090         case SIG_FEATDMF:
1091                 return ANALOG_SIG_FEATDMF;
1092         case SIG_E911:
1093                 return SIG_E911;
1094         case SIG_FGC_CAMA:
1095                 return ANALOG_SIG_FGC_CAMA;
1096         case SIG_FGC_CAMAMF:
1097                 return ANALOG_SIG_FGC_CAMAMF;
1098         case SIG_FEATB:
1099                 return ANALOG_SIG_FEATB;
1100         case SIG_SFWINK:
1101                 return ANALOG_SIG_SFWINK;
1102         case SIG_SF:
1103                 return ANALOG_SIG_SF;
1104         case SIG_SF_FEATD:
1105                 return ANALOG_SIG_SF_FEATD;
1106         case SIG_SF_FEATDMF:
1107                 return ANALOG_SIG_SF_FEATDMF;
1108         case SIG_FEATDMF_TA:
1109                 return ANALOG_SIG_FEATDMF_TA;
1110         case SIG_SF_FEATB:
1111                 return ANALOG_SIG_FEATB;
1112         default:
1113                 return -1;
1114         }
1115 }
1116
1117
1118 static int analog_tone_to_dahditone(enum analog_tone tone)
1119 {
1120         switch (tone) {
1121         case ANALOG_TONE_RINGTONE:
1122                 return DAHDI_TONE_RINGTONE;
1123         case ANALOG_TONE_STUTTER:
1124                 return DAHDI_TONE_STUTTER;
1125         case ANALOG_TONE_CONGESTION:
1126                 return DAHDI_TONE_CONGESTION;
1127         case ANALOG_TONE_DIALTONE:
1128                 return DAHDI_TONE_DIALTONE;
1129         case ANALOG_TONE_DIALRECALL:
1130                 return DAHDI_TONE_DIALRECALL;
1131         case ANALOG_TONE_INFO:
1132                 return DAHDI_TONE_INFO;
1133         default:
1134                 return -1;
1135         }
1136 }
1137
1138 static int analogsub_to_dahdisub(enum analog_sub analogsub)
1139 {
1140         int index;
1141
1142         switch (analogsub) {
1143         case ANALOG_SUB_REAL:
1144                 index = SUB_REAL;
1145                 break;
1146         case ANALOG_SUB_CALLWAIT:
1147                 index = SUB_CALLWAIT;
1148                 break;
1149         case ANALOG_SUB_THREEWAY:
1150                 index = SUB_THREEWAY;
1151                 break;
1152         default:
1153                 ast_log(LOG_ERROR, "Unidentified sub!\n");
1154                 index = SUB_REAL;
1155         }
1156
1157         return index;
1158 }
1159
1160 /*!
1161  * \internal
1162  * \brief release all members on the doomed pris list
1163  * \since 13.0
1164  *
1165  * Called priodically by the monitor threads to release spans marked for
1166  * removal.
1167  */
1168 static void release_doomed_pris(void)
1169 {
1170 #ifdef HAVE_PRI
1171         struct doomed_pri *entry;
1172
1173         AST_LIST_LOCK(&doomed_pris);
1174         while ((entry = AST_LIST_REMOVE_HEAD(&doomed_pris, list))) {
1175                 /* The span destruction must be done with this lock not held */
1176                 AST_LIST_UNLOCK(&doomed_pris);
1177                 ast_debug(4, "Destroying span %d from doomed queue.\n",
1178                                 entry->pri->span);
1179                 pri_destroy_span(entry->pri);
1180                 ast_free(entry);
1181                 AST_LIST_LOCK(&doomed_pris);
1182         }
1183         AST_LIST_UNLOCK(&doomed_pris);
1184 #endif
1185 }
1186
1187 #ifdef HAVE_PRI
1188 /*!
1189  * \brief Queue a span for destruction
1190  * \since 13.0
1191  *
1192  * \param pri the span to destroy
1193  *
1194  * Add a span to the list of spans to be destroyed later on
1195  * by the monitor thread. Allows destroying a span while holding its
1196  * lock.
1197  */
1198 static void pri_queue_for_destruction(struct sig_pri_span *pri)
1199 {
1200         struct doomed_pri *entry;
1201
1202         AST_LIST_LOCK(&doomed_pris);
1203         AST_LIST_TRAVERSE(&doomed_pris, entry, list) {
1204                 if (entry->pri == pri) {
1205                         AST_LIST_UNLOCK(&doomed_pris);
1206                         return;
1207                 }
1208         }
1209         entry = ast_calloc(sizeof(struct doomed_pri), 1);
1210         if (!entry) {
1211                 /* Nothing useful to do here. Panic? */
1212                 ast_log(LOG_WARNING, "Failed allocating memory for a doomed_pri.\n");
1213                 AST_LIST_UNLOCK(&doomed_pris);
1214                 return;
1215         }
1216         entry->pri = pri;
1217         ast_debug(4, "Queue span %d for destruction.\n", pri->span);
1218         AST_LIST_INSERT_TAIL(&doomed_pris, entry, list);
1219         AST_LIST_UNLOCK(&doomed_pris);
1220 }
1221 #endif
1222
1223 /*!
1224  * \internal
1225  * \brief Send a dial string to DAHDI.
1226  * \since 12.0.0
1227  *
1228  * \param pvt DAHDI private pointer
1229  * \param operation DAHDI dial operation to do to string
1230  * \param dial_str Dial string to send
1231  *
1232  * \retval 0 on success.
1233  * \retval non-zero on error.
1234  */
1235 static int dahdi_dial_str(struct dahdi_pvt *pvt, int operation, const char *dial_str)
1236 {
1237         int res;
1238         int offset;
1239         const char *pos;
1240         struct dahdi_dialoperation zo = {
1241                 .op = operation,
1242         };
1243
1244         /* Convert the W's to ww. */
1245         pos = dial_str;
1246         for (offset = 0; offset < sizeof(zo.dialstr) - 1; ++offset) {
1247                 if (!*pos) {
1248                         break;
1249                 }
1250                 if (*pos == 'W') {
1251                         /* Convert 'W' to "ww" */
1252                         ++pos;
1253                         if (offset >= sizeof(zo.dialstr) - 3) {
1254                                 /* No room to expand */
1255                                 break;
1256                         }
1257                         zo.dialstr[offset] = 'w';
1258                         ++offset;
1259                         zo.dialstr[offset] = 'w';
1260                         continue;
1261                 }
1262                 zo.dialstr[offset] = *pos++;
1263         }
1264         /* The zo initialization has already terminated the dialstr. */
1265
1266         ast_debug(1, "Channel %d: Dial str '%s' expanded to '%s' sent to DAHDI_DIAL.\n",
1267                 pvt->channel, dial_str, zo.dialstr);
1268         res = ioctl(pvt->subs[SUB_REAL].dfd, DAHDI_DIAL, &zo);
1269         if (res) {
1270                 ast_log(LOG_WARNING, "Channel %d: Couldn't dial '%s': %s\n",
1271                         pvt->channel, dial_str, strerror(errno));
1272         }
1273
1274         return res;
1275 }
1276
1277 static enum analog_event dahdievent_to_analogevent(int event);
1278 static int bump_gains(struct dahdi_pvt *p);
1279 static int dahdi_setlinear(int dfd, int linear);
1280
1281 static int my_start_cid_detect(void *pvt, int cid_signalling)
1282 {
1283         struct dahdi_pvt *p = pvt;
1284         int index = SUB_REAL;
1285         p->cs = callerid_new(cid_signalling);
1286         if (!p->cs) {
1287                 ast_log(LOG_ERROR, "Unable to alloc callerid\n");
1288                 return -1;
1289         }
1290         bump_gains(p);
1291         dahdi_setlinear(p->subs[index].dfd, 0);
1292
1293         return 0;
1294 }
1295
1296 static int restore_gains(struct dahdi_pvt *p);
1297
1298 static int my_stop_cid_detect(void *pvt)
1299 {
1300         struct dahdi_pvt *p = pvt;
1301         int index = SUB_REAL;
1302
1303         if (p->cs) {
1304                 callerid_free(p->cs);
1305         }
1306
1307         /* Restore linear mode after Caller*ID processing */
1308         dahdi_setlinear(p->subs[index].dfd, p->subs[index].linear);
1309         restore_gains(p);
1310
1311         return 0;
1312 }
1313
1314 static int my_get_callerid(void *pvt, char *namebuf, char *numbuf, enum analog_event *ev, size_t timeout)
1315 {
1316         struct dahdi_pvt *p = pvt;
1317         struct analog_pvt *analog_p = p->sig_pvt;
1318         struct pollfd poller;
1319         char *name, *num;
1320         int index = SUB_REAL;
1321         int res;
1322         unsigned char buf[256];
1323         int flags;
1324
1325         poller.fd = p->subs[SUB_REAL].dfd;
1326         poller.events = POLLPRI | POLLIN;
1327         poller.revents = 0;
1328
1329         res = poll(&poller, 1, timeout);
1330
1331         if (poller.revents & POLLPRI) {
1332                 *ev = dahdievent_to_analogevent(dahdi_get_event(p->subs[SUB_REAL].dfd));
1333                 return 1;
1334         }
1335
1336         if (poller.revents & POLLIN) {
1337                 /*** NOTES ***/
1338                 /* Change API: remove cid_signalling from get_callerid, add a new start_cid_detect and stop_cid_detect function
1339                  * to enable slin mode and allocate cid detector. get_callerid should be able to be called any number of times until
1340                  * either a timeout occurs or CID is detected (returns 0). returning 1 should be event received, and -1 should be
1341                  * a failure and die, and returning 2 means no event was received. */
1342                 res = read(p->subs[index].dfd, buf, sizeof(buf));
1343                 if (res < 0) {
1344                         ast_log(LOG_WARNING, "read returned error: %s\n", strerror(errno));
1345                         return -1;
1346                 }
1347
1348                 if (analog_p->ringt > 0) {
1349                         if (!(--analog_p->ringt)) {
1350                                 /* only return if we timeout from a ring event */
1351                                 return -1;
1352                         }
1353                 }
1354
1355                 if (p->cid_signalling == CID_SIG_V23_JP) {
1356                         res = callerid_feed_jp(p->cs, buf, res, AST_LAW(p));
1357                 } else {
1358                         res = callerid_feed(p->cs, buf, res, AST_LAW(p));
1359                 }
1360                 if (res < 0) {
1361                         /*
1362                          * The previous diagnostic message output likely
1363                          * explains why it failed.
1364                          */
1365                         ast_log(LOG_WARNING, "Failed to decode CallerID\n");
1366                         return -1;
1367                 }
1368
1369                 if (res == 1) {
1370                         callerid_get(p->cs, &name, &num, &flags);
1371                         if (name)
1372                                 ast_copy_string(namebuf, name, ANALOG_MAX_CID);
1373                         if (num)
1374                                 ast_copy_string(numbuf, num, ANALOG_MAX_CID);
1375
1376                         ast_debug(1, "CallerID number: %s, name: %s, flags=%d\n", num, name, flags);
1377                         return 0;
1378                 }
1379         }
1380
1381         *ev = ANALOG_EVENT_NONE;
1382         return 2;
1383 }
1384
1385 static const char *event2str(int event);
1386
1387 static int my_distinctive_ring(struct ast_channel *chan, void *pvt, int idx, int *ringdata)
1388 {
1389         unsigned char buf[256];
1390         int distMatches;
1391         int curRingData[RING_PATTERNS];
1392         int receivedRingT;
1393         int counter1;
1394         int counter;
1395         int i;
1396         int res;
1397         int checkaftercid = 0;
1398         const char *matched_context;
1399         struct dahdi_pvt *p = pvt;
1400         struct analog_pvt *analog_p = p->sig_pvt;
1401
1402         if (ringdata == NULL) {
1403                 ringdata = curRingData;
1404         } else {
1405                 checkaftercid = 1;
1406         }
1407
1408         /* We must have a ring by now so lets try to listen for distinctive ringing */
1409         if ((checkaftercid && distinctiveringaftercid) || !checkaftercid) {
1410                 /* Clear the current ring data array so we don't have old data in it. */
1411                 for (receivedRingT = 0; receivedRingT < RING_PATTERNS; receivedRingT++)
1412                         ringdata[receivedRingT] = 0;
1413                 receivedRingT = 0;
1414
1415                 if (checkaftercid && distinctiveringaftercid) {
1416                         ast_verb(3, "Detecting post-CID distinctive ring\n");
1417                 }
1418
1419                 for (;;) {
1420                         i = DAHDI_IOMUX_READ | DAHDI_IOMUX_SIGEVENT;
1421                         res = ioctl(p->subs[idx].dfd, DAHDI_IOMUX, &i);
1422                         if (res) {
1423                                 ast_log(LOG_WARNING, "I/O MUX failed: %s\n", strerror(errno));
1424                                 ast_hangup(chan);
1425                                 return 1;
1426                         }
1427                         if (i & DAHDI_IOMUX_SIGEVENT) {
1428                                 res = dahdi_get_event(p->subs[idx].dfd);
1429                                 ast_debug(3, "Got event %d (%s)...\n", res, event2str(res));
1430                                 if (res == DAHDI_EVENT_NOALARM) {
1431                                         p->inalarm = 0;
1432                                         analog_p->inalarm = 0;
1433                                 } else if (res == DAHDI_EVENT_RINGOFFHOOK) {
1434                                         /* Let us detect distinctive ring */
1435                                         ringdata[receivedRingT] = analog_p->ringt;
1436
1437                                         if (analog_p->ringt < analog_p->ringt_base / 2) {
1438                                                 break;
1439                                         }
1440                                         /* Increment the ringT counter so we can match it against
1441                                            values in chan_dahdi.conf for distinctive ring */
1442                                         if (++receivedRingT == RING_PATTERNS) {
1443                                                 break;
1444                                         }
1445                                 }
1446                         } else if (i & DAHDI_IOMUX_READ) {
1447                                 res = read(p->subs[idx].dfd, buf, sizeof(buf));
1448                                 if (res < 0) {
1449                                         if (errno != ELAST) {
1450                                                 ast_log(LOG_WARNING, "read returned error: %s\n", strerror(errno));
1451                                                 ast_hangup(chan);
1452                                                 return 1;
1453                                         }
1454                                         break;
1455                                 }
1456                                 if (analog_p->ringt > 0) {
1457                                         if (!(--analog_p->ringt)) {
1458                                                 break;
1459                                         }
1460                                 }
1461                         }
1462                 }
1463         }
1464
1465         /* Check to see if the rings we received match any of the ones in chan_dahdi.conf for this channel */
1466         ast_verb(3, "Detected ring pattern: %d,%d,%d\n", ringdata[0], ringdata[1], ringdata[2]);
1467         matched_context = p->defcontext;
1468         for (counter = 0; counter < 3; counter++) {
1469                 int range = p->drings.ringnum[counter].range;
1470
1471                 distMatches = 0;
1472                 ast_verb(3, "Checking %d,%d,%d with +/- %d range\n",
1473                         p->drings.ringnum[counter].ring[0],
1474                         p->drings.ringnum[counter].ring[1],
1475                         p->drings.ringnum[counter].ring[2],
1476                         range);
1477                 for (counter1 = 0; counter1 < 3; counter1++) {
1478                         int ring = p->drings.ringnum[counter].ring[counter1];
1479
1480                         if (ring == -1) {
1481                                 ast_verb(3, "Pattern ignore (-1) detected, so matching pattern %d regardless.\n",
1482                                         ringdata[counter1]);
1483                                 distMatches++;
1484                         } else if (ring - range <= ringdata[counter1] && ringdata[counter1] <= ring + range) {
1485                                 ast_verb(3, "Ring pattern %d is in range: %d to %d\n",
1486                                         ringdata[counter1], ring - range, ring + range);
1487                                 distMatches++;
1488                         } else {
1489                                 /* The current dring pattern cannot match. */
1490                                 break;
1491                         }
1492                 }
1493
1494                 if (distMatches == 3) {
1495                         /* The ring matches, set the context to whatever is for distinctive ring.. */
1496                         matched_context = S_OR(p->drings.ringContext[counter].contextData, p->defcontext);
1497                         ast_verb(3, "Matched Distinctive Ring context %s\n", matched_context);
1498                         break;
1499                 }
1500         }
1501
1502         /* Set selected distinctive ring context if not already set. */
1503         if (strcmp(p->context, matched_context) != 0) {
1504                 ast_copy_string(p->context, matched_context, sizeof(p->context));
1505                 ast_channel_context_set(chan, matched_context);
1506         }
1507
1508         return 0;
1509 }
1510
1511 static int my_stop_callwait(void *pvt)
1512 {
1513         struct dahdi_pvt *p = pvt;
1514         p->callwaitingrepeat = 0;
1515         p->cidcwexpire = 0;
1516         p->cid_suppress_expire = 0;
1517
1518         return 0;
1519 }
1520
1521 static int send_callerid(struct dahdi_pvt *p);
1522 static int save_conference(struct dahdi_pvt *p);
1523 static int restore_conference(struct dahdi_pvt *p);
1524
1525 static int my_callwait(void *pvt)
1526 {
1527         struct dahdi_pvt *p = pvt;
1528
1529         p->callwaitingrepeat = CALLWAITING_REPEAT_SAMPLES;
1530         if (p->cidspill) {
1531                 ast_log(LOG_WARNING, "Spill already exists?!?\n");
1532                 ast_free(p->cidspill);
1533         }
1534
1535         /*
1536          * SAS: Subscriber Alert Signal, 440Hz for 300ms
1537          * CAS: CPE Alert Signal, 2130Hz * 2750Hz sine waves
1538          */
1539         if (!(p->cidspill = ast_malloc(2400 /* SAS */ + 680 /* CAS */ + READ_SIZE * 4)))
1540                 return -1;
1541         save_conference(p);
1542         /* Silence */
1543         memset(p->cidspill, 0x7f, 2400 + 600 + READ_SIZE * 4);
1544         if (!p->callwaitrings && p->callwaitingcallerid) {
1545                 ast_gen_cas(p->cidspill, 1, 2400 + 680, AST_LAW(p));
1546                 p->callwaitcas = 1;
1547                 p->cidlen = 2400 + 680 + READ_SIZE * 4;
1548         } else {
1549                 ast_gen_cas(p->cidspill, 1, 2400, AST_LAW(p));
1550                 p->callwaitcas = 0;
1551                 p->cidlen = 2400 + READ_SIZE * 4;
1552         }
1553         p->cidpos = 0;
1554         send_callerid(p);
1555
1556         return 0;
1557 }
1558
1559 static int my_send_callerid(void *pvt, int cwcid, struct ast_party_caller *caller)
1560 {
1561         struct dahdi_pvt *p = pvt;
1562
1563         ast_debug(2, "Starting cid spill\n");
1564
1565         if (p->cidspill) {
1566                 ast_log(LOG_WARNING, "cidspill already exists??\n");
1567                 ast_free(p->cidspill);
1568         }
1569
1570         if ((p->cidspill = ast_malloc(MAX_CALLERID_SIZE))) {
1571                 if (cwcid == 0) {
1572                         p->cidlen = ast_callerid_generate(p->cidspill,
1573                                 caller->id.name.str,
1574                                 caller->id.number.str,
1575                                 AST_LAW(p));
1576                 } else {
1577                         ast_verb(3, "CPE supports Call Waiting Caller*ID.  Sending '%s/%s'\n",
1578                                 caller->id.name.str, caller->id.number.str);
1579                         p->callwaitcas = 0;
1580                         p->cidcwexpire = 0;
1581                         p->cidlen = ast_callerid_callwaiting_generate(p->cidspill,
1582                                 caller->id.name.str,
1583                                 caller->id.number.str,
1584                                 AST_LAW(p));
1585                         p->cidlen += READ_SIZE * 4;
1586                 }
1587                 p->cidpos = 0;
1588                 p->cid_suppress_expire = 0;
1589                 send_callerid(p);
1590         }
1591         return 0;
1592 }
1593
1594 static int my_dsp_reset_and_flush_digits(void *pvt)
1595 {
1596         struct dahdi_pvt *p = pvt;
1597         if (p->dsp)
1598                 ast_dsp_digitreset(p->dsp);
1599
1600         return 0;
1601 }
1602
1603 static int my_dsp_set_digitmode(void *pvt, enum analog_dsp_digitmode mode)
1604 {
1605         struct dahdi_pvt *p = pvt;
1606
1607         if (p->channel == CHAN_PSEUDO)
1608                 ast_log(LOG_ERROR, "You have assumed incorrectly sir!\n");
1609
1610         if (mode == ANALOG_DIGITMODE_DTMF) {
1611                 /* If we do hardware dtmf, no need for a DSP */
1612                 if (p->hardwaredtmf) {
1613                         if (p->dsp) {
1614                                 ast_dsp_free(p->dsp);
1615                                 p->dsp = NULL;
1616                         }
1617                         return 0;
1618                 }
1619
1620                 if (!p->dsp) {
1621                         p->dsp = ast_dsp_new();
1622                         if (!p->dsp) {
1623                                 ast_log(LOG_ERROR, "Unable to allocate DSP\n");
1624                                 return -1;
1625                         }
1626                 }
1627
1628                 ast_dsp_set_digitmode(p->dsp, DSP_DIGITMODE_DTMF | p->dtmfrelax);
1629         } else if (mode == ANALOG_DIGITMODE_MF) {
1630                 if (!p->dsp) {
1631                         p->dsp = ast_dsp_new();
1632                         if (!p->dsp) {
1633                                 ast_log(LOG_ERROR, "Unable to allocate DSP\n");
1634                                 return -1;
1635                         }
1636                 }
1637                 ast_dsp_set_digitmode(p->dsp, DSP_DIGITMODE_MF | p->dtmfrelax);
1638         }
1639         return 0;
1640 }
1641
1642 static int dahdi_wink(struct dahdi_pvt *p, int index);
1643
1644 static int my_wink(void *pvt, enum analog_sub sub)
1645 {
1646         struct dahdi_pvt *p = pvt;
1647         int index = analogsub_to_dahdisub(sub);
1648         if (index != SUB_REAL) {
1649                 ast_log(LOG_ERROR, "We used a sub other than SUB_REAL (incorrect assumption sir)\n");
1650         }
1651         return dahdi_wink(p, index);
1652 }
1653
1654 static void wakeup_sub(struct dahdi_pvt *p, int a);
1655
1656 static int reset_conf(struct dahdi_pvt *p);
1657
1658 static inline int dahdi_confmute(struct dahdi_pvt *p, int muted);
1659
1660 static void my_handle_dtmf(void *pvt, struct ast_channel *ast, enum analog_sub analog_index, struct ast_frame **dest)
1661 {
1662         struct ast_frame *f = *dest;
1663         struct dahdi_pvt *p = pvt;
1664         int idx = analogsub_to_dahdisub(analog_index);
1665
1666         ast_debug(1, "%s DTMF digit: 0x%02X '%c' on %s\n",
1667                 f->frametype == AST_FRAME_DTMF_BEGIN ? "Begin" : "End",
1668                 (unsigned)f->subclass.integer, f->subclass.integer, ast_channel_name(ast));
1669
1670         if (f->subclass.integer == 'f') {
1671                 if (f->frametype == AST_FRAME_DTMF_END) {
1672                         /* Fax tone -- Handle and return NULL */
1673                         if ((p->callprogress & CALLPROGRESS_FAX) && !p->faxhandled) {
1674                                 /* If faxbuffers are configured, use them for the fax transmission */
1675                                 if (p->usefaxbuffers && !p->bufferoverrideinuse) {
1676                                         struct dahdi_bufferinfo bi = {
1677                                                 .txbufpolicy = p->faxbuf_policy,
1678                                                 .bufsize = p->bufsize,
1679                                                 .numbufs = p->faxbuf_no
1680                                         };
1681                                         int res;
1682
1683                                         if ((res = ioctl(p->subs[idx].dfd, DAHDI_SET_BUFINFO, &bi)) < 0) {
1684                                                 ast_log(LOG_WARNING, "Channel '%s' unable to set buffer policy, reason: %s\n", ast_channel_name(ast), strerror(errno));
1685                                         } else {
1686                                                 p->bufferoverrideinuse = 1;
1687                                         }
1688                                 }
1689                                 p->faxhandled = 1;
1690                                 if (p->dsp) {
1691                                         p->dsp_features &= ~DSP_FEATURE_FAX_DETECT;
1692                                         ast_dsp_set_features(p->dsp, p->dsp_features);
1693                                         ast_debug(1, "Disabling FAX tone detection on %s after tone received\n", ast_channel_name(ast));
1694                                 }
1695                                 if (strcmp(ast_channel_exten(ast), "fax")) {
1696                                         const char *target_context = S_OR(ast_channel_macrocontext(ast), ast_channel_context(ast));
1697
1698                                         /* We need to unlock 'ast' here because ast_exists_extension has the
1699                                          * potential to start autoservice on the channel. Such action is prone
1700                                          * to deadlock.
1701                                          */
1702                                         ast_mutex_unlock(&p->lock);
1703                                         ast_channel_unlock(ast);
1704                                         if (ast_exists_extension(ast, target_context, "fax", 1,
1705                                                 S_COR(ast_channel_caller(ast)->id.number.valid, ast_channel_caller(ast)->id.number.str, NULL))) {
1706                                                 ast_channel_lock(ast);
1707                                                 ast_mutex_lock(&p->lock);
1708                                                 ast_verb(3, "Redirecting %s to fax extension\n", ast_channel_name(ast));
1709                                                 /* Save the DID/DNIS when we transfer the fax call to a "fax" extension */
1710                                                 pbx_builtin_setvar_helper(ast, "FAXEXTEN", ast_channel_exten(ast));
1711                                                 if (ast_async_goto(ast, target_context, "fax", 1))
1712                                                         ast_log(LOG_WARNING, "Failed to async goto '%s' into fax of '%s'\n", ast_channel_name(ast), target_context);
1713                                         } else {
1714                                                 ast_channel_lock(ast);
1715                                                 ast_mutex_lock(&p->lock);
1716                                                 ast_log(LOG_NOTICE, "Fax detected, but no fax extension\n");
1717                                         }
1718                                 } else {
1719                                         ast_debug(1, "Already in a fax extension, not redirecting\n");
1720                                 }
1721                         } else {
1722                                 ast_debug(1, "Fax already handled\n");
1723                         }
1724                         dahdi_confmute(p, 0);
1725                 }
1726                 p->subs[idx].f.frametype = AST_FRAME_NULL;
1727                 p->subs[idx].f.subclass.integer = 0;
1728                 *dest = &p->subs[idx].f;
1729         }
1730 }
1731
1732 static void my_lock_private(void *pvt)
1733 {
1734         struct dahdi_pvt *p = pvt;
1735         ast_mutex_lock(&p->lock);
1736 }
1737
1738 static void my_unlock_private(void *pvt)
1739 {
1740         struct dahdi_pvt *p = pvt;
1741         ast_mutex_unlock(&p->lock);
1742 }
1743
1744 static void my_deadlock_avoidance_private(void *pvt)
1745 {
1746         struct dahdi_pvt *p = pvt;
1747
1748         DEADLOCK_AVOIDANCE(&p->lock);
1749 }
1750
1751 static struct ast_manager_event_blob *dahdichannel_to_ami(struct stasis_message *msg)
1752 {
1753         RAII_VAR(struct ast_str *, channel_string, NULL, ast_free);
1754         struct ast_channel_blob *obj = stasis_message_data(msg);
1755         struct ast_json *span, *channel;
1756
1757         channel_string = ast_manager_build_channel_state_string(obj->snapshot);
1758         if (!channel_string) {
1759                 return NULL;
1760         }
1761
1762         span = ast_json_object_get(obj->blob, "span");
1763         channel = ast_json_object_get(obj->blob, "channel");
1764
1765         return ast_manager_event_blob_create(EVENT_FLAG_CALL, "DAHDIChannel",
1766                 "%s"
1767                 "DAHDISpan: %u\r\n"
1768                 "DAHDIChannel: %s\r\n",
1769                 ast_str_buffer(channel_string),
1770                 (unsigned int)ast_json_integer_get(span),
1771                 ast_json_string_get(channel));
1772 }
1773
1774 STASIS_MESSAGE_TYPE_DEFN_LOCAL(dahdichannel_type,
1775         .to_ami = dahdichannel_to_ami,
1776         );
1777
1778 /*! \brief Sends a DAHDIChannel channel blob used to produce DAHDIChannel AMI messages */
1779 static void publish_dahdichannel(struct ast_channel *chan, int span, const char *dahdi_channel)
1780 {
1781         RAII_VAR(struct ast_json *, blob, NULL, ast_json_unref);
1782
1783         ast_assert(dahdi_channel != NULL);
1784
1785         blob = ast_json_pack("{s: i, s: s}",
1786                 "span", span,
1787                 "channel", dahdi_channel);
1788         if (!blob) {
1789                 return;
1790         }
1791
1792         ast_channel_lock(chan);
1793         ast_channel_publish_blob(chan, dahdichannel_type(), blob);
1794         ast_channel_unlock(chan);
1795 }
1796
1797 /*!
1798  * \internal
1799  * \brief Post an AMI DAHDI channel association event.
1800  * \since 1.8
1801  *
1802  * \param p DAHDI private pointer
1803  * \param chan Channel associated with the private pointer
1804  *
1805  * \return Nothing
1806  */
1807 static void dahdi_ami_channel_event(struct dahdi_pvt *p, struct ast_channel *chan)
1808 {
1809         char ch_name[20];
1810
1811         if (p->channel < CHAN_PSEUDO) {
1812                 /* No B channel */
1813                 snprintf(ch_name, sizeof(ch_name), "no-media (%d)", p->channel);
1814         } else if (p->channel == CHAN_PSEUDO) {
1815                 /* Pseudo channel */
1816                 strcpy(ch_name, "pseudo");
1817         } else {
1818                 /* Real channel */
1819                 snprintf(ch_name, sizeof(ch_name), "%d", p->channel);
1820         }
1821         publish_dahdichannel(chan, p->span, ch_name);
1822 }
1823
1824 #ifdef HAVE_PRI
1825 /*!
1826  * \internal
1827  * \brief Post an AMI DAHDI channel association event.
1828  * \since 1.8
1829  *
1830  * \param pvt DAHDI private pointer
1831  * \param chan Channel associated with the private pointer
1832  *
1833  * \return Nothing
1834  */
1835 static void my_ami_channel_event(void *pvt, struct ast_channel *chan)
1836 {
1837         struct dahdi_pvt *p = pvt;
1838
1839         dahdi_ami_channel_event(p, chan);
1840 }
1841 #endif
1842
1843 /* linear_mode = 0 - turn linear mode off, >0 - turn linear mode on
1844 *       returns the last value of the linear setting
1845 */
1846 static int my_set_linear_mode(void *pvt, enum analog_sub sub, int linear_mode)
1847 {
1848         struct dahdi_pvt *p = pvt;
1849         int oldval;
1850         int idx = analogsub_to_dahdisub(sub);
1851
1852         dahdi_setlinear(p->subs[idx].dfd, linear_mode);
1853         oldval = p->subs[idx].linear;
1854         p->subs[idx].linear = linear_mode ? 1 : 0;
1855         return oldval;
1856 }
1857
1858 static void my_set_inthreeway(void *pvt, enum analog_sub sub, int inthreeway)
1859 {
1860         struct dahdi_pvt *p = pvt;
1861         int idx = analogsub_to_dahdisub(sub);
1862
1863         p->subs[idx].inthreeway = inthreeway;
1864 }
1865
1866 static int get_alarms(struct dahdi_pvt *p);
1867 static void handle_alarms(struct dahdi_pvt *p, int alms);
1868 static void my_get_and_handle_alarms(void *pvt)
1869 {
1870         int res;
1871         struct dahdi_pvt *p = pvt;
1872
1873         res = get_alarms(p);
1874         handle_alarms(p, res);
1875 }
1876
1877 static void *my_get_sigpvt_bridged_channel(struct ast_channel *chan)
1878 {
1879         RAII_VAR(struct ast_channel *, bridged, ast_channel_bridge_peer(chan), ast_channel_cleanup);
1880
1881         if (bridged && ast_channel_tech(bridged) == &dahdi_tech) {
1882                 struct dahdi_pvt *p = ast_channel_tech_pvt(bridged);
1883
1884                 if (dahdi_analog_lib_handles(p->sig, p->radio, p->oprmode)) {
1885                         return p->sig_pvt;
1886                 }
1887         }
1888         return NULL;
1889 }
1890
1891 static int my_get_sub_fd(void *pvt, enum analog_sub sub)
1892 {
1893         struct dahdi_pvt *p = pvt;
1894         int dahdi_sub = analogsub_to_dahdisub(sub);
1895         return p->subs[dahdi_sub].dfd;
1896 }
1897
1898 static void my_set_cadence(void *pvt, int *cid_rings, struct ast_channel *ast)
1899 {
1900         struct dahdi_pvt *p = pvt;
1901
1902         /* Choose proper cadence */
1903         if ((p->distinctivering > 0) && (p->distinctivering <= num_cadence)) {
1904                 if (ioctl(p->subs[SUB_REAL].dfd, DAHDI_SETCADENCE, &cadences[p->distinctivering - 1]))
1905                         ast_log(LOG_WARNING, "Unable to set distinctive ring cadence %d on '%s': %s\n", p->distinctivering, ast_channel_name(ast), strerror(errno));
1906                 *cid_rings = cidrings[p->distinctivering - 1];
1907         } else {
1908                 if (ioctl(p->subs[SUB_REAL].dfd, DAHDI_SETCADENCE, NULL))
1909                         ast_log(LOG_WARNING, "Unable to reset default ring on '%s': %s\n", ast_channel_name(ast), strerror(errno));
1910                 *cid_rings = p->sendcalleridafter;
1911         }
1912 }
1913
1914 static void my_set_alarm(void *pvt, int in_alarm)
1915 {
1916         struct dahdi_pvt *p = pvt;
1917
1918         p->inalarm = in_alarm;
1919 }
1920
1921 static void my_set_dialing(void *pvt, int is_dialing)
1922 {
1923         struct dahdi_pvt *p = pvt;
1924
1925         p->dialing = is_dialing;
1926 }
1927
1928 static void my_set_outgoing(void *pvt, int is_outgoing)
1929 {
1930         struct dahdi_pvt *p = pvt;
1931
1932         p->outgoing = is_outgoing;
1933 }
1934
1935 #if defined(HAVE_PRI) || defined(HAVE_SS7)
1936 static void my_set_digital(void *pvt, int is_digital)
1937 {
1938         struct dahdi_pvt *p = pvt;
1939
1940         p->digital = is_digital;
1941 }
1942 #endif  /* defined(HAVE_PRI) || defined(HAVE_SS7) */
1943
1944 #if defined(HAVE_SS7)
1945 static void my_set_inservice(void *pvt, int is_inservice)
1946 {
1947         struct dahdi_pvt *p = pvt;
1948
1949         p->inservice = is_inservice;
1950 }
1951 #endif  /* defined(HAVE_SS7) */
1952
1953 #if defined(HAVE_SS7)
1954 static void my_set_locallyblocked(void *pvt, int is_blocked)
1955 {
1956         struct dahdi_pvt *p = pvt;
1957
1958         p->locallyblocked = is_blocked;
1959 }
1960 #endif  /* defined(HAVE_SS7) */
1961
1962 #if defined(HAVE_SS7)
1963 static void my_set_remotelyblocked(void *pvt, int is_blocked)
1964 {
1965         struct dahdi_pvt *p = pvt;
1966
1967         p->remotelyblocked = is_blocked;
1968 }
1969 #endif  /* defined(HAVE_SS7) */
1970
1971 static void my_set_ringtimeout(void *pvt, int ringt)
1972 {
1973         struct dahdi_pvt *p = pvt;
1974         p->ringt = ringt;
1975 }
1976
1977 static void my_set_waitingfordt(void *pvt, struct ast_channel *ast)
1978 {
1979         struct dahdi_pvt *p = pvt;
1980
1981         if (p->waitfordialtone && CANPROGRESSDETECT(p) && p->dsp) {
1982                 ast_debug(1, "Defer dialing for %dms or dialtone\n", p->waitfordialtone);
1983                 gettimeofday(&p->waitingfordt, NULL);
1984                 ast_setstate(ast, AST_STATE_OFFHOOK);
1985         }
1986 }
1987
1988 static int my_check_waitingfordt(void *pvt)
1989 {
1990         struct dahdi_pvt *p = pvt;
1991
1992         if (p->waitingfordt.tv_sec) {
1993                 return 1;
1994         }
1995
1996         return 0;
1997 }
1998
1999 static void my_set_confirmanswer(void *pvt, int flag)
2000 {
2001         struct dahdi_pvt *p = pvt;
2002         p->confirmanswer = flag;
2003 }
2004
2005 static int my_check_confirmanswer(void *pvt)
2006 {
2007         struct dahdi_pvt *p = pvt;
2008         if (p->confirmanswer) {
2009                 return 1;
2010         }
2011
2012         return 0;
2013 }
2014
2015 static void my_set_callwaiting(void *pvt, int callwaiting_enable)
2016 {
2017         struct dahdi_pvt *p = pvt;
2018
2019         p->callwaiting = callwaiting_enable;
2020 }
2021
2022 static void my_cancel_cidspill(void *pvt)
2023 {
2024         struct dahdi_pvt *p = pvt;
2025
2026         ast_free(p->cidspill);
2027         p->cidspill = NULL;
2028         restore_conference(p);
2029 }
2030
2031 static int my_confmute(void *pvt, int mute)
2032 {
2033         struct dahdi_pvt *p = pvt;
2034         return dahdi_confmute(p, mute);
2035 }
2036
2037 static void my_set_pulsedial(void *pvt, int flag)
2038 {
2039         struct dahdi_pvt *p = pvt;
2040         p->pulsedial = flag;
2041 }
2042
2043 static void my_set_new_owner(void *pvt, struct ast_channel *new_owner)
2044 {
2045         struct dahdi_pvt *p = pvt;
2046
2047         p->owner = new_owner;
2048 }
2049
2050 static const char *my_get_orig_dialstring(void *pvt)
2051 {
2052         struct dahdi_pvt *p = pvt;
2053
2054         return p->dialstring;
2055 }
2056
2057 static void my_increase_ss_count(void)
2058 {
2059         ast_mutex_lock(&ss_thread_lock);
2060         ss_thread_count++;
2061         ast_mutex_unlock(&ss_thread_lock);
2062 }
2063
2064 static void my_decrease_ss_count(void)
2065 {
2066         ast_mutex_lock(&ss_thread_lock);
2067         ss_thread_count--;
2068         ast_cond_signal(&ss_thread_complete);
2069         ast_mutex_unlock(&ss_thread_lock);
2070 }
2071
2072 static void my_all_subchannels_hungup(void *pvt)
2073 {
2074         struct dahdi_pvt *p = pvt;
2075         int res, law;
2076
2077         p->faxhandled = 0;
2078         p->didtdd = 0;
2079
2080         if (p->dsp) {
2081                 ast_dsp_free(p->dsp);
2082                 p->dsp = NULL;
2083         }
2084
2085         p->law = p->law_default;
2086         law = p->law_default;
2087         res = ioctl(p->subs[SUB_REAL].dfd, DAHDI_SETLAW, &law);
2088         if (res < 0)
2089                 ast_log(LOG_WARNING, "Unable to set law on channel %d to default: %s\n", p->channel, strerror(errno));
2090
2091         dahdi_setlinear(p->subs[SUB_REAL].dfd, 0);
2092
2093 #if 1
2094         {
2095         int i;
2096         p->owner = NULL;
2097         /* Cleanup owners here */
2098         for (i = 0; i < 3; i++) {
2099                 p->subs[i].owner = NULL;
2100         }
2101         }
2102 #endif
2103
2104         reset_conf(p);
2105         if (num_restart_pending == 0) {
2106                 restart_monitor();
2107         }
2108 }
2109
2110 static int conf_del(struct dahdi_pvt *p, struct dahdi_subchannel *c, int index);
2111
2112 static int my_conf_del(void *pvt, enum analog_sub sub)
2113 {
2114         struct dahdi_pvt *p = pvt;
2115         int x = analogsub_to_dahdisub(sub);
2116
2117         return conf_del(p, &p->subs[x], x);
2118 }
2119
2120 static int conf_add(struct dahdi_pvt *p, struct dahdi_subchannel *c, int index, int slavechannel);
2121
2122 static int my_conf_add(void *pvt, enum analog_sub sub)
2123 {
2124         struct dahdi_pvt *p = pvt;
2125         int x = analogsub_to_dahdisub(sub);
2126
2127         return conf_add(p, &p->subs[x], x, 0);
2128 }
2129
2130 static int isslavenative(struct dahdi_pvt *p, struct dahdi_pvt **out);
2131
2132 static int my_complete_conference_update(void *pvt, int needconference)
2133 {
2134         struct dahdi_pvt *p = pvt;
2135         int needconf = needconference;
2136         int x;
2137         int useslavenative;
2138         struct dahdi_pvt *slave = NULL;
2139
2140         useslavenative = isslavenative(p, &slave);
2141
2142         /* If we have a slave, add him to our conference now. or DAX
2143            if this is slave native */
2144         for (x = 0; x < MAX_SLAVES; x++) {
2145                 if (p->slaves[x]) {
2146                         if (useslavenative)
2147                                 conf_add(p, &p->slaves[x]->subs[SUB_REAL], SUB_REAL, GET_CHANNEL(p));
2148                         else {
2149                                 conf_add(p, &p->slaves[x]->subs[SUB_REAL], SUB_REAL, 0);
2150                                 needconf++;
2151                         }
2152                 }
2153         }
2154         /* If we're supposed to be in there, do so now */
2155         if (p->inconference && !p->subs[SUB_REAL].inthreeway) {
2156                 if (useslavenative)
2157                         conf_add(p, &p->subs[SUB_REAL], SUB_REAL, GET_CHANNEL(slave));
2158                 else {
2159                         conf_add(p, &p->subs[SUB_REAL], SUB_REAL, 0);
2160                         needconf++;
2161                 }
2162         }
2163         /* If we have a master, add ourselves to his conference */
2164         if (p->master) {
2165                 if (isslavenative(p->master, NULL)) {
2166                         conf_add(p->master, &p->subs[SUB_REAL], SUB_REAL, GET_CHANNEL(p->master));
2167                 } else {
2168                         conf_add(p->master, &p->subs[SUB_REAL], SUB_REAL, 0);
2169                 }
2170         }
2171         if (!needconf) {
2172                 /* Nobody is left (or should be left) in our conference.
2173                    Kill it. */
2174                 p->confno = -1;
2175         }
2176
2177         return 0;
2178 }
2179
2180 static int check_for_conference(struct dahdi_pvt *p);
2181
2182 static int my_check_for_conference(void *pvt)
2183 {
2184         struct dahdi_pvt *p = pvt;
2185         return check_for_conference(p);
2186 }
2187
2188 static void my_swap_subchannels(void *pvt, enum analog_sub a, struct ast_channel *ast_a,  enum analog_sub b, struct ast_channel *ast_b)
2189 {
2190         struct dahdi_pvt *p = pvt;
2191         int da, db;
2192         int tchan;
2193         int tinthreeway;
2194
2195         da = analogsub_to_dahdisub(a);
2196         db = analogsub_to_dahdisub(b);
2197
2198         tchan = p->subs[da].chan;
2199         p->subs[da].chan = p->subs[db].chan;
2200         p->subs[db].chan = tchan;
2201
2202         tinthreeway = p->subs[da].inthreeway;
2203         p->subs[da].inthreeway = p->subs[db].inthreeway;
2204         p->subs[db].inthreeway = tinthreeway;
2205
2206         p->subs[da].owner = ast_a;
2207         p->subs[db].owner = ast_b;
2208
2209         if (ast_a)
2210                 ast_channel_set_fd(ast_a, 0, p->subs[da].dfd);
2211         if (ast_b)
2212                 ast_channel_set_fd(ast_b, 0, p->subs[db].dfd);
2213
2214         wakeup_sub(p, a);
2215         wakeup_sub(p, b);
2216
2217         return;
2218 }
2219
2220 /*!
2221  * \internal
2222  * \brief performs duties of dahdi_new, but also removes and possibly unbinds (if callid_created is 1) before returning
2223  * \note this variant of dahdi should only be used in conjunction with ast_callid_threadstorage_auto()
2224  *
2225  * \param callid_created value returned from ast_callid_threadstorage_auto()
2226  */
2227 static struct ast_channel *dahdi_new_callid_clean(struct dahdi_pvt *i, int state, int startpbx, int idx, int law, const struct ast_assigned_ids *assignedids, const struct ast_channel *requestor, ast_callid callid, int callid_created);
2228
2229 static struct ast_channel *dahdi_new(struct dahdi_pvt *i, int state, int startpbx, int idx, int law, const struct ast_assigned_ids *assignedids, const struct ast_channel *requestor, ast_callid callid);
2230
2231 static struct ast_channel *my_new_analog_ast_channel(void *pvt, int state, int startpbx, enum analog_sub sub, const struct ast_channel *requestor)
2232 {
2233         ast_callid callid = 0;
2234         int callid_created = ast_callid_threadstorage_auto(&callid);
2235         struct dahdi_pvt *p = pvt;
2236         int dsub = analogsub_to_dahdisub(sub);
2237
2238         return dahdi_new_callid_clean(p, state, startpbx, dsub, 0, NULL, requestor, callid, callid_created);
2239 }
2240
2241 #if defined(HAVE_PRI) || defined(HAVE_SS7)
2242 static int dahdi_setlaw(int dfd, int law)
2243 {
2244         int res;
2245         res = ioctl(dfd, DAHDI_SETLAW, &law);
2246         if (res)
2247                 return res;
2248         return 0;
2249 }
2250 #endif  /* defined(HAVE_PRI) || defined(HAVE_SS7) */
2251
2252 #if defined(HAVE_PRI)
2253 static struct ast_channel *my_new_pri_ast_channel(void *pvt, int state,
2254         enum sig_pri_law law, char *exten, const struct ast_assigned_ids *assignedids,
2255         const struct ast_channel *requestor)
2256 {
2257         struct dahdi_pvt *p = pvt;
2258         int audio;
2259         int newlaw = -1;
2260         ast_callid callid = 0;
2261         int callid_created = ast_callid_threadstorage_auto(&callid);
2262
2263         switch (p->sig) {
2264         case SIG_PRI_LIB_HANDLE_CASES:
2265                 if (((struct sig_pri_chan *) p->sig_pvt)->no_b_channel) {
2266                         /* PRI nobch pseudo channel.  Does not handle ioctl(DAHDI_AUDIOMODE) */
2267                         break;
2268                 }
2269                 /* Fall through */
2270         default:
2271                 /* Set to audio mode at this point */
2272                 audio = 1;
2273                 if (ioctl(p->subs[SUB_REAL].dfd, DAHDI_AUDIOMODE, &audio) == -1) {
2274                         ast_log(LOG_WARNING, "Unable to set audio mode on channel %d to %d: %s\n",
2275                                 p->channel, audio, strerror(errno));
2276                 }
2277                 break;
2278         }
2279
2280         if (law != SIG_PRI_DEFLAW) {
2281                 dahdi_setlaw(p->subs[SUB_REAL].dfd, (law == SIG_PRI_ULAW) ? DAHDI_LAW_MULAW : DAHDI_LAW_ALAW);
2282         }
2283
2284         ast_copy_string(p->exten, exten, sizeof(p->exten));
2285
2286         switch (law) {
2287                 case SIG_PRI_DEFLAW:
2288                         newlaw = 0;
2289                         break;
2290                 case SIG_PRI_ALAW:
2291                         newlaw = DAHDI_LAW_ALAW;
2292                         break;
2293                 case SIG_PRI_ULAW:
2294                         newlaw = DAHDI_LAW_MULAW;
2295                         break;
2296         }
2297
2298         return dahdi_new_callid_clean(p, state, 0, SUB_REAL, newlaw, assignedids, requestor, callid, callid_created);
2299 }
2300 #endif  /* defined(HAVE_PRI) */
2301
2302 static int set_actual_gain(int fd, float rxgain, float txgain, float rxdrc, float txdrc, int law);
2303
2304 #if defined(HAVE_PRI) || defined(HAVE_SS7)
2305 /*!
2306  * \internal
2307  * \brief Open the PRI/SS7 channel media path.
2308  * \since 1.8
2309  *
2310  * \param p Channel private control structure.
2311  *
2312  * \return Nothing
2313  */
2314 static void my_pri_ss7_open_media(void *p)
2315 {
2316         struct dahdi_pvt *pvt = p;
2317         int res;
2318         int dfd;
2319         int set_val;
2320
2321         dfd = pvt->subs[SUB_REAL].dfd;
2322
2323         /* Open the media path. */
2324         set_val = 1;
2325         res = ioctl(dfd, DAHDI_AUDIOMODE, &set_val);
2326         if (res < 0) {
2327                 ast_log(LOG_WARNING, "Unable to enable audio mode on channel %d (%s)\n",
2328                         pvt->channel, strerror(errno));
2329         }
2330
2331         /* Set correct companding law for this call. */
2332         res = dahdi_setlaw(dfd, pvt->law);
2333         if (res < 0) {
2334                 ast_log(LOG_WARNING, "Unable to set law on channel %d\n", pvt->channel);
2335         }
2336
2337         /* Set correct gain for this call. */
2338         if (pvt->digital) {
2339                 res = set_actual_gain(dfd, 0, 0, pvt->rxdrc, pvt->txdrc, pvt->law);
2340         } else {
2341                 res = set_actual_gain(dfd, pvt->rxgain, pvt->txgain, pvt->rxdrc, pvt->txdrc,
2342                         pvt->law);
2343         }
2344         if (res < 0) {
2345                 ast_log(LOG_WARNING, "Unable to set gains on channel %d\n", pvt->channel);
2346         }
2347
2348         if (pvt->dsp_features && pvt->dsp) {
2349                 ast_dsp_set_features(pvt->dsp, pvt->dsp_features);
2350                 pvt->dsp_features = 0;
2351         }
2352 }
2353 #endif  /* defined(HAVE_PRI) || defined(HAVE_SS7) */
2354
2355 #if defined(HAVE_PRI)
2356 /*!
2357  * \internal
2358  * \brief Ask DAHDI to dial the given dial string.
2359  * \since 1.8.11
2360  *
2361  * \param p Channel private control structure.
2362  * \param dial_string String to pass to DAHDI to dial.
2363  *
2364  * \note The channel private lock needs to be held when calling.
2365  *
2366  * \return Nothing
2367  */
2368 static void my_pri_dial_digits(void *p, const char *dial_string)
2369 {
2370         char dial_str[DAHDI_MAX_DTMF_BUF];
2371         struct dahdi_pvt *pvt = p;
2372         int res;
2373
2374         snprintf(dial_str, sizeof(dial_str), "T%s", dial_string);
2375         res = dahdi_dial_str(pvt, DAHDI_DIAL_OP_APPEND, dial_str);
2376         if (!res) {
2377                 pvt->dialing = 1;
2378         }
2379 }
2380 #endif  /* defined(HAVE_PRI) */
2381
2382 static int unalloc_sub(struct dahdi_pvt *p, int x);
2383
2384 static int my_unallocate_sub(void *pvt, enum analog_sub analogsub)
2385 {
2386         struct dahdi_pvt *p = pvt;
2387
2388         return unalloc_sub(p, analogsub_to_dahdisub(analogsub));
2389 }
2390
2391 static int alloc_sub(struct dahdi_pvt *p, int x);
2392
2393 static int my_allocate_sub(void *pvt, enum analog_sub analogsub)
2394 {
2395         struct dahdi_pvt *p = pvt;
2396
2397         return alloc_sub(p, analogsub_to_dahdisub(analogsub));
2398 }
2399
2400 static int has_voicemail(struct dahdi_pvt *p);
2401
2402 static int my_has_voicemail(void *pvt)
2403 {
2404         struct dahdi_pvt *p = pvt;
2405
2406         return has_voicemail(p);
2407 }
2408
2409 static int my_play_tone(void *pvt, enum analog_sub sub, enum analog_tone tone)
2410 {
2411         struct dahdi_pvt *p = pvt;
2412         int index;
2413
2414         index = analogsub_to_dahdisub(sub);
2415
2416         return tone_zone_play_tone(p->subs[index].dfd, analog_tone_to_dahditone(tone));
2417 }
2418
2419 static enum analog_event dahdievent_to_analogevent(int event)
2420 {
2421         enum analog_event res;
2422
2423         switch (event) {
2424         case DAHDI_EVENT_ONHOOK:
2425                 res = ANALOG_EVENT_ONHOOK;
2426                 break;
2427         case DAHDI_EVENT_RINGOFFHOOK:
2428                 res = ANALOG_EVENT_RINGOFFHOOK;
2429                 break;
2430         case DAHDI_EVENT_WINKFLASH:
2431                 res = ANALOG_EVENT_WINKFLASH;
2432                 break;
2433         case DAHDI_EVENT_ALARM:
2434                 res = ANALOG_EVENT_ALARM;
2435                 break;
2436         case DAHDI_EVENT_NOALARM:
2437                 res = ANALOG_EVENT_NOALARM;
2438                 break;
2439         case DAHDI_EVENT_DIALCOMPLETE:
2440                 res = ANALOG_EVENT_DIALCOMPLETE;
2441                 break;
2442         case DAHDI_EVENT_RINGERON:
2443                 res = ANALOG_EVENT_RINGERON;
2444                 break;
2445         case DAHDI_EVENT_RINGEROFF:
2446                 res = ANALOG_EVENT_RINGEROFF;
2447                 break;
2448         case DAHDI_EVENT_HOOKCOMPLETE:
2449                 res = ANALOG_EVENT_HOOKCOMPLETE;
2450                 break;
2451         case DAHDI_EVENT_PULSE_START:
2452                 res = ANALOG_EVENT_PULSE_START;
2453                 break;
2454         case DAHDI_EVENT_POLARITY:
2455                 res = ANALOG_EVENT_POLARITY;
2456                 break;
2457         case DAHDI_EVENT_RINGBEGIN:
2458                 res = ANALOG_EVENT_RINGBEGIN;
2459                 break;
2460         case DAHDI_EVENT_EC_DISABLED:
2461                 res = ANALOG_EVENT_EC_DISABLED;
2462                 break;
2463         case DAHDI_EVENT_REMOVED:
2464                 res = ANALOG_EVENT_REMOVED;
2465                 break;
2466         case DAHDI_EVENT_NEONMWI_ACTIVE:
2467                 res = ANALOG_EVENT_NEONMWI_ACTIVE;
2468                 break;
2469         case DAHDI_EVENT_NEONMWI_INACTIVE:
2470                 res = ANALOG_EVENT_NEONMWI_INACTIVE;
2471                 break;
2472 #ifdef HAVE_DAHDI_ECHOCANCEL_FAX_MODE
2473         case DAHDI_EVENT_TX_CED_DETECTED:
2474                 res = ANALOG_EVENT_TX_CED_DETECTED;
2475                 break;
2476         case DAHDI_EVENT_RX_CED_DETECTED:
2477                 res = ANALOG_EVENT_RX_CED_DETECTED;
2478                 break;
2479         case DAHDI_EVENT_EC_NLP_DISABLED:
2480                 res = ANALOG_EVENT_EC_NLP_DISABLED;
2481                 break;
2482         case DAHDI_EVENT_EC_NLP_ENABLED:
2483                 res = ANALOG_EVENT_EC_NLP_ENABLED;
2484                 break;
2485 #endif
2486         case DAHDI_EVENT_PULSEDIGIT:
2487                 res = ANALOG_EVENT_PULSEDIGIT;
2488                 break;
2489         case DAHDI_EVENT_DTMFDOWN:
2490                 res = ANALOG_EVENT_DTMFDOWN;
2491                 break;
2492         case DAHDI_EVENT_DTMFUP:
2493                 res = ANALOG_EVENT_DTMFUP;
2494                 break;
2495         default:
2496                 switch(event & 0xFFFF0000) {
2497                 case DAHDI_EVENT_PULSEDIGIT:
2498                 case DAHDI_EVENT_DTMFDOWN:
2499                 case DAHDI_EVENT_DTMFUP:
2500                         /* The event includes a digit number in the low word.
2501                          * Converting it to a 'enum analog_event' would remove
2502                          * that information. Thus it is returned as-is.
2503                          */
2504                         return event;
2505                 }
2506
2507                 res = ANALOG_EVENT_ERROR;
2508                 break;
2509         }
2510
2511         return res;
2512 }
2513
2514 static inline int dahdi_wait_event(int fd);
2515
2516 static int my_wait_event(void *pvt)
2517 {
2518         struct dahdi_pvt *p = pvt;
2519
2520         return dahdi_wait_event(p->subs[SUB_REAL].dfd);
2521 }
2522
2523 static int my_get_event(void *pvt)
2524 {
2525         struct dahdi_pvt *p = pvt;
2526         int res;
2527
2528         if (p->fake_event) {
2529                 res = p->fake_event;
2530                 p->fake_event = 0;
2531         } else
2532                 res = dahdi_get_event(p->subs[SUB_REAL].dfd);
2533
2534         return dahdievent_to_analogevent(res);
2535 }
2536
2537 static int my_is_off_hook(void *pvt)
2538 {
2539         struct dahdi_pvt *p = pvt;
2540         int res;
2541         struct dahdi_params par;
2542
2543         memset(&par, 0, sizeof(par));
2544
2545         if (p->subs[SUB_REAL].dfd > -1)
2546                 res = ioctl(p->subs[SUB_REAL].dfd, DAHDI_GET_PARAMS, &par);
2547         else {
2548                 /* Assume not off hook on CVRS */
2549                 res = 0;
2550                 par.rxisoffhook = 0;
2551         }
2552         if (res) {
2553                 ast_log(LOG_WARNING, "Unable to check hook state on channel %d: %s\n", p->channel, strerror(errno));
2554         }
2555
2556         if ((p->sig == SIG_FXSKS) || (p->sig == SIG_FXSGS)) {
2557                 /* When "onhook" that means no battery on the line, and thus
2558                 it is out of service..., if it's on a TDM card... If it's a channel
2559                 bank, there is no telling... */
2560                 return (par.rxbits > -1) || par.rxisoffhook;
2561         }
2562
2563         return par.rxisoffhook;
2564 }
2565
2566 static int my_set_echocanceller(void *pvt, int enable)
2567 {
2568         struct dahdi_pvt *p = pvt;
2569
2570         if (enable)
2571                 dahdi_ec_enable(p);
2572         else
2573                 dahdi_ec_disable(p);
2574
2575         return 0;
2576 }
2577
2578 static int dahdi_ring_phone(struct dahdi_pvt *p);
2579
2580 static int my_ring(void *pvt)
2581 {
2582         struct dahdi_pvt *p = pvt;
2583
2584         return dahdi_ring_phone(p);
2585 }
2586
2587 static int my_flash(void *pvt)
2588 {
2589         struct dahdi_pvt *p = pvt;
2590         int func = DAHDI_FLASH;
2591         return ioctl(p->subs[SUB_REAL].dfd, DAHDI_HOOK, &func);
2592 }
2593
2594 static inline int dahdi_set_hook(int fd, int hs);
2595
2596 static int my_off_hook(void *pvt)
2597 {
2598         struct dahdi_pvt *p = pvt;
2599         return dahdi_set_hook(p->subs[SUB_REAL].dfd, DAHDI_OFFHOOK);
2600 }
2601
2602 static void my_set_needringing(void *pvt, int value)
2603 {
2604         struct dahdi_pvt *p = pvt;
2605         p->subs[SUB_REAL].needringing = value;
2606 }
2607
2608 static void my_set_polarity(void *pvt, int value)
2609 {
2610         struct dahdi_pvt *p = pvt;
2611
2612         if (p->channel == CHAN_PSEUDO) {
2613                 return;
2614         }
2615         p->polarity = value;
2616         ioctl(p->subs[SUB_REAL].dfd, DAHDI_SETPOLARITY, &value);
2617 }
2618
2619 static void my_start_polarityswitch(void *pvt)
2620 {
2621         struct dahdi_pvt *p = pvt;
2622
2623         if (p->answeronpolarityswitch || p->hanguponpolarityswitch) {
2624                 my_set_polarity(pvt, 0);
2625         }
2626 }
2627
2628 static void my_answer_polarityswitch(void *pvt)
2629 {
2630         struct dahdi_pvt *p = pvt;
2631
2632         if (!p->answeronpolarityswitch) {
2633                 return;
2634         }
2635
2636         my_set_polarity(pvt, 1);
2637 }
2638
2639 static void my_hangup_polarityswitch(void *pvt)
2640 {
2641         struct dahdi_pvt *p = pvt;
2642
2643         if (!p->hanguponpolarityswitch) {
2644                 return;
2645         }
2646
2647         if (p->answeronpolarityswitch) {
2648                 my_set_polarity(pvt, 0);
2649         } else {
2650                 my_set_polarity(pvt, 1);
2651         }
2652 }
2653
2654 static int my_start(void *pvt)
2655 {
2656         struct dahdi_pvt *p = pvt;
2657         int x = DAHDI_START;
2658
2659         return ioctl(p->subs[SUB_REAL].dfd, DAHDI_HOOK, &x);
2660 }
2661
2662 static int my_dial_digits(void *pvt, enum analog_sub sub, struct analog_dialoperation *dop)
2663 {
2664         struct dahdi_pvt *p = pvt;
2665
2666         if (dop->op != ANALOG_DIAL_OP_REPLACE) {
2667                 ast_log(LOG_ERROR, "Fix the dial_digits callback!\n");
2668                 return -1;
2669         }
2670
2671         if (sub != ANALOG_SUB_REAL) {
2672                 ast_log(LOG_ERROR, "Trying to dial_digits '%s' on channel %d subchannel %u\n",
2673                         dop->dialstr, p->channel, sub);
2674                 return -1;
2675         }
2676
2677         return dahdi_dial_str(p, DAHDI_DIAL_OP_REPLACE, dop->dialstr);
2678 }
2679
2680 static void dahdi_train_ec(struct dahdi_pvt *p);
2681
2682 static int my_train_echocanceller(void *pvt)
2683 {
2684         struct dahdi_pvt *p = pvt;
2685
2686         dahdi_train_ec(p);
2687
2688         return 0;
2689 }
2690
2691 static int my_is_dialing(void *pvt, enum analog_sub sub)
2692 {
2693         struct dahdi_pvt *p = pvt;
2694         int index;
2695         int x;
2696
2697         index = analogsub_to_dahdisub(sub);
2698
2699         if (ioctl(p->subs[index].dfd, DAHDI_DIALING, &x)) {
2700                 ast_debug(1, "DAHDI_DIALING ioctl failed!\n");
2701                 return -1;
2702         }
2703
2704         return x;
2705 }
2706
2707 static int my_on_hook(void *pvt)
2708 {
2709         struct dahdi_pvt *p = pvt;
2710         return dahdi_set_hook(p->subs[ANALOG_SUB_REAL].dfd, DAHDI_ONHOOK);
2711 }
2712
2713 #if defined(HAVE_PRI)
2714 static void my_pri_fixup_chans(void *chan_old, void *chan_new)
2715 {
2716         struct dahdi_pvt *old_chan = chan_old;
2717         struct dahdi_pvt *new_chan = chan_new;
2718
2719         new_chan->owner = old_chan->owner;
2720         old_chan->owner = NULL;
2721         if (new_chan->owner) {
2722                 ast_channel_tech_pvt_set(new_chan->owner, new_chan);
2723                 ast_channel_internal_fd_set(new_chan->owner, 0, new_chan->subs[SUB_REAL].dfd);
2724                 new_chan->subs[SUB_REAL].owner = old_chan->subs[SUB_REAL].owner;
2725                 old_chan->subs[SUB_REAL].owner = NULL;
2726         }
2727         /* Copy any DSP that may be present */
2728         new_chan->dsp = old_chan->dsp;
2729         new_chan->dsp_features = old_chan->dsp_features;
2730         old_chan->dsp = NULL;
2731         old_chan->dsp_features = 0;
2732
2733         /* Transfer flags from the old channel. */
2734         new_chan->dialing = old_chan->dialing;
2735         new_chan->digital = old_chan->digital;
2736         new_chan->outgoing = old_chan->outgoing;
2737         old_chan->dialing = 0;
2738         old_chan->digital = 0;
2739         old_chan->outgoing = 0;
2740
2741         /* More stuff to transfer to the new channel. */
2742         new_chan->law = old_chan->law;
2743         strcpy(new_chan->dialstring, old_chan->dialstring);
2744 }
2745 #endif  /* defined(HAVE_PRI) */
2746
2747 #if defined(HAVE_PRI)
2748 static int sig_pri_tone_to_dahditone(enum sig_pri_tone tone)
2749 {
2750         switch (tone) {
2751         case SIG_PRI_TONE_RINGTONE:
2752                 return DAHDI_TONE_RINGTONE;
2753         case SIG_PRI_TONE_STUTTER:
2754                 return DAHDI_TONE_STUTTER;
2755         case SIG_PRI_TONE_CONGESTION:
2756                 return DAHDI_TONE_CONGESTION;
2757         case SIG_PRI_TONE_DIALTONE:
2758                 return DAHDI_TONE_DIALTONE;
2759         case SIG_PRI_TONE_DIALRECALL:
2760                 return DAHDI_TONE_DIALRECALL;
2761         case SIG_PRI_TONE_INFO:
2762                 return DAHDI_TONE_INFO;
2763         case SIG_PRI_TONE_BUSY:
2764                 return DAHDI_TONE_BUSY;
2765         default:
2766                 return -1;
2767         }
2768 }
2769 #endif  /* defined(HAVE_PRI) */
2770
2771 #if defined(HAVE_PRI)
2772 static void my_handle_dchan_exception(struct sig_pri_span *pri, int index)
2773 {
2774         int x;
2775
2776         ioctl(pri->fds[index], DAHDI_GETEVENT, &x);
2777         switch (x) {
2778         case DAHDI_EVENT_NONE:
2779                 break;
2780         case DAHDI_EVENT_ALARM:
2781         case DAHDI_EVENT_NOALARM:
2782                 if (sig_pri_is_alarm_ignored(pri)) {
2783                         break;
2784                 }
2785                 /* Fall through */
2786         default:
2787                 ast_log(LOG_NOTICE, "Got DAHDI event: %s (%d) on D-channel of span %d\n",
2788                         event2str(x), x, pri->span);
2789                 break;
2790         }
2791         /* Keep track of alarm state */
2792         switch (x) {
2793         case DAHDI_EVENT_ALARM:
2794                 pri_event_alarm(pri, index, 0);
2795                 break;
2796         case DAHDI_EVENT_NOALARM:
2797                 pri_event_noalarm(pri, index, 0);
2798                 break;
2799         case DAHDI_EVENT_REMOVED:
2800                 pri_queue_for_destruction(pri);
2801                 break;
2802         default:
2803                 break;
2804         }
2805 }
2806 #endif  /* defined(HAVE_PRI) */
2807
2808 #if defined(HAVE_PRI)
2809 static int my_pri_play_tone(void *pvt, enum sig_pri_tone tone)
2810 {
2811         struct dahdi_pvt *p = pvt;
2812
2813         return tone_zone_play_tone(p->subs[SUB_REAL].dfd, sig_pri_tone_to_dahditone(tone));
2814 }
2815 #endif  /* defined(HAVE_PRI) */
2816
2817 #if defined(HAVE_PRI) || defined(HAVE_SS7)
2818 /*!
2819  * \internal
2820  * \brief Set the caller id information.
2821  * \since 1.8
2822  *
2823  * \param pvt DAHDI private structure
2824  * \param caller Caller-id information to set.
2825  *
2826  * \return Nothing
2827  */
2828 static void my_set_callerid(void *pvt, const struct ast_party_caller *caller)
2829 {
2830         struct dahdi_pvt *p = pvt;
2831
2832         ast_copy_string(p->cid_num,
2833                 S_COR(caller->id.number.valid, caller->id.number.str, ""),
2834                 sizeof(p->cid_num));
2835         ast_copy_string(p->cid_name,
2836                 S_COR(caller->id.name.valid, caller->id.name.str, ""),
2837                 sizeof(p->cid_name));
2838         ast_copy_string(p->cid_subaddr,
2839                 S_COR(caller->id.subaddress.valid, caller->id.subaddress.str, ""),
2840                 sizeof(p->cid_subaddr));
2841         p->cid_ton = caller->id.number.plan;
2842         p->callingpres = ast_party_id_presentation(&caller->id);
2843         if (caller->id.tag) {
2844                 ast_copy_string(p->cid_tag, caller->id.tag, sizeof(p->cid_tag));
2845         }
2846         ast_copy_string(p->cid_ani,
2847                 S_COR(caller->ani.number.valid, caller->ani.number.str, ""),
2848                 sizeof(p->cid_ani));
2849         p->cid_ani2 = caller->ani2;
2850 }
2851 #endif  /* defined(HAVE_PRI) || defined(HAVE_SS7) */
2852
2853 #if defined(HAVE_PRI) || defined(HAVE_SS7)
2854 /*!
2855  * \internal
2856  * \brief Set the Dialed Number Identifier.
2857  * \since 1.8
2858  *
2859  * \param pvt DAHDI private structure
2860  * \param dnid Dialed Number Identifier string.
2861  *
2862  * \return Nothing
2863  */
2864 static void my_set_dnid(void *pvt, const char *dnid)
2865 {
2866         struct dahdi_pvt *p = pvt;
2867
2868         ast_copy_string(p->dnid, dnid, sizeof(p->dnid));
2869 }
2870 #endif  /* defined(HAVE_PRI) || defined(HAVE_SS7) */
2871
2872 #if defined(HAVE_PRI)
2873 /*!
2874  * \internal
2875  * \brief Set the Redirecting Directory Number Information Service (RDNIS).
2876  * \since 1.8
2877  *
2878  * \param pvt DAHDI private structure
2879  * \param rdnis Redirecting Directory Number Information Service (RDNIS) string.
2880  *
2881  * \return Nothing
2882  */
2883 static void my_set_rdnis(void *pvt, const char *rdnis)
2884 {
2885         struct dahdi_pvt *p = pvt;
2886
2887         ast_copy_string(p->rdnis, rdnis, sizeof(p->rdnis));
2888 }
2889 #endif  /* defined(HAVE_PRI) */
2890
2891 #if defined(HAVE_PRI)
2892 /*!
2893  * \internal
2894  * \brief Make a dialstring for native ISDN CC to recall properly.
2895  * \since 1.8
2896  *
2897  * \param priv Channel private control structure.
2898  * \param buf Where to put the modified dialstring.
2899  * \param buf_size Size of modified dialstring buffer.
2900  *
2901  * \details
2902  * original dialstring:
2903  * DAHDI/[i<span>-](g|G|r|R)<group#(0-63)>[c|r<cadance#>|d][/extension[/options]]
2904  *
2905  * The modified dialstring will have prefixed the channel-group section
2906  * with the ISDN channel restriction.
2907  *
2908  * buf:
2909  * DAHDI/i<span>-(g|G|r|R)<group#(0-63)>[c|r<cadance#>|d][/extension[/options]]
2910  *
2911  * The routine will check to see if the ISDN channel restriction is already
2912  * in the original dialstring.
2913  *
2914  * \return Nothing
2915  */
2916 static void my_pri_make_cc_dialstring(void *priv, char *buf, size_t buf_size)
2917 {
2918         char *dial;
2919         struct dahdi_pvt *pvt;
2920         AST_DECLARE_APP_ARGS(args,
2921                 AST_APP_ARG(tech);      /* channel technology token */
2922                 AST_APP_ARG(group);     /* channel/group token */
2923                 //AST_APP_ARG(ext);     /* extension token */
2924                 //AST_APP_ARG(opts);    /* options token */
2925                 //AST_APP_ARG(other);   /* Any remining unused arguments */
2926         );
2927
2928         pvt = priv;
2929         dial = ast_strdupa(pvt->dialstring);
2930         AST_NONSTANDARD_APP_ARGS(args, dial, '/');
2931         if (!args.tech) {
2932                 ast_copy_string(buf, pvt->dialstring, buf_size);
2933                 return;
2934         }
2935         if (!args.group) {
2936                 /* Append the ISDN span channel restriction to the dialstring. */
2937                 snprintf(buf, buf_size, "%s/i%d-", args.tech, pvt->pri->span);
2938                 return;
2939         }
2940         if (isdigit(args.group[0]) || args.group[0] == 'i' || strchr(args.group, '!')) {
2941                 /* The ISDN span channel restriction is not needed or already
2942                  * in the dialstring. */
2943                 ast_copy_string(buf, pvt->dialstring, buf_size);
2944                 return;
2945         }
2946         /* Insert the ISDN span channel restriction into the dialstring. */
2947         snprintf(buf, buf_size, "%s/i%d-%s", args.tech, pvt->pri->span, args.group);
2948 }
2949 #endif  /* defined(HAVE_PRI) */
2950
2951 #if defined(HAVE_PRI)
2952 /*!
2953  * \internal
2954  * \brief Reevaluate the PRI span device state.
2955  * \since 1.8
2956  *
2957  * \param pri Asterisk D channel control structure.
2958  *
2959  * \return Nothing
2960  *
2961  * \note Assumes the pri->lock is already obtained.
2962  */
2963 static void dahdi_pri_update_span_devstate(struct sig_pri_span *pri)
2964 {
2965         unsigned idx;
2966         unsigned num_b_chans;   /* Number of B channels provisioned on the span. */
2967         unsigned in_use;                /* Number of B channels in use on the span. */
2968         unsigned in_alarm;              /* TRUE if the span is in alarm condition. */
2969         enum ast_device_state new_state;
2970
2971         /* Count the number of B channels and the number of B channels in use. */
2972         num_b_chans = 0;
2973         in_use = 0;
2974         in_alarm = 1;
2975         for (idx = pri->numchans; idx--;) {
2976                 if (pri->pvts[idx] && !pri->pvts[idx]->no_b_channel) {
2977                         /* This is a B channel interface. */
2978                         ++num_b_chans;
2979                         if (!sig_pri_is_chan_available(pri->pvts[idx])) {
2980                                 ++in_use;
2981                         }
2982                         if (!pri->pvts[idx]->inalarm) {
2983                                 /* There is a channel that is not in alarm. */
2984                                 in_alarm = 0;
2985                         }
2986                 }
2987         }
2988
2989         /* Update the span congestion device state and report any change. */
2990         if (in_alarm) {
2991                 new_state = AST_DEVICE_UNAVAILABLE;
2992         } else {
2993                 new_state = num_b_chans == in_use ? AST_DEVICE_BUSY : AST_DEVICE_NOT_INUSE;
2994         }
2995         if (pri->congestion_devstate != new_state) {
2996                 pri->congestion_devstate = new_state;
2997                 ast_devstate_changed(AST_DEVICE_UNKNOWN, AST_DEVSTATE_NOT_CACHABLE, "DAHDI/I%d/congestion", pri->span);
2998         }
2999 #if defined(THRESHOLD_DEVSTATE_PLACEHOLDER)
3000         /* Update the span threshold device state and report any change. */
3001         if (in_alarm) {
3002                 new_state = AST_DEVICE_UNAVAILABLE;
3003         } else if (!in_use) {
3004                 new_state = AST_DEVICE_NOT_INUSE;
3005         } else if (!pri->user_busy_threshold) {
3006                 new_state = in_use < num_b_chans ? AST_DEVICE_INUSE : AST_DEVICE_BUSY;
3007         } else {
3008                 new_state = in_use < pri->user_busy_threshold ? AST_DEVICE_INUSE
3009                         : AST_DEVICE_BUSY;
3010         }
3011         if (pri->threshold_devstate != new_state) {
3012                 pri->threshold_devstate = new_state;
3013                 ast_devstate_changed(AST_DEVICE_UNKNOWN, AST_DEVSTATE_NOT_CACHABLE, "DAHDI/I%d/threshold", pri->span);
3014         }
3015 #endif  /* defined(THRESHOLD_DEVSTATE_PLACEHOLDER) */
3016 }
3017 #endif  /* defined(HAVE_PRI) */
3018
3019 #if defined(HAVE_PRI)
3020 /*!
3021  * \internal
3022  * \brief Reference this module.
3023  * \since 1.8
3024  *
3025  * \return Nothing
3026  */
3027 static void my_module_ref(void)
3028 {
3029         ast_module_ref(ast_module_info->self);
3030 }
3031 #endif  /* defined(HAVE_PRI) */
3032
3033 #if defined(HAVE_PRI)
3034 /*!
3035  * \internal
3036  * \brief Unreference this module.
3037  * \since 1.8
3038  *
3039  * \return Nothing
3040  */
3041 static void my_module_unref(void)
3042 {
3043         ast_module_unref(ast_module_info->self);
3044 }
3045 #endif  /* defined(HAVE_PRI) */
3046
3047 #if defined(HAVE_PRI)
3048 #if defined(HAVE_PRI_CALL_WAITING)
3049 static void my_pri_init_config(void *priv, struct sig_pri_span *pri);
3050 #endif  /* defined(HAVE_PRI_CALL_WAITING) */
3051 static int dahdi_new_pri_nobch_channel(struct sig_pri_span *pri);
3052
3053 struct sig_pri_callback sig_pri_callbacks =
3054 {
3055         .handle_dchan_exception = my_handle_dchan_exception,
3056         .play_tone = my_pri_play_tone,
3057         .set_echocanceller = my_set_echocanceller,
3058         .dsp_reset_and_flush_digits = my_dsp_reset_and_flush_digits,
3059         .lock_private = my_lock_private,
3060         .unlock_private = my_unlock_private,
3061         .deadlock_avoidance_private = my_deadlock_avoidance_private,
3062         .new_ast_channel = my_new_pri_ast_channel,
3063         .fixup_chans = my_pri_fixup_chans,
3064         .set_alarm = my_set_alarm,
3065         .set_dialing = my_set_dialing,
3066         .set_outgoing = my_set_outgoing,
3067         .set_digital = my_set_digital,
3068         .set_callerid = my_set_callerid,
3069         .set_dnid = my_set_dnid,
3070         .set_rdnis = my_set_rdnis,
3071         .new_nobch_intf = dahdi_new_pri_nobch_channel,
3072 #if defined(HAVE_PRI_CALL_WAITING)
3073         .init_config = my_pri_init_config,
3074 #endif  /* defined(HAVE_PRI_CALL_WAITING) */
3075         .get_orig_dialstring = my_get_orig_dialstring,
3076         .make_cc_dialstring = my_pri_make_cc_dialstring,
3077         .update_span_devstate = dahdi_pri_update_span_devstate,
3078         .module_ref = my_module_ref,
3079         .module_unref = my_module_unref,
3080         .dial_digits = my_pri_dial_digits,
3081         .open_media = my_pri_ss7_open_media,
3082         .ami_channel_event = my_ami_channel_event,
3083         .destroy_later = pri_queue_for_destruction,
3084 };
3085 #endif  /* defined(HAVE_PRI) */
3086
3087 #if defined(HAVE_SS7)
3088 /*!
3089  * \internal
3090  * \brief Handle the SS7 link exception.
3091  * \since 1.8
3092  *
3093  * \param linkset Controlling linkset for the channel.
3094  * \param which Link index of the signaling channel.
3095  *
3096  * \return Nothing
3097  */
3098 static void my_handle_link_exception(struct sig_ss7_linkset *linkset, int which)
3099 {
3100         int event;
3101
3102         if (ioctl(linkset->fds[which], DAHDI_GETEVENT, &event)) {
3103                 ast_log(LOG_ERROR, "SS7: Error in exception retrieval on span %d/%d!\n",
3104                         linkset->span, which);
3105                 return;
3106         }
3107         switch (event) {
3108         case DAHDI_EVENT_NONE:
3109                 break;
3110         case DAHDI_EVENT_ALARM:
3111                 ast_log(LOG_ERROR, "SS7 got event: %s(%d) on span %d/%d\n",
3112                         event2str(event), event, linkset->span, which);
3113                 sig_ss7_link_alarm(linkset, which);
3114                 break;
3115         case DAHDI_EVENT_NOALARM:
3116                 ast_log(LOG_ERROR, "SS7 got event: %s(%d) on span %d/%d\n",
3117                         event2str(event), event, linkset->span, which);
3118                 sig_ss7_link_noalarm(linkset, which);
3119                 break;
3120         default:
3121                 ast_log(LOG_NOTICE, "SS7 got event: %s(%d) on span %d/%d\n",
3122                         event2str(event), event, linkset->span, which);
3123                 break;
3124         }
3125 }
3126 #endif  /* defined(HAVE_SS7) */
3127
3128 #if defined(HAVE_SS7)
3129 static void my_ss7_set_loopback(void *pvt, int enable)
3130 {
3131         struct dahdi_pvt *p = pvt;
3132
3133         if (ioctl(p->subs[SUB_REAL].dfd, DAHDI_LOOPBACK, &enable)) {
3134                 ast_log(LOG_WARNING, "Unable to set loopback on channel %d: %s\n", p->channel,
3135                         strerror(errno));
3136         }
3137 }
3138 #endif  /* defined(HAVE_SS7) */
3139
3140 #if defined(HAVE_SS7)
3141 /*!
3142  * \internal
3143  * \brief Find the linkset to which SS7 belongs.
3144  * \since 11.0
3145  *
3146  * \param ss7 structure to match on.
3147  *
3148  * \retval linkset if found.
3149  * \retval NULL if not found.
3150  */
3151 static struct sig_ss7_linkset *my_ss7_find_linkset(struct ss7 *ss7)
3152 {
3153         int idx;
3154
3155         if (!ss7) {
3156                 return NULL;
3157         }
3158
3159         for (idx = 0; idx < NUM_SPANS; ++idx) {
3160                 if (linksets[idx].ss7.ss7 == ss7) {
3161                         return &linksets[idx].ss7;
3162                 }
3163         }
3164         return NULL;
3165 }
3166 #endif  /* defined(HAVE_SS7) */
3167
3168 #if defined(HAVE_SS7)
3169 /*!
3170  * \internal
3171  * \brief Create a new asterisk channel structure for SS7.
3172  * \since 1.8
3173  *
3174  * \param pvt Private channel structure.
3175  * \param state Initial state of new channel.
3176  * \param law Combanding law to use.
3177  * \param exten Dialplan extension for incoming call.
3178  * \param requestor Channel requesting this new channel.
3179  *
3180  * \retval ast_channel on success.
3181  * \retval NULL on error.
3182  */
3183 static struct ast_channel *my_new_ss7_ast_channel(void *pvt, int state, enum sig_ss7_law law, char *exten, const struct ast_assigned_ids *assignedids, const struct ast_channel *requestor)
3184 {
3185         struct dahdi_pvt *p = pvt;
3186         int audio;
3187         int newlaw;
3188         ast_callid callid = 0;
3189         int callid_created = ast_callid_threadstorage_auto(&callid);
3190
3191         /* Set to audio mode at this point */
3192         audio = 1;
3193         if (ioctl(p->subs[SUB_REAL].dfd, DAHDI_AUDIOMODE, &audio) == -1)
3194                 ast_log(LOG_WARNING, "Unable to set audio mode on channel %d to %d: %s\n",
3195                         p->channel, audio, strerror(errno));
3196
3197         if (law != SIG_SS7_DEFLAW) {
3198                 dahdi_setlaw(p->subs[SUB_REAL].dfd,
3199                         (law == SIG_SS7_ULAW) ? DAHDI_LAW_MULAW : DAHDI_LAW_ALAW);
3200         }
3201
3202         ast_copy_string(p->exten, exten, sizeof(p->exten));
3203
3204         newlaw = -1;
3205         switch (law) {
3206         case SIG_SS7_DEFLAW:
3207                 newlaw = 0;
3208                 break;
3209         case SIG_SS7_ALAW:
3210                 newlaw = DAHDI_LAW_ALAW;
3211                 break;
3212         case SIG_SS7_ULAW:
3213                 newlaw = DAHDI_LAW_MULAW;
3214                 break;
3215         }
3216         return dahdi_new_callid_clean(p, state, 0, SUB_REAL, newlaw, assignedids, requestor, callid, callid_created);
3217 }
3218 #endif  /* defined(HAVE_SS7) */
3219
3220 #if defined(HAVE_SS7)
3221 static int sig_ss7_tone_to_dahditone(enum sig_ss7_tone tone)
3222 {
3223         switch (tone) {
3224         case SIG_SS7_TONE_RINGTONE:
3225                 return DAHDI_TONE_RINGTONE;
3226         case SIG_SS7_TONE_STUTTER:
3227                 return DAHDI_TONE_STUTTER;
3228         case SIG_SS7_TONE_CONGESTION:
3229                 return DAHDI_TONE_CONGESTION;
3230         case SIG_SS7_TONE_DIALTONE:
3231                 return DAHDI_TONE_DIALTONE;
3232         case SIG_SS7_TONE_DIALRECALL:
3233                 return DAHDI_TONE_DIALRECALL;
3234         case SIG_SS7_TONE_INFO:
3235                 return DAHDI_TONE_INFO;
3236         case SIG_SS7_TONE_BUSY:
3237                 return DAHDI_TONE_BUSY;
3238         default:
3239                 return -1;
3240         }