Berckvens Michiel & Basteyns Jonas

Dependencies:   DS1307 TextLCD mbed

Committer:
Michielber
Date:
Thu Dec 11 16:07:34 2014 +0000
Revision:
5:6878defcfeb9
Parent:
0:f615d151a72c
Project updated belastingslijn

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Michielber 0:f615d151a72c 1
Michielber 0:f615d151a72c 2 /*
Michielber 0:f615d151a72c 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
Michielber 0:f615d151a72c 4
Michielber 0:f615d151a72c 5 Permission is hereby granted, free of charge, to any person obtaining a copy
Michielber 0:f615d151a72c 6 of this software and associated documentation files (the "Software"), to deal
Michielber 0:f615d151a72c 7 in the Software without restriction, including without limitation the rights
Michielber 0:f615d151a72c 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
Michielber 0:f615d151a72c 9 copies of the Software, and to permit persons to whom the Software is
Michielber 0:f615d151a72c 10 furnished to do so, subject to the following conditions:
Michielber 0:f615d151a72c 11
Michielber 0:f615d151a72c 12 The above copyright notice and this permission notice shall be included in
Michielber 0:f615d151a72c 13 all copies or substantial portions of the Software.
Michielber 0:f615d151a72c 14
Michielber 0:f615d151a72c 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
Michielber 0:f615d151a72c 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
Michielber 0:f615d151a72c 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
Michielber 0:f615d151a72c 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
Michielber 0:f615d151a72c 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
Michielber 0:f615d151a72c 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
Michielber 0:f615d151a72c 21 THE SOFTWARE.
Michielber 0:f615d151a72c 22 */
Michielber 0:f615d151a72c 23
Michielber 0:f615d151a72c 24 #include "PPPNetIf.h"
Michielber 0:f615d151a72c 25 #include "mbed.h"
Michielber 0:f615d151a72c 26 #include "ppp/ppp.h"
Michielber 0:f615d151a72c 27 #include "lwip/init.h"
Michielber 0:f615d151a72c 28 #include "lwip/sio.h"
Michielber 0:f615d151a72c 29
Michielber 0:f615d151a72c 30 #define __DEBUG
Michielber 0:f615d151a72c 31 #include "dbg/dbg.h"
Michielber 0:f615d151a72c 32
Michielber 0:f615d151a72c 33 #include "netCfg.h"
Michielber 0:f615d151a72c 34 #if NET_PPP
Michielber 0:f615d151a72c 35
Michielber 0:f615d151a72c 36 #define PPP_TIMEOUT 60000
Michielber 0:f615d151a72c 37
Michielber 0:f615d151a72c 38 #define BUF_SIZE 256
Michielber 0:f615d151a72c 39
Michielber 0:f615d151a72c 40 PPPNetIf::PPPNetIf(GPRSModem* pIf) : LwipNetIf(), m_pIf(pIf),/* m_open(false),*/ m_connected(false), m_status(PPP_DISCONNECTED), m_fd(0) //, m_id(0)
Michielber 0:f615d151a72c 41 {
Michielber 0:f615d151a72c 42 //FIXME: Check static refcount
Michielber 0:f615d151a72c 43 m_buf = new uint8_t[BUF_SIZE];
Michielber 0:f615d151a72c 44 }
Michielber 0:f615d151a72c 45
Michielber 0:f615d151a72c 46 PPPNetIf::~PPPNetIf()
Michielber 0:f615d151a72c 47 {
Michielber 0:f615d151a72c 48 delete[] m_buf;
Michielber 0:f615d151a72c 49 }
Michielber 0:f615d151a72c 50
Michielber 0:f615d151a72c 51 #if 0
Michielber 0:f615d151a72c 52 PPPErr PPPNetIf::open(Serial* pSerial)
Michielber 0:f615d151a72c 53 {
Michielber 0:f615d151a72c 54 GPRSErr err = m_pIf->open(pSerial);
Michielber 0:f615d151a72c 55 if(err)
Michielber 0:f615d151a72c 56 return PPP_MODEM;
Michielber 0:f615d151a72c 57 m_open = true;
Michielber 0:f615d151a72c 58 #if 0
Michielber 0:f615d151a72c 59 m_id = sioMgr::registerSerialIf(this);
Michielber 0:f615d151a72c 60 if(!m_id)
Michielber 0:f615d151a72c 61 {
Michielber 0:f615d151a72c 62 close();
Michielber 0:f615d151a72c 63 return PPP_CLOSED;
Michielber 0:f615d151a72c 64 }
Michielber 0:f615d151a72c 65 #endif
Michielber 0:f615d151a72c 66 return PPP_OK;
Michielber 0:f615d151a72c 67 }
Michielber 0:f615d151a72c 68 #endif
Michielber 0:f615d151a72c 69
Michielber 0:f615d151a72c 70
Michielber 0:f615d151a72c 71 PPPErr PPPNetIf::GPRSConnect(const char* apn, const char* userId, const char* password) //Connect using GPRS
Michielber 0:f615d151a72c 72 {
Michielber 0:f615d151a72c 73 LwipNetIf::init();
Michielber 0:f615d151a72c 74 pppInit();
Michielber 0:f615d151a72c 75 //TODO: Tell ATIf that we get ownership of the serial port
Michielber 0:f615d151a72c 76
Michielber 0:f615d151a72c 77 GPRSErr gprsErr;
Michielber 0:f615d151a72c 78 gprsErr = m_pIf->connect(apn);
Michielber 0:f615d151a72c 79 if(gprsErr)
Michielber 0:f615d151a72c 80 return PPP_NETWORK;
Michielber 0:f615d151a72c 81
Michielber 0:f615d151a72c 82 DBG("PPPNetIf: If Connected.\n");
Michielber 0:f615d151a72c 83
Michielber 0:f615d151a72c 84 if( userId == NULL )
Michielber 0:f615d151a72c 85 pppSetAuth(PPPAUTHTYPE_NONE, NULL, NULL);
Michielber 0:f615d151a72c 86 else
Michielber 0:f615d151a72c 87 pppSetAuth(PPPAUTHTYPE_PAP, userId, password); //TODO: Allow CHAP as well
Michielber 0:f615d151a72c 88
Michielber 0:f615d151a72c 89 DBG("PPPNetIf: Set Auth.\n");
Michielber 0:f615d151a72c 90
Michielber 0:f615d151a72c 91 //wait(1.);
Michielber 0:f615d151a72c 92
Michielber 0:f615d151a72c 93 //m_pIf->flushBuffer(); //Flush buffer before passing serial port to PPP
Michielber 0:f615d151a72c 94
Michielber 0:f615d151a72c 95 m_status = PPP_CONNECTING;
Michielber 0:f615d151a72c 96 DBG("m_pIf = %p\n", m_pIf);
Michielber 0:f615d151a72c 97 int res = pppOverSerialOpen((void*)m_pIf, sPppCallback, (void*)this);
Michielber 0:f615d151a72c 98 DBG("PPP connected\n");
Michielber 0:f615d151a72c 99 if(res<0)
Michielber 0:f615d151a72c 100 {
Michielber 0:f615d151a72c 101 disconnect();
Michielber 0:f615d151a72c 102 return PPP_PROTOCOL;
Michielber 0:f615d151a72c 103 }
Michielber 0:f615d151a72c 104
Michielber 0:f615d151a72c 105 DBG("PPPNetIf: PPP Started with res = %d.\n", res);
Michielber 0:f615d151a72c 106
Michielber 0:f615d151a72c 107 m_fd = res;
Michielber 0:f615d151a72c 108 m_connected = true;
Michielber 0:f615d151a72c 109 Timer t;
Michielber 0:f615d151a72c 110 t.start();
Michielber 0:f615d151a72c 111 while( m_status == PPP_CONNECTING ) //Wait for callback
Michielber 0:f615d151a72c 112 {
Michielber 0:f615d151a72c 113 poll();
Michielber 0:f615d151a72c 114 if(t.read_ms()>PPP_TIMEOUT)
Michielber 0:f615d151a72c 115 {
Michielber 0:f615d151a72c 116 DBG("PPPNetIf: Timeout.\n");
Michielber 0:f615d151a72c 117 disconnect();
Michielber 0:f615d151a72c 118 return PPP_PROTOCOL;
Michielber 0:f615d151a72c 119 }
Michielber 0:f615d151a72c 120 }
Michielber 0:f615d151a72c 121
Michielber 0:f615d151a72c 122 DBG("PPPNetIf: Callback returned.\n");
Michielber 0:f615d151a72c 123
Michielber 0:f615d151a72c 124 if( m_status == PPP_DISCONNECTED )
Michielber 0:f615d151a72c 125 {
Michielber 0:f615d151a72c 126 disconnect();
Michielber 0:f615d151a72c 127 return PPP_PROTOCOL;
Michielber 0:f615d151a72c 128 }
Michielber 0:f615d151a72c 129
Michielber 0:f615d151a72c 130 return PPP_OK;
Michielber 0:f615d151a72c 131
Michielber 0:f615d151a72c 132 }
Michielber 0:f615d151a72c 133
Michielber 0:f615d151a72c 134 PPPErr PPPNetIf::ATConnect(const char* number) //Connect using a "classic" voice modem or GSM
Michielber 0:f615d151a72c 135 {
Michielber 0:f615d151a72c 136 //TODO: IMPL
Michielber 0:f615d151a72c 137 return PPP_MODEM;
Michielber 0:f615d151a72c 138 }
Michielber 0:f615d151a72c 139
Michielber 0:f615d151a72c 140 PPPErr PPPNetIf::disconnect()
Michielber 0:f615d151a72c 141 {
Michielber 0:f615d151a72c 142 if(m_fd)
Michielber 0:f615d151a72c 143 pppClose(m_fd); //0 if ok, else should gen a WARN
Michielber 0:f615d151a72c 144 m_connected = false;
Michielber 0:f615d151a72c 145
Michielber 0:f615d151a72c 146 m_pIf->flushBuffer();
Michielber 0:f615d151a72c 147 m_pIf->printf("+++\r\n");
Michielber 0:f615d151a72c 148 wait(.5);
Michielber 0:f615d151a72c 149 m_pIf->flushBuffer();
Michielber 0:f615d151a72c 150
Michielber 0:f615d151a72c 151 GPRSErr gprsErr;
Michielber 0:f615d151a72c 152 gprsErr = m_pIf->disconnect();
Michielber 0:f615d151a72c 153 if(gprsErr)
Michielber 0:f615d151a72c 154 return PPP_NETWORK;
Michielber 0:f615d151a72c 155
Michielber 0:f615d151a72c 156 return PPP_OK;
Michielber 0:f615d151a72c 157 }
Michielber 0:f615d151a72c 158
Michielber 0:f615d151a72c 159 #if 0
Michielber 0:f615d151a72c 160 PPPErr PPPNetIf::close()
Michielber 0:f615d151a72c 161 {
Michielber 0:f615d151a72c 162 GPRSErr err = m_pIf->close();
Michielber 0:f615d151a72c 163 if(err)
Michielber 0:f615d151a72c 164 return PPP_MODEM;
Michielber 0:f615d151a72c 165 m_open = false;
Michielber 0:f615d151a72c 166 return PPP_OK;
Michielber 0:f615d151a72c 167 }
Michielber 0:f615d151a72c 168 #endif
Michielber 0:f615d151a72c 169
Michielber 0:f615d151a72c 170
Michielber 0:f615d151a72c 171 #if 0
Michielber 0:f615d151a72c 172 //We have to use :
Michielber 0:f615d151a72c 173
Michielber 0:f615d151a72c 174 /** Pass received raw characters to PPPoS to be decoded. This function is
Michielber 0:f615d151a72c 175 * thread-safe and can be called from a dedicated RX-thread or from a main-loop.
Michielber 0:f615d151a72c 176 *
Michielber 0:f615d151a72c 177 * @param pd PPP descriptor index, returned by pppOpen()
Michielber 0:f615d151a72c 178 * @param data received data
Michielber 0:f615d151a72c 179 * @param len length of received data
Michielber 0:f615d151a72c 180 */
Michielber 0:f615d151a72c 181 void
Michielber 0:f615d151a72c 182 pppos_input(int pd, u_char* data, int len)
Michielber 0:f615d151a72c 183 {
Michielber 0:f615d151a72c 184 pppInProc(&pppControl[pd].rx, data, len);
Michielber 0:f615d151a72c 185 }
Michielber 0:f615d151a72c 186 #endif
Michielber 0:f615d151a72c 187
Michielber 0:f615d151a72c 188 void PPPNetIf::poll()
Michielber 0:f615d151a72c 189 {
Michielber 0:f615d151a72c 190 if(!m_connected)
Michielber 0:f615d151a72c 191 return;
Michielber 0:f615d151a72c 192 LwipNetIf::poll();
Michielber 0:f615d151a72c 193 //static u8_t buf[128];
Michielber 0:f615d151a72c 194 int len;
Michielber 0:f615d151a72c 195 do
Michielber 0:f615d151a72c 196 {
Michielber 0:f615d151a72c 197 len = sio_tryread((sio_fd_t) m_pIf, m_buf, BUF_SIZE);
Michielber 0:f615d151a72c 198 if(len > 0)
Michielber 0:f615d151a72c 199 pppos_input(m_fd, m_buf, len);
Michielber 0:f615d151a72c 200 } while(len>0);
Michielber 0:f615d151a72c 201 }
Michielber 0:f615d151a72c 202
Michielber 0:f615d151a72c 203 //Link Callback
Michielber 0:f615d151a72c 204 void PPPNetIf::pppCallback(int errCode, void *arg)
Michielber 0:f615d151a72c 205 {
Michielber 0:f615d151a72c 206 switch ( errCode )
Michielber 0:f615d151a72c 207 {
Michielber 0:f615d151a72c 208 //No error
Michielber 0:f615d151a72c 209 case PPPERR_NONE:
Michielber 0:f615d151a72c 210 {
Michielber 0:f615d151a72c 211 struct ppp_addrs* addrs = (struct ppp_addrs*) arg;
Michielber 0:f615d151a72c 212 m_ip = IpAddr(&(addrs->our_ipaddr)); //Set IP
Michielber 0:f615d151a72c 213 }
Michielber 0:f615d151a72c 214 m_status = PPP_CONNECTED;
Michielber 0:f615d151a72c 215 break;
Michielber 0:f615d151a72c 216 default:
Michielber 0:f615d151a72c 217 //Disconnected
Michielber 0:f615d151a72c 218 DBG("PPPNetIf: Callback errCode = %d.\n", errCode);
Michielber 0:f615d151a72c 219 m_status = PPP_DISCONNECTED;
Michielber 0:f615d151a72c 220 break;
Michielber 0:f615d151a72c 221 }
Michielber 0:f615d151a72c 222 }
Michielber 0:f615d151a72c 223
Michielber 0:f615d151a72c 224 #endif