gs fan / GSwifi

GainSpan Wi-Fi library see: http://mbed.org/users/gsfan/notebook/gainspan_wifi/

Dependents:   GSwifi_httpd GSwifi_websocket GSwifi_tcpclient GSwifi_tcpserver ... more

Fork of GSwifi by gs fan

GainSpan Wi-Fi library

The GS1011 is an ultra low power 802.11b wireless module from GainSpan.

see: http://mbed.org/users/gsfan/notebook/gainspan_wifi/

/media/uploads/gsfan/gs_im_002.jpg /media/uploads/gsfan/gs1011m_2.jpg

ゲインスパン Wi-Fi モジュール ライブラリ

ゲインスパン社の低電力 Wi-Fiモジュール（無線LAN） GS1011 シリーズ用のライブラリです。

解説: http://mbed.org/users/gsfan/notebook/gainspan_wifi/

GSwifi.cpp@18:4b97804c37d1, 2012-11-01 (annotated)

Committer:
gsfan
Date:
Thu Nov 01 02:55:57 2012 +0000
Revision:
18:4b97804c37d1
Parent:
17:6828b084e74b
Child:
19:cad912f5a6ba
support smtp (send mail) and http server (httpd)

Who changed what in which revision?

UserRevisionLine numberNew contents of line
gsfan 0:2f6062c6d018 1 /**
gsfan 0:2f6062c6d018 2 * Gainspan wi-fi module library for mbed
gsfan 0:2f6062c6d018 3 * Copyright (c) 2012 gsfan
gsfan 0:2f6062c6d018 4 * Released under the MIT License: http://mbed.org/license/mit
gsfan 0:2f6062c6d018 5 */
gsfan 0:2f6062c6d018 6
gsfan 0:2f6062c6d018 7 /** @file
gsfan 0:2f6062c6d018 8 * @brief Gainspan wi-fi module library for mbed
gsfan 0:2f6062c6d018 9 * GS1011MIC, GS1011MIP, GainSpan WiFi Breakout, etc.
gsfan 0:2f6062c6d018 10 * module configuration: ATB=115200
gsfan 0:2f6062c6d018 11 */
gsfan 0:2f6062c6d018 12
gsfan 0:2f6062c6d018 13 #include "dbg.h"
gsfan 0:2f6062c6d018 14 #include "mbed.h"
gsfan 0:2f6062c6d018 15 #include "GSwifi.h"
gsfan 15:5febfc399099 16 #include <ctype.h>
gsfan 0:2f6062c6d018 17
gsfan 1:b127c6c5241d 18 #ifdef GS_UART_DIRECT
gsfan 1:b127c6c5241d 19 #if defined(TARGET_LPC1768) || defined(TARGET_LPC2368)
gsfan 1:b127c6c5241d 20 #define _gs_getc() LPC_UART1->RBR
gsfan 1:b127c6c5241d 21 #define _gs_putc(c) while(!(LPC_UART1->LSR & (1<<5))); LPC_UART1->THR = c
gsfan 1:b127c6c5241d 22 #elif defined(TARGET_LPC11U24)
gsfan 11:983f4e832a3e 23 #define _gs_getc() LPC_USART->RBR
gsfan 11:983f4e832a3e 24 #define _gs_putc(c) while(!(LPC_USART->LSR & (1<<5))); LPC_USART->THR = c
gsfan 1:b127c6c5241d 25 #endif
gsfan 1:b127c6c5241d 26 #else
gsfan 1:b127c6c5241d 27 #define _gs_getc() _gs.getc()
gsfan 1:b127c6c5241d 28 #define _gs_putc(c) _gs.putc(c)
gsfan 1:b127c6c5241d 29 #endif
gsfan 0:2f6062c6d018 30
gsfan 10:698c5e96b5b1 31 GSwifi::GSwifi (PinName p_tx, PinName p_rx, int baud) : _gs(p_tx, p_rx), _buf_cmd(GS_CMD_SIZE) {
gsfan 0:2f6062c6d018 32 _connect = false;
gsfan 0:2f6062c6d018 33 _status = GSSTAT_READY;
gsfan 0:2f6062c6d018 34 _escape = 0;
gsfan 18:4b97804c37d1 35 _response = 1;
gsfan 0:2f6062c6d018 36 _gs_mode = GSMODE_COMMAND;
gsfan 0:2f6062c6d018 37
gsfan 10:698c5e96b5b1 38 _gs.baud(baud);
gsfan 0:2f6062c6d018 39 _gs.attach(this, &GSwifi::isr_recv, Serial::RxIrq);
gsfan 0:2f6062c6d018 40 _rts = false;
gsfan 0:2f6062c6d018 41 }
gsfan 0:2f6062c6d018 42
gsfan 10:698c5e96b5b1 43 GSwifi::GSwifi (PinName p_tx, PinName p_rx, PinName p_cts, PinName p_rts, int baud) : _gs(p_tx, p_rx), _buf_cmd(GS_CMD_SIZE) {
gsfan 0:2f6062c6d018 44 _connect = false;
gsfan 0:2f6062c6d018 45 _status = GSSTAT_READY;
gsfan 0:2f6062c6d018 46 _escape = 0;
gsfan 18:4b97804c37d1 47 _response = 1;
gsfan 0:2f6062c6d018 48 _gs_mode = GSMODE_COMMAND;
gsfan 0:2f6062c6d018 49
gsfan 10:698c5e96b5b1 50 _gs.baud(baud);
gsfan 0:2f6062c6d018 51 _gs.attach(this, &GSwifi::isr_recv, Serial::RxIrq);
gsfan 0:2f6062c6d018 52
gsfan 0:2f6062c6d018 53 #if defined(TARGET_LPC1768) || defined(TARGET_LPC2368)
gsfan 0:2f6062c6d018 54 if (p_cts == p12) { // CTS input (P0_17)
gsfan 0:2f6062c6d018 55 LPC_UART1->MCR |= (1<<7); // CTSEN
gsfan 0:2f6062c6d018 56 LPC_PINCON->PINSEL1 &= ~(3 << 2);
gsfan 0:2f6062c6d018 57 LPC_PINCON->PINSEL1 |= (1 << 2); // UART CTS
gsfan 0:2f6062c6d018 58 }
gsfan 0:2f6062c6d018 59 if (p_rts == P0_22) { // RTS output (P0_22)
gsfan 0:2f6062c6d018 60 LPC_UART1->MCR |= (1<<6); // RTSEN
gsfan 0:2f6062c6d018 61 LPC_PINCON->PINSEL1 &= ~(3 << 12);
gsfan 0:2f6062c6d018 62 LPC_PINCON->PINSEL1 |= (1 << 12); // UART RTS
gsfan 0:2f6062c6d018 63 _rts = true;
gsfan 0:2f6062c6d018 64 } else {
gsfan 0:2f6062c6d018 65 _rts = false;
gsfan 0:2f6062c6d018 66 }
gsfan 0:2f6062c6d018 67 #elif defined(TARGET_LPC11U24)
gsfan 0:2f6062c6d018 68 if (p_cts == p21) { // CTS input (P0_7)
gsfan 16:aea56cce3bf5 69 LPC_USART->MCR |= (1<<7); // CTSEN
gsfan 0:2f6062c6d018 70 LPC_IOCON->PIO0_7 &= ~0x07;
gsfan 0:2f6062c6d018 71 LPC_IOCON->PIO0_7 |= 0x01; // UART CTS
gsfan 0:2f6062c6d018 72 }
gsfan 0:2f6062c6d018 73 if (p_rts == p22) { // RTS output (P0_17)
gsfan 16:aea56cce3bf5 74 LPC_USART->MCR |= (1<<6); // RTSEN
gsfan 0:2f6062c6d018 75 LPC_IOCON->PIO0_17 &= ~0x07;
gsfan 0:2f6062c6d018 76 LPC_IOCON->PIO0_17 |= 0x01; // UART RTS
gsfan 0:2f6062c6d018 77 _rts = true;
gsfan 0:2f6062c6d018 78 } else {
gsfan 0:2f6062c6d018 79 _rts = false;
gsfan 0:2f6062c6d018 80 }
gsfan 0:2f6062c6d018 81 #endif
gsfan 0:2f6062c6d018 82 }
gsfan 0:2f6062c6d018 83
gsfan 0:2f6062c6d018 84 // uart interrupt
gsfan 0:2f6062c6d018 85 void GSwifi::isr_recv () {
gsfan 0:2f6062c6d018 86 static int len, mode;
gsfan 0:2f6062c6d018 87 static char tmp[20];
gsfan 0:2f6062c6d018 88 char flg, dat;
gsfan 0:2f6062c6d018 89
gsfan 0:2f6062c6d018 90 #if defined(TARGET_LPC1768) || defined(TARGET_LPC2368)
gsfan 0:2f6062c6d018 91 flg = LPC_UART1->LSR;
gsfan 0:2f6062c6d018 92 #elif defined(TARGET_LPC11U24)
gsfan 0:2f6062c6d018 93 flg = LPC_USART->LSR;
gsfan 0:2f6062c6d018 94 #endif
gsfan 1:b127c6c5241d 95 dat = _gs_getc();
gsfan 0:2f6062c6d018 96
gsfan 0:2f6062c6d018 97 if (flg & ((1 << 7)|(1 << 3)|(1 << 4))) return;
gsfan 18:4b97804c37d1 98 // DBG("%02x_", dat);
gsfan 0:2f6062c6d018 99
gsfan 0:2f6062c6d018 100 switch (_gs_mode) {
gsfan 0:2f6062c6d018 101 case GSMODE_COMMAND: // command responce
gsfan 0:2f6062c6d018 102 if (_escape) {
gsfan 0:2f6062c6d018 103 // esc
gsfan 0:2f6062c6d018 104 switch (dat) {
gsfan 0:2f6062c6d018 105 case 'O':
gsfan 0:2f6062c6d018 106 DBG("ok\r\n");
gsfan 0:2f6062c6d018 107 _gs_ok = 1;
gsfan 0:2f6062c6d018 108 break;
gsfan 0:2f6062c6d018 109 case 'F':
gsfan 0:2f6062c6d018 110 DBG("failure\r\n");
gsfan 0:2f6062c6d018 111 _gs_failure = 1;
gsfan 0:2f6062c6d018 112 break;
gsfan 0:2f6062c6d018 113 case 'S':
gsfan 0:2f6062c6d018 114 DBG("GSMODE_DATA_RX\r\n");
gsfan 0:2f6062c6d018 115 _gs_mode = GSMODE_DATA_RX;
gsfan 0:2f6062c6d018 116 mode = 0;
gsfan 0:2f6062c6d018 117 break;
gsfan 0:2f6062c6d018 118 case 'u':
gsfan 0:2f6062c6d018 119 DBG("GSMODE_DATA_RXUDP\r\n");
gsfan 0:2f6062c6d018 120 _gs_mode = GSMODE_DATA_RXUDP;
gsfan 0:2f6062c6d018 121 mode = 0;
gsfan 0:2f6062c6d018 122 break;
gsfan 0:2f6062c6d018 123 case 'Z':
gsfan 0:2f6062c6d018 124 case 'H':
gsfan 0:2f6062c6d018 125 DBG("GSMODE_DATA_RX_BULK\r\n");
gsfan 0:2f6062c6d018 126 _gs_mode = GSMODE_DATA_RX_BULK;
gsfan 0:2f6062c6d018 127 mode = 0;
gsfan 0:2f6062c6d018 128 break;
gsfan 0:2f6062c6d018 129 case 'y':
gsfan 0:2f6062c6d018 130 DBG("GSMODE_DATA_RXUDP_BULK\r\n");
gsfan 0:2f6062c6d018 131 _gs_mode = GSMODE_DATA_RXUDP_BULK;
gsfan 0:2f6062c6d018 132 mode = 0;
gsfan 0:2f6062c6d018 133 break;
gsfan 0:2f6062c6d018 134 default:
gsfan 0:2f6062c6d018 135 DBG("unknown [ESC] %02x\r\n", dat);
gsfan 0:2f6062c6d018 136 break;
gsfan 0:2f6062c6d018 137 }
gsfan 0:2f6062c6d018 138 _escape = 0;
gsfan 0:2f6062c6d018 139 } else {
gsfan 0:2f6062c6d018 140 if (dat == 0x1b) {
gsfan 0:2f6062c6d018 141 _escape = 1;
gsfan 0:2f6062c6d018 142 } else
gsfan 0:2f6062c6d018 143 if (dat != '\r') {
gsfan 0:2f6062c6d018 144 // command
gsfan 0:2f6062c6d018 145 _buf_cmd.put(dat);
gsfan 18:4b97804c37d1 146 if (dat == '\n') {
gsfan 18:4b97804c37d1 147 _gs_enter ++;
gsfan 18:4b97804c37d1 148 if (!_response && _connect) poll_cmd();
gsfan 18:4b97804c37d1 149 }
gsfan 0:2f6062c6d018 150 }
gsfan 0:2f6062c6d018 151 }
gsfan 0:2f6062c6d018 152 break;
gsfan 0:2f6062c6d018 153
gsfan 0:2f6062c6d018 154 case GSMODE_DATA_RX:
gsfan 0:2f6062c6d018 155 case GSMODE_DATA_RXUDP:
gsfan 0:2f6062c6d018 156 if (mode == 0) {
gsfan 0:2f6062c6d018 157 // cid
gsfan 0:2f6062c6d018 158 _cid = x2i(dat);
gsfan 0:2f6062c6d018 159 _gs_sock[_cid].received = 0;
gsfan 0:2f6062c6d018 160 mode ++;
gsfan 0:2f6062c6d018 161 if (_gs_mode == GSMODE_DATA_RX) {
gsfan 0:2f6062c6d018 162 mode = 3;
gsfan 0:2f6062c6d018 163 }
gsfan 0:2f6062c6d018 164 len = 0;
gsfan 0:2f6062c6d018 165 } else
gsfan 0:2f6062c6d018 166 if (mode == 1) {
gsfan 0:2f6062c6d018 167 // ip
gsfan 0:2f6062c6d018 168 if ((dat < '0' || dat > '9') && dat != '.') {
gsfan 0:2f6062c6d018 169 int ip1, ip2, ip3, ip4;
gsfan 0:2f6062c6d018 170 tmp[len] = 0;
gsfan 0:2f6062c6d018 171 sscanf(tmp, "%d.%d.%d.%d", &ip1, &ip2, &ip3, &ip4);
gsfan 0:2f6062c6d018 172 _from.setIp(IpAddr(ip1, ip2, ip3, ip4));
gsfan 0:2f6062c6d018 173 mode ++;
gsfan 0:2f6062c6d018 174 len = 0;
gsfan 0:2f6062c6d018 175 break;
gsfan 0:2f6062c6d018 176 }
gsfan 0:2f6062c6d018 177 tmp[len] = dat;
gsfan 0:2f6062c6d018 178 len ++;
gsfan 0:2f6062c6d018 179 } else
gsfan 0:2f6062c6d018 180 if (mode == 2) {
gsfan 0:2f6062c6d018 181 // port
gsfan 0:2f6062c6d018 182 if (dat < '0' || dat > '9') {
gsfan 0:2f6062c6d018 183 tmp[len] = 0;
gsfan 0:2f6062c6d018 184 _from.setPort(atoi(tmp));
gsfan 0:2f6062c6d018 185 mode ++;
gsfan 0:2f6062c6d018 186 len = 0;
gsfan 0:2f6062c6d018 187 break;
gsfan 0:2f6062c6d018 188 }
gsfan 0:2f6062c6d018 189 tmp[len] = dat;
gsfan 0:2f6062c6d018 190 len ++;
gsfan 0:2f6062c6d018 191 } else
gsfan 0:2f6062c6d018 192 if (_escape) {
gsfan 0:2f6062c6d018 193 // esc
gsfan 0:2f6062c6d018 194 switch (dat) {
gsfan 0:2f6062c6d018 195 case 'E':
gsfan 0:2f6062c6d018 196 DBG("recv ascii %d\r\n", _cid);
gsfan 0:2f6062c6d018 197 _gs_sock[_cid].received = 1;
gsfan 0:2f6062c6d018 198 _gs_mode = GSMODE_COMMAND;
gsfan 0:2f6062c6d018 199 // recv interrupt
gsfan 0:2f6062c6d018 200 if (_gs_sock[_cid].protocol == GSPROT_HTTPGET && _gs_sock[_cid].onGsReceive != NULL) {
gsfan 1:b127c6c5241d 201 _gs_sock[_cid].onGsReceive(_cid, _gs_sock[_cid].data->use());
gsfan 0:2f6062c6d018 202 _gs_sock[_cid].received = 0;
gsfan 0:2f6062c6d018 203 }
gsfan 0:2f6062c6d018 204 break;
gsfan 0:2f6062c6d018 205 default:
gsfan 0:2f6062c6d018 206 DBG("unknown <ESC> %02x\r\n", dat);
gsfan 0:2f6062c6d018 207 break;
gsfan 0:2f6062c6d018 208 }
gsfan 0:2f6062c6d018 209 _escape = 0;
gsfan 0:2f6062c6d018 210 } else {
gsfan 0:2f6062c6d018 211 if (dat == 0x1b) {
gsfan 0:2f6062c6d018 212 _escape = 1;
gsfan 0:2f6062c6d018 213 } else {
gsfan 0:2f6062c6d018 214 // data
gsfan 0:2f6062c6d018 215 _gs_sock[_cid].data->put(dat);
gsfan 0:2f6062c6d018 216 len ++;
gsfan 12:63e714550791 217 if (len < GS_DATA_SIZE && _gs_sock[_cid].data->available() == 0) {
gsfan 14:9e89b922ace1 218 // buffer full
gsfan 14:9e89b922ace1 219 if (_gs_sock[_cid].onGsReceive != NULL) {
gsfan 14:9e89b922ace1 220 _gs_sock[_cid].onGsReceive(_cid, _gs_sock[_cid].data->use());
gsfan 12:63e714550791 221 }
gsfan 12:63e714550791 222 }
gsfan 0:2f6062c6d018 223 }
gsfan 0:2f6062c6d018 224 }
gsfan 0:2f6062c6d018 225 break;
gsfan 0:2f6062c6d018 226
gsfan 0:2f6062c6d018 227 case GSMODE_DATA_RX_BULK:
gsfan 0:2f6062c6d018 228 case GSMODE_DATA_RXUDP_BULK:
gsfan 5:6def1d0df519 229 // DBG("%c", dat);
gsfan 0:2f6062c6d018 230 if (mode == 0) {
gsfan 0:2f6062c6d018 231 // cid
gsfan 0:2f6062c6d018 232 _cid = x2i(dat);
gsfan 0:2f6062c6d018 233 _gs_sock[_cid].received = 0;
gsfan 0:2f6062c6d018 234 mode ++;
gsfan 0:2f6062c6d018 235 if (_gs_mode == GSMODE_DATA_RX_BULK) {
gsfan 0:2f6062c6d018 236 mode = 3;
gsfan 0:2f6062c6d018 237 }
gsfan 0:2f6062c6d018 238 len = 0;
gsfan 0:2f6062c6d018 239 } else
gsfan 0:2f6062c6d018 240 if (mode == 1) {
gsfan 0:2f6062c6d018 241 // ip
gsfan 0:2f6062c6d018 242 if ((dat < '0' || dat > '9') && dat != '.') {
gsfan 0:2f6062c6d018 243 int ip1, ip2, ip3, ip4;
gsfan 0:2f6062c6d018 244 tmp[len] = 0;
gsfan 0:2f6062c6d018 245 sscanf(tmp, "%d.%d.%d.%d", &ip1, &ip2, &ip3, &ip4);
gsfan 0:2f6062c6d018 246 _from.setIp(IpAddr(ip1, ip2, ip3, ip4));
gsfan 0:2f6062c6d018 247 mode ++;
gsfan 0:2f6062c6d018 248 len = 0;
gsfan 0:2f6062c6d018 249 break;
gsfan 0:2f6062c6d018 250 }
gsfan 0:2f6062c6d018 251 tmp[len] = dat;
gsfan 0:2f6062c6d018 252 len ++;
gsfan 0:2f6062c6d018 253 } else
gsfan 0:2f6062c6d018 254 if (mode == 2) {
gsfan 0:2f6062c6d018 255 // port
gsfan 0:2f6062c6d018 256 if (dat < '0' || dat > '9') {
gsfan 0:2f6062c6d018 257 tmp[len] = 0;
gsfan 0:2f6062c6d018 258 _from.setPort(atoi(tmp));
gsfan 0:2f6062c6d018 259 mode ++;
gsfan 0:2f6062c6d018 260 len = 0;
gsfan 0:2f6062c6d018 261 break;
gsfan 0:2f6062c6d018 262 }
gsfan 0:2f6062c6d018 263 tmp[len] = dat;
gsfan 0:2f6062c6d018 264 len ++;
gsfan 0:2f6062c6d018 265 } else
gsfan 0:2f6062c6d018 266 if (mode == 3) {
gsfan 0:2f6062c6d018 267 // length
gsfan 0:2f6062c6d018 268 tmp[len] = dat;
gsfan 0:2f6062c6d018 269 len ++;
gsfan 0:2f6062c6d018 270 if (len >= 4) {
gsfan 0:2f6062c6d018 271 tmp[len] = 0;
gsfan 0:2f6062c6d018 272 len = atoi(tmp);
gsfan 0:2f6062c6d018 273 mode ++;
gsfan 0:2f6062c6d018 274 break;
gsfan 0:2f6062c6d018 275 }
gsfan 0:2f6062c6d018 276 } else
gsfan 0:2f6062c6d018 277 if (mode == 4) {
gsfan 0:2f6062c6d018 278 // data
gsfan 5:6def1d0df519 279 if (_gs_sock[_cid].data != NULL) {
gsfan 5:6def1d0df519 280 _gs_sock[_cid].data->put(dat);
gsfan 5:6def1d0df519 281 }
gsfan 0:2f6062c6d018 282 len --;
gsfan 12:63e714550791 283 if (len && _gs_sock[_cid].data->available() == 0) {
gsfan 14:9e89b922ace1 284 // buffer full
gsfan 14:9e89b922ace1 285 if (_gs_sock[_cid].onGsReceive != NULL) {
gsfan 12:63e714550791 286 _gs_sock[_cid].onGsReceive(_cid, _gs_sock[_cid].data->use());
gsfan 12:63e714550791 287 }
gsfan 12:63e714550791 288 }
gsfan 0:2f6062c6d018 289 if (len == 0) {
gsfan 0:2f6062c6d018 290 DBG("recv binary %d\r\n", _cid);
gsfan 0:2f6062c6d018 291 _gs_sock[_cid].received = 1;
gsfan 0:2f6062c6d018 292 _escape = 0;
gsfan 0:2f6062c6d018 293 _gs_mode = GSMODE_COMMAND;
gsfan 0:2f6062c6d018 294 // recv interrupt
gsfan 0:2f6062c6d018 295 if (_gs_sock[_cid].protocol == GSPROT_HTTPGET && _gs_sock[_cid].onGsReceive != NULL) {
gsfan 1:b127c6c5241d 296 _gs_sock[_cid].onGsReceive(_cid, _gs_sock[_cid].data->use());
gsfan 0:2f6062c6d018 297 _gs_sock[_cid].received = 0;
gsfan 0:2f6062c6d018 298 }
gsfan 0:2f6062c6d018 299 }
gsfan 0:2f6062c6d018 300 }
gsfan 0:2f6062c6d018 301 break;
gsfan 0:2f6062c6d018 302
gsfan 0:2f6062c6d018 303 }
gsfan 0:2f6062c6d018 304 }
gsfan 0:2f6062c6d018 305
gsfan 12:63e714550791 306 int GSwifi::command (const char *cmd, GSRESPONCE res, int timeout) {
gsfan 18:4b97804c37d1 307 int i, r = 0;
gsfan 0:2f6062c6d018 308
gsfan 0:2f6062c6d018 309 if (! cmd) {
gsfan 0:2f6062c6d018 310 // dummy CR+LF
gsfan 0:2f6062c6d018 311 _gs.printf("\r\n");
gsfan 12:63e714550791 312 for (i = 0; i < 10; i ++) {
gsfan 14:9e89b922ace1 313 wait_ms(10);
gsfan 18:4b97804c37d1 314 poll_cmd();
gsfan 14:9e89b922ace1 315 _buf_cmd.clear();
gsfan 2:c6e0e97901b3 316 }
gsfan 0:2f6062c6d018 317 return 0;
gsfan 0:2f6062c6d018 318 }
gsfan 0:2f6062c6d018 319
gsfan 18:4b97804c37d1 320 _response = 1;
gsfan 0:2f6062c6d018 321 _buf_cmd.clear();
gsfan 0:2f6062c6d018 322 _gs_ok = 0;
gsfan 0:2f6062c6d018 323 _gs_failure = 0;
gsfan 0:2f6062c6d018 324 _gs_enter = 0;
gsfan 0:2f6062c6d018 325 for (i = 0; i < strlen(cmd); i ++) {
gsfan 1:b127c6c5241d 326 _gs_putc(cmd[i]);
gsfan 0:2f6062c6d018 327 }
gsfan 1:b127c6c5241d 328 _gs_putc('\r');
gsfan 1:b127c6c5241d 329 _gs_putc('\n');
gsfan 0:2f6062c6d018 330 DBG("command: %s\r\n", cmd);
gsfan 0:2f6062c6d018 331 if (strlen(cmd) == 0) return 0;
gsfan 18:4b97804c37d1 332 wait_ms(10);
gsfan 0:2f6062c6d018 333 if (timeout) {
gsfan 18:4b97804c37d1 334 r = cmdResponse(res, timeout);
gsfan 0:2f6062c6d018 335 }
gsfan 18:4b97804c37d1 336 _response = 0;
gsfan 18:4b97804c37d1 337 return r;
gsfan 0:2f6062c6d018 338 }
gsfan 0:2f6062c6d018 339
gsfan 0:2f6062c6d018 340 int GSwifi::cmdResponse (GSRESPONCE res, int ms) {
gsfan 0:2f6062c6d018 341 int i, n = 0, flg = 0;
gsfan 0:2f6062c6d018 342 char buf[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 343 Timer timeout;
gsfan 0:2f6062c6d018 344
gsfan 0:2f6062c6d018 345 timeout.start();
gsfan 0:2f6062c6d018 346 for (;;) {
gsfan 0:2f6062c6d018 347 // recv response
gsfan 0:2f6062c6d018 348 i = 0;
gsfan 0:2f6062c6d018 349 while (i < sizeof(buf)) {
gsfan 0:2f6062c6d018 350 if (_buf_cmd.use()) {
gsfan 0:2f6062c6d018 351 _buf_cmd.get(&buf[i]);
gsfan 0:2f6062c6d018 352 if (buf[i] == '\n') {
gsfan 0:2f6062c6d018 353 break;
gsfan 0:2f6062c6d018 354 }
gsfan 0:2f6062c6d018 355 i ++;
gsfan 0:2f6062c6d018 356 }
gsfan 0:2f6062c6d018 357 if (timeout.read_ms() > ms) {
gsfan 0:2f6062c6d018 358 timeout.stop();
gsfan 0:2f6062c6d018 359 DBG("timeout\r\n");
gsfan 0:2f6062c6d018 360 return -1;
gsfan 0:2f6062c6d018 361 }
gsfan 0:2f6062c6d018 362 }
gsfan 0:2f6062c6d018 363 _gs_enter = 0;
gsfan 0:2f6062c6d018 364 if (i == 0) continue;
gsfan 0:2f6062c6d018 365 buf[i] = 0;
gsfan 0:2f6062c6d018 366 DBG("response: %s\r\n", buf);
gsfan 0:2f6062c6d018 367 timeout.stop();
gsfan 0:2f6062c6d018 368
gsfan 0:2f6062c6d018 369 if (strcmp(buf, "OK") == 0) {
gsfan 0:2f6062c6d018 370 _gs_ok = 1;
gsfan 0:2f6062c6d018 371 } else
gsfan 0:2f6062c6d018 372 if (strncmp(buf, "ERROR", 5) == 0) {
gsfan 0:2f6062c6d018 373 _gs_failure = 1;
gsfan 0:2f6062c6d018 374 }
gsfan 0:2f6062c6d018 375
gsfan 0:2f6062c6d018 376 switch(res) {
gsfan 0:2f6062c6d018 377 case GSRES_NORMAL:
gsfan 0:2f6062c6d018 378 flg = 1;
gsfan 0:2f6062c6d018 379 break;
gsfan 0:2f6062c6d018 380 case GSRES_WPS:
gsfan 0:2f6062c6d018 381 if (n == 0 && strncmp(buf, "SSID", 4) == 0) {
gsfan 0:2f6062c6d018 382 n ++;
gsfan 0:2f6062c6d018 383 } else
gsfan 0:2f6062c6d018 384 if (n == 1 && strncmp(buf, "CHANNEL", 7) == 0) {
gsfan 0:2f6062c6d018 385 n ++;
gsfan 0:2f6062c6d018 386 } else
gsfan 0:2f6062c6d018 387 if (n == 2 && strncmp(buf, "PASSPHRASE", 10) == 0) {
gsfan 0:2f6062c6d018 388 n ++;
gsfan 0:2f6062c6d018 389 flg = 1;
gsfan 0:2f6062c6d018 390 }
gsfan 0:2f6062c6d018 391 break;
gsfan 0:2f6062c6d018 392 case GSRES_CONNECT:
gsfan 0:2f6062c6d018 393 if (strncmp(buf, "CONNECT", 7) == 0) {
gsfan 0:2f6062c6d018 394 _cid = x2i(buf[8]);
gsfan 0:2f6062c6d018 395 flg = 1;
gsfan 0:2f6062c6d018 396 }
gsfan 0:2f6062c6d018 397 break;
gsfan 0:2f6062c6d018 398 case GSRES_DHCP:
gsfan 0:2f6062c6d018 399 if (n == 0 && strstr(buf, "SubNet") && strstr(buf, "Gateway")) {
gsfan 0:2f6062c6d018 400 n ++;
gsfan 0:2f6062c6d018 401 } else
gsfan 0:2f6062c6d018 402 if (n == 1) {
gsfan 0:2f6062c6d018 403 int ip1, ip2, ip3, ip4;
gsfan 0:2f6062c6d018 404 char *tmp = buf + 1;
gsfan 0:2f6062c6d018 405 sscanf(tmp, "%d.%d.%d.%d", &ip1, &ip2, &ip3, &ip4);
gsfan 0:2f6062c6d018 406 _ipaddr = IpAddr(ip1, ip2, ip3, ip4);
gsfan 0:2f6062c6d018 407 tmp = strstr(tmp, ":") + 2;
gsfan 0:2f6062c6d018 408 sscanf(tmp, "%d.%d.%d.%d", &ip1, &ip2, &ip3, &ip4);
gsfan 0:2f6062c6d018 409 _netmask = IpAddr(ip1, ip2, ip3, ip4);
gsfan 0:2f6062c6d018 410 tmp = strstr(tmp, ":") + 2;
gsfan 0:2f6062c6d018 411 sscanf(tmp, "%d.%d.%d.%d", &ip1, &ip2, &ip3, &ip4);
gsfan 0:2f6062c6d018 412 _gateway = IpAddr(ip1, ip2, ip3, ip4);
gsfan 0:2f6062c6d018 413 n ++;
gsfan 0:2f6062c6d018 414 flg = 1;
gsfan 0:2f6062c6d018 415 }
gsfan 0:2f6062c6d018 416 break;
gsfan 0:2f6062c6d018 417 case GSRES_MACADDRESS:
gsfan 9:3b819ba34c6c 418 if (buf[2] == ':' && buf[5] == ':') {
gsfan 0:2f6062c6d018 419 int mac1, mac2, mac3, mac4, mac5, mac6;
gsfan 0:2f6062c6d018 420 sscanf(buf, "%x:%x:%x:%x:%x:%x", &mac1, &mac2, &mac3, &mac4, &mac5, &mac6);
gsfan 4:a8d38857f3fd 421 _mac[0] = mac1;
gsfan 4:a8d38857f3fd 422 _mac[1] = mac2;
gsfan 4:a8d38857f3fd 423 _mac[2] = mac3;
gsfan 4:a8d38857f3fd 424 _mac[3] = mac4;
gsfan 4:a8d38857f3fd 425 _mac[4] = mac5;
gsfan 4:a8d38857f3fd 426 _mac[5] = mac6;
gsfan 0:2f6062c6d018 427 flg = 1;
gsfan 0:2f6062c6d018 428 }
gsfan 0:2f6062c6d018 429 break;
gsfan 0:2f6062c6d018 430 case GSRES_DNSLOOKUP:
gsfan 0:2f6062c6d018 431 if (strncmp(buf, "IP:", 3) == 0) {
gsfan 0:2f6062c6d018 432 int ip1, ip2, ip3, ip4;
gsfan 0:2f6062c6d018 433 sscanf(&buf[3], "%d.%d.%d.%d", &ip1, &ip2, &ip3, &ip4);
gsfan 0:2f6062c6d018 434 _resolv = IpAddr(ip1, ip2, ip3, ip4);
gsfan 0:2f6062c6d018 435 flg = 1;
gsfan 0:2f6062c6d018 436 }
gsfan 0:2f6062c6d018 437 break;
gsfan 0:2f6062c6d018 438 case GSRES_HTTP:
gsfan 4:a8d38857f3fd 439 if (buf[0] >= '0' && buf[0] <= 'F') {
gsfan 4:a8d38857f3fd 440 _cid = x2i(buf[0]);
gsfan 0:2f6062c6d018 441 flg = 1;
gsfan 0:2f6062c6d018 442 }
gsfan 0:2f6062c6d018 443 break;
gsfan 1:b127c6c5241d 444 case GSRES_RSSI:
gsfan 1:b127c6c5241d 445 if (buf[0] == '-' || (buf[0] >= '0' && buf[0] <= '9')) {
gsfan 1:b127c6c5241d 446 _rssi = atoi(buf);
gsfan 1:b127c6c5241d 447 flg = 1;
gsfan 1:b127c6c5241d 448 }
gsfan 1:b127c6c5241d 449 break;
gsfan 5:6def1d0df519 450 case GSRES_TIME:
gsfan 5:6def1d0df519 451 if (buf[0] >= '0' && buf[0] <= '9') {
gsfan 5:6def1d0df519 452 int year, month, day, hour, min, sec;
gsfan 5:6def1d0df519 453 struct tm t;
gsfan 11:983f4e832a3e 454 sscanf(buf, "%d/%d/%d,%d:%d:%d", &day, &month, &year, &hour, &min, &sec);
gsfan 5:6def1d0df519 455 t.tm_sec = sec;
gsfan 5:6def1d0df519 456 t.tm_min = min;
gsfan 5:6def1d0df519 457 t.tm_hour = hour;
gsfan 5:6def1d0df519 458 t.tm_mday = day;
gsfan 5:6def1d0df519 459 t.tm_mon = month - 1;
gsfan 5:6def1d0df519 460 t.tm_year = year - 1900;
gsfan 5:6def1d0df519 461 _time = mktime(&t);
gsfan 5:6def1d0df519 462 flg = 1;
gsfan 5:6def1d0df519 463 }
gsfan 5:6def1d0df519 464 break;
gsfan 0:2f6062c6d018 465 }
gsfan 0:2f6062c6d018 466
gsfan 0:2f6062c6d018 467 if ((flg && _gs_ok) || _gs_failure) break;
gsfan 0:2f6062c6d018 468 timeout.reset();
gsfan 0:2f6062c6d018 469 timeout.start();
gsfan 0:2f6062c6d018 470 }
gsfan 0:2f6062c6d018 471
gsfan 0:2f6062c6d018 472 if (_gs_failure || flg == 0) {
gsfan 0:2f6062c6d018 473 return -1;
gsfan 0:2f6062c6d018 474 } else {
gsfan 0:2f6062c6d018 475 return 0;
gsfan 0:2f6062c6d018 476 }
gsfan 0:2f6062c6d018 477 }
gsfan 0:2f6062c6d018 478
gsfan 0:2f6062c6d018 479 int GSwifi::connect (GSSECURITY sec, char *ssid, char *pass, int dhcp) {
gsfan 0:2f6062c6d018 480 int r;
gsfan 0:2f6062c6d018 481 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 482
gsfan 0:2f6062c6d018 483 if (_connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 484
gsfan 0:2f6062c6d018 485 command(NULL, GSRES_NORMAL);
gsfan 0:2f6062c6d018 486 if (command("ATE0", GSRES_NORMAL)) return -1;
gsfan 0:2f6062c6d018 487 if (_rts) {
gsfan 0:2f6062c6d018 488 command("AT&K0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 489 command("AT&R1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 490 }
gsfan 0:2f6062c6d018 491 command("AT+NMAC=?", GSRES_MACADDRESS);
gsfan 0:2f6062c6d018 492 #ifdef GS_BULK
gsfan 0:2f6062c6d018 493 command("AT+BDATA=1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 494 #endif
gsfan 0:2f6062c6d018 495
gsfan 0:2f6062c6d018 496 disconnect();
gsfan 0:2f6062c6d018 497 command("AT+WM=0", GSRES_NORMAL); // infrastructure
gsfan 0:2f6062c6d018 498 wait_ms(100);
gsfan 0:2f6062c6d018 499 if (dhcp) {
gsfan 0:2f6062c6d018 500 command("AT+NDHCP=1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 501 } else {
gsfan 0:2f6062c6d018 502 command("AT+NDHCP=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 503 }
gsfan 0:2f6062c6d018 504
gsfan 0:2f6062c6d018 505 switch (sec) {
gsfan 0:2f6062c6d018 506 case GSSEC_NONE:
gsfan 0:2f6062c6d018 507 command("AT+WAUTH=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 508 sprintf(cmd, "AT+WA=%s", ssid);
gsfan 0:2f6062c6d018 509 r = command(cmd, GSRES_NORMAL, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 510 break;
gsfan 0:2f6062c6d018 511 case GSSEC_OPEN:
gsfan 0:2f6062c6d018 512 case GSSEC_WEP:
gsfan 0:2f6062c6d018 513 sprintf(cmd, "AT+WAUTH=%d", sec);
gsfan 0:2f6062c6d018 514 command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 515 sprintf(cmd, "AT+WWEP1=%s", pass);
gsfan 0:2f6062c6d018 516 command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 517 wait_ms(100);
gsfan 0:2f6062c6d018 518 sprintf(cmd, "AT+WA=%s", ssid);
gsfan 1:b127c6c5241d 519 r = command(cmd, GSRES_DHCP, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 520 break;
gsfan 0:2f6062c6d018 521 case GSSEC_WPA_PSK:
gsfan 0:2f6062c6d018 522 case GSSEC_WPA2_PSK:
gsfan 0:2f6062c6d018 523 command("AT+WAUTH=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 524 // sprintf(cmd, "AT+WWPA=%s", pass);
gsfan 0:2f6062c6d018 525 // command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 526 sprintf(cmd, "AT+WPAPSK=%s,%s", ssid, pass);
gsfan 0:2f6062c6d018 527 command(cmd, GSRES_NORMAL, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 528 wait_ms(100);
gsfan 0:2f6062c6d018 529 sprintf(cmd, "AT+WA=%s", ssid);
gsfan 1:b127c6c5241d 530 r = command(cmd, GSRES_DHCP, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 531 break;
gsfan 0:2f6062c6d018 532 case GSSEC_WPS_BUTTON:
gsfan 0:2f6062c6d018 533 command("AT+WAUTH=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 534 r = command("AT+WWPS=1", GSRES_WPS, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 535 if (r) break;
gsfan 0:2f6062c6d018 536 if (dhcp) {
gsfan 0:2f6062c6d018 537 r = command("AT+NDHCP=1", GSRES_DHCP, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 538 }
gsfan 0:2f6062c6d018 539 break;
gsfan 6:a423f0d197de 540 default:
gsfan 6:a423f0d197de 541 DBG("Can't use security\r\n");
gsfan 6:a423f0d197de 542 r = -1;
gsfan 6:a423f0d197de 543 break;
gsfan 0:2f6062c6d018 544 }
gsfan 0:2f6062c6d018 545
gsfan 18:4b97804c37d1 546 if (r == 0 && !dhcp) {
gsfan 18:4b97804c37d1 547 sprintf(cmd, "AT+DNSSET=%d.%d.%d.%d",
gsfan 18:4b97804c37d1 548 _gateway[0], _gateway[1], _gateway[2], _gateway[3]);
gsfan 18:4b97804c37d1 549 command(cmd, GSRES_NORMAL);
gsfan 18:4b97804c37d1 550 }
gsfan 18:4b97804c37d1 551
gsfan 0:2f6062c6d018 552 if (r == 0) _connect = true;
gsfan 0:2f6062c6d018 553 return r;
gsfan 0:2f6062c6d018 554 }
gsfan 0:2f6062c6d018 555
gsfan 0:2f6062c6d018 556 int GSwifi::adhock (GSSECURITY sec, char *ssid, char *pass, IpAddr ipaddr, IpAddr netmask) {
gsfan 0:2f6062c6d018 557 int r;
gsfan 0:2f6062c6d018 558 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 559
gsfan 0:2f6062c6d018 560 if (_connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 561
gsfan 0:2f6062c6d018 562 command(NULL, GSRES_NORMAL);
gsfan 0:2f6062c6d018 563 if (command("ATE0", GSRES_NORMAL)) return -1;
gsfan 0:2f6062c6d018 564 if (_rts) {
gsfan 0:2f6062c6d018 565 command("AT&K0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 566 command("AT&R1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 567 }
gsfan 0:2f6062c6d018 568 disconnect();
gsfan 0:2f6062c6d018 569 command("AT+NMAC=?", GSRES_MACADDRESS);
gsfan 0:2f6062c6d018 570 #ifdef GS_BULK
gsfan 0:2f6062c6d018 571 command("AT+BDATA=1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 572 #endif
gsfan 0:2f6062c6d018 573
gsfan 0:2f6062c6d018 574 command("AT+WM=1", GSRES_NORMAL); // adhock
gsfan 0:2f6062c6d018 575 wait_ms(100);
gsfan 0:2f6062c6d018 576 command("AT+NDHCP=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 577 setAddress(ipaddr, netmask, ipaddr, ipaddr);
gsfan 0:2f6062c6d018 578
gsfan 0:2f6062c6d018 579 switch (sec) {
gsfan 0:2f6062c6d018 580 case GSSEC_NONE:
gsfan 0:2f6062c6d018 581 command("AT+WAUTH=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 582 sprintf(cmd, "AT+WA=%s", ssid);
gsfan 0:2f6062c6d018 583 r = command(cmd, GSRES_NORMAL, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 584 break;
gsfan 0:2f6062c6d018 585 case GSSEC_OPEN:
gsfan 0:2f6062c6d018 586 case GSSEC_WEP:
gsfan 0:2f6062c6d018 587 sprintf(cmd, "AT+WAUTH=%d", sec);
gsfan 0:2f6062c6d018 588 command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 589 sprintf(cmd, "AT+WWEP1=%s", pass);
gsfan 0:2f6062c6d018 590 command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 591 wait_ms(100);
gsfan 0:2f6062c6d018 592 sprintf(cmd, "AT+WA=%s", ssid);
gsfan 0:2f6062c6d018 593 r = command(cmd, GSRES_NORMAL, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 594 break;
gsfan 0:2f6062c6d018 595 default:
gsfan 0:2f6062c6d018 596 DBG("Can't use security\r\n");
gsfan 0:2f6062c6d018 597 r = -1;
gsfan 0:2f6062c6d018 598 break;
gsfan 0:2f6062c6d018 599 }
gsfan 0:2f6062c6d018 600
gsfan 0:2f6062c6d018 601 if (r == 0) _connect = true;
gsfan 0:2f6062c6d018 602 return r;
gsfan 0:2f6062c6d018 603 }
gsfan 0:2f6062c6d018 604
gsfan 0:2f6062c6d018 605 int GSwifi::limitedap (GSSECURITY sec, char *ssid, char *pass, IpAddr ipaddr, IpAddr netmask) {
gsfan 0:2f6062c6d018 606 int r;
gsfan 0:2f6062c6d018 607 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 608
gsfan 0:2f6062c6d018 609 if (_connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 610
gsfan 0:2f6062c6d018 611 command(NULL, GSRES_NORMAL);
gsfan 0:2f6062c6d018 612 if (command("ATE0", GSRES_NORMAL)) return -1;
gsfan 0:2f6062c6d018 613 if (_rts) {
gsfan 0:2f6062c6d018 614 command("AT&K0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 615 command("AT&R1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 616 }
gsfan 0:2f6062c6d018 617 disconnect();
gsfan 0:2f6062c6d018 618 command("AT+NMAC=?", GSRES_MACADDRESS);
gsfan 0:2f6062c6d018 619 #ifdef GS_BULK
gsfan 0:2f6062c6d018 620 command("AT+BDATA=1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 621 #endif
gsfan 0:2f6062c6d018 622
gsfan 0:2f6062c6d018 623 command("AT+WM=2", GSRES_NORMAL); // limited ap
gsfan 0:2f6062c6d018 624 wait_ms(1000);
gsfan 0:2f6062c6d018 625 command("AT+NDHCP=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 626 setAddress(ipaddr, netmask, ipaddr, ipaddr);
gsfan 8:bce9e7e51a0d 627 if (command("AT+DHCPSRVR=1", GSRES_NORMAL)) return -1;
gsfan 8:bce9e7e51a0d 628 if (command("AT+DNS=1,setup", GSRES_NORMAL)) return -1;
gsfan 0:2f6062c6d018 629
gsfan 0:2f6062c6d018 630 switch (sec) {
gsfan 0:2f6062c6d018 631 case GSSEC_NONE:
gsfan 0:2f6062c6d018 632 command("AT+WAUTH=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 633 sprintf(cmd, "AT+WA=%s", ssid);
gsfan 0:2f6062c6d018 634 r = command(cmd, GSRES_NORMAL, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 635 break;
gsfan 0:2f6062c6d018 636 case GSSEC_OPEN:
gsfan 0:2f6062c6d018 637 case GSSEC_WEP:
gsfan 0:2f6062c6d018 638 sprintf(cmd, "AT+WAUTH=%d", sec);
gsfan 0:2f6062c6d018 639 command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 640 sprintf(cmd, "AT+WWEP1=%s", pass);
gsfan 0:2f6062c6d018 641 command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 642 wait_ms(100);
gsfan 0:2f6062c6d018 643 sprintf(cmd, "AT+WA=%s", ssid);
gsfan 0:2f6062c6d018 644 r = command(cmd, GSRES_NORMAL, GS_TIMEOUT2);
gsfan 0:2f6062c6d018 645 break;
gsfan 0:2f6062c6d018 646 default:
gsfan 0:2f6062c6d018 647 DBG("Can't use security\r\n");
gsfan 0:2f6062c6d018 648 r = -1;
gsfan 0:2f6062c6d018 649 break;
gsfan 0:2f6062c6d018 650 }
gsfan 0:2f6062c6d018 651
gsfan 0:2f6062c6d018 652 if (r == 0) _connect = true;
gsfan 0:2f6062c6d018 653 return r;
gsfan 0:2f6062c6d018 654 }
gsfan 0:2f6062c6d018 655
gsfan 0:2f6062c6d018 656 int GSwifi::disconnect () {
gsfan 0:2f6062c6d018 657 int i;
gsfan 0:2f6062c6d018 658
gsfan 0:2f6062c6d018 659 _connect = false;
gsfan 0:2f6062c6d018 660 for (i = 0; i < 16; i ++) {
gsfan 0:2f6062c6d018 661 _gs_sock[i].connect = false;
gsfan 0:2f6062c6d018 662 }
gsfan 0:2f6062c6d018 663 command("AT+NCLOSEALL", GSRES_NORMAL);
gsfan 0:2f6062c6d018 664 command("AT+WD", GSRES_NORMAL);
gsfan 0:2f6062c6d018 665 command("AT+NDHCP=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 666 wait_ms(100);
gsfan 0:2f6062c6d018 667 return 0;
gsfan 0:2f6062c6d018 668 }
gsfan 0:2f6062c6d018 669
gsfan 0:2f6062c6d018 670 int GSwifi::setAddress () {
gsfan 0:2f6062c6d018 671
gsfan 0:2f6062c6d018 672 if (command("AT+NDHCP=1", GSRES_DHCP), GS_TIMEOUT2) return -1;
gsfan 0:2f6062c6d018 673 if (_ipaddr.isNull()) return -1;
gsfan 0:2f6062c6d018 674 return 0;
gsfan 0:2f6062c6d018 675 }
gsfan 0:2f6062c6d018 676
gsfan 0:2f6062c6d018 677 int GSwifi::setAddress (IpAddr ipaddr, IpAddr netmask, IpAddr gateway, IpAddr nameserver) {
gsfan 0:2f6062c6d018 678 int r;
gsfan 0:2f6062c6d018 679 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 680
gsfan 0:2f6062c6d018 681 command("AT+NDHCP=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 682 wait_ms(100);
gsfan 0:2f6062c6d018 683
gsfan 0:2f6062c6d018 684 sprintf(cmd, "AT+NSET=%d.%d.%d.%d,%d.%d.%d.%d,%d.%d.%d.%d",
gsfan 0:2f6062c6d018 685 ipaddr[0], ipaddr[1], ipaddr[2], ipaddr[3],
gsfan 0:2f6062c6d018 686 netmask[0], netmask[1], netmask[2], netmask[3],
gsfan 0:2f6062c6d018 687 gateway[0], gateway[1], gateway[2], gateway[3]);
gsfan 0:2f6062c6d018 688 r = command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 689 if (r) return -1;
gsfan 0:2f6062c6d018 690 _ipaddr = ipaddr;
gsfan 0:2f6062c6d018 691 _netmask = netmask;
gsfan 0:2f6062c6d018 692 _gateway = gateway;
gsfan 0:2f6062c6d018 693
gsfan 0:2f6062c6d018 694 if (ipaddr != nameserver) {
gsfan 0:2f6062c6d018 695 sprintf(cmd, "AT+DNSSET=%d.%d.%d.%d",
gsfan 0:2f6062c6d018 696 nameserver[0], nameserver[1], nameserver[2], nameserver[3]);
gsfan 0:2f6062c6d018 697 r = command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 698 }
gsfan 0:2f6062c6d018 699 return r;
gsfan 0:2f6062c6d018 700 }
gsfan 0:2f6062c6d018 701
gsfan 1:b127c6c5241d 702 int GSwifi::getAddress (IpAddr &ipaddr, IpAddr &netmask, IpAddr &gateway, IpAddr &nameserver) {
gsfan 1:b127c6c5241d 703 ipaddr = _ipaddr;
gsfan 1:b127c6c5241d 704 netmask = _netmask;
gsfan 1:b127c6c5241d 705 gateway = _gateway;
gsfan 1:b127c6c5241d 706 nameserver = _nameserver;
gsfan 2:c6e0e97901b3 707 return 0;
gsfan 1:b127c6c5241d 708 }
gsfan 1:b127c6c5241d 709
gsfan 0:2f6062c6d018 710 int GSwifi::getHostByName (const char* name, IpAddr &addr) {
gsfan 0:2f6062c6d018 711 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 712
gsfan 0:2f6062c6d018 713 if (! _connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 714
gsfan 0:2f6062c6d018 715 sprintf(cmd, "AT+DNSLOOKUP=%s", name);
gsfan 0:2f6062c6d018 716 if (command(cmd, GSRES_DNSLOOKUP)) return -1;
gsfan 0:2f6062c6d018 717
gsfan 0:2f6062c6d018 718 addr = _resolv;
gsfan 0:2f6062c6d018 719 return 0;
gsfan 0:2f6062c6d018 720 }
gsfan 0:2f6062c6d018 721
gsfan 0:2f6062c6d018 722 int GSwifi::getHostByName (Host &host) {
gsfan 0:2f6062c6d018 723 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 724
gsfan 0:2f6062c6d018 725 if (! _connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 726
gsfan 0:2f6062c6d018 727 sprintf(cmd, "AT+DNSLOOKUP=%s", host.getName());
gsfan 0:2f6062c6d018 728 if (command(cmd, GSRES_DNSLOOKUP)) return -1;
gsfan 0:2f6062c6d018 729
gsfan 0:2f6062c6d018 730 host.setIp(_resolv);
gsfan 0:2f6062c6d018 731 return 0;
gsfan 0:2f6062c6d018 732 }
gsfan 0:2f6062c6d018 733
gsfan 0:2f6062c6d018 734 int GSwifi::setRFPower (int power) {
gsfan 0:2f6062c6d018 735 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 736
gsfan 0:2f6062c6d018 737 if (power < 0 || power > 7) return -1;
gsfan 0:2f6062c6d018 738
gsfan 0:2f6062c6d018 739 sprintf(cmd, "AT+WP=%d", power);
gsfan 0:2f6062c6d018 740 return command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 741 }
gsfan 0:2f6062c6d018 742
gsfan 2:c6e0e97901b3 743 int GSwifi::powerSave (int active, int save) {
gsfan 0:2f6062c6d018 744 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 745
gsfan 0:2f6062c6d018 746 if (_status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 747
gsfan 2:c6e0e97901b3 748 sprintf(cmd, "AT+WRXACTIVE=%d", active);
gsfan 0:2f6062c6d018 749 command(cmd, GSRES_NORMAL);
gsfan 3:1345daf4ec1a 750 sprintf(cmd, "AT+WRXPS=%d", save);
gsfan 0:2f6062c6d018 751 return command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 752 }
gsfan 0:2f6062c6d018 753
gsfan 0:2f6062c6d018 754 int GSwifi::standby (int msec) {
gsfan 0:2f6062c6d018 755 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 756
gsfan 0:2f6062c6d018 757 if (_status != GSSTAT_READY && _status != GSSTAT_WAKEUP) return -1;
gsfan 0:2f6062c6d018 758
gsfan 0:2f6062c6d018 759 if (_status != GSSTAT_WAKEUP) {
gsfan 0:2f6062c6d018 760 command("AT+WRXACTIVE=0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 761 command("AT+STORENWCONN", GSRES_NORMAL);
gsfan 0:2f6062c6d018 762 } else {
gsfan 0:2f6062c6d018 763 command("ATE0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 764 if (_rts) {
gsfan 0:2f6062c6d018 765 command("AT&K0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 766 command("AT&R1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 767 }
gsfan 0:2f6062c6d018 768 }
gsfan 0:2f6062c6d018 769 _status = GSSTAT_STANDBY;
gsfan 0:2f6062c6d018 770 sprintf(cmd, "AT+PSSTBY=%d,0,0,0", msec); // go standby
gsfan 0:2f6062c6d018 771 return command(cmd, GSRES_NORMAL, 0);
gsfan 0:2f6062c6d018 772 }
gsfan 0:2f6062c6d018 773
gsfan 0:2f6062c6d018 774 int GSwifi::wakeup () {
gsfan 0:2f6062c6d018 775
gsfan 0:2f6062c6d018 776 if (_status == GSSTAT_WAKEUP) {
gsfan 0:2f6062c6d018 777 _status = GSSTAT_READY;
gsfan 0:2f6062c6d018 778 command("ATE0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 779 if (_rts) {
gsfan 0:2f6062c6d018 780 command("AT&K0", GSRES_NORMAL);
gsfan 0:2f6062c6d018 781 command("AT&R1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 782 }
gsfan 0:2f6062c6d018 783 #ifdef GS_BULK
gsfan 0:2f6062c6d018 784 command("AT+BDATA=1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 785 #endif
gsfan 0:2f6062c6d018 786 command("AT+RESTORENWCONN", GSRES_NORMAL);
gsfan 0:2f6062c6d018 787 wait_ms(100);
gsfan 0:2f6062c6d018 788 return command("AT+WRXACTIVE=1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 789 } else
gsfan 0:2f6062c6d018 790 if (_status == GSSTAT_DEEPSLEEP) {
gsfan 0:2f6062c6d018 791 _status = GSSTAT_READY;
gsfan 0:2f6062c6d018 792 return command("AT", GSRES_NORMAL);
gsfan 0:2f6062c6d018 793 }
gsfan 0:2f6062c6d018 794 return -1;
gsfan 0:2f6062c6d018 795 }
gsfan 0:2f6062c6d018 796
gsfan 0:2f6062c6d018 797 int GSwifi::deepSleep () {
gsfan 0:2f6062c6d018 798
gsfan 0:2f6062c6d018 799 if (_status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 800
gsfan 0:2f6062c6d018 801 _status = GSSTAT_DEEPSLEEP;
gsfan 0:2f6062c6d018 802 return command("AT+PSDPSLEEP", GSRES_NORMAL, 0); // go deep sleep
gsfan 0:2f6062c6d018 803 }
gsfan 0:2f6062c6d018 804
gsfan 0:2f6062c6d018 805 bool GSwifi::isConnected () {
gsfan 0:2f6062c6d018 806 return _connect;
gsfan 0:2f6062c6d018 807 }
gsfan 0:2f6062c6d018 808
gsfan 0:2f6062c6d018 809 GSSTATUS GSwifi::getStatus () {
gsfan 0:2f6062c6d018 810 return _status;
gsfan 0:2f6062c6d018 811 }
gsfan 0:2f6062c6d018 812
gsfan 1:b127c6c5241d 813 int GSwifi::getRssi () {
gsfan 1:b127c6c5241d 814 if (command("AT+WRSSI=?", GSRES_RSSI)) {
gsfan 1:b127c6c5241d 815 return 0;
gsfan 1:b127c6c5241d 816 }
gsfan 1:b127c6c5241d 817 return _rssi;
gsfan 1:b127c6c5241d 818 }
gsfan 1:b127c6c5241d 819
gsfan 5:6def1d0df519 820 int GSwifi::ntpdate (Host host, int sec) {
gsfan 5:6def1d0df519 821 char cmd[GS_CMD_SIZE];
gsfan 5:6def1d0df519 822
gsfan 5:6def1d0df519 823 if (! _connect || _status != GSSTAT_READY) return -1;
gsfan 5:6def1d0df519 824
gsfan 5:6def1d0df519 825 if (host.getIp().isNull()) {
gsfan 5:6def1d0df519 826 if (getHostByName(host)) {
gsfan 5:6def1d0df519 827 if (getHostByName(host)) return -1;
gsfan 5:6def1d0df519 828 }
gsfan 5:6def1d0df519 829 }
gsfan 5:6def1d0df519 830
gsfan 5:6def1d0df519 831 if (sec) {
gsfan 5:6def1d0df519 832 sprintf(cmd, "AT+NTIMESYNC=1,%d.%d.%d.%d,%d,1,%d", host.getIp()[0], host.getIp()[1], host.getIp()[2], host.getIp()[3],
gsfan 5:6def1d0df519 833 GS_TIMEOUT / 1000, sec);
gsfan 5:6def1d0df519 834 } else {
gsfan 5:6def1d0df519 835 sprintf(cmd, "AT+NTIMESYNC=1,%d.%d.%d.%d,%d,0", host.getIp()[0], host.getIp()[1], host.getIp()[2], host.getIp()[3],
gsfan 5:6def1d0df519 836 GS_TIMEOUT / 1000);
gsfan 5:6def1d0df519 837 }
gsfan 5:6def1d0df519 838 return command(cmd, GSRES_NORMAL);
gsfan 5:6def1d0df519 839 }
gsfan 5:6def1d0df519 840
gsfan 5:6def1d0df519 841 int GSwifi::setTime (time_t time) {
gsfan 5:6def1d0df519 842 char cmd[GS_CMD_SIZE];
gsfan 5:6def1d0df519 843 struct tm *t;
gsfan 5:6def1d0df519 844
gsfan 5:6def1d0df519 845 if (_status != GSSTAT_READY) return -1;
gsfan 5:6def1d0df519 846
gsfan 5:6def1d0df519 847 t = localtime(&time);
gsfan 5:6def1d0df519 848 sprintf(cmd, "AT+SETTIME=%d/%d/%d,%d:%d:%d", t->tm_mday, t->tm_mon + 1, t->tm_year + 1900, t->tm_hour, t->tm_min, t->tm_sec);
gsfan 5:6def1d0df519 849 return command(cmd, GSRES_NORMAL);
gsfan 5:6def1d0df519 850 }
gsfan 5:6def1d0df519 851
gsfan 5:6def1d0df519 852 time_t GSwifi::getTime () {
gsfan 5:6def1d0df519 853
gsfan 5:6def1d0df519 854 if (command("AT+GETTIME=?", GSRES_TIME)) {
gsfan 5:6def1d0df519 855 return 0;
gsfan 5:6def1d0df519 856 }
gsfan 5:6def1d0df519 857 return _time;
gsfan 5:6def1d0df519 858 }
gsfan 5:6def1d0df519 859
gsfan 6:a423f0d197de 860 int GSwifi::gpioOut (int port, int out) {
gsfan 6:a423f0d197de 861 char cmd[GS_CMD_SIZE];
gsfan 6:a423f0d197de 862
gsfan 6:a423f0d197de 863 if (_status != GSSTAT_READY) return -1;
gsfan 6:a423f0d197de 864
gsfan 6:a423f0d197de 865 sprintf(cmd, "AT+DGPIO=%d,%d", port, out);
gsfan 6:a423f0d197de 866 return command(cmd, GSRES_NORMAL);
gsfan 6:a423f0d197de 867 }
gsfan 6:a423f0d197de 868
gsfan 18:4b97804c37d1 869 void GSwifi::poll_cmd () {
gsfan 18:4b97804c37d1 870 int i;
gsfan 0:2f6062c6d018 871
gsfan 16:aea56cce3bf5 872 while (_gs_enter) {
gsfan 0:2f6062c6d018 873 // received "\n"
gsfan 0:2f6062c6d018 874 char buf[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 875
gsfan 0:2f6062c6d018 876 wait_ms(10);
gsfan 0:2f6062c6d018 877 _gs_enter --;
gsfan 0:2f6062c6d018 878 i = 0;
gsfan 0:2f6062c6d018 879 while (_buf_cmd.use() && i < sizeof(buf)) {
gsfan 0:2f6062c6d018 880 _buf_cmd.get(&buf[i]);
gsfan 0:2f6062c6d018 881 if (buf[i] == '\n') {
gsfan 0:2f6062c6d018 882 break;
gsfan 0:2f6062c6d018 883 }
gsfan 0:2f6062c6d018 884 i ++;
gsfan 0:2f6062c6d018 885 }
gsfan 0:2f6062c6d018 886 buf[i] = 0;
gsfan 0:2f6062c6d018 887 DBG("poll: %s\r\n", buf);
gsfan 0:2f6062c6d018 888
gsfan 14:9e89b922ace1 889 if (i == 0) {
gsfan 14:9e89b922ace1 890 } else
gsfan 1:b127c6c5241d 891 if (strncmp(buf, "CONNECT", 7) == 0 && buf[8] >= '0' && buf[8] <= 'F') {
gsfan 18:4b97804c37d1 892 int cid = x2i(buf[8]);
gsfan 18:4b97804c37d1 893 if (_gs_sock[cid].type == GSTYPE_SERVER) {
gsfan 1:b127c6c5241d 894 int acid, ip1, ip2, ip3, ip4;
gsfan 1:b127c6c5241d 895 char *tmp = buf + 12;
gsfan 1:b127c6c5241d 896
gsfan 1:b127c6c5241d 897 acid = x2i(buf[10]);
gsfan 18:4b97804c37d1 898 DBG("connect %d -> %d\r\n", cid, acid);
gsfan 18:4b97804c37d1 899 newSock(acid, _gs_sock[cid].type, _gs_sock[cid].protocol, _gs_sock[cid].onGsReceive);
gsfan 18:4b97804c37d1 900 _gs_sock[acid].lcid = cid;
gsfan 1:b127c6c5241d 901 sscanf(tmp, "%d.%d.%d.%d", &ip1, &ip2, &ip3, &ip4);
gsfan 1:b127c6c5241d 902 _gs_sock[acid].host.setIp(IpAddr(ip1, ip2, ip3, ip4));
gsfan 1:b127c6c5241d 903 tmp = strstr(tmp, " ") + 1;
gsfan 1:b127c6c5241d 904 _gs_sock[acid].host.setPort(atoi(tmp));
gsfan 18:4b97804c37d1 905
gsfan 18:4b97804c37d1 906 if (_gs_sock[acid].protocol == GSPROT_HTTPD) {
gsfan 18:4b97804c37d1 907 poll_httpd(acid, 0);
gsfan 18:4b97804c37d1 908 } else
gsfan 18:4b97804c37d1 909 if (_gs_sock[acid].onGsReceive != NULL) {
gsfan 18:4b97804c37d1 910 _gs_sock[acid].onGsReceive(acid, 0); // event connected
gsfan 18:4b97804c37d1 911 }
gsfan 1:b127c6c5241d 912 }
gsfan 0:2f6062c6d018 913 } else
gsfan 0:2f6062c6d018 914 if (strncmp(buf, "DISCONNECT", 10) == 0) {
gsfan 18:4b97804c37d1 915 int cid = x2i(buf[11]);
gsfan 18:4b97804c37d1 916 DBG("disconnect %d\r\n", cid);
gsfan 18:4b97804c37d1 917 _gs_sock[cid].connect = false;
gsfan 18:4b97804c37d1 918
gsfan 18:4b97804c37d1 919 if (_gs_sock[cid].protocol == GSPROT_HTTPD) {
gsfan 18:4b97804c37d1 920 poll_httpd(cid, 0);
gsfan 18:4b97804c37d1 921 } else
gsfan 18:4b97804c37d1 922 if (_gs_sock[cid].onGsReceive != NULL) {
gsfan 18:4b97804c37d1 923 _gs_sock[cid].onGsReceive(cid, 0); // event disconnected
gsfan 18:4b97804c37d1 924 }
gsfan 0:2f6062c6d018 925 } else
gsfan 0:2f6062c6d018 926 if (strncmp(buf, "DISASSOCIATED", 13) == 0 ||
gsfan 0:2f6062c6d018 927 strncmp(buf, "Disassociated", 13) == 0 ||
gsfan 16:aea56cce3bf5 928 strncmp(buf, "Disassociation Event", 20) == 0 ||
gsfan 16:aea56cce3bf5 929 strncmp(buf, "UnExpected Warm Boot", 20) == 0) {
gsfan 0:2f6062c6d018 930 _connect = false;
gsfan 0:2f6062c6d018 931 for (i = 0; i < 16; i ++) {
gsfan 0:2f6062c6d018 932 _gs_sock[i].connect = false;
gsfan 0:2f6062c6d018 933 }
gsfan 0:2f6062c6d018 934 } else
gsfan 0:2f6062c6d018 935 if (strncmp(buf, "Out of StandBy-Timer", 20) == 0 ||
gsfan 0:2f6062c6d018 936 strncmp(buf, "Out of StandBy-Alarm", 20) == 0) {
gsfan 16:aea56cce3bf5 937 // if (_status == GSSTAT_STANDBY) {
gsfan 0:2f6062c6d018 938 _status = GSSTAT_WAKEUP;
gsfan 16:aea56cce3bf5 939 // }
gsfan 0:2f6062c6d018 940 } else
gsfan 0:2f6062c6d018 941 if (strncmp(buf, "Out of Deep Sleep", 17) == 0 ) {
gsfan 16:aea56cce3bf5 942 // if (_status == GSSTAT_DEEPSLEEP) {
gsfan 0:2f6062c6d018 943 _status = GSSTAT_READY;
gsfan 16:aea56cce3bf5 944 // }
gsfan 0:2f6062c6d018 945 } else
gsfan 0:2f6062c6d018 946 if (strncmp(buf, "Out of", 6) == 0) {
gsfan 0:2f6062c6d018 947 }
gsfan 0:2f6062c6d018 948 DBG("status: %d\r\n", _status);
gsfan 0:2f6062c6d018 949 }
gsfan 18:4b97804c37d1 950 }
gsfan 18:4b97804c37d1 951
gsfan 18:4b97804c37d1 952 void GSwifi::poll () {
gsfan 18:4b97804c37d1 953 int i, j;
gsfan 18:4b97804c37d1 954
gsfan 18:4b97804c37d1 955 poll_cmd();
gsfan 18:4b97804c37d1 956
gsfan 0:2f6062c6d018 957 for (i = 0; i < 16; i ++) {
gsfan 0:2f6062c6d018 958 // if (_gs_sock[i].connect && _gs_sock[i].received) {
gsfan 0:2f6062c6d018 959 if (_gs_sock[i].received && _gs_sock[i].data->use()) {
gsfan 0:2f6062c6d018 960 // recv interrupt
gsfan 0:2f6062c6d018 961 _gs_sock[i].received = 0;
gsfan 18:4b97804c37d1 962 if (_gs_sock[i].protocol == GSPROT_HTTPD) {
gsfan 18:4b97804c37d1 963 for (j = 0; j < 1500 / GS_DATA_SIZE + 1; j ++) {
gsfan 18:4b97804c37d1 964 if (! _gs_sock[i].connect || ! _gs_sock[i].data->use()) break;
gsfan 18:4b97804c37d1 965 poll_httpd(i, _gs_sock[i].data->use());
gsfan 18:4b97804c37d1 966 }
gsfan 18:4b97804c37d1 967 } else
gsfan 12:63e714550791 968 if (_gs_sock[i].onGsReceive != NULL) {
gsfan 12:63e714550791 969 for (j = 0; j < 1500 / GS_DATA_SIZE + 1; j ++) {
gsfan 18:4b97804c37d1 970 if (! _gs_sock[i].connect || ! _gs_sock[i].data->use()) break;
gsfan 12:63e714550791 971 _gs_sock[i].onGsReceive(i, _gs_sock[i].data->use());
gsfan 12:63e714550791 972 }
gsfan 12:63e714550791 973 }
gsfan 0:2f6062c6d018 974 }
gsfan 0:2f6062c6d018 975 }
gsfan 0:2f6062c6d018 976 }
gsfan 0:2f6062c6d018 977
gsfan 2:c6e0e97901b3 978 void GSwifi::newSock (int cid, GSTYPE type, GSPROTOCOL pro, onGsReceiveFunc ponGsReceive) {
gsfan 1:b127c6c5241d 979 _gs_sock[cid].type = type;
gsfan 1:b127c6c5241d 980 _gs_sock[cid].protocol = pro;
gsfan 1:b127c6c5241d 981 _gs_sock[cid].connect = true;
gsfan 1:b127c6c5241d 982 if (_gs_sock[cid].data == NULL) {
gsfan 1:b127c6c5241d 983 _gs_sock[cid].data = new RingBuffer(GS_DATA_SIZE);
gsfan 1:b127c6c5241d 984 } else {
gsfan 1:b127c6c5241d 985 _gs_sock[cid].data->clear();
gsfan 1:b127c6c5241d 986 }
gsfan 1:b127c6c5241d 987 _gs_sock[cid].lcid = 0;
gsfan 1:b127c6c5241d 988 _gs_sock[cid].received = 0;
gsfan 1:b127c6c5241d 989 _gs_sock[cid].onGsReceive = ponGsReceive;
gsfan 1:b127c6c5241d 990 }
gsfan 1:b127c6c5241d 991
gsfan 0:2f6062c6d018 992 int GSwifi::open (Host &host, GSPROTOCOL pro, onGsReceiveFunc ponGsReceive) {
gsfan 0:2f6062c6d018 993 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 994
gsfan 0:2f6062c6d018 995 if (! _connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 996 if (host.getIp().isNull() || host.getPort() == 0) {
gsfan 0:2f6062c6d018 997 return -1;
gsfan 0:2f6062c6d018 998 }
gsfan 0:2f6062c6d018 999
gsfan 0:2f6062c6d018 1000 if (pro == GSPROT_UDP) {
gsfan 0:2f6062c6d018 1001 sprintf(cmd, "AT+NCUDP=%d.%d.%d.%d,%d", host.getIp()[0], host.getIp()[1], host.getIp()[2], host.getIp()[3], host.getPort());
gsfan 0:2f6062c6d018 1002 } else {
gsfan 0:2f6062c6d018 1003 sprintf(cmd, "AT+NCTCP=%d.%d.%d.%d,%d", host.getIp()[0], host.getIp()[1], host.getIp()[2], host.getIp()[3], host.getPort());
gsfan 0:2f6062c6d018 1004 }
gsfan 0:2f6062c6d018 1005 if (command(cmd, GSRES_CONNECT)) return -1;
gsfan 0:2f6062c6d018 1006
gsfan 1:b127c6c5241d 1007 newSock(_cid, GSTYPE_CLIENT, pro, ponGsReceive);
gsfan 0:2f6062c6d018 1008 return _cid;
gsfan 0:2f6062c6d018 1009 }
gsfan 0:2f6062c6d018 1010
gsfan 0:2f6062c6d018 1011 int GSwifi::listen (int port, GSPROTOCOL pro, onGsReceiveFunc ponGsReceive) {
gsfan 0:2f6062c6d018 1012 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 1013
gsfan 0:2f6062c6d018 1014 if (! _connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 1015 if (port == 0) {
gsfan 0:2f6062c6d018 1016 return -1;
gsfan 0:2f6062c6d018 1017 }
gsfan 0:2f6062c6d018 1018
gsfan 0:2f6062c6d018 1019 if (pro == GSPROT_UDP) {
gsfan 0:2f6062c6d018 1020 sprintf(cmd, "AT+NSUDP=%d", port);
gsfan 0:2f6062c6d018 1021 } else {
gsfan 0:2f6062c6d018 1022 sprintf(cmd, "AT+NSTCP=%d", port);
gsfan 0:2f6062c6d018 1023 }
gsfan 0:2f6062c6d018 1024 if (command(cmd, GSRES_CONNECT)) return -1;
gsfan 0:2f6062c6d018 1025
gsfan 1:b127c6c5241d 1026 newSock(_cid, GSTYPE_SERVER, pro, ponGsReceive);
gsfan 0:2f6062c6d018 1027 return _cid;
gsfan 0:2f6062c6d018 1028 }
gsfan 0:2f6062c6d018 1029
gsfan 0:2f6062c6d018 1030 int GSwifi::close (int cid) {
gsfan 0:2f6062c6d018 1031 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 1032
gsfan 0:2f6062c6d018 1033 if (! _gs_sock[cid].connect) return -1;
gsfan 0:2f6062c6d018 1034
gsfan 0:2f6062c6d018 1035 _gs_sock[cid].connect = false;
gsfan 0:2f6062c6d018 1036 delete _gs_sock[cid].data;
gsfan 0:2f6062c6d018 1037 _gs_sock[cid].data = NULL;
gsfan 0:2f6062c6d018 1038 sprintf(cmd, "AT+NCLOSE=%X", cid);
gsfan 0:2f6062c6d018 1039 return command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 1040 }
gsfan 0:2f6062c6d018 1041
gsfan 0:2f6062c6d018 1042 int GSwifi::send (int cid, char *buf, int len) {
gsfan 0:2f6062c6d018 1043 int i;
gsfan 6:a423f0d197de 1044 Timer timeout;
gsfan 0:2f6062c6d018 1045
gsfan 0:2f6062c6d018 1046 if (! _gs_sock[cid].connect) return -1;
gsfan 0:2f6062c6d018 1047
gsfan 0:2f6062c6d018 1048 if ((_gs_sock[cid].protocol == GSPROT_TCP) ||
gsfan 18:4b97804c37d1 1049 (_gs_sock[cid].protocol == GSPROT_UDP && _gs_sock[cid].type == GSTYPE_CLIENT) ||
gsfan 18:4b97804c37d1 1050 (_gs_sock[cid].protocol == GSPROT_HTTPD)) {
gsfan 0:2f6062c6d018 1051 // TCP Client, TCP Server, UDP Client
gsfan 0:2f6062c6d018 1052 _gs_ok = 0;
gsfan 0:2f6062c6d018 1053 _gs_failure = 0;
gsfan 0:2f6062c6d018 1054 #ifdef GS_BULK
gsfan 0:2f6062c6d018 1055 _gs.printf("\x1bZ%X%04d", cid, len);
gsfan 0:2f6062c6d018 1056 for (i = 0; i < len; i ++) {
gsfan 1:b127c6c5241d 1057 _gs_putc(buf[i]);
gsfan 0:2f6062c6d018 1058 DBG("%c", buf[i]);
gsfan 0:2f6062c6d018 1059 }
gsfan 0:2f6062c6d018 1060 #else
gsfan 0:2f6062c6d018 1061 _gs.printf("\x1bS%X", cid);
gsfan 0:2f6062c6d018 1062 for (i = 0; i < len; i ++) {
gsfan 0:2f6062c6d018 1063 if (buf[i] >= 0x20 && buf[i] < 0x7f) {
gsfan 1:b127c6c5241d 1064 _gs_putc(buf[i]);
gsfan 0:2f6062c6d018 1065 DBG("%c", buf[i]);
gsfan 0:2f6062c6d018 1066 }
gsfan 0:2f6062c6d018 1067 }
gsfan 1:b127c6c5241d 1068 _gs_putc(0x1b);
gsfan 1:b127c6c5241d 1069 _gs_putc('E');
gsfan 0:2f6062c6d018 1070 #endif
gsfan 0:2f6062c6d018 1071 } else {
gsfan 0:2f6062c6d018 1072 return -1;
gsfan 0:2f6062c6d018 1073 }
gsfan 6:a423f0d197de 1074 timeout.start();
gsfan 6:a423f0d197de 1075 while (!_gs_ok && !_gs_failure && timeout.read_ms() < GS_TIMEOUT);
gsfan 0:2f6062c6d018 1076 return _gs_ok == 1 ? 0 : -1;
gsfan 0:2f6062c6d018 1077 }
gsfan 0:2f6062c6d018 1078
gsfan 0:2f6062c6d018 1079 int GSwifi::send (int cid, char *buf, int len, Host &host) {
gsfan 0:2f6062c6d018 1080 int i;
gsfan 6:a423f0d197de 1081 Timer timeout;
gsfan 0:2f6062c6d018 1082
gsfan 0:2f6062c6d018 1083 if (! _gs_sock[cid].connect) return -1;
gsfan 0:2f6062c6d018 1084
gsfan 0:2f6062c6d018 1085 if ((_gs_sock[cid].protocol == GSPROT_UDP && _gs_sock[cid].type == GSTYPE_SERVER)) {
gsfan 0:2f6062c6d018 1086 // UDP Server
gsfan 0:2f6062c6d018 1087 _gs_ok = 0;
gsfan 0:2f6062c6d018 1088 _gs_failure = 0;
gsfan 0:2f6062c6d018 1089 #ifdef GS_BULK
gsfan 0:2f6062c6d018 1090 _gs.printf("\x1bY%X", cid);
gsfan 7:b75b7fc144ff 1091 _gs.printf("%d.%d.%d.%d:%d:", host.getIp()[0], host.getIp()[1], host.getIp()[2], host.getIp()[3], host.getPort());
gsfan 0:2f6062c6d018 1092 _gs.printf("%04d", len);
gsfan 0:2f6062c6d018 1093 for (i = 0; i < len; i ++) {
gsfan 1:b127c6c5241d 1094 _gs_putc(buf[i]);
gsfan 0:2f6062c6d018 1095 DBG("%c", buf[i]);
gsfan 0:2f6062c6d018 1096 }
gsfan 0:2f6062c6d018 1097 #else
gsfan 0:2f6062c6d018 1098 _gs.printf("\x1bU%X", cid);
gsfan 7:b75b7fc144ff 1099 _gs.printf("%d.%d.%d.%d:%d:", host.getIp()[0], host.getIp()[1], host.getIp()[2], host.getIp()[3], host.getPort());
gsfan 0:2f6062c6d018 1100 for (i = 0; i < len; i ++) {
gsfan 0:2f6062c6d018 1101 if (buf[i] >= 0x20 && buf[i] < 0x7f) {
gsfan 1:b127c6c5241d 1102 _gs_putc(buf[i]);
gsfan 0:2f6062c6d018 1103 DBG("%c", buf[i]);
gsfan 0:2f6062c6d018 1104 }
gsfan 0:2f6062c6d018 1105 }
gsfan 1:b127c6c5241d 1106 _gs_putc(0x1b);
gsfan 1:b127c6c5241d 1107 _gs_putc('E');
gsfan 0:2f6062c6d018 1108 #endif
gsfan 0:2f6062c6d018 1109 } else {
gsfan 0:2f6062c6d018 1110 return -1;
gsfan 0:2f6062c6d018 1111 }
gsfan 6:a423f0d197de 1112 timeout.start();
gsfan 6:a423f0d197de 1113 while (!_gs_ok && !_gs_failure && timeout.read_ms() < GS_TIMEOUT);
gsfan 0:2f6062c6d018 1114 return _gs_ok == 1 ? 0 : -1;
gsfan 0:2f6062c6d018 1115 }
gsfan 0:2f6062c6d018 1116
gsfan 0:2f6062c6d018 1117 int GSwifi::recv (int cid, char *buf, int len) {
gsfan 0:2f6062c6d018 1118 int r;
gsfan 0:2f6062c6d018 1119 Timer timeout;
gsfan 0:2f6062c6d018 1120
gsfan 0:2f6062c6d018 1121 if (_gs_sock[cid].data == NULL) return 0;
gsfan 0:2f6062c6d018 1122
gsfan 0:2f6062c6d018 1123 timeout.start();
gsfan 0:2f6062c6d018 1124 while (_gs_sock[cid].data->use() == 0) {
gsfan 0:2f6062c6d018 1125 if (timeout.read_ms() > GS_TIMEOUT) return 0;
gsfan 0:2f6062c6d018 1126 }
gsfan 0:2f6062c6d018 1127 timeout.stop();
gsfan 0:2f6062c6d018 1128
gsfan 0:2f6062c6d018 1129 r = _gs_sock[cid].data->get(buf, len);
gsfan 0:2f6062c6d018 1130 return r;
gsfan 0:2f6062c6d018 1131 }
gsfan 0:2f6062c6d018 1132
gsfan 0:2f6062c6d018 1133 int GSwifi::recv (int cid, char *buf, int len, Host &host) {
gsfan 0:2f6062c6d018 1134 int r;
gsfan 0:2f6062c6d018 1135 Timer timeout;
gsfan 0:2f6062c6d018 1136
gsfan 0:2f6062c6d018 1137 if (_gs_sock[cid].data == NULL) return 0;
gsfan 0:2f6062c6d018 1138
gsfan 0:2f6062c6d018 1139 timeout.start();
gsfan 0:2f6062c6d018 1140 while (_gs_sock[cid].data->use() == 0) {
gsfan 0:2f6062c6d018 1141 if (timeout.read_ms() > GS_TIMEOUT) return 0;
gsfan 0:2f6062c6d018 1142 }
gsfan 0:2f6062c6d018 1143 timeout.stop();
gsfan 0:2f6062c6d018 1144
gsfan 0:2f6062c6d018 1145 r = _gs_sock[cid].data->get(buf, len);
gsfan 0:2f6062c6d018 1146 host = _from;
gsfan 0:2f6062c6d018 1147 return r;
gsfan 0:2f6062c6d018 1148 }
gsfan 0:2f6062c6d018 1149
gsfan 0:2f6062c6d018 1150 bool GSwifi::isConnected (int cid) {
gsfan 0:2f6062c6d018 1151 return _gs_sock[cid].connect;
gsfan 0:2f6062c6d018 1152 }
gsfan 0:2f6062c6d018 1153
gsfan 17:6828b084e74b 1154 int GSwifi::httpGet (Host &host, char *uri, char *user, char *pwd, int ssl, onGsReceiveFunc ponGsReceive) {
gsfan 0:2f6062c6d018 1155 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 1156
gsfan 0:2f6062c6d018 1157 if (! _connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 1158
gsfan 0:2f6062c6d018 1159 if (host.getIp().isNull()) {
gsfan 0:2f6062c6d018 1160 if (getHostByName(host)) {
gsfan 0:2f6062c6d018 1161 if (getHostByName(host)) return -1;
gsfan 0:2f6062c6d018 1162 }
gsfan 0:2f6062c6d018 1163 }
gsfan 0:2f6062c6d018 1164 if (host.getPort() == 0) {
gsfan 0:2f6062c6d018 1165 if (ssl) {
gsfan 0:2f6062c6d018 1166 host.setPort(443);
gsfan 0:2f6062c6d018 1167 } else {
gsfan 0:2f6062c6d018 1168 host.setPort(80);
gsfan 0:2f6062c6d018 1169 }
gsfan 0:2f6062c6d018 1170 }
gsfan 0:2f6062c6d018 1171
gsfan 0:2f6062c6d018 1172 command("AT+HTTPCONF=3,close", GSRES_NORMAL); // Connection:
gsfan 0:2f6062c6d018 1173 sprintf(cmd, "AT+HTTPCONF=11,%s", host.getName()); // Host:
gsfan 0:2f6062c6d018 1174 command(cmd, GSRES_NORMAL);
gsfan 15:5febfc399099 1175 if (user && pwd) {
gsfan 15:5febfc399099 1176 char tmp[GS_CMD_SIZE], tmp2[GS_CMD_SIZE];
gsfan 15:5febfc399099 1177 snprintf(tmp, sizeof(tmp), "%s:%s", user, pwd);
gsfan 15:5febfc399099 1178 base64encode(tmp, strlen(tmp), tmp2, sizeof(tmp2));
gsfan 15:5febfc399099 1179 sprintf(cmd, "AT+HTTPCONF=2,Basic %s", tmp2); // Authorization:
gsfan 15:5febfc399099 1180 command(cmd, GSRES_NORMAL);
gsfan 15:5febfc399099 1181 } else {
gsfan 15:5febfc399099 1182 command("AT+HTTPCONFDEL=2", GSRES_NORMAL);
gsfan 15:5febfc399099 1183 }
gsfan 15:5febfc399099 1184 command("AT+HTTPCONFDEL=5", GSRES_NORMAL);
gsfan 15:5febfc399099 1185 command("AT+HTTPCONFDEL=7", GSRES_NORMAL);
gsfan 15:5febfc399099 1186
gsfan 0:2f6062c6d018 1187 sprintf(cmd, "AT+HTTPOPEN=%d.%d.%d.%d,%d", host.getIp()[0], host.getIp()[1], host.getIp()[2], host.getIp()[3], host.getPort());
gsfan 0:2f6062c6d018 1188 if (ssl) {
gsfan 0:2f6062c6d018 1189 strcat(cmd, ",1");
gsfan 0:2f6062c6d018 1190 }
gsfan 0:2f6062c6d018 1191 if (command(cmd, GSRES_HTTP)) return -1;
gsfan 1:b127c6c5241d 1192 newSock(_cid, GSTYPE_CLIENT, GSPROT_HTTPGET, ponGsReceive);
gsfan 0:2f6062c6d018 1193
gsfan 15:5febfc399099 1194 sprintf(cmd, "AT+HTTPSEND=%d,1,%d,%s", _cid, GS_TIMEOUT / 1000, uri); // GET
gsfan 0:2f6062c6d018 1195 command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 1196
gsfan 0:2f6062c6d018 1197 return _cid;
gsfan 0:2f6062c6d018 1198 }
gsfan 0:2f6062c6d018 1199
gsfan 15:5febfc399099 1200 int GSwifi::httpGet (Host &host, char *uri, int ssl, onGsReceiveFunc ponGsReceive) {
gsfan 17:6828b084e74b 1201 return httpGet (host, uri, NULL, NULL, ssl, ponGsReceive);
gsfan 15:5febfc399099 1202 }
gsfan 15:5febfc399099 1203
gsfan 17:6828b084e74b 1204 int GSwifi::httpPost (Host &host, char *uri, char *body, char *user, char *pwd, int ssl, onGsReceiveFunc ponGsReceive) {
gsfan 15:5febfc399099 1205 char cmd[GS_CMD_SIZE];
gsfan 15:5febfc399099 1206 int i, len;
gsfan 15:5febfc399099 1207
gsfan 15:5febfc399099 1208 if (! _connect || _status != GSSTAT_READY) return -1;
gsfan 15:5febfc399099 1209
gsfan 15:5febfc399099 1210 if (host.getIp().isNull()) {
gsfan 15:5febfc399099 1211 if (getHostByName(host)) {
gsfan 15:5febfc399099 1212 if (getHostByName(host)) return -1;
gsfan 15:5febfc399099 1213 }
gsfan 15:5febfc399099 1214 }
gsfan 15:5febfc399099 1215 if (host.getPort() == 0) {
gsfan 15:5febfc399099 1216 if (ssl) {
gsfan 15:5febfc399099 1217 host.setPort(443);
gsfan 15:5febfc399099 1218 } else {
gsfan 15:5febfc399099 1219 host.setPort(80);
gsfan 15:5febfc399099 1220 }
gsfan 15:5febfc399099 1221 }
gsfan 15:5febfc399099 1222 len = strlen(body);
gsfan 15:5febfc399099 1223
gsfan 15:5febfc399099 1224 command("AT+HTTPCONF=3,close", GSRES_NORMAL); // Connection:
gsfan 15:5febfc399099 1225 sprintf(cmd, "AT+HTTPCONF=11,%s", host.getName()); // Host:
gsfan 15:5febfc399099 1226 command(cmd, GSRES_NORMAL);
gsfan 15:5febfc399099 1227 sprintf(cmd, "AT+HTTPCONF=5,%d", len); // Content-Length:
gsfan 15:5febfc399099 1228 command(cmd, GSRES_NORMAL);
gsfan 15:5febfc399099 1229 command("AT+HTTPCONF=7,application/x-www-form-urlencoded", GSRES_NORMAL); // Content-type:
gsfan 15:5febfc399099 1230 if (user && pwd) {
gsfan 15:5febfc399099 1231 char tmp[GS_CMD_SIZE], tmp2[GS_CMD_SIZE];
gsfan 15:5febfc399099 1232 snprintf(tmp, sizeof(tmp), "%s:%s", user, pwd);
gsfan 15:5febfc399099 1233 base64encode(tmp, strlen(tmp), tmp2, sizeof(tmp2));
gsfan 15:5febfc399099 1234 sprintf(cmd, "AT+HTTPCONF=2,Basic %s", tmp2); // Authorization:
gsfan 15:5febfc399099 1235 command(cmd, GSRES_NORMAL);
gsfan 15:5febfc399099 1236 } else {
gsfan 15:5febfc399099 1237 command("AT+HTTPCONFDEL=2", GSRES_NORMAL);
gsfan 15:5febfc399099 1238 }
gsfan 15:5febfc399099 1239
gsfan 15:5febfc399099 1240 sprintf(cmd, "AT+HTTPOPEN=%d.%d.%d.%d,%d", host.getIp()[0], host.getIp()[1], host.getIp()[2], host.getIp()[3], host.getPort());
gsfan 15:5febfc399099 1241 if (ssl) {
gsfan 15:5febfc399099 1242 strcat(cmd, ",1");
gsfan 15:5febfc399099 1243 }
gsfan 15:5febfc399099 1244 if (command(cmd, GSRES_HTTP)) return -1;
gsfan 15:5febfc399099 1245 newSock(_cid, GSTYPE_CLIENT, GSPROT_HTTPPOST, ponGsReceive);
gsfan 15:5febfc399099 1246
gsfan 15:5febfc399099 1247 sprintf(cmd, "AT+HTTPSEND=%d,3,%d,%s,%d", _cid, GS_TIMEOUT / 1000, uri, len); // POST
gsfan 15:5febfc399099 1248 command(cmd, GSRES_NORMAL);
gsfan 15:5febfc399099 1249
gsfan 15:5febfc399099 1250 _gs.printf("\x1bH%X", _cid);
gsfan 15:5febfc399099 1251 for (i = 0; i < len; i ++) {
gsfan 15:5febfc399099 1252 _gs_putc(body[i]);
gsfan 15:5febfc399099 1253 DBG("%c", body[i]);
gsfan 15:5febfc399099 1254 }
gsfan 15:5febfc399099 1255
gsfan 15:5febfc399099 1256 return _cid;
gsfan 15:5febfc399099 1257 }
gsfan 15:5febfc399099 1258
gsfan 15:5febfc399099 1259 int GSwifi::httpPost (Host &host, char *uri, char *body, int ssl, onGsReceiveFunc ponGsReceive) {
gsfan 17:6828b084e74b 1260 return httpPost (host, uri, body, NULL, NULL, ssl, ponGsReceive);
gsfan 15:5febfc399099 1261 }
gsfan 15:5febfc399099 1262
gsfan 0:2f6062c6d018 1263 int GSwifi::certAdd (char *name, char *cert, int len) {
gsfan 0:2f6062c6d018 1264 int i;
gsfan 0:2f6062c6d018 1265 char cmd[GS_CMD_SIZE];
gsfan 0:2f6062c6d018 1266
gsfan 0:2f6062c6d018 1267 if (! _connect || _status != GSSTAT_READY) return -1;
gsfan 0:2f6062c6d018 1268
gsfan 0:2f6062c6d018 1269 sprintf(cmd, "AT+TCERTADD=%s,1,%d,1", name, len); // Hex, ram
gsfan 0:2f6062c6d018 1270 command(cmd, GSRES_NORMAL);
gsfan 0:2f6062c6d018 1271
gsfan 1:b127c6c5241d 1272 _gs_putc(0x1b);
gsfan 1:b127c6c5241d 1273 _gs_putc('W');
gsfan 0:2f6062c6d018 1274 for (i = 0; i < len; i ++) {
gsfan 1:b127c6c5241d 1275 _gs_putc(cert[i]);
gsfan 0:2f6062c6d018 1276 }
gsfan 0:2f6062c6d018 1277 return cmdResponse(GSRES_NORMAL, GS_TIMEOUT);
gsfan 0:2f6062c6d018 1278 }
gsfan 0:2f6062c6d018 1279
gsfan 15:5febfc399099 1280 int GSwifi::base64encode (const char *input, int length, char *output, int len) {
gsfan 15:5febfc399099 1281 // code from
gsfan 15:5febfc399099 1282 // Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
gsfan 15:5febfc399099 1283 static const char base64[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
gsfan 15:5febfc399099 1284 unsigned int c, c1, c2, c3;
gsfan 15:5febfc399099 1285
gsfan 15:5febfc399099 1286 if (len < ((((length-1)/3)+1)<<2)) return -1;
gsfan 15:5febfc399099 1287 for(unsigned int i = 0, j = 0; i<length; i+=3,j+=4) {
gsfan 15:5febfc399099 1288 c1 = ((((unsigned char)*((unsigned char *)&input[i]))));
gsfan 15:5febfc399099 1289 c2 = (length>i+1)?((((unsigned char)*((unsigned char *)&input[i+1])))):0;
gsfan 15:5febfc399099 1290 c3 = (length>i+2)?((((unsigned char)*((unsigned char *)&input[i+2])))):0;
gsfan 15:5febfc399099 1291
gsfan 15:5febfc399099 1292 c = ((c1 & 0xFC) >> 2);
gsfan 15:5febfc399099 1293 output[j+0] = base64[c];
gsfan 15:5febfc399099 1294 c = ((c1 & 0x03) << 4) | ((c2 & 0xF0) >> 4);
gsfan 15:5febfc399099 1295 output[j+1] = base64[c];
gsfan 15:5febfc399099 1296 c = ((c2 & 0x0F) << 2) | ((c3 & 0xC0) >> 6);
gsfan 15:5febfc399099 1297 output[j+2] = (length>i+1)?base64[c]:'=';
gsfan 15:5febfc399099 1298 c = (c3 & 0x3F);
gsfan 15:5febfc399099 1299 output[j+3] = (length>i+2)?base64[c]:'=';
gsfan 15:5febfc399099 1300 }
gsfan 15:5febfc399099 1301 output[(((length-1)/3)+1)<<2] = '\0';
gsfan 15:5febfc399099 1302 return 0;
gsfan 15:5febfc399099 1303 }
gsfan 15:5febfc399099 1304
gsfan 15:5febfc399099 1305 int GSwifi::urlencode (char *str, char *buf, int len) {
gsfan 15:5febfc399099 1306 // code from
gsfan 15:5febfc399099 1307 // Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
gsfan 15:5febfc399099 1308 static const char to_hex[] = "0123456789ABCDEF";
gsfan 15:5febfc399099 1309 // char *pstr = str, *buf = (char*)malloc(strlen(str) * 3 + 1), *pbuf = buf;
gsfan 15:5febfc399099 1310 char *pstr = str, *pbuf = buf;
gsfan 15:5febfc399099 1311
gsfan 15:5febfc399099 1312 if (len < (strlen(str) * 3 + 1)) return -1;
gsfan 15:5febfc399099 1313 while (*pstr) {
gsfan 15:5febfc399099 1314 if (isalnum(*pstr) || *pstr == '-' || *pstr == '_' || *pstr == '.' || *pstr == '~') {
gsfan 15:5febfc399099 1315 *pbuf++ = *pstr;
gsfan 15:5febfc399099 1316 } else if (*pstr == ' ') {
gsfan 15:5febfc399099 1317 *pbuf++ = '+';
gsfan 15:5febfc399099 1318 } else {
gsfan 15:5febfc399099 1319 *pbuf++ = '%';
gsfan 15:5febfc399099 1320 *pbuf++ = to_hex[(*pstr >> 4) & 0x0f];
gsfan 15:5febfc399099 1321 *pbuf++ = to_hex[*pstr & 0x0f];
gsfan 15:5febfc399099 1322 }
gsfan 15:5febfc399099 1323 pstr++;
gsfan 15:5febfc399099 1324 }
gsfan 15:5febfc399099 1325 *pbuf = '\0';
gsfan 15:5febfc399099 1326 return 0;
gsfan 15:5febfc399099 1327 }
gsfan 15:5febfc399099 1328
gsfan 0:2f6062c6d018 1329 int GSwifi::x2i (char c) {
gsfan 0:2f6062c6d018 1330 if (c >= '0' && c <= '9') {
gsfan 0:2f6062c6d018 1331 return c - '0';
gsfan 0:2f6062c6d018 1332 } else
gsfan 0:2f6062c6d018 1333 if (c >= 'A' && c <= 'F') {
gsfan 0:2f6062c6d018 1334 return c - 'A' + 10;
gsfan 0:2f6062c6d018 1335 } else
gsfan 0:2f6062c6d018 1336 if (c >= 'a' && c <= 'f') {
gsfan 0:2f6062c6d018 1337 return c - 'a' + 10;
gsfan 0:2f6062c6d018 1338 }
gsfan 0:2f6062c6d018 1339 return 0;
gsfan 0:2f6062c6d018 1340 }
gsfan 0:2f6062c6d018 1341
gsfan 0:2f6062c6d018 1342 char GSwifi::i2x (int i) {
gsfan 0:2f6062c6d018 1343 if (i >= 0 && i <= 9) {
gsfan 0:2f6062c6d018 1344 return i + '0';
gsfan 0:2f6062c6d018 1345 } else
gsfan 0:2f6062c6d018 1346 if (i >= 10 && i <= 15) {
gsfan 0:2f6062c6d018 1347 return i - 10 + 'A';
gsfan 0:2f6062c6d018 1348 }
gsfan 0:2f6062c6d018 1349 return 0;
gsfan 0:2f6062c6d018 1350 }
gsfan 0:2f6062c6d018 1351
gsfan 0:2f6062c6d018 1352
gsfan 18:4b97804c37d1 1353 #ifdef DEBUF
gsfan 0:2f6062c6d018 1354 // for test
gsfan 0:2f6062c6d018 1355
gsfan 0:2f6062c6d018 1356 void GSwifi::test () {
gsfan 2:c6e0e97901b3 1357 /*
gsfan 0:2f6062c6d018 1358 command(NULL, GSRES_NORMAL);
gsfan 0:2f6062c6d018 1359 wait_ms(100);
gsfan 0:2f6062c6d018 1360 command("AT+NCLOSEALL", GSRES_NORMAL);
gsfan 0:2f6062c6d018 1361 _connect = true;
gsfan 2:c6e0e97901b3 1362 */
gsfan 2:c6e0e97901b3 1363 command("AT+WRXACTIVE=1", GSRES_NORMAL);
gsfan 0:2f6062c6d018 1364 }
gsfan 0:2f6062c6d018 1365
gsfan 0:2f6062c6d018 1366 int GSwifi::getc() {
gsfan 0:2f6062c6d018 1367 char c;
gsfan 0:2f6062c6d018 1368 if (_buf_cmd.use()) {
gsfan 0:2f6062c6d018 1369 _buf_cmd.get(&c);
gsfan 0:2f6062c6d018 1370 }
gsfan 0:2f6062c6d018 1371 /*
gsfan 0:2f6062c6d018 1372 } else
gsfan 0:2f6062c6d018 1373 if (_gs_sock[0].data != NULL) {
gsfan 0:2f6062c6d018 1374 _gs_sock[0].data->get(&c);
gsfan 0:2f6062c6d018 1375 }
gsfan 0:2f6062c6d018 1376 */
gsfan 0:2f6062c6d018 1377 return c;
gsfan 0:2f6062c6d018 1378 }
gsfan 0:2f6062c6d018 1379
gsfan 0:2f6062c6d018 1380 void GSwifi::putc(char c) {
gsfan 1:b127c6c5241d 1381 _gs_putc(c);
gsfan 0:2f6062c6d018 1382 }
gsfan 0:2f6062c6d018 1383
gsfan 0:2f6062c6d018 1384 int GSwifi::readable() {
gsfan 0:2f6062c6d018 1385 return _buf_cmd.use();
gsfan 0:2f6062c6d018 1386 // return _buf_cmd.use() || (_gs_sock[0].data != NULL && _gs_sock[0].data->use());
gsfan 0:2f6062c6d018 1387 }
gsfan 18:4b97804c37d1 1388 #endif