NAME

GSM::SMS::NBS - API for sending and receiving SMS messages.

SYNOPSIS

use GSM::SMS::NBS;

my $nbs = GSM::SMS::NBS->new;

$nbs->sendRTTTL('+32475000000', $rtttl_string);
$nbs->sendOperatorLogo_b64($msisdn, $countrycode, $operator, $b64, 'gif');
$nbs->sendOperatorLogo_file($msisdn, $countrycode, $operatorcode, $file);
$nbs->sendGroupGraphic_b64($msisdn, $b64, 'png');
$nbs->sendGroupGraphic_file($msisdn, $file);
$nbs->sendVCard($msisdn, $lastname, $firstname, $phonenumber);
$nbs->sendConfig(....);
$nbs->sendSMSTextMessage($msisdn, $message, $multipart);

...

my $originatingaddress;
my $message;
my $timestamp;
my $transportname;
my $port;
my $blocking = GSM::SMS::NBS::RECEIVE::BLOCKING;

$nbs->receive(	\$originatingaddress,
  \$message,
  \$timestamp,
  \$transportname,
  \$port,
  $blocking
 );

 print "I got a message from $originatingaddress\n";

DESCRIPTION

This module is a facade for the GSM::SMS package. It provides an easy API for sending and receiving SMS messages.

CONSTANTS

GSM::SMS::NBS::RECEIVE_BLOCKING

Blocking receive

GSM::SMS::NBS::RECEIVE_NONBLOCKING

Non blocking receive

GSM::SMS::NBS::MULTIPART_YES

No multipart text messages. See the method sendSMSTextMessage.

GSM::SMS::NBS::MULTIPART_YES

Multipart text messages. See the method sendSMSTextMessage.

GSM::SMS::NBS::FLASH_YES

Send flash - for immediate display - messages. See the method sendSMSTextMessage.

GSM::SMS::NBS::FLASH_NO

No flash. See the method sendSMSTextMessage.

CONSTRUCTORS

new - Constructor
my $nbs = GSM::SMS::NBS->new(
            -transport => $name_of_transport,
            -config_file => $config_file
            );
 
my $nbs = GSM::SMS::NBS->new( $config_file );

Both parameters are optional. If you have configured the GSM::SMS package, you'll not need to use a specific configuration file.

The transport parameter allows you to specify a specific transport to use for this instance of GSM::SMS::NBS. When sending a message, a route will be tried to be determined via this specific transport. If successfull, this transport will be used to actualy send the message. This parameter is the name of transport as specified in the configuration.

METHODS

sendto - Send a message

This is a helper function. It'l take a message and tries to send it. This method uses the GSM::SMS::NBS::* subclasses to split up the message in smaller fragments.

sendRTTTL - Send a ring tone in RTTTL format.
$nbs->sendRTTTL( $msisdn, $rtttlstring );

Send a ring tone ( $rtttlstring ) to the specified telephone number ( $msisdn ). The RTTTL ( Ringing Tone Tagged Text Language ) format is specified as described in the file docs/rtttlsyntax.txt.

You can find a lot of information about RTTTL ( and a lot of ringing tones ) on the internet. Just point your favourite browser to your favourite searchengine and look for ringing tones.

$nbs->sendOperatorLogo_b64( $msisdn, $country, $operator, $b64, $format);

An operator logo indicates the operator you are connected to for the moment. This is used to have a nice logo on your telephone all of the time.

For this method you'll also need to provide a country code and an operator code. I've assembled a list of country and operator codes for different mobile operators in the file "docs/codes.txt". For the moment there is no convenience class that implements the lookup of these code according to the mobile phone number. Due to the dynamic nature of these numbers - numbers can be kept when switching operators - there is no real use of providing an automatic lookup using the mobile phone numbers (maybe a community web service can help us here?).

The method expects a base64 serialised image and the format of the image, 'gif', 'png'. The Image::Magick package is used to process the image, this guarabntees a lot of supported formats. The image needs to be 71 by 14 pixels.

$nbs->sendOperatorLogo_file( $msisdn, $country, $operator, $file );

Send an operator logo to $msisdn, using the image in file $file. This method does the same thing as sendOperatorLogo_b64, but uses a file instead of a base 64 encoded image.

sendGroupGraphic_b64 - Send a group graphic
$nbs->sendGroupGraphic_b64( $msisdn, $b64, $format);

Send a group graphic, also called a Caller Line Identification icon ( CLIicon ),to the recipient indicated by the telephone number $msisdn. It expects a base 64 encoded image and the format the image is in, like 'gif', 'png'. To find out which image formats are supported, look at the superb package Image::Magick. The base 64 encoded image is just a serialisation of an image file, not of the image bitarray. The image is limited in size, it needs to be 71x14 pixels.

sendGroupGraphic_file - Send a group graphic
$nbs->sendGroupGraphic_file( $msisdn, $file);

Send a group graphic to $msisdn, use the image in file $file. The image must be 71x14 pixels.

sendVCard - Send a VCard
$nbs->sendVCard( $msisdn, $lastname, $firstname, $telephone );

A VCard is a small business card, containing information about a person. It is not a GSM only standard, netscape uses vcards to identify the mail sender ( attach vcard option ). You can look at the complete VCard MIME specification in RFC 2425 and RFC 2426.

