Добрый день. Поделитесь рабочей компонентой под платформу x64.
Для x32 есть, работает.
Для x64 есть, но работать отказывается.
Спасибо.

уже была тут тема, идите на гит там есть исходники, компилите и вуаля

И отсюда брал и на гит. Не взлетает.
с Visual Studio не знаком.
Вот и создал тему.

Держи https://dropmefiles.com/Xy7Xp

+ (3) Это с гитхаба, с немного исправленными ошибками.

(4) Ухты, спасибо за оперативное решение. Всё ок!

(5) ну вот, а то все мама, да мама (с) :))

(3) Подскажите, вашей компонентой авторизируюсь, всё ок.

    ОбъектКомпоненты = Новый("AddIn.Test.ROM-Asterisk-Native");

    IP = "10.0.0.10";
    Port = "5038";
    
    ОбъектКомпоненты.Connect(IP,Port);
    
    Если ОбъектКомпоненты.Подключено Тогда
        Сообщить("Подключено!");
    Иначе
        Сообщить("Авторизация неуспешна!");
        Возврат;
    КонецЕсли;    

Соединение проходит. Потому что если поменять IP или Порт, то значение "ОбъектКомпоненты.Подключено" = Ложь.

Далее пытаюсь залогинится.
Пишу следующее:

    CRLF = Символы.ВК + Символы.ПС;

    ТекстКоманды =
        "Action: Login"+CRLF+
                "Username: "+user+CRLF+
                "Secret: "+password+CRLF;

    Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);     

Переменная "Флаг" всегда содержит значение "Истина". Даже при неправильном логине/пароле.
Как заставить возвращать нормальный ответ?

Так попробуй:
    ТекстКоманды =
        "Action: Login"+CRLF+
                "Username: "+user+CRLF+
                "Secret: "+password+CRLF+CRLF;

Так тоже пробовал. Все равно всё "Истина".

(9) Этот метод почти всегда возвращает Истина. Пробуй после этого выполнить какую-нибудь команду Астериска

Например?

Вот пробую такую:

ТекстКоманды = "Action: CoreSettings"+CRLF;
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);

Возвращает Истина.

Такую:

ТекстКоманды="Action: Ping"+CRLF;
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);

Тоже Истина.

Даже несуществующую пишу:

ТекстКоманды="Action: TESTTTT"+CRLF;
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);

Все равно Истина)

(4) а вернуть на гитхаб исправленные ошибки не?

(10) Есть еще мысли, куда посмотреть? У вас компонента работает нормально?

(13) Да, все работает.
Вот так реализован метод "ВыполнитьКоманду": https://ibb.co/mh8bpXC

(13) Версия астериска какая?

(13) + Проверяй настройки AMI

С х32 компонентой как теже самые команды отрабатываются?

(15) Версия Asterisk 16

(17) Проверил, да, оказывается также. Значит дело не в компоненте. А в астериске или чем-то еще...

(19) Компонента дергает внешнее событие 1С. Сделай его на форме и смотри чего она тебе будет слать в сообщениях

(20) Через telnet соединился, авторизировался, отправил команду, в ответ получил нормальную реакцию.
https://ibb.co/mRF9m0s

Во внешнее событие на форме 1С попадает только соединение:
ОбъектКомпоненты.Connect(IP,Port);

Вот что получаю:

Процедура ВнешнееСобытие(Источник, Событие, Данные)
Источник = "ROM-Asterisk-Native";
Событие = "Connected";
Данные = "Server:10.0.0.10 Port:5038";
КонецПроцедуры

Авторизация во внешнее не попадает.
И остальные команды тоже...

(21) После логина сделай Компонента.SetRegex("");

(22)
Метод объекта не обнаружен (SetRegex)
ОбъектКомпоненты.SetRegex("");

(23) SetGegEx попробуй. Чувствительно к регистру чтоль.

(24) *SetRegEx

(25) Да, регистр имел значение.
Но возвращает также "Истина". И во внешнее событие не заходит.
Может быть вы бы смогли найти немного времени и подключится ко мне? Думаю так быстрее решится...

(26) Ну теперь пробуй звонить и смотри события и прочее. Какого рода интеграция нужна? Подключиться не могу.

(27) Нужно при входящем звонке словить кто звонит. Как правильно сделать?

(28) Сейчас при входящем звонке события сыпятся во внешнее событие? Если да, то начинай анализировать их. Если нет - проверяй настройки AMI и/или пробуй установить регулярку типа "."

(28) номер получить, по нему искать кто звонит

