/*
UDPDemo.c: UDP client Demo

Compiler: BC++ 3.1,
          Turbo C++ 1.01 (3.01)
          MSVC 1.52

Compile mode: Large

Project: UDPDemo.c
         ..\..\lib\uPAC5000.Lib
         ..\..\lib\OS7_COM.lib
         ..\lib\GSM.lib

Hardware: uPAC-5000

Note
    The OS7_COM.lib library is required for using the GSM member functions.

[Feb 18, 2011] by Malo
*/

#include <conio.h>
#include <stdio.h>
#include <malloc.h>
#include <stdlib.h>
#include <string.h>
#include "..\..\lib\uPAC5000.h"
#include "..\..\lib\OS7_COM.h"
#include "..\lib\GSM.h"

void printPacket(GPRSData gprsData)
{
    int i;
    static int no = 0;
    no++;
    Print("----new GPRS Data (%d)----\r\n", no);
    Print("IP:Port = %s:%d, from link = %d\r\n", gprsData.IP, gprsData.port, gprsData.link);
    Print("Data length = %d\r\n", gprsData.dataLen);
    Print("Data = \r\n");
    for(i=0; i<gprsData.dataLen; i++)
    {
        Putch(gprsData.data[i]);
    }
    Print("\r\n------------------\r\n");
}

