File content as of revision 5:5366d39d3719:

#include "mbed.h"
#include "C027.h"
#include "GPS.h"
#include "MDM.h"

C027 c027;

void printDeviceStatus(MDMParser::DevStatus* status) {
    printf("Device Status:\r\n");
    const char* txtModel[] = { "Unknown", "SARA-G350", "LISA-U200", "LISA-C200" };
    if (status->model < sizeof(txtModel)/sizeof(*txtModel) && (status->model != MDMParser::MODEL_UNKNOWN))
        printf("  Model: %s\r\n", txtModel[status->model]);
    const char* txtSim[] = { "Unknown", "Pin", "Ready" };
    if (status->sim < sizeof(txtSim)/sizeof(*txtSim) && (status->sim != MDMParser::SIM_UNKNOWN))
        printf("  SIM:   %s\r\n", txtSim[status->sim]);
    if (status->ccid)  
        printf("  CCID:  %s\r\n", status->ccid);
    if (status->imei) 
        printf("  IMEI:  %s\r\n", status->imei);
    if (status->imsi)  
        printf("  IMSI:  %s\r\n", status->imsi);
}

void printNetStatus(MDMParser::NetStatus *status)
{
    printf("Network Status:\r\n");
    const char* txtReg[] = { "Unknown", "Denied", "None", "Home", "Roaming" };
    if (status->reg < sizeof(txtReg)/sizeof(*txtReg) && (status->reg != MDMParser::REG_UNKNOWN))
        printf("  Registration:       %s\r\n", txtReg[status->reg]);
    const char* txtAct[] = { "Unknown", "GSM", "Edge", "3G", "CDMA" };
    if (status->act < sizeof(txtAct)/sizeof(*txtAct) && (status->act != MDMParser::ACT_UNKNOWN))
        printf("  Access Technology:  %s\r\n", txtAct[status->act]);
    if (status->rssi) 
        printf("  Signal Strength:    %d dBm\r\n", status->rssi);
    if (status->opr)  
        printf("  Operator:           %s\r\n", status->opr);
    if (status->num)  
        printf("  Phone Number:       %s\r\n", status->num);
}

int main(void)
{
    int ret;
    char buf[512] = "";

    Serial pc(USBTX,USBRX);
    pc.baud(115200);
    
    printf("C027 Support Example\r\n");

    c027.mdmPower(true);
    c027.gpsPower(true);
    wait(2);

    GPSI2C gps(GPSSDA,GPSSCL,GPSADR);     // use GPSI2C class
    // GPSSerial gps(GPSTXD,GPSRXD,GPSBAUD); // or GPSSerial class 
    MDMSerial mdm(MDMTXD, MDMRXD, MDMBAUD
#if DEVICE_SERIAL_FC
                 ,MDMRTS,MDMCTS
#endif
                );
                
    // initialize the modem 
    printf("Init\r\n");
    MDMParser::DevStatus devStatus;
    MDMParser::NetStatus netStatus;
    if (mdm.init(/* SIM PIN = */ NULL, &devStatus))
    {
        printDeviceStatus(&devStatus);
        
        // wait until we are connected
        printf("Network Check\r\n");
        while (!mdm.checkNetStatus(&netStatus))
            wait_ms(1000);
    
        printNetStatus(&netStatus);
        printf("Network Join\r\n");
        // join the internet connection 
        MDMParser::IP ip = 
            mdm.join(/* APN      = */ "gprs.swisscom.ch", 
                     /* USER     = */ NULL, 
                     /* PASSWORD = */ NULL);
        if (ip != NOIP)
        {
            printf("IP Address: " IPSTR "\r\n", IPNUM(ip));
            printf("Socket Create\r\n");
            int socket = mdm.socketSocket(MDMParser::IPPROTO_TCP);
            if (socket >= 0)
            {
                printf("Socket Connect\r\n");
                if (mdm.socketConnect(socket, "mbed.org", 80))
                {
                    printf("Make a Http Post Request\r\n");
                    const char http[] = "GET /media/uploads/mbed_official/hello.txt HTTP/1.0\r\n\r\n";
                    printf("Socket Send\r\n");
                    mdm.socketSend(socket, http, sizeof(http)-1);
                
                    printf("Socket Recving\r\n");
                    while (true) {
                        ret = mdm.socketReadable(socket);
                        if (ret > 0)
                            ret = mdm.socketRecv(socket, buf, sizeof(buf)-1);
                        if (ret < 0)
                            break;
                        else if (ret > 0)
                            printf("Socket Recv \"%*s\"\r\n", ret, buf);
                    }
                    printf("Socket Close\r\n");
                    mdm.socketClose(socket);
                }
                printf("Socket Free\r\n");
                mdm.socketFree(socket);
            }
            
            // disconnect  
            printf("Network Disconnect\r\n");
            mdm.disconnect();
        }
        
        const char* ussd = "*#134#"; // You may get answer "UNKNOWN APPLICATION"
        printf("Send Ussd Command %s\r\n", ussd);
        ret = mdm.ussdCommand(ussd, buf);
        if (ret > 0) 
            printf("Got Ussd Answer: \"%*s\"\r\n", ret, buf);
            
        printf("Checking SMS and GPS\r\n");
        char link[128] = "";
        unsigned int i = 0xFFFFFFFF;
        const int wait = 100;
        while (1) {
            
            while ((ret = gps.getMessage(buf, sizeof(buf))) > 0)
            {
                int len = LENGTH(ret);
                //printf("NMEA: %.*s\r\n", len-2, msg); 
                if ((PROTOCOL(ret) == NMEA) && (len > 6) && !strncmp("$GPGLL", buf, 6))
                {
                    double la = 0, lo = 0;
                    char ch;
                    if (gps.getNmeaAngle(1,buf,len,la) && 
                        gps.getNmeaAngle(3,buf,len,lo) && 
                        gps.getNmeaItem(6,buf,len,ch) && ch == 'A')
                    {
                        printf("GPS Location: %.5f %.5f\r\n", la, lo); 
                        sprintf(link, "I am here!\n"
                                      "https://maps.google.com/?q=%.5f,%.5f", la, lo); 
                    }
                }
            }
            
            if (i++ == 10000/wait) {
                i = 0;
                // check the network status
                if (mdm.checkNetStatus(&netStatus))
                    printNetStatus(&netStatus);
                    
                // checking unread sms
                int ix[8];
                int n = mdm.smsList("REC UNREAD", ix, 8);
                if (8 < n) n = 8;
                while (0 < n--)
                {
                    char num[32];
                    printf("Unread SMS at index %d\r\n", ix[n]);
                    if (mdm.smsRead(ix[n], num, buf, sizeof(buf))) {
                        printf("Got SMS from \"%s\" with text \"%s\"\r\n", num, buf);
                        printf("Delete SMS at index %d\r\n", ix[n]);
                        mdm.smsDelete(ix[n]);
                        // provide a reply
                        const char* reply = "Hello my friend";
                        if (strstr(buf, /*w*/"here are you"))
                            reply = *link ? link : "I don't know"; // reply wil location link
                        printf("Send SMS reply \"%s\" to \"%s\"\r\n", reply, num);
                        mdm.smsSend(num, reply);
                    }
                }
            }
            wait_ms(wait);
        }  
        mdm.powerOff();
        gps.powerOff();
    }
    printf("done\r\n");
    // now it is safe to switch off
    c027.mdmPower(false);
    c027.gpsPower(false);
    
    return 0;
}