www.gsmopen.org ...low cost GSM for FreeSWITCH and Asterisk

chuky,
have you copied the "ciapalo" file at its place? Is it in your configuration? Its the place written in configuration the same place where you copied it? It is executable by the user that executes asterisk?

In the mean time, I would suggest you read a book on Linux and linux administration, it will give you a lot of information that is needed if you want to deal with asterisk and co. This not to say I don't like to answer questions, but just because seems reading it would be very useful to you.

Dear Adam,

I deeply apologize for having offended you, it was absolutely not in my intentions. Probably just the shortness of the report and the "bona fide" of your approach made me think you was a beginner in linux (there is no bad in being a beginner) and that an introduction to linux could be of help.
I really really apologize for offending you: sorry.

The characters that does not appears are exactly utf8, as you said, and are not displayed in console for the limitations of the console itself, but would be written correctly on the file in /tmp.

Is the file working if you send it something from command line?

eg:
echo "ciao"| /usr/local/asterisk14/sbin/ciapalo

Also, can you verify that the asterisk user can execute it (not a permission level, but as a user - maybe it has no shell or whatever other problem):

su root
su - asterisk
echo "ciao"| /usr/local/asterisk14/sbin/ciapalo

We'll found the problem! :)
-giovanni

maybe you just have perl installed in another location, or no perl....

Yes, it was permissions.

I through 7777 at it, but it was giving an error that it did not like that the whole world could write to the script.

Now that that is straightened out! Any sugestions on how to grab the phone number and message into variables? There doesnt seem to be any identifying aspects about the string that I can use to que a grep.

It wrote the following:
---REC UNREAD|||---|||---00310038003100350037003100380035003000380039|||---1815XXXXXXX|||---10/01/28,09:26:08-24|||---ကĨ ☀ࠤ|||---004300720061007A00790020006200690074006300680021|||---Hello World|||

I would like to modify the perl script to not only to append to smses_received, but to also put the from phone number and message content into variables, and validate the information, and execute another program.

I WILL tell you I am a PERL noobie!!!!

I guess I will have to count the delimiter "---" and "|||" to find the feild I want.

I will do some reading and find out what I can do, I guess its time to learn perl. But suggestions are always welcome! :)

Adam

You can test this one, and adapt it to your needs.

#!/usr/bin/perl
open(FILEOUT, ">> /tmp/smses_received");
while(<>){
print FILEOUT $_ ;
printf FILEOUT "\n" ;

chomp();
@word = split /\|\|\|---/ ;
printf FILEOUT "NUMBER: ";
print FILEOUT $word[3];
printf FILEOUT "\n";
printf FILEOUT "DATE: ";
print FILEOUT $word[4];
printf FILEOUT "\n";
$word[7] =~ s/\|\|\|//g;
printf FILEOUT "TEXT: ";
print FILEOUT $word[7];
printf FILEOUT "\n";
printf FILEOUT "\n";
printf FILEOUT "\n";
}
close(FILEOUT);

Thanks for your words, very well received!

can I counseil you the Asterisk book from O'Reilly? :)

you can call:

/usr/local/asterisk/sbin/asterisk -rx "celliax_sendsms interface_name receiver_number \"Text of the SMS\""

Please dont hate me, but how do I get the variable to INCLUDE the \ character, because it normally means do not process the next character. This is what I have:


#!/usr/bin/perl
open(FILEOUT, "> /tmp/smses_received");
while(<>){
print FILEOUT $_ ;
printf FILEOUT "\n" ;

chomp();
@word = split /\|\|\|---/;
printf FILEOUT "NUMBER: ";
print FILEOUT $word[3];
printf FILEOUT "\n";
printf FILEOUT "DATE: ";
print FILEOUT $word[4];
printf FILEOUT "\n";
$word[7] =~ s/\|\|\|//g;
printf FILEOUT "TEXT: ";
print FILEOUT $word[7];
printf FILEOUT "\n";
printf FILEOUT "\n";
printf FILEOUT "\n";

}
close(FILEOUT);

$startcmd = "/usr/activate_relay/activate_relay 1 0";
$goodtxt = "asterisk -rx "celliax_sendsms line0/$word[3] \"Good Password\"\"";
$badtxt = "asterisk -rx "celliax_sendsms line0/$word[3] \"Bad Password\"\"";

if ($word[7] == 1234){
system($startcmd);
system($startcmd);
system($startcmd);
system($goodtxt);
} else {
system($badtxt);

This works, but only sends the First word in a txt. I know this is newbie stuff, but im not sure if its even possible. Maybe I have to add to string together with . or something like that......hmmm

Would it work to do something like this?

System ('asterisk -rx \"celliax_sendsms line0/' . $word[3] . '\"Good Password\"\"');