int main(void)
{
    int iAction=1, quit=1;
    int i, j;
    int tmp;
    int libVer;
    char libDate[20];
    int Result=0;
    int send_n;
    NetProfile netProfile;
    SYSProfile sysProfile;
    GPRSData gprsData;
    char serverIP[16];
    int serverPort;
    long socket_n;
    int netSendStatus = 0;
    char myIP[16];

    InitLib(); /* InitLib() must be called before other functions in the library may be used */

    //-- print uPAC5000.lib version
    GetLibDate(libDate);
    libVer=GetLibVersion();
    Print("uPAC5000.Lib vesion %X.%02X, Date:%s\r\n", libVer>>8, libVer&0xff, libDate);

    //-- print GSM lib. version
    GM_SYS_GetLibDate(libDate);
    libVer = GM_SYS_GetLibVersion();
    Print("GSM LIB vesion %X.%02X, Date:%s\r\n", libVer>>8, libVer&0xff, libDate);

    //---- init modem
    strcpy(sysProfile.PINCode, "0000"); //The pin code  of SIM card, ex: "0000"
    sysProfile.modemPort = 11;  //modem port number. G-4500 = 4, uP-5000 = 11
    sysProfile.hardware = 2;    //hardware type. 0: other hardware, 1: G-4500, 2: uPAC-5000, 3: iP-8000
    if( (Result = GM_SYS_InitModem(sysProfile)) == GM_NOERROR)
        Print("init_modem success!!\r\n");
    else{
        Print("init_modem fail!! return value is %d\r\n", Result);
        return 1;
    }

    //--check Could the modem service?
    while(GM_SYS_CheckModemStatus() != GM_NOERROR)
    {
        Print("wait modem register...\r\n");
        DelayMs(1000);
    }
    Print("modem registered!!\r\n");

    while(iAction!=0)
    {
        iAction=0;
        quit=0;

        Print("\r\n");
        Print("1) UDP client demo\r\n");
        Print("2) check signal quality\r\n");
        Print("3) check registered?\r\n");
        Print("\r\n");
        Print("0) Quits demo program\r\n");
        Print("Choose an option and press [Enter]: ");
        Scanf("%d", &iAction);
        Print("\r\n");

        switch(iAction)
        {
        case 1: //UDP client demo
            Print("UDP client demo start\r\n");

            // set Network profile
            strcpy(netProfile.APN, "INTERNET"); //APN for network provided by your cellular provider
            strcpy(netProfile.pw, "");          //username for network provided by your cellular provider
            strcpy(netProfile.user, "");        //password for network provided by your cellular provider
            //The most basic task of DNS is to translate hostnames such as www.icpdas.com to IP address such as 96.9.41.131.
            strcpy(netProfile.DnsServerIP, ""); //empty string = system default value
            GM_NET_SetNet(netProfile);

            //set ip, port of server
            Print("please input server IP:(ex: 74.125.227.48)\r\n");
            Scanf("%s", serverIP);
            Print("please input server Port:(ex: 80)\r\n");
            Scanf("%d", &serverPort);

            //--(1) install link[0], GM_NET_InstallLink(0, 0, serverIP, serverPort) for UDP
            GM_NET_InstallLink(0, 0, serverIP, serverPort);
            Print("linking...\r\n");
            socket_n = 0;   //count for the packets
            while (1)
            {
                // press "ESC" to exit
                if(Kbhit())
                {
                    tmp = Getch();
                    if( tmp == 27 || tmp == 'q')
                        break;
                }

                //--(2) check that could the modem service, if it can't, skip operating the modem below
                if(GM_SYS_CheckModemStatus() != GM_NOERROR)
                    continue;

                if(GM_NET_GetLinkStatus(0)!=1)
                    continue;
                else
                    GM_NET_GetIP(myIP);

                //--(3) send the data to server, and when LinkStatus[1]=1
                switch((netSendStatus=GM_SYS_CheckCmdStatus()))
                {
                case GM_READY:
                    Print("sending package[%8ld]..., myIP = %s\r\n", socket_n, myIP);
                    gprsData.link = 0;
                    sprintf(gprsData.data, "-<%8ld>-UDP send test!!", socket_n);
                    gprsData.dataLen = strlen(gprsData.data);
                    if(GM_NET_Send(gprsData.link, gprsData.data, gprsData.dataLen)!=GM_NOERROR)
                        Print("can't send package[%8ld]\r\n");
                    break;
                case GM_NOERROR:
                    Print("send success!!\r\n");
                    socket_n++;
                    break;
                case GM_BUSY:   //sending, and waiting reply
                    break;
                default:
                    Print("send error, and re-send again, error code=%d\r\n", netSendStatus);
                    break;
                }

                //--(4) if any new data packet come in, print it
                if(GM_NET_GetNewPacket(&gprsData) != NULL)
                {
                    Print("\n== new data packet come in\r\n");
                    printPacket(gprsData);
                }

            }
            GM_NET_CloseLink(0);//== Close client link[n], 3G:0~9, 2G:0
            GM_NET_CloseNet();

            break;

        case 2://check signal quality
            Result = GM_SYS_CheckSignal();
            Print("-----------------------------------\r\n");
            Print("signal value = %d\r\n", Result);
            Print("signal quality:\r\n");
            Print("0        -113 dBm or less\r\n");
            Print("1        -111 dBm\r\n");
            Print("2~30     -109... -53 dBm\r\n");
            Print("31       -51 dBm or greater\r\n");
            Print("99       not known or not detectable\r\n");
            Print("-----------------------------------\r\n");
            break;

        case 3://check register value
            Result = GM_SYS_CheckReg();
            Print("-----------------------------------\r\n");
            Print("register value = %d  (0:no register, 1:registered, 2:registering)\r\n", Result);
            Print("register flag:\r\n");
            Print(" 0:  not registered\r\n");
            Print(" 1:  registered, home network\r\n");
            Print(" 2:  not registered, and searching...\r\n");
            Print(" 3:  registration denied\r\n");
            Print(" 4:  unknown\r\n");
            Print(" 5:  registered, roaming\r\n");
            Print("-----------------------------------\r\n");
            break;

        case 0:
        default:
            quit=1;
            break;

        }//end switch()

        if(!quit)
        {
            Print("Press any key to continue...\r\n");
            Getch();
        }
    }//end while(1)

    //must close before program ending to release you resource
    GM_SYS_CloseModem(0);   //== Close the modem, 0:not turn off modem, 1:turn off modem

    Print("Please press ENTER to exit...\r\n");

    Getch();
    return 0;
}