app_morsecode.c File Reference

Morsecode application. More...

#include "asterisk.h"
#include "asterisk/file.h"
#include "asterisk/channel.h"
#include "asterisk/pbx.h"
#include "asterisk/module.h"
#include "asterisk/indications.h"

Include dependency graph for app_morsecode.c:

Go to the source code of this file.

Functions
	AST_MODULE_INFO_STANDARD_EXTENDED (ASTERISK_GPL_KEY, "Morse code")
static int	load_module (void)
static int	morsecode_exec (struct ast_channel *chan, const char *data)
static int	playtone (struct ast_channel *chan, int tone, int len)
static int	unload_module (void)

Variables
static const char *const	americanmorsecode []
static const char	app_morsecode [] = "Morsecode"
static const char *const	internationalcode []

Detailed Description

Morsecode application.

Author

Tilghman Lesher app_m.nosp@m.orse.nosp@m.code_.nosp@m._v00.nosp@m.1@the.nosp@m.-til.nosp@m.ghman.nosp@m..com

Naveen Albert aster.nosp@m.isk@.nosp@m.phrea.nosp@m.knet.nosp@m..org

Definition in file app_morsecode.c.

Function Documentation

AST_MODULE_INFO_STANDARD_EXTENDED()

AST_MODULE_INFO_STANDARD_EXTENDED	(	ASTERISK_GPL_KEY	,
		"Morse code"
	)

load_module()

static int load_module ( void  )

static

Definition at line 292 of file app_morsecode.c.

{
    return ast_register_application_xml(app_morsecode, morsecode_exec);
}

References app_morsecode, ast_register_application_xml, and morsecode_exec().

morsecode_exec()

static int morsecode_exec ( struct ast_channel *  chan, const char *  data  )

static

Definition at line 184 of file app_morsecode.c.

{
    int res = 0, ditlen, tone, toneoff, digit2;
    const char *digit;
    const char *ditlenc, *tonec, *toneb, *codetype;
 
    if (ast_strlen_zero(data)) {
        ast_log(LOG_WARNING, "Syntax: Morsecode(<string>) - no argument found\n");
        return 0;
    }
 
    ast_channel_lock(chan);
    /* Use variable MORESEDITLEN, if set (else 80) */
    ditlenc = pbx_builtin_getvar_helper(chan, "MORSEDITLEN");
    if (ast_strlen_zero(ditlenc) || (sscanf(ditlenc, "%30d", &ditlen) != 1)) {
        ditlen = 80;
    }
 
    /* Use variable MORSETONE, if set (else 800) */
    tonec = pbx_builtin_getvar_helper(chan, "MORSETONE");
    if (ast_strlen_zero(tonec) || (sscanf(tonec, "%30d", &tone) != 1)) {
        tone = 800;
    }
 
    /* Use variable MORSESPACETONE, if set (else 0) */
    toneb = pbx_builtin_getvar_helper(chan, "MORSESPACETONE");
    if (ast_strlen_zero(toneb) || (sscanf(toneb, "%30d", &toneoff) != 1)) {
        toneoff = 0;
    }
 
    /* Use variable MORSETYPE, if set (else INTERNATIONAL) */
    codetype = pbx_builtin_getvar_helper(chan, "MORSETYPE");
    if (!codetype || strcmp(codetype, "AMERICAN")) {
        codetype = "INTERNATIONAL";
    }
 
    ast_channel_unlock(chan);
    if (!strcmp(codetype, "AMERICAN")) {
        for (digit = data; *digit; digit++) {
            const char *dahdit;
            digit2 = *digit;
            if (digit2 < 0 || digit2 > 127) {
                continue;
            }
            for (dahdit = americanmorsecode[digit2]; *dahdit; dahdit++) {
                if (*dahdit == '-') {
                    res = playtone(chan, tone, 3 * ditlen);
                } else if (*dahdit == '.') {
                    res = playtone(chan, tone, 1 * ditlen);
                } else if (*dahdit == 'L' || *dahdit == 'l') {
                    res = playtone(chan, tone, 6 * ditlen); /* long dash */
                } else if (*dahdit == '0') {
                    res = playtone(chan, tone, 9 * ditlen); /* extra long dash */
                } else if (*dahdit == ' ') { /* space char (x20) = 6 dot lengths */
                    /* Intra-char pauses, specific to American Morse */
                    res = playtone(chan, toneoff, 3 * ditlen);
                } else {
                    /* Account for ditlen of silence immediately following */
                    res = playtone(chan, toneoff, 2 * ditlen);
                }
 
                /* Pause slightly between each dit and dah */
                res = playtone(chan, toneoff, 1 * ditlen);
                if (res)
                    break;
            }
            /* Pause between characters */
            res = playtone(chan, toneoff, 3 * ditlen);
            if (res)
                break;
        }
    } else { /* International */
        for (digit = data; *digit; digit++) {
            const char *dahdit;
            digit2 = *digit;
            if (digit2 < 0 || digit2 > 127) {
                continue;
            }
            for (dahdit = internationalcode[digit2]; *dahdit; dahdit++) {
                if (*dahdit == '-') {
                    res = playtone(chan, tone, 3 * ditlen);
                } else if (*dahdit == '.') {
                    res = playtone(chan, tone, 1 * ditlen);
                } else {
                    /* Account for ditlen of silence immediately following */
                    res = playtone(chan, toneoff, 2 * ditlen);
                }
 
                /* Pause slightly between each dit and dah */
                res = playtone(chan, toneoff, 1 * ditlen);
                if (res)
                    break;
            }
            /* Pause between characters */
            res = playtone(chan, toneoff, 2 * ditlen);
            if (res)
                break;
        }
    }
 
    return res;
}

