X-Git-Url: https://codewiz.org/gitweb?a=blobdiff_plain;f=boards%2Fsam3x-ek%2Fexamples%2Fsam3x-ek_http_server%2Fmain.c;h=6b545b4dece2a93b69418a1775b831b7bad0676a;hb=1b90f53ba4a4e0f4984999fb42b15bae49b92422;hp=d8087c65b63c4a974d4aaaff27388b2f2f98fd84;hpb=f3ce42cfd746ed096afcf3d1ee287dfddba3bdef;p=bertos.git diff --git a/boards/sam3x-ek/examples/sam3x-ek_http_server/main.c b/boards/sam3x-ek/examples/sam3x-ek_http_server/main.c index d8087c65..6b545b4d 100644 --- a/boards/sam3x-ek/examples/sam3x-ek_http_server/main.c +++ b/boards/sam3x-ek/examples/sam3x-ek_http_server/main.c @@ -37,15 +37,23 @@ * * This simple web server read the site's pages from SD card, and manage * the cases where SD is not present or page not found, using embedded pages. - * Quering from browser the /status page, the server return a json dictionary where are store - * some board status info, like board temperature, up-time, etc. + * Quering from browser some cgi page, the server return a json dictionary. */ +#include "bitmaps.h" + +#include "hw/hw_http.h" #include "hw/hw_sd.h" #include "hw/hw_adc.h" #include "hw/hw_sdram.h" +#include "hw/hw_led.h" +#include "hw/hw_lcd.h" +// Define logging setting (for cfg/log.h module). +#define LOG_LEVEL 3 +#define LOG_VERBOSITY 0 +#include #include #include @@ -56,6 +64,7 @@ #include #include #include +#include #include #include @@ -70,27 +79,49 @@ #include #include +#include +#include +#include + #include #include +#include #include #include +/* Macro to unpack the ip addres from lwip format in 4 int*/ +#define IP_ADDR_TO_INT_TUPLE(addr) \ + (int)((addr) >> 0 & 0xff), \ + (int)((addr) >> 8 & 0xff), \ + (int)((addr) >> 16 & 0xff), \ + (int)((addr) >> 24 & 0xff) + /* Network interface global variables */ static struct ip_addr ipaddr, netmask, gw; static struct netif netif; + +#define GET_LED_STATUS(status, led_id) (((status) & BV((led_id))) >> (led_id)) +#define CLEAR_LED_STATUS(status, led_id) ((status) &= ~BV((led_id))) +#define SET_LED_STATUS(status, led_id) ((status) |= BV((led_id))) + typedef struct BoardStatus { char local_ip[sizeof("123.123.123.123")]; char last_connected_ip[sizeof("123.123.123.123")]; + uint8_t led_status; uint16_t internal_temp; - ticks_t up_time; + uint32_t up_time; size_t tot_req; } BoardStatus; static BoardStatus status; +static uint8_t raster[RAST_SIZE(LCD_WIDTH, LCD_HEIGHT)]; +static Bitmap lcd_bitmap; +extern Font font_gohu; +static int lcd_brightness = LCD_BACKLIGHT_MAX; static void init(void) @@ -109,6 +140,26 @@ static void init(void) */ proc_init(); sdram_init(); + dmac_init(); + adc_init(); + + /* Enable the adc to read internal temperature sensor */ + hw_enableTempRead(); + + LED_INIT(); + + lcd_hx8347_init(); + lcd_setBacklight(lcd_brightness); + + gfx_bitmapInit(&lcd_bitmap, raster, LCD_WIDTH, LCD_HEIGHT); + gfx_setFont(&lcd_bitmap, &font_luBS14); + + lcd_hx8347_blitBitmap(&lcd_bitmap); + lcd_hx8347_blitBitmap24(10, 52, BMP_LOGO_WIDTH, BMP_LOGO_HEIGHT, bmp_logo); + timer_delay(3000); + + text_xprintf(&lcd_bitmap, 1, 0, TEXT_CENTER, "Brightness: %d", lcd_brightness); + lcd_hx8347_blitBitmap(&lcd_bitmap); /* Initialize TCP/IP stack */ tcpip_init(NULL, NULL); @@ -118,65 +169,345 @@ static void init(void) netif_set_default(&netif); netif_set_up(&netif); - dmac_init(); - - adc_init(); - /* Enable the adc to read internal temperature sensor */ - hw_enableTempRead(); } -static NORETURN void status_process(void) +static NORETURN void proc_displayRefresh(void) { while (1) { + + //LOG_INFO("Refresh display\n"); status.internal_temp = hw_convertToDegree(adc_read(ADC_TEMPERATURE_CH)); status.up_time++; + timer_delay(1000); } } -#define IP_ADDR_TO_INT_TUPLE(addr) \ - (int)((addr) >> 0 & 0xff), \ - (int)((addr) >> 8 & 0xff), \ - (int)((addr) >> 16 & 0xff), \ - (int)((addr) >> 24 & 0xff) - -static uint8_t tx_buf[1024]; +static uint8_t tx_buf[2048]; -static int cgi_status(char *revc_buf, struct netconn *client) +/* + * Return a JSON string of board status. + */ +static int cgi_status(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) { - (void)revc_buf; + (void)recv_buf; + (void)recv_len; + (void)name; + status.tot_req++; + uint16_t volt = ADC_RANGECONV(adc_read(1), 0, 3300); //Update board status. sprintf(status.last_connected_ip, "%d.%d.%d.%d", IP_ADDR_TO_INT_TUPLE(client->pcb.ip->remote_ip.addr)); sprintf(status.local_ip, "%d.%d.%d.%d", IP_ADDR_TO_INT_TUPLE(client->pcb.ip->local_ip.addr)); - sprintf((char *)tx_buf, "[ %s, %s, %d.%d, %ld, %d ]", status.local_ip, status.last_connected_ip, - status.internal_temp / 10, status.internal_temp % 10, - status.up_time, status.tot_req); - - status.tot_req++; - http_sendOk(client); + sprintf((char *)tx_buf, "{ \"local_ip\":\"%s\",\"last_connected_ip\":\"%s\", \"temp\":%d.%d,\"volt\":%d.%d,\"up_time\":%ld,\"tot_req\":%d, \ +\"leds\":{ \"0\":\"%d\", \"1\":\"%d\", \"2\":\"%d\"}}", + status.local_ip, status.last_connected_ip, + status.internal_temp / 10, status.internal_temp % 10, + volt / 1000, volt % 1000, + status.up_time, status.tot_req, + GET_LED_STATUS(status.led_status, 0), + GET_LED_STATUS(status.led_status, 1), + GET_LED_STATUS(status.led_status, 2)); + + http_sendOk(client, HTTP_CONTENT_JSON); netconn_write(client, tx_buf, strlen((char *)tx_buf), NETCONN_COPY); return 0; } -static int cgi_logo(char *revc_buf, struct netconn *client) +static int cgi_logo(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) { - (void)revc_buf; + (void)recv_buf; + (void)recv_len; + (void)name; - http_sendOk(client); + http_sendOk(client, HTTP_CONTENT_JPEG); netconn_write(client, bertos_logo_jpg, bertos_logo_jpg_len, NETCONN_NOCOPY); return 0; } +/* + * Return the internal micro temperature string. + */ +static int cgi_temp(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)recv_buf; + (void)recv_len; + (void)name; + + sprintf((char *)tx_buf, "[%d.%d]", status.internal_temp / 10, status.internal_temp % 10); + + http_sendOk(client, HTTP_CONTENT_JSON); + netconn_write(client, tx_buf, strlen((char *)tx_buf), NETCONN_COPY); + return 0; +} + + +/* + * Return the board uptime. + */ +static int cgi_uptime(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)recv_buf; + (void)recv_len; + (void)name; + + + + uint32_t m = status.up_time / 60; + uint32_t h = m / 60; + uint32_t s = status.up_time - (m * 60) - (h * 3600); + + sprintf((char *)tx_buf, "[\"%ldh %ldm %lds\"]", h, m, s); + + http_sendOk(client, HTTP_CONTENT_JSON); + netconn_write(client, tx_buf, strlen((char *)tx_buf), NETCONN_COPY); + return 0; +} + +/* + * Return the VR1 potentiometer voltage. + */ +static int cgi_resistor(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)recv_buf; + (void)recv_len; + (void)name; + + uint16_t volt = ADC_RANGECONV(adc_read(1), 0, 3300); + kprintf("volt %d\n", volt); + sprintf((char *)tx_buf, "[ \"%d.%dV\" ]", volt / 1000, volt % 1000); + + http_sendOk(client, HTTP_CONTENT_JSON); + netconn_write(client, tx_buf, strlen((char *)tx_buf), NETCONN_COPY); + return 0; +} + + +#define CGI_LED_ID_KEY "n" +#define CGI_LED_CMD_KEY "set" + +static char key_value[80]; + +/* + * Reply to client the request string. + */ +static int cgi_led(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)recv_buf; + (void)recv_len; + (void)name; + + char *query_str = strstr(name, "?") + 1; + size_t query_str_len = strlen(query_str); + int led_id; + int led_cmd; + + int len = http_tokenizeGetRequest(query_str, query_str_len); + + LOG_INFO("Found %d key/value pair\n", len); + + if (http_getValue(query_str, query_str_len, CGI_LED_ID_KEY, key_value, sizeof(key_value)) < 0) + { + LOG_ERR("key %s, not found\n", CGI_LED_ID_KEY); + goto error; + } + + LOG_INFO("Found key %s = %s\n", CGI_LED_ID_KEY, key_value); + led_id = atoi(key_value); + + + if (http_getValue(query_str, query_str_len, CGI_LED_CMD_KEY, key_value, sizeof(key_value)) < 0) + { + LOG_ERR("key %s, not found\n", CGI_LED_CMD_KEY); + goto error; + } + + LOG_INFO("Found key %s = %s\n", CGI_LED_CMD_KEY, key_value); + led_cmd = atoi(key_value); + + if (led_cmd) + { + LED_ON(led_id); + SET_LED_STATUS(status.led_status, led_id); + } + else + { + LED_OFF(led_id); + CLEAR_LED_STATUS(status.led_status, led_id); + } + + sprintf((char *)tx_buf, "{\"n\":%d, \"set\":,%d}", led_id, led_cmd); + + http_sendOk(client, HTTP_CONTENT_JSON); + netconn_write(client, tx_buf, strlen((char *)tx_buf), NETCONN_COPY); + return 0; + +error: + http_sendInternalErr(client, HTTP_CONTENT_JSON); + return 0; +} + +static int cgi_ledStatus(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)recv_buf; + (void)recv_len; + (void)name; + + sprintf((char *)tx_buf, "{ \"0\":\"%d\", \"1\":\"%d\", \"2\":\"%d\"}", + GET_LED_STATUS(status.led_status, 0), + GET_LED_STATUS(status.led_status, 1), + GET_LED_STATUS(status.led_status, 2)); + + http_sendOk(client, HTTP_CONTENT_JSON); + netconn_write(client, tx_buf, strlen((char *)tx_buf), NETCONN_COPY); + return 0; +} + +/* + * Reply to client the request string. + */ +static int cgi_echo(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)name; + + http_sendOk(client, HTTP_CONTENT_PLAIN); + netconn_write(client, recv_buf, recv_len, NETCONN_COPY); + return 0; +} + + + +/* + * Default function that http server call every client request, if it doesn't match a cgi table. + * In this implementation all client request are associate to real file stored on FAT file + * sistem on SD card. If the file there is not on SD card the server reply to client the + * error File not found, and send an harcoded page. In the same way, the server reply + * error page if the SD card is not present. + * + */ +static int http_htmPageLoad(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)recv_buf; + (void)recv_len; + + if (SD_CARD_PRESENT()) + { + + // SD fat filesystem context + Sd sd; + FATFS fs; + FatFile in_file; + FRESULT result; + + bool sd_ok = sd_init(&sd, NULL, 0); + if (sd_ok) + { + LOG_INFO("Mount FAT filesystem.\n"); + result = f_mount(0, &fs); + if (result != FR_OK) + { + LOG_ERR("Mounting FAT volumes error[%d]\n", result); + sd_ok = false; + f_mount(0, NULL); + } + + if (sd_ok) + { + result = fatfile_open(&in_file, name, FA_OPEN_EXISTING | FA_READ); + + size_t count = 0; + if (result == FR_OK) + { + LOG_INFO("Opened file '%s' size %ld\n", name, in_file.fat_file.fsize); + + int type = http_searchContentType(name); + http_sendOk(client, type); + + while (count < in_file.fat_file.fsize) + { + int len = kfile_read(&in_file.fd, tx_buf, sizeof(tx_buf)); + netconn_write(client, tx_buf, len, NETCONN_COPY); + count += len; + } + + kfile_flush(&in_file.fd); + kfile_close(&in_file.fd); + + LOG_INFO("Sent: %d\n", count); + } + else + { + LOG_ERR("Unable to open file: '%s' error[%d]\n", name, result); + http_sendFileNotFound(client, HTTP_CONTENT_HTML); + netconn_write(client, http_file_not_found, http_file_not_found_len - 1, NETCONN_NOCOPY); + } + } + } + f_mount(0, NULL); + LOG_INFO("Umount FAT filesystem.\n"); + } + else + { + http_sendFileNotFound(client, HTTP_CONTENT_HTML); + netconn_write(client, http_sd_not_present, http_sd_not_present_len, NETCONN_NOCOPY); + } + return 0; +} + +/* + * Return to client a string that display the CHIP ID information. + * See datasheet for more detail. + */ +static int cgi_chipInfo(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)recv_buf; + (void)recv_len; + (void)name; + + sprintf((char *)tx_buf, "{ \"core_name\":\"%s\", \"arch_name\":\"%s\", \"sram_size\":\"%s\",\"flash_size\":\"%s\", \"mem_boot_type\":\"%s\" }", + chipid_eproc_name(CHIPID_EPRCOC()), + chipid_archnames(CHIPID_ARCH()), + chipid_sramsize(CHIPID_SRAMSIZ()), + chipid_nvpsize(CHIPID_NVPSIZ()), + chipid_nvptype(CHIPID_NVTYP())); + + http_sendOk(client, HTTP_CONTENT_JSON); + netconn_write(client, tx_buf, strlen((char *)tx_buf), NETCONN_COPY); + + return 0; +} + + +static int cgi_error(struct netconn *client, const char *name, char *recv_buf, size_t recv_len) +{ + (void)client; + (void)name; + (void)recv_buf; + (void)recv_len; + + return -1; +} + +/* + * Static cgi table where we associate callback to page. + */ static HttpCGI cgi_table[] = { - { "status", cgi_status }, - { "bertos_logo_jpg.jpg", cgi_logo }, - { NULL, NULL } + { CGI_MATCH_WORD, "echo", cgi_echo }, + { CGI_MATCH_NAME, "get_temperature", cgi_temp }, + { CGI_MATCH_NAME, "get_uptime", cgi_uptime }, + { CGI_MATCH_NAME, "get_resistor", cgi_resistor }, + { CGI_MATCH_NAME, "set_led", cgi_led }, + { CGI_MATCH_NAME, "get_ledStatus", cgi_ledStatus }, + { CGI_MATCH_NAME, "error", cgi_error }, + { CGI_MATCH_WORD, "status", cgi_status }, + { CGI_MATCH_NAME, "get_chipinfo", cgi_chipInfo }, + { CGI_MATCH_NAME, "bertos_logo_jpg", cgi_logo }, + { CGI_MATCH_NONE, NULL, NULL } }; @@ -184,11 +515,11 @@ int main(void) { struct netconn *server; - /* Hardware initialization */ init(); + http_init(http_htmPageLoad, cgi_table); - proc_new(status_process, NULL, KERN_MINSTACKSIZE * 2, NULL); + proc_new(proc_displayRefresh, NULL, KERN_MINSTACKSIZE * 2, NULL); dhcp_start(&netif); while (!netif.ip_addr.addr) @@ -201,6 +532,6 @@ int main(void) while (1) { - http_server(server, cgi_table); + http_poll(server); } }