sendConfig - Send WAP configuration settings
$nbs->sendConfig( $msisdn, 
                  $bearer, 
                  $connection, 
                  $auth, 
                  $type,
                  $speed, 
                  $proxy, 
                  $home, 
                  $uid, 
                  $pwd, 
                  $phone, 
                  $name
                  );

Send a WAP configuration to a WAP capable handset. It expects the following parameters:

The parameters in UPPERCASE are exported constants by the GSM::SMS::OTA::Config.

$msisdn

Phonenumber recipient

$bearer

The carrier used ( circuit switched data or sms ), WAP is independent of the underlying connectivity layer.

OTA_BEARER_CSD
OTA_BEARER_SMS
$connection

You have to use continuous for CSD (circuit switched) type of calls.

OTA_CONNECTIONTYPE_TEMPORARY
OTA_CONNECTIONTYPE_CONTINUOUS
$auth

Use PAP or CHAP as authentication type. A CSD call is just a data call, and as such can use a normal dial-in point.

OTA_CSD_AUTHTYPE_PAP
OTA_CSD_AUTHTYPE_CHAP
$type

The following calling types are defined. You can either choose ISDN or an analogie connection. The analogue connection is the most used.

OTA_CSD_CALLTYPE_ISDN
OTA_CSD_CALLTYPE_ANALOGUE
$speed

Connection speed.

OTA_CSD_CALLSPEED_9600
OTA_CSD_CALLSPEED_14400
OTA_CSD_CALLSPEED_AUTO
$proxy

IP address of the WAP gateway to use.

$home

URL of the homepage for this setting. e.g. http://wap.domain.com

$uid

Dial-up userid

$pwd

Dial-up password

$phone

Dial-up telephone number

$name

Nick name for this connection.

This feature has been tested on a Nokia 7110, but other Nokia handsets are also supported.

sendSMSTextMessage - Send a text message
$nbs->sendSMSTextMessage( $msisdn, $msg, $multipart, $flash );

Send a text message ( $msg ) to the gsm number ( $msisdn ). If you set $multipart to true (!=0) the message will be split automatically in 160 char blocks. When $multipart is set to false it will be truncated at 160 characters. The flash option allows you to send a message that is displayed immediately on the screen of the mobile phone. This message is not stored in the SIM memory of the mobile phone. This option defaults to false.

If you want to keep it clean, the following constants can be used for the multipart flag.

GSM::SMS::NBS::MULTIPART_YES
GSM::SMS::NBS::MULTIPART_NO

Likewise the following constants are usefull for the flash sending.

GSM::SMS::NBS::FLASH_YES
GSM::SMS::NBS::FLASH_NO

Sending out a non-multipart, non-flash message can be done as follows:

$nbs->sendSMSTextMessage( "+324...", "Hello World" );

Sending out a non-multipart, flash message can be done as follows:

 $nbs->sendSMSTextMessage( "+324...", 
                           "Alarm, power down", 
                           $GSM::SMS::NBS::MULTIPART_NO,
                           $GSM::SMS::NBS::FLASH_YES
                           );
sendPictureMessage_b64 - Send a picture message
$nbs->sebdPictureMessage_b64( $msisdn, $text, $b64_encoded_image, $format );

Send a Picture message where the image is encoded in a base64 string. The base64 encoding can be handy when implementing a web based service, in which media files are kept in a RDBMS as base64 encoded strings.

sendPictureMessage_file - Send a picture message
$nbs->sendPictureMessage_file( $msisdn, $text, $file );

A picture message is a multipart format, consisting of text and an image. The image can be the double height of a normal GSM picture, i.e. 28 pixels. The text can be abything you want, encoded in a ISO8859-1 charset. There are no tests again the validity of the text string though! The image can be delivered in different formats, i.e. gif, png, ... If you want to know which ones, look them up in the convert man page.

receive - Receive SMS and NBS messages
$nbs->receive(	\$originatingaddress,
  \$message,
  \$timestamp,
  \$transportname,
  \$port,
  $blocking
);

This method is used for implementing bidirectional SMS. With you can receive incoming messages. The only transport ( for the moment ) that can receive SMS messages is the Serial transport.

The originatingaddress contains the sender msisdn number.

The message contains the ( concatenated ) message. A NBS message can be larger than 140 bytes, so a UDP like format is used to send fragements. The lower layers of the GSM::SMS package take care of the SAR ( Segmentation And Reassembly ).

The timestamp has the following format:

YYMMDDHHMMSSTZ

YY	:=	2 digits for the year ( 01 = 2001 )
MM	:=	2 digits for the month
DD	:=	2 digits for the day
HH	:=	2 digits for the hour
MM	:=	2 ditits for the minutes
SS	:=	2 digits for the seconds
TZ	:=  timezone 

Transportname contains the name of the transport as defined in the config file.

Port is the port number used to denote a specified service in the NBS stack.

my $originatingaddress;
my $message;
my $timestamp;
my $transportname;
my $port;
my $blocking = GSM::SMS::NBS::RECEIVE_BLOCKING;

$nbs->receive(	\$originatingaddress,
  \$message,
  \$timestamp,
  \$transportname,
  \$port,
  $blocking
);

print "I got a message from $originatingaddress\n";
get_transport - Return the GSM::SMS::Transport object
my $transport = $nbs->get_transport;

AUTHOR

Johan Van den Brande <johan@vandenbrande.com>