References americanmorsecode, ast_channel_lock, ast_channel_unlock, ast_log, ast_strlen_zero(), digit, internationalcode, LOG_WARNING, pbx_builtin_getvar_helper(), and playtone().

Referenced by load_module().

playtone()

static int playtone ( struct ast_channel *  chan, int  tone, int  len  )

static

Definition at line 173 of file app_morsecode.c.

{
    int res;
    char dtmf[20];
    snprintf(dtmf, sizeof(dtmf), "%d/%d", tone, len);
    ast_playtones_start(chan, 0, dtmf, 0);
    res = ast_safe_sleep(chan, len);
    ast_playtones_stop(chan);
    return res;
}

References ast_playtones_start(), ast_playtones_stop(), ast_safe_sleep(), and len().

Referenced by action_bridge(), and morsecode_exec().

unload_module()

static int unload_module ( void  )

static

Definition at line 287 of file app_morsecode.c.

{
    return ast_unregister_application(app_morsecode);
}

References app_morsecode, and ast_unregister_application().

Variable Documentation

americanmorsecode

const char* const americanmorsecode[]

static

Definition at line 129 of file app_morsecode.c.

                                                {
    "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", /*  0-15 */
    "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", /* 16-31 */
    "  ",    /* 32 - <space> */
    "---.",   /* 33 - ! */
    "..-. -.",/* 34 - " (QN)*/
    "",       /* 35 - # */
    "... .-..",/* 36 - $ (SX) */
    "",       /* 37 - % */
    ". ...",  /* 38 - & (ES) */
    "..-. .-..",/* 39 - ' (QX) */
    "..... -.", /* 40 - ( (PN) */
    "..... .. ..", /* 41 - ) (PY) */
    "",       /* 42 - * */
    "",       /* 43 - + */
    ".-.-",   /* 44 - , */
    ".... .-..",/* 45 - (HX) */
    "..--..", /* 46 - . */
    "..- -",  /* 47 - / (UT) */
    ".--.", "..-..", "...-.", "....-", "---", "......", "--..", "-....", "-..-", "0", /* 48-57 - 0-9 */
    "-.- . .",/* 58 - : (KO) */
    "... ..", /* 59 - ; */
    "",       /* 60 - < */
    "-...-",  /* 61 - = (paragraph mark) */
    "",       /* 62 - > */
    "-..-.",  /* 63 - ? */
    ".--.-.", /* 64 - @ */
    ".-", "-...", ".. .", "-..", ".", ".-.", "--.", "....", "..", ".-.-", "-.-", "L", "--", /* A-M */
    "-.", ". .", ".....", "..-.", ". ..", "...", "-", "..-", "...-", ".--", ".-..", ".. ..", "... .", /* N-Z */
    "..... -.", /* 91 - [ (really '(') */
    "..- -",  /* 92 - \ (really '/') */
    "..... .. ..", /* 93 - ] (really ')') */
    "",       /* 94 - ^ */
    "..--.-", /* 95 - _ */
    ".----.", /* 96 - ` */
    ".-", "-...", ".. .", "-..", ".", ".-.", "--.", "....", "..", ".-.-", "-.-", "L", "--", /* a-m */
    "-.", ". .", ".....", "..-.", ". ..", "...", "-", "..-", "...-", ".--", ".-..", ".. ..", "... .", /* n-z */
    "..... -.", /* 123 - { (really '(') */
    "",       /* 124 - | */
    "..... .. ..", /* 125 - } (really ')') */
    "..- -",  /* 126 - ~ (really bar) */
    ". . .",  /* 127 - <del> (error) */
};

