[Freeswitch-users] ESL and DEBUG messages

[Giovanni Maruzzelli]

Please, can someone chime in and tell if something has to change in the
skype module, or if the perl script has to be modified?

-giovanni

On Mon, Feb 4, 2013 at 2:50 PM, Anton Vojlenko <stargray at bigmir.net> wrote:

> ****<http://www.punchng.com/news/i-cant-solve-nigerias-problems-alone-president/>I
> can't solve this problem alone.
> In fs_cli i can see DEBUG messages:
> freeswitch at internal> skypopen sk1 GET USERSTATUS
> Using interface: globals.SKYPOPEN_INTERFACES[1].name=|||sk1|||
>
> 2013-02-04 15:31:44.565590 [DEBUG] skypopen_protocol.c:1732    [|]
> [DEBUG_SKYPE  1732 ][sk1            ][IDLE,IDLE] SENDING: |||GET
> USERSTATUS||||
> 2013-02-04 15:31:44.565590 [DEBUG] skypopen_protocol.c:207     [|]
> [DEBUG_SKYPE  207  ][sk1            ][IDLE,IDLE] READING: |||USERSTATUS
> ONLINE|||
>
> But when i execute perl script i can't see them:
> #perl /home/checker.pl
> Using interface: globals.SKYPOPEN_INTERFACES[1].name=|||sk1|||
>
> #cat /home/checker.pl
>
> #!/usr/bin/perl
> use strict;
> use warnings;
> require ESL;
> #ESL::eslSetLogLevel(7);
>
> my $host = "127.0.0.1";
> my $port = "8021";
> my $pass = "ClueCon";
>
> my $con  = new ESL::ESLconnection($host, $port, $pass);
>
> $con->api("console loglevel 9");
> $con->api("fsctl loglevel 9");
>
> my $status = $con->api("skypopen sk1 GET USERSTATUS")->getBody();
> print "$status";
> $con->disconnect()
>
>
>
> 2013/1/23 Anton Vojlenko <stargray at bigmir.net>
>
>> Giovanni, I can see Skype API answers only when i using fs_cli. With perl
>> script I can't see them.
>>
>>
>> 2013/1/22 Giovanni Maruzzelli <gmaruzz at gmail.com>
>>
>>> On Tue, Jan 22, 2013 at 12:51 PM, Anton Vojlenko <stargray at bigmir.net>
>>> wrote:
>>> > Hello,
>>> >
>>> > I want to check user status from the Skype client instance, but I
>>> can't see
>>> > Skype API answers from it. How to fix this?
>>>
>>> Have you tried to give:
>>>
>>> "fsctl loglevel 9" in addition to "console loglevel 9" ?
>>>
>>>
>>>
>>> > Script example:
>>> >
>>> > #!/usr/bin/perl
>>> > use strict;
>>> > use warnings;
>>> > require ESL;
>>> >
>>> > my $host = "localhost";
>>> > my $port = "8021";
>>> > my $pass = "somepass";
>>> > my $con  = new ESL::ESLconnection($host, $port, $pass);
>>> >
>>> > $con->api("console loglevel 9");
>>> > my $status = $con->api("skypopen sk1 GET USERSTATUS")->getBody();
>>> > print $status;
>>> > $con->disconnect();
>>> >
>>>
>>> --
>>> Sincerely,
>>>
>>> Giovanni Maruzzelli
>>> Cell : +39-347-2665618
>>>
>>> _________________________________________________________________________
>>> Professional FreeSWITCH Consulting Services:
>>> consulting at freeswitch.org
>>> http://www.freeswitchsolutions.com
>>>
>>> 
>>> 
>>>
>>> Official FreeSWITCH Sites
>>> http://www.freeswitch.org
>>> http://wiki.freeswitch.org
>>> http://www.cluecon.com
>>>
>>> FreeSWITCH-users mailing list
>>> FreeSWITCH-users at lists.freeswitch.org
>>> http://lists.freeswitch.org/mailman/listinfo/freeswitch-users
>>> UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users
>>> http://www.freeswitch.org
>>>
>>
>>
>
> _________________________________________________________________________
> Professional FreeSWITCH Consulting Services:
> consulting at freeswitch.org
> http://www.freeswitchsolutions.com
>
> 
> 
>
> Official FreeSWITCH Sites
> http://www.freeswitch.org
> http://wiki.freeswitch.org
> http://www.cluecon.com
>
> FreeSWITCH-users mailing list
> FreeSWITCH-users at lists.freeswitch.org
> http://lists.freeswitch.org/mailman/listinfo/freeswitch-users
> UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users
> http://www.freeswitch.org
>
>


-- 
Sincerely,

Giovanni Maruzzelli
Cell : +39-347-2665618
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.freeswitch.org/pipermail/freeswitch-users/attachments/20130204/0153c2af/attachment-0001.html