1279 lines
47 KiB
C
1279 lines
47 KiB
C
/*
|
|
* This file is part of the MicroPython project, http://micropython.org/
|
|
*
|
|
* The MIT License (MIT)
|
|
*
|
|
* Copyright (c) 2022 Scott Shawcroft for Adafruit Industries
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
* of this software and associated documentation files (the "Software"), to deal
|
|
* in the Software without restriction, including without limitation the rights
|
|
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
* copies of the Software, and to permit persons to whom the Software is
|
|
* furnished to do so, subject to the following conditions:
|
|
*
|
|
* The above copyright notice and this permission notice shall be included in
|
|
* all copies or substantial portions of the Software.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
|
* THE SOFTWARE.
|
|
*/
|
|
|
|
#include <string.h>
|
|
|
|
#include "extmod/vfs.h"
|
|
#include "extmod/vfs_fat.h"
|
|
#include "genhdr/mpversion.h"
|
|
#include "py/mpstate.h"
|
|
#include "py/stackctrl.h"
|
|
|
|
#include "shared-bindings/wifi/Radio.h"
|
|
#include "shared-module/storage/__init__.h"
|
|
#include "shared/timeutils/timeutils.h"
|
|
#include "supervisor/fatfs_port.h"
|
|
#include "supervisor/shared/reload.h"
|
|
#include "supervisor/shared/translate/translate.h"
|
|
#include "supervisor/shared/web_workflow/web_workflow.h"
|
|
#include "supervisor/shared/web_workflow/websocket.h"
|
|
#include "supervisor/usb.h"
|
|
|
|
#include "shared-bindings/hashlib/__init__.h"
|
|
#include "shared-bindings/hashlib/Hash.h"
|
|
#include "shared-bindings/mdns/RemoteService.h"
|
|
#include "shared-bindings/mdns/Server.h"
|
|
#include "shared-bindings/socketpool/__init__.h"
|
|
#include "shared-bindings/socketpool/Socket.h"
|
|
#include "shared-bindings/socketpool/SocketPool.h"
|
|
|
|
#if CIRCUITPY_WIFI
|
|
#include "shared-bindings/wifi/__init__.h"
|
|
#endif
|
|
|
|
#if CIRCUITPY_DOTENV
|
|
#include "shared-module/dotenv/__init__.h"
|
|
#endif
|
|
|
|
// TODO: Remove ESP specific stuff. For now, it is useful as we refine the server.
|
|
#include "esp_log.h"
|
|
|
|
static const char *TAG = "CP webserver";
|
|
|
|
enum request_state {
|
|
STATE_METHOD,
|
|
STATE_PATH,
|
|
STATE_VERSION,
|
|
STATE_HEADER_KEY,
|
|
STATE_HEADER_VALUE,
|
|
STATE_BODY
|
|
};
|
|
|
|
typedef struct {
|
|
enum request_state state;
|
|
char method[8];
|
|
char path[256];
|
|
char header_key[64];
|
|
char header_value[64];
|
|
// We store the origin so we can reply back with it.
|
|
char origin[64];
|
|
size_t content_length;
|
|
size_t offset;
|
|
uint64_t timestamp_ms;
|
|
bool redirect;
|
|
bool done;
|
|
bool in_progress;
|
|
bool authenticated;
|
|
bool expect;
|
|
bool json;
|
|
bool websocket;
|
|
uint32_t websocket_version;
|
|
// RFC6455 for websockets says this header should be 24 base64 characters long.
|
|
char websocket_key[24 + 1];
|
|
} _request;
|
|
|
|
static wifi_radio_error_t wifi_status = WIFI_RADIO_ERROR_NONE;
|
|
|
|
static mdns_server_obj_t mdns;
|
|
|
|
static socketpool_socketpool_obj_t pool;
|
|
static socketpool_socket_obj_t listening;
|
|
static socketpool_socket_obj_t active;
|
|
|
|
static _request active_request;
|
|
|
|
static char _api_password[64];
|
|
|
|
static uint32_t _encoded_ip = 0;
|
|
static char _our_ip_encoded[4 * 4];
|
|
|
|
// in_len is the number of bytes to encode. out_len is the number of bytes we
|
|
// have to do it.
|
|
static bool _base64_in_place(char *buf, size_t in_len, size_t out_len) {
|
|
size_t triples = (((in_len - 1) / 3) + 1);
|
|
size_t encoded_len = triples * 4;
|
|
if (encoded_len + 1 > out_len) {
|
|
return false;
|
|
}
|
|
|
|
// First pass, we convert input buffer to numeric base 64 values
|
|
char *in = buf + (triples - 1) * 3;
|
|
char *out = buf + (triples - 1) * 4;
|
|
int r = in_len % 3;
|
|
int partial = 0;
|
|
if (r != 0) {
|
|
out[3] = 64;
|
|
if (r == 2) {
|
|
out[2] = (in[1] & 0x0F) << 2;
|
|
out[1] = (in[0] & 0x03) << 4 | (in[1] & 0xF0) >> 4;
|
|
} else {
|
|
out[2] = 64;
|
|
out[1] = (in[0] & 0x03) << 4;
|
|
}
|
|
out[0] = (in[0] & 0xFC) >> 2;
|
|
in -= 3;
|
|
out -= 4;
|
|
partial = 1;
|
|
}
|
|
buf[encoded_len] = '\0';
|
|
for (size_t i = 0; i < triples - partial; i++) {
|
|
out[3] = in[2] & 0x3F;
|
|
out[2] = (in[1] & 0x0F) << 2 | (in[2] & 0xC0) >> 6;
|
|
out[1] = (in[0] & 0x03) << 4 | (in[1] & 0xF0) >> 4;
|
|
out[0] = (in[0] & 0xFC) >> 2;
|
|
in -= 3;
|
|
out -= 4;
|
|
}
|
|
|
|
// Second pass, we convert number base 64 values to actual base64 ascii encoding
|
|
out = buf;
|
|
for (mp_uint_t j = 0; j < encoded_len; j++) {
|
|
if (*out < 26) {
|
|
*out += 'A';
|
|
} else if (*out < 52) {
|
|
*out += 'a' - 26;
|
|
} else if (*out < 62) {
|
|
*out += '0' - 52;
|
|
} else if (*out == 62) {
|
|
*out = '+';
|
|
} else if (*out == 63) {
|
|
*out = '/';
|
|
} else {
|
|
*out = '=';
|
|
}
|
|
out++;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
|
|
void supervisor_web_workflow_status(void) {
|
|
serial_write_compressed(translate("Wi-Fi: "));
|
|
if (common_hal_wifi_radio_get_enabled(&common_hal_wifi_radio_obj)) {
|
|
uint32_t ipv4_address = wifi_radio_get_ipv4_address(&common_hal_wifi_radio_obj);
|
|
if (wifi_status == WIFI_RADIO_ERROR_AUTH_EXPIRE ||
|
|
wifi_status == WIFI_RADIO_ERROR_AUTH_FAIL) {
|
|
serial_write_compressed(translate("Authentication failure"));
|
|
} else if (wifi_status != WIFI_RADIO_ERROR_NONE) {
|
|
mp_printf(&mp_plat_print, "%d", wifi_status);
|
|
} else if (ipv4_address == 0) {
|
|
serial_write_compressed(translate("No IP"));
|
|
} else {
|
|
if (_encoded_ip != ipv4_address) {
|
|
uint8_t *octets = (uint8_t *)&ipv4_address;
|
|
snprintf(_our_ip_encoded, sizeof(_our_ip_encoded), "%d.%d.%d.%d", octets[0], octets[1], octets[2], octets[3]);
|
|
_encoded_ip = ipv4_address;
|
|
}
|
|
|
|
mp_printf(&mp_plat_print, "%s", _our_ip_encoded);
|
|
// TODO: Use these unicode to show signal strength: ▂▄▆█
|
|
}
|
|
} else {
|
|
serial_write_compressed(translate("off"));
|
|
}
|
|
}
|
|
|
|
void supervisor_start_web_workflow(void) {
|
|
#if CIRCUITPY_WEB_WORKFLOW && CIRCUITPY_WIFI
|
|
|
|
if (common_hal_wifi_radio_get_enabled(&common_hal_wifi_radio_obj) &&
|
|
wifi_radio_get_ipv4_address(&common_hal_wifi_radio_obj) != 0) {
|
|
// Already started.
|
|
return;
|
|
}
|
|
|
|
char ssid[33];
|
|
char password[64];
|
|
mp_int_t ssid_len = 0;
|
|
mp_int_t password_len = 0;
|
|
|
|
#if CIRCUITPY_DOTENV
|
|
ssid_len = dotenv_get_key("/.env", "CIRCUITPY_WIFI_SSID", ssid, sizeof(ssid) - 1);
|
|
password_len = dotenv_get_key("/.env", "CIRCUITPY_WIFI_PASSWORD", password, sizeof(password) - 1);
|
|
#endif
|
|
if (ssid_len <= 0 || (size_t)ssid_len >= sizeof(ssid) ||
|
|
password_len <= 0 || (size_t)password_len >= sizeof(password)) {
|
|
return;
|
|
}
|
|
common_hal_wifi_init(false);
|
|
common_hal_wifi_radio_set_enabled(&common_hal_wifi_radio_obj, true);
|
|
|
|
// TODO: Do our own scan so that we can find the channel we want before calling connect.
|
|
// Otherwise, connect will do a full slow scan to pick the best AP.
|
|
|
|
// NUL terminate the strings because dotenv doesn't.
|
|
ssid[ssid_len] = '\0';
|
|
password[password_len] = '\0';
|
|
wifi_status = common_hal_wifi_radio_connect(
|
|
&common_hal_wifi_radio_obj, (uint8_t *)ssid, ssid_len, (uint8_t *)password, password_len,
|
|
0, 0.1, NULL, 0);
|
|
|
|
if (wifi_status != WIFI_RADIO_ERROR_NONE) {
|
|
common_hal_wifi_radio_set_enabled(&common_hal_wifi_radio_obj, false);
|
|
return;
|
|
}
|
|
|
|
mdns_server_construct(&mdns, true);
|
|
common_hal_mdns_server_set_instance_name(&mdns, MICROPY_HW_BOARD_NAME);
|
|
common_hal_mdns_server_advertise_service(&mdns, "_circuitpython", "_tcp", 80);
|
|
|
|
pool.base.type = &socketpool_socketpool_type;
|
|
common_hal_socketpool_socketpool_construct(&pool, &common_hal_wifi_radio_obj);
|
|
|
|
ESP_LOGI(TAG, "Starting web workflow");
|
|
listening.base.type = &socketpool_socket_type;
|
|
socketpool_socket(&pool, SOCKETPOOL_AF_INET, SOCKETPOOL_SOCK_STREAM, &listening);
|
|
common_hal_socketpool_socket_settimeout(&listening, 0);
|
|
// Bind to any ip.
|
|
// TODO: Make this port .env configurable.
|
|
common_hal_socketpool_socket_bind(&listening, "", 0, 80);
|
|
common_hal_socketpool_socket_listen(&listening, 1);
|
|
|
|
mp_int_t api_password_len = dotenv_get_key("/.env", "CIRCUITPY_WEB_API_PASSWORD", _api_password + 1, sizeof(_api_password) - 2);
|
|
if (api_password_len > 0) {
|
|
_api_password[0] = ':';
|
|
_api_password[api_password_len + 1] = '\0';
|
|
_base64_in_place(_api_password, api_password_len + 1, sizeof(_api_password));
|
|
}
|
|
|
|
active.base.type = &socketpool_socket_type;
|
|
active.num = -1;
|
|
active.connected = false;
|
|
|
|
websocket_init();
|
|
|
|
// TODO:
|
|
// GET /cp/serial.txt
|
|
// - Most recent 1k of serial output.
|
|
// GET /edit/
|
|
// - Super basic editor
|
|
#endif
|
|
}
|
|
|
|
static void _send_raw(socketpool_socket_obj_t *socket, const uint8_t *buf, int len) {
|
|
int sent = -EAGAIN;
|
|
while (sent == -EAGAIN && common_hal_socketpool_socket_get_connected(socket)) {
|
|
sent = socketpool_socket_send(socket, buf, len);
|
|
}
|
|
if (sent < len) {
|
|
ESP_LOGE(TAG, "short send %d %d", sent, len);
|
|
}
|
|
}
|
|
|
|
static void _send_str(socketpool_socket_obj_t *socket, const char *str) {
|
|
_send_raw(socket, (const uint8_t *)str, strlen(str));
|
|
}
|
|
|
|
// The last argument must be NULL! Otherwise, it won't stop.
|
|
static void _send_strs(socketpool_socket_obj_t *socket, ...) {
|
|
va_list ap;
|
|
va_start(ap, socket);
|
|
|
|
const char *str = va_arg(ap, const char *);
|
|
while (str != NULL) {
|
|
_send_str(socket, str);
|
|
str = va_arg(ap, const char *);
|
|
}
|
|
va_end(ap);
|
|
}
|
|
|
|
static void _send_chunk(socketpool_socket_obj_t *socket, const char *chunk) {
|
|
char encoded_len[sizeof(size_t) * 2 + 1];
|
|
int len = snprintf(encoded_len, sizeof(encoded_len), "%X", strlen(chunk));
|
|
_send_raw(socket, (const uint8_t *)encoded_len, len);
|
|
_send_raw(socket, (const uint8_t *)"\r\n", 2);
|
|
_send_raw(socket, (const uint8_t *)chunk, strlen(chunk));
|
|
_send_raw(socket, (const uint8_t *)"\r\n", 2);
|
|
}
|
|
|
|
// A bit of a misnomer because it sends all arguments as one chunk.
|
|
// The last argument must be NULL! Otherwise, it won't stop.
|
|
static void _send_chunks(socketpool_socket_obj_t *socket, ...) {
|
|
va_list strs_to_count;
|
|
va_start(strs_to_count, socket);
|
|
|
|
va_list strs_to_send;
|
|
va_copy(strs_to_send, strs_to_count);
|
|
|
|
size_t chunk_len = 0;
|
|
const char *str = va_arg(strs_to_count, const char *);
|
|
while (str != NULL) {
|
|
chunk_len += strlen(str);
|
|
str = va_arg(strs_to_count, const char *);
|
|
}
|
|
va_end(strs_to_count);
|
|
|
|
char encoded_len[sizeof(size_t) * 2 + 1];
|
|
snprintf(encoded_len, sizeof(encoded_len), "%X", chunk_len);
|
|
_send_strs(socket, encoded_len, "\r\n", NULL);
|
|
|
|
str = va_arg(strs_to_send, const char *);
|
|
while (str != NULL) {
|
|
_send_str(socket, str);
|
|
str = va_arg(strs_to_send, const char *);
|
|
}
|
|
va_end(strs_to_send);
|
|
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static bool _endswith(const char *str, const char *suffix) {
|
|
if (str == NULL || suffix == NULL) {
|
|
return false;
|
|
}
|
|
if (strlen(suffix) > strlen(str)) {
|
|
return false;
|
|
}
|
|
return strcmp(str + (strlen(str) - strlen(suffix)), suffix) == 0;
|
|
}
|
|
|
|
const char *ok_hosts[] = {
|
|
"code.circuitpython.org",
|
|
"127.0.0.1",
|
|
"localhost",
|
|
};
|
|
|
|
static bool _origin_ok(const char *origin) {
|
|
const char *http = "http://";
|
|
const char *local = ".local";
|
|
|
|
// note: redirected requests send an Origin of "null" and will be caught by this
|
|
if (strncmp(origin, http, strlen(http)) != 0) {
|
|
return false;
|
|
}
|
|
// These are prefix checks up to : so that any port works.
|
|
const char *hostname = common_hal_mdns_server_get_hostname(&mdns);
|
|
const char *end = origin + strlen(http) + strlen(hostname) + strlen(local);
|
|
if (strncmp(origin + strlen(http), hostname, strlen(hostname)) == 0 &&
|
|
strncmp(origin + strlen(http) + strlen(hostname), local, strlen(local)) == 0 &&
|
|
(end[0] == '\0' || end[0] == ':')) {
|
|
return true;
|
|
}
|
|
|
|
end = origin + strlen(http) + strlen(_our_ip_encoded);
|
|
if (strncmp(origin + strlen(http), _our_ip_encoded, strlen(_our_ip_encoded)) == 0 &&
|
|
(end[0] == '\0' || end[0] == ':')) {
|
|
return true;
|
|
}
|
|
|
|
for (size_t i = 0; i < MP_ARRAY_SIZE(ok_hosts); i++) {
|
|
// Allows any port
|
|
end = origin + strlen(http) + strlen(ok_hosts[i]);
|
|
if (strncmp(origin + strlen(http), ok_hosts[i], strlen(ok_hosts[i])) == 0
|
|
&& (end[0] == '\0' || end[0] == ':')) {
|
|
return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
STATIC bool _usb_active(void) {
|
|
// Check to see if USB has already been mounted. If not, then we "eject" from USB until we're done.
|
|
#if CIRCUITPY_USB && CIRCUITPY_USB_MSC
|
|
if (storage_usb_enabled() && !usb_msc_lock()) {
|
|
return true;
|
|
}
|
|
#endif
|
|
return false;
|
|
}
|
|
|
|
|
|
static const char *OK_JSON = "HTTP/1.1 200 OK\r\nTransfer-Encoding: chunked\r\nContent-Type: application/json\r\n";
|
|
|
|
static void _cors_header(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"Access-Control-Allow-Credentials: true\r\n",
|
|
"Vary: Origin, Accept, Upgrade\r\n",
|
|
"Access-Control-Allow-Origin: ", request->origin, "\r\n",
|
|
NULL);
|
|
}
|
|
|
|
static void _reply_continue(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_str(socket, "HTTP/1.1 100 Continue\r\n");
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_created(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 201 Created\r\n",
|
|
"Content-Length: 0\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_no_content(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 204 No Content\r\n",
|
|
"Content-Length: 0\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_access_control(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 204 No Content\r\n",
|
|
"Content-Length: 0\r\n",
|
|
"Access-Control-Expose-Headers: Access-Control-Allow-Methods\r\n",
|
|
"Access-Control-Allow-Headers: X-Timestamp, Content-Type\r\n",
|
|
"Access-Control-Allow-Methods:GET, OPTIONS", NULL);
|
|
if (!_usb_active()) {
|
|
_send_str(socket, ", PUT, DELETE");
|
|
#if CIRCUITPY_USB_MSC
|
|
usb_msc_unlock();
|
|
#endif
|
|
}
|
|
_send_str(socket, "\r\n");
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_missing(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 404 Not Found\r\n",
|
|
"Content-Length: 0\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_method_not_allowed(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 405 Method Not Allowed\r\n",
|
|
"Content-Length: 0\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_forbidden(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 403 Forbidden\r\n",
|
|
"Content-Length: 0\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_conflict(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 409 Conflict\r\n",
|
|
"Content-Length: 19\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\nUSB storage active.");
|
|
}
|
|
|
|
static void _reply_payload_too_large(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 413 Payload Too Large\r\n",
|
|
"Content-Length: 0\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_expectation_failed(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 417 Expectation Failed\r\n",
|
|
"Content-Length: 0\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_unauthorized(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 401 Unauthorized\r\n",
|
|
"Content-Length: 0\r\n",
|
|
"WWW-Authenticate: Basic realm=\"CircuitPython\"\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_server_error(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_strs(socket,
|
|
"HTTP/1.1 500 Internal Server Error\r\n",
|
|
"Content-Length: 0\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_redirect(socketpool_socket_obj_t *socket, _request *request, const char *path) {
|
|
int nodelay = 1;
|
|
lwip_setsockopt(socket->num, IPPROTO_TCP, TCP_NODELAY, &nodelay, sizeof(nodelay));
|
|
const char *hostname = common_hal_mdns_server_get_hostname(&mdns);
|
|
_send_strs(socket,
|
|
"HTTP/1.1 301 Moved Permanently\r\n",
|
|
"Connection: close\r\n",
|
|
"Content-Length: 0\r\n",
|
|
"Location: ", NULL);
|
|
if (request->websocket) {
|
|
_send_str(socket, "ws");
|
|
} else {
|
|
_send_str(socket, "http");
|
|
}
|
|
|
|
_send_strs(socket, "://", hostname, ".local", path, "\r\n", NULL);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
}
|
|
|
|
static void _reply_directory_json(socketpool_socket_obj_t *socket, _request *request, FF_DIR *dir, const char *request_path, const char *path) {
|
|
socketpool_socket_send(socket, (const uint8_t *)OK_JSON, strlen(OK_JSON));
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
_send_chunk(socket, "[");
|
|
bool first = true;
|
|
|
|
FILINFO file_info;
|
|
char *fn = file_info.fname;
|
|
FRESULT res = f_readdir(dir, &file_info);
|
|
while (res == FR_OK && fn[0] != 0) {
|
|
if (!first) {
|
|
_send_chunk(socket, ",");
|
|
}
|
|
_send_chunks(socket,
|
|
"{\"name\": \"", file_info.fname, "\",",
|
|
"\"directory\": ", NULL);
|
|
if ((file_info.fattrib & AM_DIR) != 0) {
|
|
_send_chunk(socket, "true");
|
|
} else {
|
|
_send_chunk(socket, "false");
|
|
}
|
|
// We use nanoseconds past Jan 1, 1970 for consistency with BLE API and
|
|
// LittleFS.
|
|
_send_chunk(socket, ", \"modified_ns\": ");
|
|
|
|
uint64_t truncated_time = timeutils_mktime(1980 + (file_info.fdate >> 9),
|
|
(file_info.fdate >> 5) & 0xf,
|
|
file_info.fdate & 0x1f,
|
|
file_info.ftime >> 11,
|
|
(file_info.ftime >> 5) & 0x1f,
|
|
(file_info.ftime & 0x1f) * 2) * 1000000000ULL;
|
|
|
|
char encoded_number[32];
|
|
snprintf(encoded_number, sizeof(encoded_number), "%lld", truncated_time);
|
|
_send_chunks(socket, encoded_number, ", \"file_size\": ", NULL);
|
|
size_t file_size = 0;
|
|
if ((file_info.fattrib & AM_DIR) == 0) {
|
|
file_size = file_info.fsize;
|
|
}
|
|
snprintf(encoded_number, sizeof(encoded_number), "%d", file_size);
|
|
_send_chunks(socket, encoded_number, "}", NULL);
|
|
first = false;
|
|
res = f_readdir(dir, &file_info);
|
|
}
|
|
_send_chunk(socket, "]");
|
|
_send_chunk(socket, "");
|
|
}
|
|
|
|
static void _reply_with_file(socketpool_socket_obj_t *socket, _request *request, const char *filename, FIL *active_file) {
|
|
uint32_t total_length = f_size(active_file);
|
|
char encoded_len[10];
|
|
snprintf(encoded_len, sizeof(encoded_len), "%d", total_length);
|
|
|
|
_send_strs(socket,
|
|
"HTTP/1.1 200 OK\r\n",
|
|
"Content-Length: ", encoded_len, "\r\n", NULL);
|
|
// TODO: Make this a table to save space.
|
|
if (_endswith(filename, ".txt") || _endswith(filename, ".py")) {
|
|
_send_str(socket, "Content-Type: text/plain\r\n");
|
|
} else if (_endswith(filename, ".js")) {
|
|
_send_str(socket, "Content-Type: text/javascript\r\n");
|
|
} else if (_endswith(filename, ".html")) {
|
|
_send_str(socket, "Content-Type: text/html\r\n");
|
|
} else if (_endswith(filename, ".json")) {
|
|
_send_str(socket, "Content-Type: application/json\r\n");
|
|
} else {
|
|
_send_str(socket, "Content-Type: application/octet-stream\r\n");
|
|
}
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
|
|
uint32_t total_read = 0;
|
|
while (total_read < total_length) {
|
|
uint8_t data_buffer[64];
|
|
size_t quantity_read;
|
|
f_read(active_file, data_buffer, 64, &quantity_read);
|
|
total_read += quantity_read;
|
|
uint32_t send_offset = 0;
|
|
while (send_offset < quantity_read) {
|
|
int sent = socketpool_socket_send(socket, data_buffer + send_offset, quantity_read - send_offset);
|
|
if (sent < 0) {
|
|
if (sent == -EAGAIN) {
|
|
sent = 0;
|
|
} else {
|
|
ESP_LOGE(TAG, "file send error %d", sent);
|
|
break;
|
|
}
|
|
}
|
|
send_offset += sent;
|
|
}
|
|
}
|
|
if (total_read < total_length) {
|
|
socketpool_socket_close(socket);
|
|
}
|
|
}
|
|
|
|
static void _reply_with_devices_json(socketpool_socket_obj_t *socket, _request *request) {
|
|
mdns_remoteservice_obj_t found_devices[32];
|
|
size_t total_results = mdns_server_find(&mdns, "_circuitpython", "_tcp", 1, found_devices, MP_ARRAY_SIZE(found_devices));
|
|
size_t count = MIN(total_results, MP_ARRAY_SIZE(found_devices));
|
|
socketpool_socket_send(socket, (const uint8_t *)OK_JSON, strlen(OK_JSON));
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
char total_encoded[4];
|
|
snprintf(total_encoded, sizeof(total_encoded), "%d", total_results);
|
|
_send_chunks(socket, "{\"total\": ", total_encoded, ", \"devices\": [", NULL);
|
|
for (size_t i = 0; i < count; i++) {
|
|
if (i > 0) {
|
|
_send_chunk(socket, ",");
|
|
}
|
|
const char *hostname = common_hal_mdns_remoteservice_get_hostname(&found_devices[i]);
|
|
const char *instance_name = common_hal_mdns_remoteservice_get_instance_name(&found_devices[i]);
|
|
char port_encoded[4];
|
|
int port = common_hal_mdns_remoteservice_get_port(&found_devices[i]);
|
|
snprintf(port_encoded, sizeof(port_encoded), "%d", port);
|
|
char ip_encoded[4 * 4];
|
|
uint32_t ipv4_address = mdns_remoteservice_get_ipv4_address(&found_devices[i]);
|
|
uint8_t *octets = (uint8_t *)&ipv4_address;
|
|
snprintf(ip_encoded, sizeof(ip_encoded), "%d.%d.%d.%d", octets[0], octets[1], octets[2], octets[3]);
|
|
_send_chunks(socket,
|
|
"{\"hostname\": \"", hostname, "\", ",
|
|
"\"instance_name\": \"", instance_name, "\", ",
|
|
"\"port\": ", port_encoded, ", ",
|
|
"\"ip\": \"", ip_encoded, "\"}", NULL);
|
|
common_hal_mdns_remoteservice_deinit(&found_devices[i]);
|
|
}
|
|
_send_chunk(socket, "]}");
|
|
// Empty chunk signals the end of the response.
|
|
_send_chunk(socket, "");
|
|
}
|
|
|
|
static void _reply_with_version_json(socketpool_socket_obj_t *socket, _request *request) {
|
|
_send_str(socket, OK_JSON);
|
|
_cors_header(socket, request);
|
|
_send_str(socket, "\r\n");
|
|
char encoded_creator_id[11]; // 2 ** 32 is 10 decimal digits plus one for \0
|
|
snprintf(encoded_creator_id, sizeof(encoded_creator_id), "%u", CIRCUITPY_CREATOR_ID);
|
|
char encoded_creation_id[11]; // 2 ** 32 is 10 decimal digits plus one for \0
|
|
snprintf(encoded_creation_id, sizeof(encoded_creation_id), "%u", CIRCUITPY_CREATION_ID);
|
|
const char *hostname = common_hal_mdns_server_get_hostname(&mdns);
|
|
_send_chunks(socket,
|
|
"{\"web_api_version\": 1, ",
|
|
"\"version\": \"", MICROPY_GIT_TAG, "\", ",
|
|
"\"build_date\": \"", MICROPY_BUILD_DATE, "\", ",
|
|
"\"board_name\": \"", MICROPY_HW_BOARD_NAME, "\", ",
|
|
"\"mcu_name\": \"", MICROPY_HW_MCU_NAME, "\", ",
|
|
"\"board_id\": \"", CIRCUITPY_BOARD_ID, "\", ",
|
|
"\"creator_id\": ", encoded_creator_id, ", ",
|
|
"\"creation_id\": ", encoded_creation_id, ", ",
|
|
"\"hostname\": \"", hostname, "\", ",
|
|
"\"port\": 80, ",
|
|
"\"ip\": \"", _our_ip_encoded,
|
|
"\"}", NULL);
|
|
// Empty chunk signals the end of the response.
|
|
_send_chunk(socket, "");
|
|
}
|
|
|
|
// Copied from ble file_transfer.c. We should share it.
|
|
STATIC FRESULT _delete_directory_contents(FATFS *fs, const TCHAR *path) {
|
|
FF_DIR dir;
|
|
FRESULT res = f_opendir(fs, &dir, path);
|
|
FILINFO file_info;
|
|
// Check the stack since we're putting paths on it.
|
|
if (mp_stack_usage() >= MP_STATE_THREAD(stack_limit)) {
|
|
return FR_INT_ERR;
|
|
}
|
|
while (res == FR_OK) {
|
|
res = f_readdir(&dir, &file_info);
|
|
if (res != FR_OK || file_info.fname[0] == '\0') {
|
|
break;
|
|
}
|
|
size_t pathlen = strlen(path);
|
|
size_t fnlen = strlen(file_info.fname);
|
|
TCHAR full_path[pathlen + 1 + fnlen];
|
|
memcpy(full_path, path, pathlen);
|
|
full_path[pathlen] = '/';
|
|
size_t full_pathlen = pathlen + 1 + fnlen;
|
|
memcpy(full_path + pathlen + 1, file_info.fname, fnlen);
|
|
full_path[full_pathlen] = '\0';
|
|
if ((file_info.fattrib & AM_DIR) != 0) {
|
|
res = _delete_directory_contents(fs, full_path);
|
|
}
|
|
if (res != FR_OK) {
|
|
break;
|
|
}
|
|
res = f_unlink(fs, full_path);
|
|
}
|
|
f_closedir(&dir);
|
|
return res;
|
|
}
|
|
|
|
// FATFS has a two second timestamp resolution but the BLE API allows for nanosecond resolution.
|
|
// This function truncates the time the time to a resolution storable by FATFS and fills in the
|
|
// FATFS encoded version into fattime.
|
|
STATIC uint64_t truncate_time(uint64_t input_time, DWORD *fattime) {
|
|
timeutils_struct_time_t tm;
|
|
uint64_t seconds_since_epoch = timeutils_seconds_since_epoch_from_nanoseconds_since_1970(input_time);
|
|
timeutils_seconds_since_epoch_to_struct_time(seconds_since_epoch, &tm);
|
|
uint64_t truncated_time = timeutils_nanoseconds_since_epoch_to_nanoseconds_since_1970((seconds_since_epoch / 2) * 2 * 1000000000);
|
|
|
|
*fattime = ((tm.tm_year - 1980) << 25) | (tm.tm_mon << 21) | (tm.tm_mday << 16) |
|
|
(tm.tm_hour << 11) | (tm.tm_min << 5) | (tm.tm_sec >> 1);
|
|
return truncated_time;
|
|
}
|
|
|
|
STATIC void _discard_incoming(socketpool_socket_obj_t *socket, size_t amount) {
|
|
size_t discarded = 0;
|
|
while (discarded < amount) {
|
|
uint8_t bytes[64];
|
|
size_t read_len = MIN(sizeof(bytes), amount - discarded);
|
|
int len = socketpool_socket_recv_into(socket, bytes, read_len);
|
|
if (len < 0) {
|
|
break;
|
|
}
|
|
discarded += read_len;
|
|
}
|
|
}
|
|
|
|
static void _write_file_and_reply(socketpool_socket_obj_t *socket, _request *request, FATFS *fs, const TCHAR *path) {
|
|
FIL active_file;
|
|
|
|
if (_usb_active()) {
|
|
_discard_incoming(socket, request->content_length);
|
|
_reply_conflict(socket, request);
|
|
return;
|
|
}
|
|
if (request->timestamp_ms > 0) {
|
|
DWORD fattime;
|
|
truncate_time(request->timestamp_ms * 1000000, &fattime);
|
|
override_fattime(fattime);
|
|
}
|
|
|
|
FRESULT result = f_open(fs, &active_file, path, FA_WRITE);
|
|
bool new_file = false;
|
|
if (result == FR_NO_FILE) {
|
|
new_file = true;
|
|
result = f_open(fs, &active_file, path, FA_WRITE | FA_OPEN_ALWAYS);
|
|
}
|
|
|
|
if (result == FR_NO_PATH) {
|
|
override_fattime(0);
|
|
#if CIRCUITPY_USB_MSC
|
|
usb_msc_unlock();
|
|
#endif
|
|
_discard_incoming(socket, request->content_length);
|
|
_reply_missing(socket, request);
|
|
return;
|
|
}
|
|
if (result != FR_OK) {
|
|
ESP_LOGE(TAG, "file write error %d %s", result, path);
|
|
override_fattime(0);
|
|
#if CIRCUITPY_USB_MSC
|
|
usb_msc_unlock();
|
|
#endif
|
|
_discard_incoming(socket, request->content_length);
|
|
_reply_server_error(socket, request);
|
|
return;
|
|
} else if (request->expect) {
|
|
_reply_continue(socket, request);
|
|
}
|
|
|
|
// Change the file size to start.
|
|
f_lseek(&active_file, request->content_length);
|
|
if (f_tell(&active_file) < request->content_length) {
|
|
f_close(&active_file);
|
|
override_fattime(0);
|
|
#if CIRCUITPY_USB_MSC
|
|
usb_msc_unlock();
|
|
#endif
|
|
_discard_incoming(socket, request->content_length);
|
|
// Too large.
|
|
if (request->expect) {
|
|
_reply_expectation_failed(socket, request);
|
|
} else {
|
|
_reply_payload_too_large(socket, request);
|
|
}
|
|
|
|
return;
|
|
}
|
|
f_truncate(&active_file);
|
|
f_rewind(&active_file);
|
|
|
|
size_t total_read = 0;
|
|
bool error = false;
|
|
while (total_read < request->content_length && !error) {
|
|
uint8_t bytes[64];
|
|
size_t read_len = MIN(sizeof(bytes), request->content_length - total_read);
|
|
int len = socketpool_socket_recv_into(socket, bytes, read_len);
|
|
if (len < 0) {
|
|
if (len == -EAGAIN) {
|
|
continue;
|
|
} else {
|
|
ESP_LOGE(TAG, "other error %d", len);
|
|
}
|
|
error = true;
|
|
break;
|
|
}
|
|
UINT actual;
|
|
f_write(&active_file, bytes, len, &actual);
|
|
if (actual != (UINT)len) {
|
|
ESP_LOGE(TAG, "didn't write whole file");
|
|
}
|
|
total_read += len;
|
|
}
|
|
|
|
f_close(&active_file);
|
|
#if CIRCUITPY_USB_MSC
|
|
usb_msc_unlock();
|
|
#endif
|
|
|
|
override_fattime(0);
|
|
if (new_file) {
|
|
_reply_created(socket, request);
|
|
} else {
|
|
_reply_no_content(socket, request);
|
|
}
|
|
}
|
|
|
|
#define STATIC_FILE(filename) extern uint32_t filename##_length; extern uint8_t filename[]; extern const char *filename##_content_type;
|
|
|
|
STATIC_FILE(directory_html);
|
|
STATIC_FILE(directory_js);
|
|
STATIC_FILE(welcome_html);
|
|
STATIC_FILE(welcome_js);
|
|
STATIC_FILE(style_css);
|
|
STATIC_FILE(serial_html);
|
|
STATIC_FILE(serial_js);
|
|
STATIC_FILE(blinka_16x16_ico);
|
|
|
|
static void _reply_static(socketpool_socket_obj_t *socket, _request *request, const uint8_t *response, size_t response_len, const char *content_type) {
|
|
uint32_t total_length = response_len;
|
|
char encoded_len[10];
|
|
snprintf(encoded_len, sizeof(encoded_len), "%d", total_length);
|
|
|
|
_send_strs(socket,
|
|
"HTTP/1.1 200 OK\r\n",
|
|
"Content-Encoding: gzip\r\n",
|
|
"Content-Length: ", encoded_len, "\r\n",
|
|
"Content-Type: ", content_type, "\r\n",
|
|
"\r\n", NULL);
|
|
_send_raw(socket, response, response_len);
|
|
}
|
|
|
|
#define _REPLY_STATIC(socket, request, filename) _reply_static(socket, request, filename, filename##_length, filename##_content_type)
|
|
|
|
static void _reply_websocket_upgrade(socketpool_socket_obj_t *socket, _request *request) {
|
|
// Compute accept key
|
|
hashlib_hash_obj_t hash;
|
|
common_hal_hashlib_new(&hash, "sha1");
|
|
common_hal_hashlib_hash_update(&hash, (const uint8_t *)request->websocket_key, strlen(request->websocket_key));
|
|
const char *magic_string = "258EAFA5-E914-47DA-95CA-C5AB0DC85B11";
|
|
common_hal_hashlib_hash_update(&hash, (const uint8_t *)magic_string, strlen(magic_string));
|
|
size_t digest_size = common_hal_hashlib_hash_get_digest_size(&hash);
|
|
size_t encoded_size = (digest_size + 1) * 4 / 3 + 1;
|
|
uint8_t encoded_accept[encoded_size];
|
|
common_hal_hashlib_hash_digest(&hash, encoded_accept, sizeof(encoded_accept));
|
|
_base64_in_place((char *)encoded_accept, digest_size, encoded_size);
|
|
|
|
// Reply with upgrade
|
|
_send_strs(socket, "HTTP/1.1 101 Switching Protocols\r\n",
|
|
"Upgrade: websocket\r\n",
|
|
"Connection: Upgrade\r\n",
|
|
"Sec-WebSocket-Accept: ", encoded_accept, "\r\n",
|
|
"\r\n", NULL);
|
|
websocket_handoff(socket);
|
|
// socket is now closed and "disconnected".
|
|
}
|
|
|
|
static bool _reply(socketpool_socket_obj_t *socket, _request *request) {
|
|
if (request->redirect) {
|
|
_reply_redirect(socket, request, request->path);
|
|
} else if (strlen(request->origin) > 0 && !_origin_ok(request->origin)) {
|
|
ESP_LOGE(TAG, "bad origin %s", request->origin);
|
|
_reply_forbidden(socket, request);
|
|
} else if (strncmp(request->path, "/fs/", 4) == 0) {
|
|
if (strcasecmp(request->method, "OPTIONS") == 0) {
|
|
// OPTIONS is sent for CORS preflight, unauthenticated
|
|
_reply_access_control(socket, request);
|
|
} else if (!request->authenticated) {
|
|
if (_api_password[0] != '\0') {
|
|
_reply_unauthorized(socket, request);
|
|
} else {
|
|
_reply_forbidden(socket, request);
|
|
}
|
|
} else {
|
|
char *path = request->path + 3;
|
|
size_t pathlen = strlen(path);
|
|
FATFS *fs = &((fs_user_mount_t *)MP_STATE_VM(vfs_mount_table)->obj)->fatfs;
|
|
// Trailing / is a directory.
|
|
bool directory = false;
|
|
if (path[pathlen - 1] == '/') {
|
|
// FATFS lib doesn't like a trailing / for paths besides root.
|
|
if (pathlen > 1) {
|
|
path[pathlen - 1] = '\0';
|
|
}
|
|
directory = true;
|
|
}
|
|
// Delete is almost identical for files and directories so share the
|
|
// implementation.
|
|
if (strcasecmp(request->method, "DELETE") == 0) {
|
|
if (_usb_active()) {
|
|
_reply_conflict(socket, request);
|
|
return false;
|
|
}
|
|
|
|
FILINFO file;
|
|
FRESULT result = f_stat(fs, path, &file);
|
|
if (result == FR_OK) {
|
|
if ((file.fattrib & AM_DIR) != 0) {
|
|
result = _delete_directory_contents(fs, path);
|
|
}
|
|
if (result == FR_OK) {
|
|
result = f_unlink(fs, path);
|
|
}
|
|
}
|
|
|
|
#if CIRCUITPY_USB_MSC
|
|
usb_msc_unlock();
|
|
#endif
|
|
if (result == FR_NO_PATH || result == FR_NO_FILE) {
|
|
_reply_missing(socket, request);
|
|
} else if (result != FR_OK) {
|
|
ESP_LOGE(TAG, "rm error %d %s", result, path);
|
|
_reply_server_error(socket, request);
|
|
} else {
|
|
_reply_no_content(socket, request);
|
|
return true;
|
|
}
|
|
} else if (directory) {
|
|
if (strcasecmp(request->method, "GET") == 0) {
|
|
FF_DIR dir;
|
|
FRESULT res = f_opendir(fs, &dir, path);
|
|
// Put the / back for replies.
|
|
if (pathlen > 1) {
|
|
path[pathlen - 1] = '/';
|
|
}
|
|
if (res != FR_OK) {
|
|
_reply_missing(socket, request);
|
|
return false;
|
|
}
|
|
if (request->json) {
|
|
_reply_directory_json(socket, request, &dir, request->path, path);
|
|
} else if (pathlen == 1) {
|
|
_REPLY_STATIC(socket, request, directory_html);
|
|
} else {
|
|
_reply_missing(socket, request);
|
|
}
|
|
|
|
f_closedir(&dir);
|
|
} else if (strcasecmp(request->method, "PUT") == 0) {
|
|
if (_usb_active()) {
|
|
_reply_conflict(socket, request);
|
|
return false;
|
|
}
|
|
|
|
if (request->timestamp_ms > 0) {
|
|
DWORD fattime;
|
|
truncate_time(request->timestamp_ms * 1000000, &fattime);
|
|
override_fattime(fattime);
|
|
}
|
|
FRESULT result = f_mkdir(fs, path);
|
|
override_fattime(0);
|
|
#if CIRCUITPY_USB_MSC
|
|
usb_msc_unlock();
|
|
#endif
|
|
if (result == FR_EXIST) {
|
|
_reply_no_content(socket, request);
|
|
} else if (result == FR_NO_PATH) {
|
|
_reply_missing(socket, request);
|
|
} else if (result != FR_OK) {
|
|
ESP_LOGE(TAG, "mkdir error %d %s", result, path);
|
|
_reply_server_error(socket, request);
|
|
} else {
|
|
_reply_created(socket, request);
|
|
return true;
|
|
}
|
|
}
|
|
} else { // Dealing with a file.
|
|
if (strcasecmp(request->method, "GET") == 0) {
|
|
FIL active_file;
|
|
FRESULT result = f_open(fs, &active_file, path, FA_READ);
|
|
|
|
if (result != FR_OK) {
|
|
_reply_missing(socket, request);
|
|
} else {
|
|
_reply_with_file(socket, request, path, &active_file);
|
|
}
|
|
|
|
f_close(&active_file);
|
|
} else if (strcasecmp(request->method, "PUT") == 0) {
|
|
_write_file_and_reply(socket, request, fs, path);
|
|
return true;
|
|
}
|
|
}
|
|
}
|
|
} else if (strncmp(request->path, "/cp/", 4) == 0) {
|
|
const char *path = request->path + 3;
|
|
if (strcasecmp(request->method, "OPTIONS") == 0) {
|
|
// handle preflight requests to /cp/
|
|
_reply_access_control(socket, request);
|
|
} else if (strcasecmp(request->method, "GET") != 0) {
|
|
_reply_method_not_allowed(socket, request);
|
|
} else if (strcmp(path, "/devices.json") == 0) {
|
|
_reply_with_devices_json(socket, request);
|
|
} else if (strcmp(path, "/version.json") == 0) {
|
|
_reply_with_version_json(socket, request);
|
|
} else if (strcmp(path, "/serial/") == 0) {
|
|
if (!request->authenticated) {
|
|
if (_api_password[0] != '\0') {
|
|
_reply_unauthorized(socket, request);
|
|
} else {
|
|
_reply_forbidden(socket, request);
|
|
}
|
|
} else if (request->websocket) {
|
|
_reply_websocket_upgrade(socket, request);
|
|
} else {
|
|
_REPLY_STATIC(socket, request, serial_html);
|
|
}
|
|
} else {
|
|
_reply_missing(socket, request);
|
|
}
|
|
} else if (strcasecmp(request->method, "GET") != 0) {
|
|
_reply_method_not_allowed(socket, request);
|
|
} else {
|
|
if (strcmp(request->path, "/") == 0) {
|
|
// TODO: Autogenerate this based on the blinka bitmap and change the
|
|
// palette based on MAC address.
|
|
_REPLY_STATIC(socket, request, welcome_html);
|
|
} else if (strcmp(request->path, "/directory.js") == 0) {
|
|
_REPLY_STATIC(socket, request, directory_js);
|
|
} else if (strcmp(request->path, "/welcome.js") == 0) {
|
|
_REPLY_STATIC(socket, request, welcome_js);
|
|
} else if (strcmp(request->path, "/serial.js") == 0) {
|
|
_REPLY_STATIC(socket, request, serial_js);
|
|
} else if (strcmp(request->path, "/style.css") == 0) {
|
|
_REPLY_STATIC(socket, request, style_css);
|
|
} else if (strcmp(request->path, "/favicon.ico") == 0) {
|
|
// TODO: Autogenerate this based on the blinka bitmap and change the
|
|
// palette based on MAC address.
|
|
_REPLY_STATIC(socket, request, blinka_16x16_ico);
|
|
} else {
|
|
_reply_missing(socket, request);
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
static void _reset_request(_request *request) {
|
|
request->state = STATE_METHOD;
|
|
request->origin[0] = '\0';
|
|
request->content_length = 0;
|
|
request->offset = 0;
|
|
request->timestamp_ms = 0;
|
|
request->redirect = false;
|
|
request->done = false;
|
|
request->in_progress = false;
|
|
request->authenticated = false;
|
|
request->expect = false;
|
|
request->json = false;
|
|
request->websocket = false;
|
|
}
|
|
|
|
static void _process_request(socketpool_socket_obj_t *socket, _request *request) {
|
|
bool more = true;
|
|
bool error = false;
|
|
uint8_t c;
|
|
// This code assumes header lines are terminated with \r\n
|
|
while (more && !error) {
|
|
int len = socketpool_socket_recv_into(socket, &c, 1);
|
|
if (len != 1) {
|
|
more = false;
|
|
break;
|
|
}
|
|
if (!request->in_progress) {
|
|
autoreload_suspend(AUTORELOAD_SUSPEND_WEB);
|
|
request->in_progress = true;
|
|
}
|
|
switch (request->state) {
|
|
case STATE_METHOD: {
|
|
if (c == ' ') {
|
|
request->method[request->offset] = '\0';
|
|
request->offset = 0;
|
|
request->state = STATE_PATH;
|
|
} else if (request->offset > sizeof(request->method) - 1) {
|
|
// Skip methods that are too long.
|
|
} else {
|
|
request->method[request->offset] = c;
|
|
request->offset++;
|
|
}
|
|
break;
|
|
}
|
|
case STATE_PATH: {
|
|
if (c == ' ') {
|
|
request->path[request->offset] = '\0';
|
|
request->offset = 0;
|
|
ESP_LOGI(TAG, "Request %s %s", request->method, request->path);
|
|
request->state = STATE_VERSION;
|
|
} else if (request->offset > sizeof(request->path) - 1) {
|
|
// Skip methods that are too long.
|
|
} else {
|
|
request->path[request->offset] = c;
|
|
request->offset++;
|
|
}
|
|
break;
|
|
}
|
|
case STATE_VERSION: {
|
|
const char *supported_version = "HTTP/1.1\r";
|
|
error = supported_version[request->offset] != c;
|
|
request->offset++;
|
|
if (request->offset == strlen(supported_version)) {
|
|
request->state = STATE_HEADER_KEY;
|
|
request->offset = 0;
|
|
}
|
|
break;
|
|
}
|
|
case STATE_HEADER_KEY: {
|
|
if (c == '\r') {
|
|
request->state = STATE_BODY;
|
|
} else if (c == '\n') {
|
|
// Consume the \n
|
|
} else if (c == ':') {
|
|
request->header_key[request->offset] = '\0';
|
|
request->offset = 0;
|
|
request->state = STATE_HEADER_VALUE;
|
|
} else if (request->offset > sizeof(request->header_key) - 1) {
|
|
// Skip methods that are too long.
|
|
} else {
|
|
request->header_key[request->offset] = c;
|
|
request->offset++;
|
|
}
|
|
break;
|
|
}
|
|
case STATE_HEADER_VALUE: {
|
|
if (request->offset == 0) {
|
|
error = c != ' ';
|
|
request->offset++;
|
|
} else if (c == '\r') {
|
|
request->header_value[request->offset - 1] = '\0';
|
|
request->offset = 0;
|
|
request->state = STATE_HEADER_KEY;
|
|
if (strcasecmp(request->header_key, "Authorization") == 0) {
|
|
const char *prefix = "Basic ";
|
|
request->authenticated = strncmp(request->header_value, prefix, strlen(prefix)) == 0 &&
|
|
strcmp(_api_password, request->header_value + strlen(prefix)) == 0;
|
|
} else if (strcasecmp(request->header_key, "Host") == 0) {
|
|
request->redirect = strcmp(request->header_value, "circuitpython.local") == 0;
|
|
} else if (strcasecmp(request->header_key, "Content-Length") == 0) {
|
|
request->content_length = strtoul(request->header_value, NULL, 10);
|
|
} else if (strcasecmp(request->header_key, "Expect") == 0) {
|
|
request->expect = strcmp(request->header_value, "100-continue") == 0;
|
|
} else if (strcasecmp(request->header_key, "Accept") == 0) {
|
|
request->json = strcasecmp(request->header_value, "application/json") == 0;
|
|
} else if (strcasecmp(request->header_key, "Origin") == 0) {
|
|
strcpy(request->origin, request->header_value);
|
|
} else if (strcasecmp(request->header_key, "X-Timestamp") == 0) {
|
|
request->timestamp_ms = strtoull(request->header_value, NULL, 10);
|
|
} else if (strcasecmp(request->header_key, "Upgrade") == 0) {
|
|
request->websocket = strcmp(request->header_value, "websocket") == 0;
|
|
} else if (strcasecmp(request->header_key, "Sec-WebSocket-Version") == 0) {
|
|
request->websocket_version = strtoul(request->header_value, NULL, 10);
|
|
} else if (strcasecmp(request->header_key, "Sec-WebSocket-Key") == 0 &&
|
|
strlen(request->header_value) == 24) {
|
|
strcpy(request->websocket_key, request->header_value);
|
|
}
|
|
ESP_LOGI(TAG, "Header %s %s", request->header_key, request->header_value);
|
|
} else if (request->offset > sizeof(request->header_value) - 1) {
|
|
// Skip methods that are too long.
|
|
} else {
|
|
request->header_value[request->offset - 1] = c;
|
|
request->offset++;
|
|
}
|
|
break;
|
|
}
|
|
case STATE_BODY:
|
|
request->done = true;
|
|
more = false;
|
|
break;
|
|
}
|
|
}
|
|
if (error) {
|
|
const char *error_response = "HTTP/1.1 501 Not Implemented\r\n\r\n";
|
|
int nodelay = 1;
|
|
lwip_setsockopt(socket->num, IPPROTO_TCP, TCP_NODELAY, &nodelay, sizeof(nodelay));
|
|
socketpool_socket_send(socket, (const uint8_t *)error_response, strlen(error_response));
|
|
}
|
|
if (!request->done) {
|
|
return;
|
|
}
|
|
bool reload = _reply(socket, request);
|
|
_reset_request(request);
|
|
autoreload_resume(AUTORELOAD_SUSPEND_WEB);
|
|
if (reload) {
|
|
autoreload_trigger();
|
|
}
|
|
}
|
|
|
|
|
|
void supervisor_web_workflow_background(void) {
|
|
// Otherwise, see if we have another socket to accept.
|
|
if ((!common_hal_socketpool_socket_get_connected(&active) || !active_request.in_progress) &&
|
|
!common_hal_socketpool_socket_get_closed(&listening) &&
|
|
listening.num > 0) {
|
|
uint32_t ip;
|
|
uint32_t port;
|
|
int newsoc = socketpool_socket_accept(&listening, (uint8_t *)&ip, &port);
|
|
if (newsoc == -EBADF) {
|
|
common_hal_socketpool_socket_close(&listening);
|
|
return;
|
|
}
|
|
if (newsoc > 0) {
|
|
// Close the active socket because we have another we accepted.
|
|
if (!common_hal_socketpool_socket_get_closed(&active)) {
|
|
common_hal_socketpool_socket_close(&active);
|
|
}
|
|
// TODO: Don't do this because it uses the private struct layout.
|
|
// Create the socket
|
|
active.num = newsoc;
|
|
active.pool = &pool;
|
|
active.connected = true;
|
|
|
|
common_hal_socketpool_socket_settimeout(&active, 0);
|
|
|
|
_reset_request(&active_request);
|
|
|
|
lwip_fcntl(newsoc, F_SETFL, O_NONBLOCK);
|
|
}
|
|
}
|
|
|
|
// If we have a request in progress, continue working on it.
|
|
if (common_hal_socketpool_socket_get_connected(&active)) {
|
|
_process_request(&active, &active_request);
|
|
} else {
|
|
// Close the active socket if it is no longer connected.
|
|
common_hal_socketpool_socket_close(&active);
|
|
}
|
|
}
|
|
|
|
void supervisor_stop_web_workflow(void) {
|
|
}
|