Referenced by morsecode_exec().

app_morsecode

const char app_morsecode[] = "Morsecode"

static

Definition at line 83 of file app_morsecode.c.

Referenced by load_module(), and unload_module().

internationalcode

const char* const internationalcode[]

static

Definition at line 85 of file app_morsecode.c.

                                                {
    "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", /*  0-15 */
    "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", /* 16-31 */
    " ",      /* 32 - <space> */
    ".-.-.-", /* 33 - ! */
    ".-..-.", /* 34 - " */
    "",       /* 35 - # */
    "",       /* 36 - $ */
    "",       /* 37 - % */
    "",       /* 38 - & */
    ".----.", /* 39 - ' */
    "-.--.-", /* 40 - ( */
    "-.--.-", /* 41 - ) */
    "",       /* 42 - * */
    "",       /* 43 - + */
    "--..--", /* 44 - , */
    "-....-", /* 45 - - */
    ".-.-.-", /* 46 - . */
    "-..-.",  /* 47 - / */
    "-----", ".----", "..---", "...--", "....-", ".....", "-....", "--...", "---..", "----.", /* 48-57 - 0-9 */
    "---...", /* 58 - : */
    "-.-.-.", /* 59 - ; */
    "",       /* 60 - < */
    "-...-",  /* 61 - = */
    "",       /* 62 - > */
    "..--..", /* 63 - ? */
    ".--.-.", /* 64 - @ */
    ".-", "-...", "-.-.", "-..", ".", "..-.", "--.", "....", "..", ".---", "-.-", ".-..", "--", /* A-M */
    "-.", "---", ".--.", "--.-", ".-.", "...", "-", "..-", "...-", ".--", "-..-", "-.--", "--..", /* N-Z */
    "-.--.-", /* 91 - [ (really '(') */
    "-..-.",  /* 92 - \ (really '/') */
    "-.--.-", /* 93 - ] (really ')') */
    "",       /* 94 - ^ */
    "..--.-", /* 95 - _ */
    ".----.", /* 96 - ` */
    ".-", "-...", "-.-.", "-..", ".", "..-.", "--.", "....", "..", ".---", "-.-", ".-..", "--", /* a-m */
    "-.", "---", ".--.", "--.-", ".-.", "...", "-", "..-", "...-", ".--", "-..-", "-.--", "--..", /* n-z */
    "-.--.-", /* 123 - { (really '(') */
    "",       /* 124 - | */
    "-.--.-", /* 125 - } (really ')') */
    "-..-.",  /* 126 - ~ (really bar) */
    ". . .",  /* 127 - <del> (error) */
};

Referenced by morsecode_exec().