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@5:f204a47aa813, 2018-01-26 (annotated)

Committer:
dvddnr
Date:
Fri Jan 26 14:59:14 2018 +0000
Revision:
5:f204a47aa813
Parent:
4:9926288a8703
Child:
6:94fc61e1cf40
reworked http request; added RTC initialization using now.httpbin.org free web service

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