The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Net::Radio::oFono::SimManager - access Modem object's SimManager interface

SYNOPSIS

  my $oFono = Net::Location::oFono->new();
  my @modems = Net::Location::oFono->get_modems();
  foreach my $modem_path (@modems) {
    my $simmgr = Net::Location::oFono->get_modem_interface($modem_path, "SimManager");
    $simmgr->GetProperty("SubscriberIdentity") eq $cfg{IMSI} # identify right one
      and $simmgr->GetProperty("PinRequired") eq "pin" # do not enter when not wanted
      and $simmgr->EnterPin("pin", "1234"); # enter pin code
  }

INHERITANCE

  Net::Radio::oFono::SimManager
  ISA Net::Radio::oFono::Modem
    ISA Net::Radio::oFono::Helpers::EventMgr
    DOES Net::Radio::oFono::Roles::RemoteObj
    DOES Net::Radio::oFono::Roles::Properties

METHODS

See ofono/doc/sim-api.txt for valid pin types and detailed action description and possible errors.

ChangePin($pintype,$oldpin,$newpin)

Changes the appropriate pin type.

EnterPin($pintype,$pin)

Enters the currently pending pin. The type value must match the pin type being asked in the PinRequired property.

ResetPin($pintype,$puk,$pin)

Provides the unblock key to the modem and if correct resets the pin to the new value of pin.

LockPin($pintype,$pin)

Activates the lock for the particular pin type.

UnlockPin($pintype,$pin)

Deactivates the lock for the particular pin type.

GetIcon($id)

Obtain the icon given by id. Only ids greater than 1 are valid. XPM format is currently used to return the icon data.

BUGS

Please report any bugs or feature requests to bug-net-radio-ofono at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Net-Radio-oFono. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

If you think you've found a bug then please read "How to Report Bugs Effectively" by Simon Tatham: http://www.chiark.greenend.org.uk/~sgtatham/bugs.html.

SUPPORT

You can find documentation for this module with the perldoc command.

    perldoc Net::Radio::oFono

You can also look for information at:

Where can I go for help with a concrete version?

Bugs and feature requests are accepted against the latest version only. To get patches for earlier versions, you need to get an agreement with a developer of your choice - who may or not report the issue and a suggested fix upstream (depends on the license you have chosen).

Business support and maintenance

For business support you can contact Jens via his CPAN email address rehsackATcpan.org. Please keep in mind that business support is neither available for free nor are you eligible to receive any support based on the license distributed with this package.

ACKNOWLEDGEMENTS

At first the guys from the oFono-Team shall be named: Marcel Holtmann and Denis Kenzior, the maintainers and all the people named in ofono/AUTHORS. Without their effort, there would no need for a Net::Radio::oFono module.

Further, Peter "ribasushi" Rabbitson helped a lot by providing hints and support how to make this API accessor a valuable CPAN module.

AUTHOR

Jens Rehsack, <rehsack at cpan.org>

LICENSE AND COPYRIGHT

Copyright 2012 Jens Rehsack.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.