[Freeswitch-svn] [commit] r12966 - freeswitch/trunk/src/mod/say/mod_say_ru
FreeSWITCH SVN
buklov at freeswitch.org
Thu Apr 9 12:56:09 PDT 2009
Author: buklov
Date: Thu Apr 9 14:56:08 2009
New Revision: 12966
Log:
first release
Added:
freeswitch/trunk/src/mod/say/mod_say_ru/mod_say_ru.c
Added: freeswitch/trunk/src/mod/say/mod_say_ru/mod_say_ru.c
==============================================================================
--- (empty file)
+++ freeswitch/trunk/src/mod/say/mod_say_ru/mod_say_ru.c Thu Apr 9 14:56:08 2009
@@ -0,0 +1,1509 @@
+/*
+ * Copyright (c) 2007, Anthony Minessale II
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ *
+ * * Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ *
+ * * Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ *
+ * * Neither the name of the original author; nor the names of any contributors
+ * may be used to endorse or promote products derived from this software
+ * without specific prior written permission.
+ *
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+ * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+ * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+ * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
+ * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+ * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+ * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+ * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+ * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+ * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+ * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *
+ * The Initial Developer of the Original Code is
+ * Anthony Minessale II <anthmct at yahoo.com>
+ * Portions created by the Initial Developer are Copyright (C)
+ * the Initial Developer. All Rights Reserved.
+ *
+ * Contributor(s):
+ *
+ * Anthony Minessale II <anthmct at yahoo.com>
+ * Michael B. Murdock <mike at mmurdock.org>
+ * Oleg Dolya <oleg.dolya at gmail.com>
+ * Boris Buklov <buklov at mail.ru>
+ *
+ * mod_say_ru.c -- Say for Russian
+ *
+ */
+
+#include <switch.h>
+#include <math.h>
+#include <ctype.h>
+
+typedef enum {
+ male, //мужского пола
+ female, //женского
+ it //оно
+} sex_t;
+
+
+
+typedef enum {
+ how_much, //сколько с полом
+ when, //какого - когда -- без пола
+ what_ //какая/какой/какое с полом
+} question_t; //вопрос
+
+
+
+SWITCH_MODULE_LOAD_FUNCTION(mod_say_ru_load);
+SWITCH_MODULE_DEFINITION(mod_say_ru, mod_say_ru_load, NULL, NULL);
+
+#define say_num(num, t) { \
+ char tmp[80];\
+ switch_status_t tstatus;\
+ switch_snprintf(tmp, sizeof(tmp), "%u", (unsigned)num); \
+ if ((tstatus = ru_say_general_count(session, tmp, SST_ITEMS, t, args)) != SWITCH_STATUS_SUCCESS) {\
+ return tstatus;\
+ }}\
+
+#define say_file(...) {\
+ char tmp[80];\
+ switch_status_t tstatus;\
+ switch_snprintf(tmp, sizeof(tmp), __VA_ARGS__);\
+ if ((tstatus = switch_ivr_play_file(session, NULL, tmp, args)) != SWITCH_STATUS_SUCCESS){ \
+ return tstatus;\
+ }\
+ if (!switch_channel_ready(switch_core_session_get_channel(session))) {\
+ return SWITCH_STATUS_FALSE;\
+ }}\
+
+
+static switch_status_t ru_spell(switch_core_session_t *session, char *tosay, switch_say_type_t type, switch_say_method_t method, switch_input_args_t *args)
+{
+ char *p;
+
+ for (p = tosay; p && *p; p++) {
+ int a = tolower((int) *p);
+ if (a >= 48 && a <= 57) {
+ say_file("digits/%d.wav", a - 48);
+ } else {
+ if (type == SST_NAME_SPELLED) {
+ say_file("ascii/%d.wav", a);
+ } else if (type == SST_NAME_PHONETIC) {
+ say_file("phonetic-ascii/%d.wav", a);
+ }
+ }
+ }
+
+ return SWITCH_STATUS_SUCCESS;
+}
+
+//воспроизводить по 3 цифры
+static switch_status_t play_group( sex_t sex,question_t question, int a, int b, int c,
+ char *what,int last, switch_core_session_t *session, switch_input_args_t *args)
+{
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "play group %d %d %d sex=%d q=%d last=%d\n", a,b,c,sex,question,last);
+ if (a) {
+ if ((b==0)||(c==0)) { // если b и с равны 0 то сказать шестьсот, сестисотый, шестисотая
+ switch (question) {
+//------------------------------------------------------
+ case how_much: //сколько когда дальше нету цифр например 100 200...
+ switch (sex) { //пол
+ case male: //мужчина
+ say_file("digits/%d00.wav", a); //сто
+ if (what=="thousand") {
+ say_file("digits/thousands.wav");//тысяч
+ }
+ else if (what=="million") {
+ say_file("digits/millions.wav");//миллионов
+ }
+ //-------------
+ break;
+
+ case female: //женщина
+ say_file("digits/%d00.wav", a);//сто
+ if (what=="thousand") {
+ say_file("digits/thousands.wav");//тысяч
+ }
+ else if (what=="million") {
+ say_file("digits/millions.wav");//миллионов
+ }
+ break;
+ //-------------
+ case it: //оно
+ say_file("digits/%d00.wav", a);//сто
+ if (what=="thousand") {
+ say_file("digits/thousands.wav"); //тысяч
+ }
+ else if (what=="million") {
+ say_file("digits/millions.wav");//миллионов
+ }
+ break;
+ //-------------
+ }
+ break;
+//------------------------------------------------------
+ case what_: //какой/я/ое
+ switch (sex) { //пол
+ case male: //мужчина
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);//двухсот
+ say_file("digits/h-millionx.wav");//тысячный
+ }
+ else {
+ say_file("digits/%d00.wav", a);//двести
+ say_file("digits/thousands.wav");//тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);//двухсот
+ say_file("digits/h-millionm.wav");//Миллионный
+ }
+ else {
+ say_file("digits/%d00.wav", a);//двести
+ say_file("digits/millions.wav");//миллионов
+ }
+ }
+ else {
+ say_file("digits/h-%d00m.wav", a);//сотый двухсотый
+ }
+ break;
+
+ case female: //женщина
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);//двухсот
+ say_file("digits/h-millionf.wav");//тысячная
+ }
+ else {
+ say_file("digits/%d00.wav", a);//двести
+ say_file("digits/thousands.wav");//тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);//двухсот
+ say_file("digits/h-millionf.wav");//Миллионная
+ }
+ else {
+ say_file("digits/%d00.wav", a);//двести
+ say_file("digits/millions.wav");//миллионов
+ }
+ }
+ else {
+ say_file("digits/h-%d00f.wav", a);//сотая двухсотая
+ }
+ break;
+ case it: //оно
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);//двухсот
+ say_file("digits/h-millionn.wav");//тысячное
+ }
+ else {
+ say_file("digits/%d00.wav", a);//двести
+ say_file("digits/thousands.wav");//тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);//двухсот
+ say_file("digits/h-millionn.wav");//Миллионное
+ }
+ else {
+ say_file("digits/%d00.wav", a);//двести
+ say_file("digits/millions.wav");//миллионов
+ }
+ }
+ else {
+ say_file("digits/h-%d00n.wav", a);//сотого
+ }
+ break;
+ }
+ break;
+//-------------------------------------------------------
+ case when: //какого - когда без пола
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);//двухсот
+ say_file("digits/h-millionx.wav");//тысячного
+ }
+ else {
+ say_file("digits/%d00.wav", a);//двести
+ say_file("digits/thousands.wav");//тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);//двухсот
+ say_file("digits/h-millionx.wav");//Миллионного
+ }
+ else {
+ say_file("digits/%d00.wav", a);//двести
+ say_file("digits/millions.wav");//миллионов
+ }
+ }
+ else {
+ say_file("digits/h-%d00x.wav", a);//сотого
+ }
+ break;
+ } //end switch (question)
+ }//end if ((b==0)||(c==0))
+ else // если есть ещё цифры
+ {
+ switch (question) {
+ case how_much:
+ say_file("digits/%d00.wav", a); //просто сто и тд
+ break;
+ case what_:
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);
+ }
+ else {
+ say_file("digits/%d00.wav", a); //сто
+ }
+ break;
+ case when:
+ if (last==0) {
+ say_file("digits/h-%d00xx.wav", a);
+ }
+ else {
+ say_file("digits/%d00.wav", a); //сто
+ }
+ break;
+ }
+ }
+ }//end if (a)
+ if (b) // если b больше 0
+ {
+ if (b > 1) { //если цифры больше 19
+ if (c==0) { // если c == нолю 20-30-40-50
+ switch (question) {
+//------------------------------------------------------
+ case how_much: //сколько когда дальше нету цифр например 10 20...
+ switch (sex) { //пол
+ case male: //мужчина
+ say_file("digits/%d0.wav", b); //двадцать
+ if (what=="thousand") {
+ say_file("digits/thousands.wav", b); //тысяч
+ }
+ else if (what=="millon") {
+ say_file("digits/millions.wav", b); //миллионов
+ }
+ //-------------
+ break;
+
+ case female: //женщина
+ say_file("digits/%d0.wav", b);//двадцать
+ if (what=="thousand") {
+ say_file("digits/thousands.wav", b); //тысяч
+ }
+ else if (what=="millon") {
+ say_file("digits/millions.wav", b); //миллионов
+ }
+ break;
+ //-------------
+ case it: //оно
+ say_file("digits/%d0.wav", b);// двадцать
+ if (what=="thousand") {
+ say_file("digits/thousands.wav", b); //тысяч
+ }
+ else if (what=="millon") {
+ say_file("digits/millions.wav", b); //миллионов
+ }
+ break;
+ //-------------
+ }
+ break;
+//------------------------------------------------------
+ case what_: //какой/я/ое >19 и c==0 20-30-40
+ switch (sex) { //пол
+ case male: //мужчина
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d0xx.wav", b);//двадцати
+ say_file("digits/h-thousandm.wav", b); //тысячный
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ say_file("digits/h-thousand.wav", b); //тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d0xx.wav", b);//двадцати
+ say_file("digits/h-millionm.wav", b); //миллионный
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ say_file("digits/h-thousand.wav", b); //миллионов
+ }
+ }
+ else { //без миллионов и тысяч
+ if (last==0) {
+ say_file("digits/h-%d0m.wav", b);//двадцатый
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ }
+ }
+ break;
+ case female: //женщина
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d0xx.wav", b);//двадцати
+ say_file("digits/h-thousandf.wav", b); //тысячная
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ say_file("digits/h-thousand.wav", b); //тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d0xx.wav", b);//двадцати
+ say_file("digits/h-millionf.wav", b); //миллионная
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ say_file("digits/h-thousand.wav", b); //миллионов
+ }
+ }
+ else { //без миллионов и тысяч
+ if (last==0) {
+ say_file("digits/h-%d0f.wav", b);//двадцатая
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ }
+ }
+ break;
+ case it: //оно
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d0xx.wav", b);//двадцати
+ say_file("digits/h-thousandn.wav", b); //тысячное
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ say_file("digits/h-thousand.wav", b); //тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d0xx.wav", b);//двадцати
+ say_file("digits/h-millionn.wav", b); //миллионное
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ say_file("digits/h-thousand.wav", b); //миллионов
+ }
+ }
+ else { //без миллионов и тысяч
+ if (last==0) {
+ say_file("digits/h-%d0n.wav", b);//двадцатое
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ }
+ }
+ break;
+ }
+ break;
+//-------------------------------------------------------
+ case when: //какого - когда без пола
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d0xx.wav", b);//двадцати
+ say_file("digits/h-thousandx.wav", b); //тысячного
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ say_file("digits/h-thousand.wav", b); //тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d0xx.wav", b);//двадцати
+ say_file("digits/h-millionx.wav", b); //миллионного
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ say_file("digits/h-thousand.wav", b); //миллионов
+ }
+ }
+ else { //без миллионов и тысяч
+ if (last==0) {
+ say_file("digits/h-%d0x.wav", b);//двадцатого
+ }
+ else {
+ say_file("digits/%d0.wav", b);//двадцать
+ }
+ }
+ break;
+ }
+ }//конец если c == нолю
+ else
+ {
+ say_file("digits/%d0.wav", b); // иначе просто двадцать .. и тд
+ }
+ }//конец если больше 19
+ else { //если цифры меньше 20
+ switch (question) {
+//------------------------------------------------------
+ case how_much: //сколько когда от 10 до 19
+ switch (sex) { //пол
+ case male: //мужчина
+ say_file("digits/%d%d.wav",b ,c); //девятнадцать
+ if (what=="thousand") {
+ say_file("digits/thousands.wav"); //тысяч
+ }
+ else if (what=="million") {
+ say_file("digits/millions.wav"); //миллионов
+ }
+ //-------------
+ break;
+ case female: //женщина
+ say_file("digits/%d%d.wav",b ,c);//девятнадцать
+ if (what=="thousand") {
+ say_file("digits/thousands.wav"); //тысяч
+ }
+ else if (what=="million") {
+ say_file("digits/millions.wav"); //миллионов
+ }
+ break;
+ //-------------
+ case it: //оно
+ say_file("digits/%d%d.wav",b ,c);// девятнадцать
+ if (what=="thousand") {
+ say_file("digits/thousands.wav"); //тысяч
+ }
+ else if (what=="million") {
+ say_file("digits/millions.wav"); //миллионов
+ }
+ break;
+ //-------------
+ }
+ break;
+//------------------------------------------------------
+ case what_: //какой/я/ое
+ switch (sex) { //пол
+ case male: //женщина
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d%dxx.wav", b,c);//десяти, пятнадцати ..
+ say_file("digits/h-thousandm.wav"); //тысячный
+ }
+ else {
+ say_file("digits/%d%d.wav", b,c);//девятнацать
+ say_file("digits/h-thousand.wav"); //тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d%dxx.wav", b,c);//десяти, пятнадцати ..
+ say_file("digits/h-millionm.wav"); //миллионный
+ }
+ else {
+ say_file("digits/%d%d.wav", b,c);//девятнадцать
+ say_file("digits/h-thousand.wav"); //миллионов
+ }
+ }
+ else { //без миллионов и тысяч
+ if (last==0) {
+ say_file("digits/h-%d%dm.wav", b,c);//девятнадцатый
+ }
+ else {
+ say_file("digits/%d%d.wav");//девятнадцать
+ }
+ }
+ case female: //женщина
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d%dxx.wav", b,c);//десяти, пятнадцати ..
+ say_file("digits/h-thousandf.wav"); //тысячная
+ }
+ else {
+ say_file("digits/%d%d.wav", b,c);//девятнацать
+ say_file("digits/h-thousand.wav"); //тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d%dxx.wav", b,c);//десяти, пятнадцати ..
+ say_file("digits/h-millionf.wav"); //миллионная
+ }
+ else {
+ say_file("digits/%d%d.wav", b,c);//девятнадцать
+ say_file("digits/h-thousand.wav"); //миллионов
+ }
+ }
+ else { //без миллионов и тысяч
+ if (last==0) {
+ say_file("digits/h-%d%df.wav", b,c);//девятнадцатая
+ }
+ else {
+ say_file("digits/%d%d.wav");//девятнадцать
+ }
+ }
+ break;
+ case it: //оно
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d%dxx.wav", b,c);//десяти, пятнадцати ..
+ say_file("digits/h-thousandn.wav"); //тысячное
+ }
+ else {
+ say_file("digits/%d%d.wav", b,c);//девятнацать
+ say_file("digits/h-thousand.wav"); //тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d%dxx.wav", b,c);//десяти, пятнадцати ..
+ say_file("digits/h-millionn.wav"); //миллионное
+ }
+ else {
+ say_file("digits/%d%d.wav", b,c);//девятнадцать
+ say_file("digits/h-thousand.wav"); //миллионов
+ }
+ }
+ else { //без миллионов и тысяч
+ if (last==0) {
+ say_file("digits/h-%d%dn.wav", b,c);//девятнадцатое
+ }
+ else {
+ say_file("digits/%d%d.wav");//девятнадцать
+ }
+ }
+ break;
+ }
+ break;
+//-------------------------------------------------------
+ case when: //какого - когда без пола
+ if (what=="thousand") {
+ if (last==0) {
+ say_file("digits/h-%d%dxx.wav", b,c);//десяти, пятнадцати ..
+ say_file("digits/h-thousandx.wav"); //тысячного
+ }
+ else {
+ say_file("digits/%d%d.wav", b,c);//девятнацать
+ say_file("digits/h-thousand.wav"); //тысяч
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {
+ say_file("digits/h-%d%dxx.wav", b,c);//десяти, пятнадцати ..
+ say_file("digits/h-millionx.wav"); //миллионного
+ }
+ else {
+ say_file("digits/%d%d.wav", b,c);//девятнадцать
+ say_file("digits/h-thousand.wav"); //миллионов
+ }
+ }
+ else { //без миллионов и тысяч
+ if (last==0) {
+ say_file("digits/h-%d%dx.wav", b,c);//девятнадцатого
+ }
+ else {
+ say_file("digits/%d%d.wav");//девятнадцать
+ }
+ }
+
+ break;
+ }//конец если c == нолю
+ c=0; //что бы не проговаривать c
+ }// конец //если цифры меньше 20
+ }//конец if (b)
+
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "play group c \n");
+
+
+
+ if ((c)||(what=="zero")) {// последняя цифра (самая сложная) или проговорить ноль , для случает когда первые цифры нули
+ if (c>2||c==0) {//0 и 3-9
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "play group c 1\n");
+
+ switch (question)
+ {
+//------------------------------------------------------
+ case how_much: //сколько 3-9
+ switch (sex)
+ { //пол
+ case male: //мужчина
+ if (what=="thousand") { //тысяч
+ if ((c>2)&&(c<5)) {
+ say_file("digits/%d.wav", c);// три - четыре
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ else{
+ say_file("digits/%d.wav", c);// пять .. девять
+ say_file("digits/thousands.wav"); //тысяч
+ }
+ }
+ else if (what=="million") { //миллионов
+ if ((c>2)&&(c<5)) {
+ say_file("digits/%d.wav", c);// три четыре
+ say_file("digits/million-a.wav"); //миллиона
+ }
+ else{
+ say_file("digits/%d.wav", c);// пять .. девять
+ say_file("digits/millions.wav"); //миллионов
+ }
+ }
+ else {
+ say_file("digits/%d.wav", c);// три девять ноль
+ }
+ break;
+
+ case female: //женщина
+ if (what=="thousand") { //тысяч
+ if ((c>2)&&(c<5)) {
+ say_file("digits/%d.wav", c);// три - четыре
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ else{
+ say_file("digits/%d.wav", c);// пять .. девять
+ say_file("digits/thousands.wav"); //тысяч
+ }
+ }
+ else if (what=="million") { //миллионов
+ if ((c>2)&&(c<5)) {
+ say_file("digits/%d.wav", c);// три четыре
+ say_file("digits/million-a.wav"); //миллиона
+ }
+ else{
+ say_file("digits/%d.wav", c);// пять .. девять
+ say_file("digits/millions.wav"); //миллионов
+ }
+ }
+ else {
+ say_file("digits/%d.wav", c);// три девять ноль
+ }
+ break;
+
+ //-------------
+ case it: //оно
+ if (what=="thousand") { //тысяч
+ if ((c>2)&&(c<5)) {
+ say_file("digits/%d.wav", c);// три - четыре
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ else{
+ say_file("digits/%d.wav", c);// пять .. девять
+ say_file("digits/thousands.wav"); //тысяч
+ }
+ }
+ else if (what=="million") { //миллионов
+ if ((c>2)&&(c<5)) {
+ say_file("digits/%d.wav", c);// три четыре
+ say_file("digits/million-a.wav"); //миллиона
+ }
+ else{
+ say_file("digits/%d.wav", c);// пять .. девять
+ say_file("digits/millions.wav"); //миллионов
+ }
+ }
+ else {
+ say_file("digits/%d.wav", c);// три девять ноль
+ }
+ break;
+ }
+ break;
+//------------------------------------------------------
+ case what_: //какой/я/ое
+ switch (sex)
+ { //пол
+ case male: //мужчина
+ if (what=="thousand") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ say_file("digits/h-thousandm.wav"); //тысячный
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ say_file("digits/h-millionm.wav"); //миллионный
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand.wav"); //миллиона
+ }
+ }//просто цифры без тысяч
+ else{
+ say_file("digits/h-%dm.wav", c);//третий нулевой ..
+ }
+ break;
+ case female: //женщина
+ if (what=="thousand") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ say_file("digits/h-thousandf.wav"); //тысячная
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ say_file("digits/h-millionf.wav"); //миллионная
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand.wav"); //миллиона
+ }
+ }//просто цифры без тысяч
+ else{
+ say_file("digits/h-%df.wav", c);//третья нулевая ..
+ }
+ break;
+ case it: //оно
+ if (what=="thousand") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ say_file("digits/h-thousandn.wav"); //тысячное
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ say_file("digits/h-millionn.wav"); //миллионное
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand.wav"); //миллиона
+ }
+ }//просто цифры без тысяч
+ else{
+ say_file("digits/h-%dn.wav", c);//третье нулевое ..
+ }
+ break;
+ }
+ break;
+//-------------------------------------------------------
+ case when: //какого - когда без пола
+ if (what=="thousand") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ say_file("digits/h-thousandx.wav"); //тысячного
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ say_file("digits/h-millionx.wav"); //миллионого
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand.wav"); //миллиона
+ }
+ }//просто цифры без тысяч
+ else{
+ say_file("digits/h-%dx.wav", c);//третьего нулевого ..
+ }
+ break;
+ }//конец switch (question)
+ } //конец //0 и 3-9
+ else if ((c==2)||(c==1)) { //1 2
+ switch (question) {
+//------------------------------------------------------
+ case how_much: //
+ switch (sex)
+ { //пол
+ case male: //мужчина
+ if (what=="thousand") {
+ if (c==1) {
+ say_file("digits/%df.wav", c); // одна две
+ say_file("digits/thousand.wav"); //тысяча
+ }
+ else{
+ say_file("digits/%df.wav", c); // одна две
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ say_file("digits/%d.wav", c); // один два
+ if (c==1) {
+ say_file("digits/million.wav", c); //миллион
+ }
+ else { //один два
+ say_file("digits/million-a.wav"); // миллиона
+ }
+ }
+ else { //просто один два
+ say_file("digits/%d.wav", c); // один два
+ }
+ break;
+ //-------------
+ case female: //женщина
+ if (what=="thousand") {
+ if (c==1) {
+ say_file("digits/%df.wav", c); // одна две
+ say_file("digits/thousand.wav"); //тысяча
+ }
+ else{
+ say_file("digits/%df.wav", c); // одна две
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ say_file("digits/%d.wav", c); // один два
+ if (c==1) {
+ say_file("digits/million.wav"); //миллион
+ }
+ else { //один два
+ say_file("digits/million-a.wav"); // миллиона
+ }
+ }
+ else { //просто одна две
+ say_file("digits/%df.wav", c); // одна две
+ }
+ break;
+ //-------------
+ case it: //оно
+ if (what=="thousand") {
+ if (c==1) {
+ say_file("digits/%df.wav", c); // одна две
+ say_file("digits/thousand.wav"); //тысяча
+ }
+ else{
+ say_file("digits/%df.wav", c); // одна две
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ say_file("digits/%d.wav", c); // один два
+ if (c==1) {
+ say_file("digits/million.wav"); //миллион
+ }
+ else { //один два
+ say_file("digits/million-a.wav"); // миллиона
+ }
+ }
+ else { //просто одно две
+ say_file("digits/%dn.wav", c); // одна две
+ }
+ break;
+ }
+ break;
+//------------------------------------------------------
+ case what_: //какой/я/ое
+ switch (sex)
+ { //пол
+ case male: //мужчина
+ if (what=="thousand") {
+ if (last==0) {// если дальше нету цифр значит говорить двух,одна 2-х, ...
+ if (c!=1) { //не произность одна тысячный
+ say_file("digits/h-%dxx.wav", c);//одна, двух
+ }
+ say_file("digits/h-thousandm.wav"); //тысячный
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%df.wav", c);//одна две
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ if (c!=1) {
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ }
+ say_file("digits/h-millionm.wav"); //миллионный
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand-a.wav"); //миллиона
+ }
+ }//просто цифры без тысяч
+ else{
+ say_file("digits/h-%dm.wav", c);//третий нулевой ..
+ }
+ break;
+ case female: //женщина
+ if (what=="thousand") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 1-х, 2-х ...
+ if (c!=1) { //не произность одна тысячная
+ say_file("digits/h-%dxx.wav", c);//одна, двух
+ }
+ say_file("digits/h-thousandf.wav"); //тысячная
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%df.wav", c);//две четыре ..
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ if (c!=1) {
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ }
+ say_file("digits/h-millionf.wav"); //миллионная
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand-a.wav"); //миллиона
+ }
+ }//просто цифры без тысяч
+ else{
+ say_file("digits/h-%df.wav", c);//третья нулевая ..
+ }
+ break;
+ case it: //оно
+ if (what=="thousand") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 1-х, 2-х ...
+ if (c!=1) { //не произность одна тысячное
+ say_file("digits/h-%dxx.wav", c);//одна, двух
+ }
+ say_file("digits/h-thousandn.wav"); //тысячное
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%df.wav", c);//две ..
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ if (c!=1) {
+ say_file("digits/h-%dxx.wav", c);//одна, двух
+ }
+ say_file("digits/h-millionn.wav"); //миллионное
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand-a.wav"); //миллиона
+ }
+ }//просто цифры без тысяч
+ else{
+ say_file("digits/h-%dn.wav", c);//третье нулевое ..
+ }
+ break;
+ }
+ break;
+//-------------------------------------------------------
+ case when: //какого - когда без пола
+ if (what=="thousand") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ if (c!=1) { //не произность одна тысячного
+ say_file("digits/h-%dxx.wav", c);//одна, двух
+ }
+ say_file("digits/h-thousandx.wav"); //тысячного
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%df.wav", c);//две четыре ..
+ say_file("digits/thousands-i.wav"); //тысячи
+ }
+ }
+ else if (what=="million") {
+ if (last==0) {// если дальше нету цифр значит говорить двух, 3-х, 4-х ...
+ if (c!=1) {
+ say_file("digits/h-%dxx.wav", c);//одна, двух, трёх
+ }
+ say_file("digits/h-millionx.wav"); //миллионного
+ }
+ else { //если есть дальше цифры меньше 1000
+ say_file("digits/%d.wav", c);//три четыре ..
+ say_file("digits/thousand-a.wav"); //миллиона
+ }
+ }//просто цифры без тысяч
+ else{
+ say_file("digits/h-%dx.wav", c);//третьего нулевого ..
+ }
+ break;
+ }
+ }//else if ((c==2)||(c==1)) { //1 2
+
+ }//конец if ((c)||(what=="zero"))
+ return SWITCH_STATUS_SUCCESS;
+}
+
+
+
+
+static char *strip_commas(char *in, char *out, switch_size_t len)
+{
+ char *p = in, *q = out;
+ char *ret = out;
+ switch_size_t x = 0;
+
+ for (; p && *p; p++) {
+ if ((*p > 47 && *p < 58)) {
+ *q++ = *p;
+ } else if (*p != ',') {
+ ret = NULL;
+ break;
+ }
+
+ if (++x > len) {
+ ret = NULL;
+ break;
+ }
+ }
+
+ return ret;
+}
+
+static char *strip_nonnumerics(char *in, char *out, switch_size_t len)
+{
+ char *p = in, *q = out;
+ char *ret = out;
+ switch_size_t x = 0;
+ // valid are 0 - 9, period (.), minus (-), and plus (+) - remove all others
+ for (; p && *p; p++) {
+ if ((*p > 47 && *p < 58) || *p == '.' || *p == '-' || *p == '+') {
+ *q++ = *p;
+ }
+
+ if (++x > len) {
+ ret = NULL;
+ break;
+ }
+ }
+
+ return ret;
+}
+
+
+static switch_status_t ru_say_count(switch_core_session_t *session,
+ char *tosay, sex_t sex, question_t question, switch_input_args_t *args)
+{
+ int in;
+ int x = 0;
+ int places[9] = { 0 };
+ char sbuf[13] = "";
+
+ switch_status_t status;
+
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "ru_say_count %d %d %d other!\n", places[2], places[1], places[0]);
+
+ if (!(tosay = strip_commas(tosay, sbuf, sizeof(sbuf))) || strlen(tosay) > 9) {
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Parse Error!\n");
+ return SWITCH_STATUS_GENERR;
+ }
+
+ in = atoi(tosay);
+ int in_ = in;
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "int in=%d!\n", in);
+ if (in != 0) {
+ for (x = 8; x >= 0; x--) {
+ int num = (int) pow(10, x);
+ if ((places[(uint32_t) x] = in / num)) {
+ in -= places[(uint32_t) x] * num;
+ }
+ }
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "int in=%d \n", in);
+
+ if ((status = play_group(sex,question, places[8], places[7], places[6], "million",in%1000000, session, args)) != SWITCH_STATUS_SUCCESS) {
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "play group %d %d %d million!\n", places[8], places[7], places[6]);
+ return status;
+ }
+ if ((status = play_group(sex,question, places[5], places[4], places[3], "thousand",in_%1000,session, args)) != SWITCH_STATUS_SUCCESS) {
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "play group %d %d %d thousand!\n", places[5], places[4], places[3]);
+ return status;
+ }
+ if ((status = play_group(sex,question, places[2], places[1], places[0], NULL, 0,session, args)) != SWITCH_STATUS_SUCCESS)
+ {
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "play group %d %d %d other!\n", places[2], places[1], places[0]);
+ return status;
+ }
+ } else { //если ноль что бы и его проговаривать в правильных падежах
+ if ((status = play_group(sex,question, places[2], places[1], places[0], "zero",0, session, args)) != SWITCH_STATUS_SUCCESS)
+ {
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, "play group %d %d %d other!\n", places[2], places[1], places[0]);
+ return status;
+ }
+ }
+
+ return SWITCH_STATUS_SUCCESS;
+}
+
+
+static switch_status_t ru_say_general_count(switch_core_session_t *session,
+ char *tosay, switch_say_type_t type, switch_say_method_t method, switch_input_args_t *args)
+{
+ switch_status_t status;
+ sex_t sex;
+ question_t question;
+
+ if (type== SST_MESSAGES)
+ {
+ sex=it;
+ question=how_much;
+ }
+ else if (type== SST_NUMBER||type==SST_PERSONS)
+ {
+ sex=male;
+ question=how_much;
+ }
+ else if (type== SST_ITEMS)
+ {
+ sex=male;
+ question=what_;
+ }
+ else
+ {
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Unknown Say type=[%d]\n", type);
+ return SWITCH_STATUS_FALSE;
+ }
+ status=ru_say_count(session,tosay,sex,question,args);
+ return SWITCH_STATUS_SUCCESS;
+}
+
+
+
+static switch_status_t ru_say_money(switch_core_session_t *session, char *tosay, switch_say_type_t type,
+ switch_say_method_t method,switch_input_args_t *args)
+{
+ char sbuf[16] = "";
+ char *dollars = NULL;
+ char *cents = NULL;
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, " ru_say_money %s\n",tosay );
+ if (strlen(tosay) > 15 || !(tosay = strip_nonnumerics(tosay, sbuf, sizeof(sbuf)))) {
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Parse Error!\n");
+ return SWITCH_STATUS_GENERR;
+ }
+ dollars = sbuf;
+
+ if ((cents = strchr(sbuf, '.'))) {
+ *cents++ = '\0';
+ if (strlen(cents) > 2) {
+ cents[2] = '\0';
+ }
+ }
+ if (sbuf[0] == '+') {
+ dollars++;
+ }
+
+ if (sbuf[0] == '-') {
+ say_file("currency/minus.wav");
+ dollars++;
+ }
+ ru_say_count(session,dollars ,male,how_much,args);
+ int idollars = atoi(dollars)%100;
+ int idollar = atoi(dollars)%10;
+ if (idollars == 1 || (idollars > 20 && idollar == 1)) {/* рубль */
+ say_file("currency/dollar.wav");
+ }
+ else if ((idollars > 1 && idollars < 5) || (idollars > 20 && idollar > 1 && idollar < 5)) { /*рубля */
+ say_file("currency/dollar1.wav");
+ }
+ else { /*рублей */
+ say_file("currency/dollar2.wav");
+ }
+ /* Say cents */
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, " %s\n",cents );
+ ru_say_count(session,cents ,female,how_much,args);
+ int icents = atoi(cents)%100;
+ int icent = atoi(cents)%10;
+ if (icents == 1 || (icents > 20 && icent == 1))
+ {
+ /* копейка */
+ say_file("currency/cent.wav");
+ }
+ else if ((icents > 1 && icents < 5) || (icents > 20 && icent > 1 && icent < 5))
+ {
+ /* копейки */
+ say_file("currency/cent1.wav");
+ }
+ else
+ {
+ /* копеек */
+ say_file("currency/cents.wav");
+ }
+ return SWITCH_STATUS_SUCCESS;
+}
+
+
+static switch_status_t ru_say_time(switch_core_session_t *session, char *tosay, switch_say_type_t type, switch_say_method_t method,
+ switch_input_args_t *args)
+{
+ int32_t t;
+ char tmp[80];
+ switch_time_t target = 0, target_now = 0;
+ switch_time_exp_t tm, tm_now;
+ uint8_t say_date = 0, say_time = 0, say_year = 0, say_month = 0, say_dow = 0, say_day = 0, say_yesterday = 0, say_today = 0;
+ switch_channel_t *channel = switch_core_session_get_channel(session);
+ const char *tz = switch_channel_get_variable(channel, "timezone");
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_INFO, " ru_say_time %s type=%d method=%d\n",tosay, type,method );
+
+ if (type == SST_TIME_MEASUREMENT) {
+ int64_t hours = 0;
+ int64_t minutes = 0;
+ int64_t seconds = 0;
+ int64_t r = 0;
+
+ if (strchr(tosay, ':')) {
+ char *tme = switch_core_session_strdup(session, tosay);
+ char *p;
+
+ if ((p = strrchr(tme, ':'))) {
+ *p++ = '\0';
+ seconds = atoi(p);
+ if ((p = strchr(tme, ':'))) {
+ *p++ = '\0';
+ minutes = atoi(p);
+ if (tme) {
+ hours = atoi(tme);
+ }
+ } else {
+ minutes = atoi(tme);
+ }
+ }
+ } else {
+ if ((seconds = atol(tosay)) <= 0) {
+ seconds = (int64_t) switch_epoch_time_now(NULL);
+ }
+
+ if (seconds >= 60) {
+ minutes = seconds / 60;
+ r = seconds % 60;
+ seconds = r;
+ }
+
+ if (minutes >= 60) {
+ hours = minutes / 60;
+ r = minutes % 60;
+ minutes = r;
+ }
+ }
+
+ switch_snprintf(tmp, sizeof(tmp), "%u", (unsigned)hours);
+ ru_say_count(session,tmp ,male,how_much,args);
+ if (((hours%10) == 1) && (hours!=11)) {
+ /* час */
+ say_file("time/hour.wav");
+ }
+ else if (((hours%10>1)&&(hours%10<5)) &&((hours<12)||(hours>14))) {
+ say_file("time/hours-a.wav"); /* часа */
+ }
+ else {
+ say_file("time/hours.wav"); /* часов*/
+ }
+
+ switch_snprintf(tmp, sizeof(tmp), "%u", (unsigned)minutes); //перевести минуты в *char
+ ru_say_count(session,tmp ,female,how_much,args);
+ if (((minutes%10) == 1) && (minutes!=11)) {
+ say_file("time/minute.wav"); //минута
+ }
+ else if (((minutes%10>1)&&(minutes%10<5))&&((minutes<12)||(minutes>14))){
+ say_file("time/minutes-i.wav"); // минуты
+ }
+ else {
+ say_file("time/minutes.wav"); //минут
+ }
+
+ if (seconds!=0) {
+ switch_snprintf(tmp, sizeof(tmp), "%u", (unsigned)seconds);
+ ru_say_count(session,tmp ,female,how_much,args);
+ if (((seconds%10) == 1) && (seconds!=11)) {
+ say_file("time/second.wav"); // секунда
+ }
+ else if (((seconds%10>1)&&(seconds%10<5))&&((seconds<12)||(seconds>14))) {
+ say_file("time/seconds-i.wav"); // секуны
+ }
+ else {
+ say_file("time/seconds.wav"); //секунд
+ }
+ }
+
+ return SWITCH_STATUS_SUCCESS;
+ }
+
+ if ((t = atol(tosay)) > 0) {
+ target = switch_time_make(t, 0);
+ target_now = switch_micro_time_now();
+ } else {
+ target = switch_micro_time_now();
+ target_now = switch_micro_time_now();
+ }
+
+ if (tz) {
+ int check = atoi(tz);
+ if (check) {
+ switch_time_exp_tz(&tm, target, check);
+ switch_time_exp_tz(&tm_now, target_now, check);
+ } else {
+ switch_time_exp_tz_name(tz, &tm, target);
+ switch_time_exp_tz_name(tz, &tm_now, target_now);
+ }
+ } else {
+ switch_time_exp_lt(&tm, target);
+ switch_time_exp_lt(&tm_now, target_now);
+ }
+ switch (type) {
+ case SST_CURRENT_DATE_TIME:
+ say_date = say_time = 1;
+ break;
+ case SST_CURRENT_DATE:
+ say_date = 1;
+ break;
+ case SST_CURRENT_TIME:
+ say_time = 1;
+ break;
+ case SST_SHORT_DATE_TIME:
+ say_time = 1;
+ if (tm.tm_year != tm_now.tm_year) {
+ say_date = 1;
+ break;
+ }
+ if (tm.tm_yday == tm_now.tm_yday) {
+ say_today = 1;
+ break;
+ }
+ if (tm.tm_yday == tm_now.tm_yday - 1) {
+ say_yesterday = 1;
+ break;
+ }
+ if (tm.tm_yday >= tm_now.tm_yday - 5) {
+ say_dow = 1;
+ break;
+ }
+ if (tm.tm_mon != tm_now.tm_mon) {
+ say_month = say_day = say_dow = 1;
+ break;
+ }
+
+ say_month = say_day = say_dow = 1;
+
+ break;
+ default:
+ break;
+ }
+
+ if (say_today) {
+ say_file("time/today.wav");
+ }
+ if (say_yesterday) {
+ say_file("time/yesterday.wav");
+ }
+ if (say_dow) {
+ say_file("time/day-%d.wav", tm.tm_wday);
+ }
+ if (say_date) {
+ say_year = say_month = say_day = say_dow = 1;
+ say_today = say_yesterday = 0;
+ }
+ if (say_day) {
+ switch_snprintf(tmp, sizeof(tmp), "%u", (unsigned)tm.tm_mday);
+ ru_say_count(session,tmp ,male,when,args);
+ }
+ if (say_month) {
+ say_file("time/mon-%d.wav", tm.tm_mon);
+ }
+ if (say_year) {
+ switch_snprintf(tmp, sizeof(tmp), "%u", (unsigned)(tm.tm_year + 1900));
+ ru_say_count(session,tmp ,male,when,args);
+ say_file("time/h-year.wav");
+ }
+ if (say_month||say_year||say_date||say_dow)
+ {
+ say_file("time/at.wav");
+ }
+ if (say_time) {
+ switch_snprintf(tmp, sizeof(tmp), "%d:%d:%d",tm.tm_hour+1,tm.tm_min,tm.tm_sec);
+ ru_say_time(session, tmp, SST_TIME_MEASUREMENT, method, args);
+ }
+ return SWITCH_STATUS_SUCCESS;
+}
+
+
+
+static switch_status_t ru_say(switch_core_session_t *session, char *tosay, switch_say_type_t type, switch_say_method_t method, switch_input_args_t *args)
+{
+ switch_say_callback_t say_cb = NULL;
+
+
+ switch (type) {
+ case SST_NUMBER:
+ case SST_ITEMS:
+ case SST_PERSONS:
+ case SST_MESSAGES:
+ say_cb = ru_say_general_count;
+ break;
+ case SST_TIME_MEASUREMENT:
+ say_cb = ru_say_time;
+ break;
+
+ case SST_CURRENT_DATE:
+ say_cb = ru_say_time;
+ break;
+
+ case SST_CURRENT_TIME:
+ say_cb = ru_say_time;
+ break;
+
+ case SST_CURRENT_DATE_TIME:
+ say_cb = ru_say_time;
+ break;
+ case SST_IP_ADDRESS:
+// say_cb = ru_ip;
+ break;
+ case SST_NAME_SPELLED:
+ case SST_NAME_PHONETIC:
+ say_cb = ru_spell;
+ break;
+ case SST_CURRENCY:
+ say_cb = ru_say_money;
+ break;
+ default:
+ switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Unknown Say type=[%d]\n", type);
+ break;
+ }
+ if (say_cb) {
+ return say_cb(session, tosay, type, method, args);
+ }
+ return SWITCH_STATUS_FALSE;
+}
+
+
+
+SWITCH_MODULE_LOAD_FUNCTION(mod_say_ru_load)
+{
+ switch_say_interface_t *say_interface;
+ /* connect my internal structure to the blank pointer passed to me */
+ *module_interface = switch_loadable_module_create_module_interface(pool, modname);
+ say_interface = switch_loadable_module_create_interface(*module_interface, SWITCH_SAY_INTERFACE);
+ say_interface->interface_name = "ru";
+ say_interface->say_function = ru_say;
+
+ /* indicate that the module should continue to be loaded */
+ return SWITCH_STATUS_SUCCESS;
+}
+
+/* For Emacs:
+ * Local Variables:
+ * mode:c
+ * indent-tabs-mode:t
+ * tab-width:4
+ * c-basic-offset:4
+ * End:
+ * For VIM:
+ * vim:set softtabstop=4 shiftwidth=4 tabstop=4:
+ */
More information about the Freeswitch-svn
mailing list