Блин, я уже не знаю куда смотреть.
Команды же все должны во внешнее событие прилетать? А прилетает только одно. Connect.
Ну и соответственно исходящие/входящие звонки также не прилетают.
Что нужно посмотреть в настройках АМИ?

(31) смотри тебе надо кешировать один номер , который должен делать переадресацию после 2-3 звонка . Т.е. 1С должен успеть перехватить входящий звонок до того как астериск перенаправит его на оператора .

для того чтобы перехватить и проверить работу сейчас , попроси никого не поднимать трубку на твой входящий звонок

(31) Сделай SetRegEx("Event:.*")

+(34) Может при пустом выражении он ничего не кидает во внешнее событие, не помню уже, а в коде лень смотреть.

Может на видосе чето увидите. Записал экран =)
Там видно, что во внешнее событие не заходит.

https://www.youtube.com/watch?v=x-QDeo07Lq0

(36) Ну вот ты подключился, установил регулярное выражение, теперь позвони на какой-нибудь внутренний номер или на внешний, без разницы и жди лог во внешнем событии. Если при звонке ничего не приходит, то смотри настройки AMI. Тут я не подскажу, гугли.

+(37) Что-то типа https://voxlink.ru/kb/book/interfejs-upravlenija-asterisk-ami/

CRLF используется для разделения каждой из строк в пакете и двух последовательностей CRLF (она же \r\n) для того, чтобы обозначить завершение передачи команды в Астериск

36 -> 8 !!1

(40) Так тоже пробовал...
https://ibb.co/f4vGQfG

(41) напиши формулу срлф

CR это ВК, LF это ПС

линукс такой линукс

и тся ться исправь!

(42) CRLF = Символы.ВК + Символы.ПС;

(44) У меня Windows

(45) Не понял...

перехвати отладкой из 1с в текстовый файлик все команды и копипастой сделай через телнет
если у тебя и вправду (8) и (46) код рабочий
возможно из-за отладки ты дожидаешься отлупа по таймауту

Хорошая идея. В отладке скопипастил команду, через телнет вставил, всё ок отрабатывает.

Авторизация:
https://ibb.co/YfFG4d1

CoreSettings:
https://ibb.co/MRVK9Hy

В 1С не работает...

ТекстКоманды = "Action: Login"+username;
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);
ТекстКоманды = "CR";
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);
ТекстКоманды = "LF";
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);
.
.
.
.
ТекстКоманды = "CR";
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);
ТекстКоманды = "LF";
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);
ТекстКоманды = "CR";
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);
ТекстКоманды = "LF";
Флаг = ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);

?

вместо CR символ сам конечно и я бы попробовал /r/n

Ладно, всем спасибо за участие. На одном и том же месте топчусь. Разместил задачу на платном ресурсе, может хоть так помогут. Если есть желающие, кто тут может/хочет помочь на платной основе, напишите пожалуйста на почту.

[email protected]

Спасибо)

Еще раз привет. Вообщем, решил сам. Если кому интересно, нужно было после авторизации включить режим прослушивания...
И все Eventы приходят во внешнее событие. Спасибо)

    ТекстКоманды =     "Action: login" + CRLF+
                       "Username: " + User + CRLF +
                    "Secret: " + Secret + CRLF + CRLF;

    ОбъектКомпоненты.ВыполнитьКоманду(ТекстКоманды);
    ОбъектКомпоненты.РежимПрослушивания(Истина);

Утро вечера мудренее ! Я так понял разобрался ?

(3) Файлы к сожаланию удалились((
Обновите пожалуйста!

(3) (0) Ребята, поделитесь компонентой, пожалуйста)

https://dropmefiles.com/nkcck

(58) Огромное спасибо!!!

Всем привет! Прошу поделиться компонентой для 32 и 64 битных платформ

(55) Добрый день! В параллельной ветке (архивной) "1с: Пример интеграции 1С и АТС типа Asterisk штатными средствами 1С / 1С 8" Вы отсылали на почту исходники, всем желающим, там была обработка и компонента, если что-то осталось не могли бы Вы поделиться со мной? Ранее это было все реализовано (до меня), перестало работать, нужно попробовать восстановить, пытаюсь начать с нуля, по шагам в той ветке, но пока не с чего... если можете помочь, пришлите, пожалуйста, на почту [email protected].

(58) Добрый день! не могли бы обновить ссылку, нужна для х64

(61) после обеда пришлю

Завтра

(61) почту давайте, отправлю все что осталось

(65) отправил