D D / Mbed 2 deprecated DISCO_L475VG_IOT01-Telegram-BOT

A Telegram BOT for this awesome all-in-one board.

Dependencies:   BSP_B-L475E-IOT01 mbed es_wifi jsmn

Telegram Bot for DISCO_L475VG_IOT01

This application embeds aTelegram chatbot into the DISCO_L475VG_IOT01 board.

The Bot answers to the users queries about:

  • Real time environmental data taken from the on board sensors.
  • Environmental data history of the latest 24 hours stored on board.
  • Camera images taken from the Arducam-mini-2mp (optional).

This software uses:

Compilation

Import in your compiler and modify the following defines:

  • WIFI_SSID
  • WIFI_PASSWORD
  • TELEGRAM_BOT_APIKEY

Please follow the Telegram bots documentation (https://core.telegram.org/bots) to better understand how the Telegram API works and how to create your bot.

In order to support the Arducam-Mini-2MP set WITH_ARDUCAM_2640 #define to 1.

Screenshots

/media/uploads/dvddnr/screenshot_20180130-073732.png /media/uploads/dvddnr/screenshot_20180130-073703.png /media/uploads/dvddnr/arducam.jpeg /media/uploads/dvddnr/screenshot_20180216-102601.png

Security

The Inventek wifi module creates the ssl connection but does not authenticate the server's certificate ( AT cmd P9=0 ).

For more details http://www.inventeksys.com/IWIN/programming-certificates-tcp-ssltls/

main.cpp@4:9926288a8703, 2018-01-25 (annotated)

Committer:
dvddnr
Date:
Thu Jan 25 15:27:29 2018 +0000
Revision:
4:9926288a8703
Parent:
3:d6d4d692f167
Child:
5:f204a47aa813
manage wifi module disconnections

Who changed what in which revision?

UserRevisionLine numberNew contents of line
dvddnr 0:1fc46da4a976 1 #include "mbed.h"
dvddnr 0:1fc46da4a976 2
dvddnr 0:1fc46da4a976 3 #include "stm32l475e_iot01_tsensor.h"
dvddnr 0:1fc46da4a976 4 #include "stm32l475e_iot01_hsensor.h"
dvddnr 0:1fc46da4a976 5 #include "stm32l475e_iot01_psensor.h"
dvddnr 1:60fbd0835b9d 6 #include "es_wifi.h"
dvddnr 1:60fbd0835b9d 7 #include "es_wifi_io.h"
dvddnr 1:60fbd0835b9d 8 #include "jsmn.h"
dvddnr 1:60fbd0835b9d 9
dvddnr 1:60fbd0835b9d 10
dvddnr 1:60fbd0835b9d 11
dvddnr 1:60fbd0835b9d 12 #define WIFI_SSID ""
dvddnr 1:60fbd0835b9d 13 #define WIFI_PASSWORD ""
dvddnr 1:60fbd0835b9d 14 #define TELEGRAM_BOT_APIKEY ""
dvddnr 1:60fbd0835b9d 15
dvddnr 1:60fbd0835b9d 16 #define WIFI_WRITE_TIMEOUT 10000
dvddnr 1:60fbd0835b9d 17 #define WIFI_READ_TIMEOUT 10000
dvddnr 1:60fbd0835b9d 18 #define CONNECTION_TRIAL_MAX 10
dvddnr 1:60fbd0835b9d 19
dvddnr 4:9926288a8703 20 // LED
dvddnr 4:9926288a8703 21 DigitalOut g_alivenessLED(LED1);
dvddnr 1:60fbd0835b9d 22
dvddnr 1:60fbd0835b9d 23 // wifi interfaces
dvddnr 1:60fbd0835b9d 24 ES_WIFIObject_t g_es_wifi_ctx;
dvddnr 1:60fbd0835b9d 25 bool wifi_connect(void);
dvddnr 1:60fbd0835b9d 26 bool open_tcpssl(uint8_t socket, uint16_t local_port, uint16_t remote_port, char *domain_name);
dvddnr 1:60fbd0835b9d 27 bool close_tcpssl(uint32_t socket);
dvddnr 0:1fc46da4a976 28
dvddnr 1:60fbd0835b9d 29 // http I/O buffer
dvddnr 1:60fbd0835b9d 30 char g_http_io_buffer[ES_WIFI_DATA_SIZE];
dvddnr 1:60fbd0835b9d 31
dvddnr 1:60fbd0835b9d 32 // Telegram json I/O buffer
dvddnr 1:60fbd0835b9d 33 #define TBOT_JSON_BUFFER_SIZE 5 * 1024
dvddnr 1:60fbd0835b9d 34 char g_json_io_buffer[TBOT_JSON_BUFFER_SIZE];
dvddnr 1:60fbd0835b9d 35
dvddnr 1:60fbd0835b9d 36 // telegram REST API
dvddnr 1:60fbd0835b9d 37 const char TELEGRAM_GETUPDATES[] = "GET /bot" TELEGRAM_BOT_APIKEY "/getUpdates?offset=%d&timeout=5&limit=1 HTTP/1.1\r\nHost: api.telegram.org\r\nUser-Agent: curl/7.50.1\r\nAccept: */*\r\n\r\n";
dvddnr 1:60fbd0835b9d 38 const char TELEGRAM_SENDMESSAGE[] = "GET /bot" TELEGRAM_BOT_APIKEY "/sendMessage HTTP/1.1\r\nHost: api.telegram.org\r\nUser-Agent: curl/7.50.1\r\nAccept: */*\r\nContent-Type: application/json\r\nContent-Length: %d\r\n\r\n";
dvddnr 1:60fbd0835b9d 39 const char TELEGRAM_CUSTOM_KEYBOARD[] = "{\"keyboard\": [[\"Temperature\"],[\"Humidity\"],[\"Pressure\"]],\"one_time_keyboard\": true}";
dvddnr 1:60fbd0835b9d 40 bool telegram_get_update(int32_t update_id);
dvddnr 1:60fbd0835b9d 41 bool telegram_send_message();
dvddnr 1:60fbd0835b9d 42 bool telegram_https_get(bool has_json_payload);
dvddnr 1:60fbd0835b9d 43 #define TELEGRAM_BOT_INCOMING_CMD_SIZE 80
dvddnr 1:60fbd0835b9d 44 char g_incoming_msg[TELEGRAM_BOT_INCOMING_CMD_SIZE];
dvddnr 1:60fbd0835b9d 45 void telegram_bot(void);
dvddnr 1:60fbd0835b9d 46
dvddnr 1:60fbd0835b9d 47
dvddnr 1:60fbd0835b9d 48 // HTTP util
dvddnr 1:60fbd0835b9d 49 bool http_parse_response(char *http_chunk, uint16_t http_chunk_len, bool *status_code_ok, uint16_t *content_len);
dvddnr 1:60fbd0835b9d 50
dvddnr 1:60fbd0835b9d 51 // JSON parser
dvddnr 1:60fbd0835b9d 52 #define JSON_MAX_TOKENS 128
dvddnr 1:60fbd0835b9d 53 jsmn_parser g_json_parser;
dvddnr 1:60fbd0835b9d 54 jsmntok_t g_json_tokens[JSON_MAX_TOKENS];
dvddnr 1:60fbd0835b9d 55 bool jsoneq(const char *json, jsmntok_t *tok, const char *s,jsmntype_t type);
dvddnr 0:1fc46da4a976 56
dvddnr 0:1fc46da4a976 57 int main()
dvddnr 0:1fc46da4a976 58 {
dvddnr 1:60fbd0835b9d 59
dvddnr 4:9926288a8703 60 printf("> DISCO_L475VG_IOT01-Telegram-BOT started\r\n");
dvddnr 0:1fc46da4a976 61
dvddnr 1:60fbd0835b9d 62
dvddnr 1:60fbd0835b9d 63 /* Setup env sensors */
dvddnr 0:1fc46da4a976 64 BSP_TSENSOR_Init();
dvddnr 0:1fc46da4a976 65 BSP_HSENSOR_Init();
dvddnr 0:1fc46da4a976 66 BSP_PSENSOR_Init();
dvddnr 1:60fbd0835b9d 67
dvddnr 0:1fc46da4a976 68
dvddnr 1:60fbd0835b9d 69 /* start chatbot */
dvddnr 1:60fbd0835b9d 70 telegram_bot();
dvddnr 1:60fbd0835b9d 71 }
dvddnr 0:1fc46da4a976 72
dvddnr 1:60fbd0835b9d 73 void telegram_bot(void)
dvddnr 1:60fbd0835b9d 74 {
dvddnr 1:60fbd0835b9d 75 int32_t update_id = 0;
dvddnr 1:60fbd0835b9d 76 int32_t chat_id = 0;
dvddnr 1:60fbd0835b9d 77 int json_results;
dvddnr 1:60fbd0835b9d 78 bool well_done = false;
dvddnr 0:1fc46da4a976 79
dvddnr 4:9926288a8703 80 if(wifi_connect())
dvddnr 4:9926288a8703 81 printf("> Wifi connected\r\n");
dvddnr 4:9926288a8703 82 else
dvddnr 4:9926288a8703 83 {
dvddnr 4:9926288a8703 84 NVIC_SystemReset();
dvddnr 4:9926288a8703 85 }
dvddnr 0:1fc46da4a976 86
dvddnr 1:60fbd0835b9d 87 while (1)
dvddnr 1:60fbd0835b9d 88 {
dvddnr 4:9926288a8703 89 g_alivenessLED = !g_alivenessLED;
dvddnr 4:9926288a8703 90
dvddnr 1:60fbd0835b9d 91 // Get updates -- API method getUpdates
dvddnr 1:60fbd0835b9d 92 printf("> Get updates\r\n");
dvddnr 1:60fbd0835b9d 93 g_json_io_buffer[0]=0;
dvddnr 1:60fbd0835b9d 94 if (telegram_get_update(update_id + 1) == false)
dvddnr 1:60fbd0835b9d 95 {
dvddnr 4:9926288a8703 96 printf("> ERROR telegram_get_update\r\n> Reset wifi connection\r\n");
dvddnr 4:9926288a8703 97 ES_WIFI_ResetModule(&g_es_wifi_ctx);
dvddnr 4:9926288a8703 98 wifi_connect();
dvddnr 1:60fbd0835b9d 99 continue;
dvddnr 1:60fbd0835b9d 100 }
dvddnr 1:60fbd0835b9d 101 printf("> JSON content: %s\r\n", g_json_io_buffer);
dvddnr 1:60fbd0835b9d 102
dvddnr 1:60fbd0835b9d 103 // Parsing json response
dvddnr 1:60fbd0835b9d 104 jsmn_init(&g_json_parser);
dvddnr 1:60fbd0835b9d 105 json_results = jsmn_parse(&g_json_parser,g_json_io_buffer,strlen(g_json_io_buffer),g_json_tokens,JSON_MAX_TOKENS);
dvddnr 1:60fbd0835b9d 106 if(json_results < 4)
dvddnr 1:60fbd0835b9d 107 {
dvddnr 1:60fbd0835b9d 108 printf("> ERROR invalid json response\r\n");
dvddnr 1:60fbd0835b9d 109 continue;
dvddnr 1:60fbd0835b9d 110 }
dvddnr 0:1fc46da4a976 111
dvddnr 1:60fbd0835b9d 112 /* check ok */
dvddnr 1:60fbd0835b9d 113 if( jsoneq(g_json_io_buffer,&g_json_tokens[1],"ok",JSMN_STRING) == false ) continue;
dvddnr 1:60fbd0835b9d 114 if( jsoneq(g_json_io_buffer,&g_json_tokens[2],"true",JSMN_PRIMITIVE) == false ) continue;
dvddnr 0:1fc46da4a976 115
dvddnr 1:60fbd0835b9d 116 /* fetch update id */
dvddnr 1:60fbd0835b9d 117 well_done = false;
dvddnr 1:60fbd0835b9d 118 for(int i=3;i<json_results;i++)
dvddnr 1:60fbd0835b9d 119 {
dvddnr 1:60fbd0835b9d 120 if( jsoneq(g_json_io_buffer,&g_json_tokens[i],"update_id",JSMN_STRING) == true )
dvddnr 1:60fbd0835b9d 121 {
dvddnr 1:60fbd0835b9d 122 g_json_io_buffer[g_json_tokens[i+1].end]=0;
dvddnr 1:60fbd0835b9d 123 update_id = atoi(g_json_io_buffer+g_json_tokens[i+1].start);
dvddnr 1:60fbd0835b9d 124 well_done = true;
dvddnr 1:60fbd0835b9d 125 }
dvddnr 1:60fbd0835b9d 126 }
dvddnr 0:1fc46da4a976 127
dvddnr 1:60fbd0835b9d 128 // update_id not found ?
dvddnr 1:60fbd0835b9d 129 if(well_done == false) continue;
dvddnr 0:1fc46da4a976 130
dvddnr 1:60fbd0835b9d 131 /* fetch chat id */
dvddnr 1:60fbd0835b9d 132 well_done = false;
dvddnr 1:60fbd0835b9d 133 for(int i=3;i<json_results;i++)
dvddnr 1:60fbd0835b9d 134 {
dvddnr 1:60fbd0835b9d 135 if( jsoneq(g_json_io_buffer,&g_json_tokens[i],"id",JSMN_STRING) == true )
dvddnr 1:60fbd0835b9d 136 {
dvddnr 1:60fbd0835b9d 137 g_json_io_buffer[g_json_tokens[i+1].end]=0;
dvddnr 1:60fbd0835b9d 138 chat_id = atoi(g_json_io_buffer+g_json_tokens[i+1].start);
dvddnr 1:60fbd0835b9d 139 well_done = true;
dvddnr 1:60fbd0835b9d 140 }
dvddnr 1:60fbd0835b9d 141 }
dvddnr 0:1fc46da4a976 142
dvddnr 1:60fbd0835b9d 143 // chat_id not found ?
dvddnr 1:60fbd0835b9d 144 if(well_done == false) continue;
dvddnr 0:1fc46da4a976 145
dvddnr 1:60fbd0835b9d 146 /*fetch message */
dvddnr 1:60fbd0835b9d 147 well_done = false;
dvddnr 1:60fbd0835b9d 148 g_incoming_msg[0]=0;
dvddnr 1:60fbd0835b9d 149 for(int i=3;i<json_results;i++)
dvddnr 1:60fbd0835b9d 150 {
dvddnr 1:60fbd0835b9d 151 if( jsoneq(g_json_io_buffer,&g_json_tokens[i],"text",JSMN_STRING) == true )
dvddnr 1:60fbd0835b9d 152 {
dvddnr 1:60fbd0835b9d 153 int msg_len = g_json_tokens[i+1].end - g_json_tokens[i+1].start;
dvddnr 1:60fbd0835b9d 154 if( msg_len < TELEGRAM_BOT_INCOMING_CMD_SIZE)
dvddnr 1:60fbd0835b9d 155 {
dvddnr 1:60fbd0835b9d 156 memcpy(g_incoming_msg,g_json_io_buffer+g_json_tokens[i+1].start,msg_len);
dvddnr 1:60fbd0835b9d 157 g_incoming_msg[msg_len] = 0;
dvddnr 1:60fbd0835b9d 158 well_done = true;
dvddnr 1:60fbd0835b9d 159 }
dvddnr 1:60fbd0835b9d 160 break;
dvddnr 1:60fbd0835b9d 161 }
dvddnr 1:60fbd0835b9d 162 }
dvddnr 1:60fbd0835b9d 163
dvddnr 1:60fbd0835b9d 164 printf("> Incoming msg: %s\n\r",g_incoming_msg);
dvddnr 1:60fbd0835b9d 165
dvddnr 0:1fc46da4a976 166
dvddnr 1:60fbd0835b9d 167 // parse incoming message
dvddnr 1:60fbd0835b9d 168 if( strstr(g_incoming_msg,"Temperature") != NULL)
dvddnr 1:60fbd0835b9d 169 {
dvddnr 1:60fbd0835b9d 170 snprintf(g_json_io_buffer,TBOT_JSON_BUFFER_SIZE,"{\"chat_id\":%d,\"text\":\"Temperature %.2f degC\",\"reply_markup\":%s}",
dvddnr 1:60fbd0835b9d 171 chat_id,BSP_TSENSOR_ReadTemp(),TELEGRAM_CUSTOM_KEYBOARD);
dvddnr 1:60fbd0835b9d 172 }
dvddnr 1:60fbd0835b9d 173 else if( strstr(g_incoming_msg,"Humidity") != NULL)
dvddnr 1:60fbd0835b9d 174 {
dvddnr 1:60fbd0835b9d 175 snprintf(g_json_io_buffer,TBOT_JSON_BUFFER_SIZE,"{\"chat_id\":%d,\"text\":\"Humidity %.2f %%\",\"reply_markup\":%s}",
dvddnr 1:60fbd0835b9d 176 chat_id,BSP_HSENSOR_ReadHumidity(),TELEGRAM_CUSTOM_KEYBOARD);
dvddnr 1:60fbd0835b9d 177 }
dvddnr 1:60fbd0835b9d 178 else if( strstr(g_incoming_msg,"Pressure") != NULL)
dvddnr 1:60fbd0835b9d 179 {
dvddnr 1:60fbd0835b9d 180 snprintf(g_json_io_buffer,TBOT_JSON_BUFFER_SIZE,"{\"chat_id\":%d,\"text\":\"Pressure %.2f mBar\",\"reply_markup\":%s}",
dvddnr 1:60fbd0835b9d 181 chat_id,BSP_PSENSOR_ReadPressure(),TELEGRAM_CUSTOM_KEYBOARD);
dvddnr 1:60fbd0835b9d 182 }
dvddnr 1:60fbd0835b9d 183 else
dvddnr 1:60fbd0835b9d 184 {
dvddnr 1:60fbd0835b9d 185 snprintf(g_json_io_buffer,TBOT_JSON_BUFFER_SIZE,"{\"chat_id\":%d,\"text\":\"Available commands\",\"reply_markup\":%s}",
dvddnr 1:60fbd0835b9d 186 chat_id,TELEGRAM_CUSTOM_KEYBOARD);
dvddnr 1:60fbd0835b9d 187 }
dvddnr 1:60fbd0835b9d 188
dvddnr 1:60fbd0835b9d 189 if( telegram_send_message() == false)
dvddnr 1:60fbd0835b9d 190 {
dvddnr 1:60fbd0835b9d 191 printf("> ERROR telegram_send_message\r\n");
dvddnr 1:60fbd0835b9d 192 continue;
dvddnr 1:60fbd0835b9d 193 }
dvddnr 1:60fbd0835b9d 194
dvddnr 1:60fbd0835b9d 195 jsmn_init(&g_json_parser);
dvddnr 1:60fbd0835b9d 196 json_results = jsmn_parse(&g_json_parser,g_json_io_buffer,strlen(g_json_io_buffer),g_json_tokens,JSON_MAX_TOKENS);
dvddnr 1:60fbd0835b9d 197 if(json_results < 4)
dvddnr 1:60fbd0835b9d 198 {
dvddnr 1:60fbd0835b9d 199 printf("> ERROR invalid json response\r\n");
dvddnr 1:60fbd0835b9d 200 continue;
dvddnr 1:60fbd0835b9d 201 }
dvddnr 0:1fc46da4a976 202
dvddnr 1:60fbd0835b9d 203 /* check ok */
dvddnr 1:60fbd0835b9d 204 if( jsoneq(g_json_io_buffer,&g_json_tokens[1],"ok",JSMN_STRING) == false ) continue;
dvddnr 1:60fbd0835b9d 205 if( jsoneq(g_json_io_buffer,&g_json_tokens[2],"true",JSMN_PRIMITIVE) == false ) continue;
dvddnr 0:1fc46da4a976 206
dvddnr 0:1fc46da4a976 207 }
dvddnr 0:1fc46da4a976 208 }
dvddnr 1:60fbd0835b9d 209
dvddnr 1:60fbd0835b9d 210
dvddnr 1:60fbd0835b9d 211
dvddnr 1:60fbd0835b9d 212
dvddnr 1:60fbd0835b9d 213 /*****************************************************************************************
dvddnr 1:60fbd0835b9d 214 *
dvddnr 1:60fbd0835b9d 215 *
dvddnr 1:60fbd0835b9d 216 * telegram rest api
dvddnr 1:60fbd0835b9d 217 *
dvddnr 1:60fbd0835b9d 218 *
dvddnr 1:60fbd0835b9d 219 ******************************************************************************************/
dvddnr 1:60fbd0835b9d 220
dvddnr 1:60fbd0835b9d 221
dvddnr 1:60fbd0835b9d 222 bool telegram_get_update(int32_t update_id)
dvddnr 1:60fbd0835b9d 223 {
dvddnr 1:60fbd0835b9d 224 /* prepare http get header */
dvddnr 1:60fbd0835b9d 225 snprintf(g_http_io_buffer, ES_WIFI_PAYLOAD_SIZE, TELEGRAM_GETUPDATES, update_id);
dvddnr 1:60fbd0835b9d 226 return telegram_https_get(false);
dvddnr 1:60fbd0835b9d 227 }
dvddnr 1:60fbd0835b9d 228
dvddnr 1:60fbd0835b9d 229
dvddnr 1:60fbd0835b9d 230
dvddnr 1:60fbd0835b9d 231 bool telegram_send_message()
dvddnr 1:60fbd0835b9d 232 {
dvddnr 1:60fbd0835b9d 233 /* prepare http get header */
dvddnr 1:60fbd0835b9d 234 snprintf(g_http_io_buffer, ES_WIFI_PAYLOAD_SIZE, TELEGRAM_SENDMESSAGE, strlen(g_json_io_buffer));
dvddnr 1:60fbd0835b9d 235 return telegram_https_get(true);
dvddnr 1:60fbd0835b9d 236 }
dvddnr 1:60fbd0835b9d 237
dvddnr 1:60fbd0835b9d 238
dvddnr 1:60fbd0835b9d 239 bool telegram_https_get(bool has_json_payload)
dvddnr 1:60fbd0835b9d 240 {
dvddnr 1:60fbd0835b9d 241 uint16_t io_s, tx_s;
dvddnr 1:60fbd0835b9d 242 ES_WIFI_Status_t io_status;
dvddnr 1:60fbd0835b9d 243 bool http_ok;
dvddnr 1:60fbd0835b9d 244 int32_t http_content_len;
dvddnr 1:60fbd0835b9d 245 char *http_content_pivot;
dvddnr 1:60fbd0835b9d 246 uint16_t content_chunk_size;
dvddnr 1:60fbd0835b9d 247 bool ret_val = false;
dvddnr 1:60fbd0835b9d 248 static uint8_t socket=0;
dvddnr 1:60fbd0835b9d 249
dvddnr 1:60fbd0835b9d 250 /* open socket */
dvddnr 1:60fbd0835b9d 251 socket++;
dvddnr 1:60fbd0835b9d 252 if(socket==4) socket=0;
dvddnr 1:60fbd0835b9d 253 io_status = ES_WIFI_STATUS_ERROR;
dvddnr 1:60fbd0835b9d 254 for (int i = 0; i < CONNECTION_TRIAL_MAX; i++)
dvddnr 1:60fbd0835b9d 255 {
dvddnr 1:60fbd0835b9d 256 printf("> Open SSL connection ...\r\n");
dvddnr 1:60fbd0835b9d 257 if (open_tcpssl(socket, 0, 443, "api.telegram.org"))
dvddnr 1:60fbd0835b9d 258 {
dvddnr 1:60fbd0835b9d 259 printf("> SSL Connection opened successfully.\r\n");
dvddnr 1:60fbd0835b9d 260 io_status = ES_WIFI_STATUS_OK;
dvddnr 1:60fbd0835b9d 261 break;
dvddnr 1:60fbd0835b9d 262 }
dvddnr 1:60fbd0835b9d 263 }
dvddnr 1:60fbd0835b9d 264
dvddnr 1:60fbd0835b9d 265 if (io_status != ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 266 {
dvddnr 1:60fbd0835b9d 267 printf("> socket open error.\r\n");
dvddnr 1:60fbd0835b9d 268 return false;
dvddnr 1:60fbd0835b9d 269 }
dvddnr 1:60fbd0835b9d 270
dvddnr 1:60fbd0835b9d 271
dvddnr 1:60fbd0835b9d 272 /* send http get header */
dvddnr 1:60fbd0835b9d 273 tx_s = strlen(g_http_io_buffer);
dvddnr 1:60fbd0835b9d 274 // printf(g_http_io_buffer);
dvddnr 1:60fbd0835b9d 275 io_s = 0;
dvddnr 1:60fbd0835b9d 276 if (ES_WIFI_SendData(&g_es_wifi_ctx, socket, (uint8_t *)g_http_io_buffer, tx_s, &io_s, WIFI_WRITE_TIMEOUT) != ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 277 {
dvddnr 1:60fbd0835b9d 278 printf("> ERROR : CANNOT send data\r\n");
dvddnr 1:60fbd0835b9d 279 goto happy_end;
dvddnr 1:60fbd0835b9d 280 }
dvddnr 1:60fbd0835b9d 281 if (io_s != tx_s)
dvddnr 1:60fbd0835b9d 282 {
dvddnr 1:60fbd0835b9d 283 printf("> ERROR Send %d of %d.\r\n", io_s, tx_s);
dvddnr 1:60fbd0835b9d 284 goto happy_end;
dvddnr 1:60fbd0835b9d 285 }
dvddnr 1:60fbd0835b9d 286
dvddnr 1:60fbd0835b9d 287 /* send json payload */
dvddnr 1:60fbd0835b9d 288 if(has_json_payload)
dvddnr 1:60fbd0835b9d 289 {
dvddnr 1:60fbd0835b9d 290 tx_s = strlen(g_json_io_buffer);
dvddnr 1:60fbd0835b9d 291 io_s = 0;
dvddnr 1:60fbd0835b9d 292 if (ES_WIFI_SendData(&g_es_wifi_ctx, socket, (uint8_t *)g_json_io_buffer, tx_s, &io_s, WIFI_WRITE_TIMEOUT) != ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 293 {
dvddnr 1:60fbd0835b9d 294 printf("> ERROR : CANNOT send data\r\n");
dvddnr 1:60fbd0835b9d 295 goto happy_end;
dvddnr 1:60fbd0835b9d 296 }
dvddnr 1:60fbd0835b9d 297 if (io_s != tx_s)
dvddnr 1:60fbd0835b9d 298 {
dvddnr 1:60fbd0835b9d 299 printf("> ERROR Send %d of %d.\r\n", io_s, tx_s);
dvddnr 1:60fbd0835b9d 300 goto happy_end;
dvddnr 1:60fbd0835b9d 301 }
dvddnr 1:60fbd0835b9d 302 }
dvddnr 1:60fbd0835b9d 303
dvddnr 1:60fbd0835b9d 304 /* fetch response */
dvddnr 1:60fbd0835b9d 305 io_status = ES_WIFI_ReceiveData(&g_es_wifi_ctx, socket, (uint8_t *)g_http_io_buffer, ES_WIFI_PAYLOAD_SIZE, &io_s, WIFI_READ_TIMEOUT);
dvddnr 1:60fbd0835b9d 306 if (io_status != ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 307 {
dvddnr 1:60fbd0835b9d 308 printf("> ERROR : socket receive data\r\n");
dvddnr 1:60fbd0835b9d 309 goto happy_end;
dvddnr 1:60fbd0835b9d 310 }
dvddnr 1:60fbd0835b9d 311
dvddnr 1:60fbd0835b9d 312 /* parse http response for the status code and content len */
dvddnr 1:60fbd0835b9d 313 http_ok = false;
dvddnr 1:60fbd0835b9d 314 http_content_len = 0;
dvddnr 1:60fbd0835b9d 315 g_http_io_buffer[io_s] = 0;
dvddnr 1:60fbd0835b9d 316 if (io_s == 0 || http_parse_response((char *)g_http_io_buffer, io_s, &http_ok, (uint16_t *)&http_content_len) == false)
dvddnr 1:60fbd0835b9d 317 {
dvddnr 1:60fbd0835b9d 318 printf("< Invalid response\r\n");
dvddnr 1:60fbd0835b9d 319 for (int i = 0; i < io_s; i++)
dvddnr 1:60fbd0835b9d 320 printf("%c", g_http_io_buffer[i]);
dvddnr 1:60fbd0835b9d 321 printf("> Invalid response\r\n");
dvddnr 1:60fbd0835b9d 322 goto happy_end;
dvddnr 1:60fbd0835b9d 323 }
dvddnr 1:60fbd0835b9d 324 printf("HTTP OK = %d Content len = %d\r\n", http_ok, http_content_len);
dvddnr 1:60fbd0835b9d 325
dvddnr 1:60fbd0835b9d 326 /* fetch json response */
dvddnr 1:60fbd0835b9d 327 http_content_pivot = strstr((char *)g_http_io_buffer, "\r\n\r\n");
dvddnr 1:60fbd0835b9d 328 if (http_content_pivot != NULL)
dvddnr 1:60fbd0835b9d 329 {
dvddnr 1:60fbd0835b9d 330 http_content_pivot += 4;
dvddnr 1:60fbd0835b9d 331 content_chunk_size = strlen(http_content_pivot);
dvddnr 1:60fbd0835b9d 332 if (content_chunk_size < TBOT_JSON_BUFFER_SIZE)
dvddnr 1:60fbd0835b9d 333 strcpy(g_json_io_buffer, http_content_pivot);
dvddnr 1:60fbd0835b9d 334 http_content_len -= content_chunk_size;
dvddnr 1:60fbd0835b9d 335 }
dvddnr 1:60fbd0835b9d 336 else
dvddnr 1:60fbd0835b9d 337 {
dvddnr 1:60fbd0835b9d 338 printf("< Invalid response\r\n");
dvddnr 1:60fbd0835b9d 339 for (int i = 0; i < io_s; i++)
dvddnr 1:60fbd0835b9d 340 printf("%c", g_http_io_buffer[i]);
dvddnr 1:60fbd0835b9d 341 printf("> Invalid response\r\n");
dvddnr 1:60fbd0835b9d 342 goto happy_end;
dvddnr 1:60fbd0835b9d 343 }
dvddnr 1:60fbd0835b9d 344
dvddnr 1:60fbd0835b9d 345 /* continue to fetch json chunck */
dvddnr 1:60fbd0835b9d 346 while (http_content_len > 0)
dvddnr 1:60fbd0835b9d 347 {
dvddnr 1:60fbd0835b9d 348 if (ES_WIFI_ReceiveData2(&g_es_wifi_ctx, (uint8_t *)g_http_io_buffer, ES_WIFI_PAYLOAD_SIZE, &io_s) != ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 349 {
dvddnr 1:60fbd0835b9d 350 printf("> ERROR : socket receive data\r\n");
dvddnr 1:60fbd0835b9d 351 goto happy_end;
dvddnr 1:60fbd0835b9d 352 }
dvddnr 1:60fbd0835b9d 353 g_http_io_buffer[io_s] = 0;
dvddnr 1:60fbd0835b9d 354 http_content_len -= io_s;
dvddnr 1:60fbd0835b9d 355 if (http_content_len < 0 || io_s == 0)
dvddnr 1:60fbd0835b9d 356 {
dvddnr 1:60fbd0835b9d 357 printf("> ERROR : http content len overflow\r\n");
dvddnr 1:60fbd0835b9d 358 goto happy_end;
dvddnr 1:60fbd0835b9d 359 }
dvddnr 1:60fbd0835b9d 360 strcat(g_json_io_buffer, g_http_io_buffer);
dvddnr 1:60fbd0835b9d 361 }
dvddnr 1:60fbd0835b9d 362 ret_val = http_ok;
dvddnr 1:60fbd0835b9d 363
dvddnr 1:60fbd0835b9d 364 happy_end:
dvddnr 1:60fbd0835b9d 365 printf("> Close SSL connection...\r\n");
dvddnr 1:60fbd0835b9d 366 close_tcpssl(socket);
dvddnr 1:60fbd0835b9d 367 printf("> done.\r\n");
dvddnr 1:60fbd0835b9d 368 return ret_val;
dvddnr 1:60fbd0835b9d 369 }
dvddnr 1:60fbd0835b9d 370
dvddnr 1:60fbd0835b9d 371
dvddnr 1:60fbd0835b9d 372
dvddnr 1:60fbd0835b9d 373
dvddnr 1:60fbd0835b9d 374 /*****************************************************************************************
dvddnr 1:60fbd0835b9d 375 *
dvddnr 1:60fbd0835b9d 376 *
dvddnr 1:60fbd0835b9d 377 * JSON parsing
dvddnr 1:60fbd0835b9d 378 *
dvddnr 1:60fbd0835b9d 379 *
dvddnr 1:60fbd0835b9d 380 ******************************************************************************************/
dvddnr 1:60fbd0835b9d 381
dvddnr 1:60fbd0835b9d 382 bool jsoneq(const char *json, jsmntok_t *tok, const char *s,jsmntype_t type)
dvddnr 1:60fbd0835b9d 383 {
dvddnr 1:60fbd0835b9d 384 if (tok->type == type && (int) strlen(s) == tok->end - tok->start &&
dvddnr 1:60fbd0835b9d 385 strncmp(json + tok->start, s, tok->end - tok->start) == 0) {
dvddnr 1:60fbd0835b9d 386 return true;
dvddnr 1:60fbd0835b9d 387 }
dvddnr 1:60fbd0835b9d 388 return false;
dvddnr 1:60fbd0835b9d 389 }
dvddnr 1:60fbd0835b9d 390
dvddnr 1:60fbd0835b9d 391 /*****************************************************************************************
dvddnr 1:60fbd0835b9d 392 *
dvddnr 1:60fbd0835b9d 393 *
dvddnr 1:60fbd0835b9d 394 * HTTP parsing
dvddnr 1:60fbd0835b9d 395 *
dvddnr 1:60fbd0835b9d 396 *
dvddnr 1:60fbd0835b9d 397 ******************************************************************************************/
dvddnr 1:60fbd0835b9d 398
dvddnr 1:60fbd0835b9d 399 const char HTTP_200OK[] = "200 OK\r\n";
dvddnr 1:60fbd0835b9d 400 const char HTTP_CL[] = "Content-Length: ";
dvddnr 1:60fbd0835b9d 401 bool http_parse_response(char *http_chunk, uint16_t http_chunk_len, bool *status_code_ok, uint16_t *content_len)
dvddnr 1:60fbd0835b9d 402 {
dvddnr 1:60fbd0835b9d 403 char *line_pivot, *key_pivot;
dvddnr 1:60fbd0835b9d 404
dvddnr 1:60fbd0835b9d 405 line_pivot = strstr(http_chunk, "\r\n");
dvddnr 1:60fbd0835b9d 406 if (line_pivot == NULL)
dvddnr 1:60fbd0835b9d 407 return false;
dvddnr 1:60fbd0835b9d 408
dvddnr 1:60fbd0835b9d 409 key_pivot = strstr(http_chunk, HTTP_200OK);
dvddnr 1:60fbd0835b9d 410 if (key_pivot == NULL)
dvddnr 1:60fbd0835b9d 411 return false;
dvddnr 1:60fbd0835b9d 412
dvddnr 1:60fbd0835b9d 413 if (key_pivot < line_pivot)
dvddnr 1:60fbd0835b9d 414 *status_code_ok = true;
dvddnr 1:60fbd0835b9d 415 else
dvddnr 1:60fbd0835b9d 416 *status_code_ok = false;
dvddnr 1:60fbd0835b9d 417
dvddnr 1:60fbd0835b9d 418 while (1)
dvddnr 1:60fbd0835b9d 419 {
dvddnr 1:60fbd0835b9d 420 line_pivot = strstr(line_pivot + 2, "\r\n");
dvddnr 1:60fbd0835b9d 421 if (line_pivot == NULL)
dvddnr 1:60fbd0835b9d 422 break;
dvddnr 1:60fbd0835b9d 423 key_pivot = strstr(http_chunk, HTTP_CL);
dvddnr 1:60fbd0835b9d 424 if (key_pivot == NULL)
dvddnr 1:60fbd0835b9d 425 continue;
dvddnr 1:60fbd0835b9d 426 if (key_pivot < line_pivot)
dvddnr 1:60fbd0835b9d 427 {
dvddnr 1:60fbd0835b9d 428 key_pivot += strlen(HTTP_CL);
dvddnr 1:60fbd0835b9d 429 *content_len = atoi((char const *)key_pivot);
dvddnr 1:60fbd0835b9d 430 return true;
dvddnr 1:60fbd0835b9d 431 }
dvddnr 1:60fbd0835b9d 432 }
dvddnr 1:60fbd0835b9d 433
dvddnr 1:60fbd0835b9d 434 return false;
dvddnr 1:60fbd0835b9d 435 }
dvddnr 1:60fbd0835b9d 436
dvddnr 1:60fbd0835b9d 437 /*****************************************************************************************
dvddnr 1:60fbd0835b9d 438 *
dvddnr 1:60fbd0835b9d 439 *
dvddnr 1:60fbd0835b9d 440 * WIFI
dvddnr 1:60fbd0835b9d 441 *
dvddnr 1:60fbd0835b9d 442 *
dvddnr 1:60fbd0835b9d 443 ******************************************************************************************/
dvddnr 1:60fbd0835b9d 444
dvddnr 1:60fbd0835b9d 445 bool wifi_connect(void)
dvddnr 1:60fbd0835b9d 446 {
dvddnr 1:60fbd0835b9d 447 /* HW setup */
dvddnr 1:60fbd0835b9d 448 if (ES_WIFI_RegisterBusIO(&g_es_wifi_ctx,
dvddnr 1:60fbd0835b9d 449 SPI_WIFI_Init,
dvddnr 1:60fbd0835b9d 450 SPI_WIFI_DeInit,
dvddnr 1:60fbd0835b9d 451 SPI_WIFI_Delay,
dvddnr 1:60fbd0835b9d 452 SPI_WIFI_SendData,
dvddnr 1:60fbd0835b9d 453 SPI_WIFI_ReceiveData) != ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 454 return false;
dvddnr 1:60fbd0835b9d 455
dvddnr 1:60fbd0835b9d 456 if (ES_WIFI_Init(&g_es_wifi_ctx) != ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 457 return false;
dvddnr 1:60fbd0835b9d 458 ES_WIFI_ResetToFactoryDefault(&g_es_wifi_ctx);
dvddnr 1:60fbd0835b9d 459
dvddnr 1:60fbd0835b9d 460 /* JOIN AP */
dvddnr 1:60fbd0835b9d 461 for (int i = 0; i < CONNECTION_TRIAL_MAX; i++)
dvddnr 1:60fbd0835b9d 462 {
dvddnr 1:60fbd0835b9d 463 if (ES_WIFI_Connect(&g_es_wifi_ctx, WIFI_SSID, WIFI_PASSWORD, ES_WIFI_SEC_WPA_WPA2) == ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 464 {
dvddnr 1:60fbd0835b9d 465 if (ES_WIFI_GetNetworkSettings(&g_es_wifi_ctx) == ES_WIFI_STATUS_OK)
dvddnr 1:60fbd0835b9d 466 return true;
dvddnr 1:60fbd0835b9d 467 else
dvddnr 1:60fbd0835b9d 468 return false;
dvddnr 1:60fbd0835b9d 469 }
dvddnr 1:60fbd0835b9d 470 wait_ms(1000);
dvddnr 1:60fbd0835b9d 471 }
dvddnr 1:60fbd0835b9d 472
dvddnr 1:60fbd0835b9d 473 return false;
dvddnr 1:60fbd0835b9d 474 }
dvddnr 1:60fbd0835b9d 475
dvddnr 1:60fbd0835b9d 476 bool open_tcpssl(uint8_t socket, uint16_t local_port, uint16_t remote_port, char *domain_name)
dvddnr 1:60fbd0835b9d 477 {
dvddnr 1:60fbd0835b9d 478 ES_WIFI_Conn_t conn;
dvddnr 1:60fbd0835b9d 479
dvddnr 1:60fbd0835b9d 480 conn.Number = socket;
dvddnr 1:60fbd0835b9d 481 conn.RemotePort = remote_port;
dvddnr 1:60fbd0835b9d 482 conn.LocalPort = local_port;
dvddnr 1:60fbd0835b9d 483 conn.Type = ES_WIFI_TCP_SSL_CONNECTION;
dvddnr 1:60fbd0835b9d 484 strncpy((char *)conn.RemoteIP, domain_name, sizeof(conn.RemoteIP));
dvddnr 1:60fbd0835b9d 485 return (ES_WIFI_StartClientConnection(&g_es_wifi_ctx, &conn) == ES_WIFI_STATUS_OK) ? true : false;
dvddnr 1:60fbd0835b9d 486 }
dvddnr 1:60fbd0835b9d 487
dvddnr 1:60fbd0835b9d 488 bool close_tcpssl(uint32_t socket)
dvddnr 1:60fbd0835b9d 489 {
dvddnr 1:60fbd0835b9d 490 ES_WIFI_Conn_t conn;
dvddnr 1:60fbd0835b9d 491 conn.Number = socket;
dvddnr 1:60fbd0835b9d 492
dvddnr 1:60fbd0835b9d 493 return (ES_WIFI_StopClientConnection(&g_es_wifi_ctx, &conn)== ES_WIFI_STATUS_OK);
dvddnr 1:60fbd0835b9d 494 }
dvddnr 1:60fbd0835b9d 495
dvddnr 1:60fbd0835b9d 496