Add a small LED interface and demo app.

app/dartino/main.c

 // Copyright (c) 2016, the Dartino project authors. Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE.md file.
 
 #include "config.h"
 
 #include <stdint.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
 
 #include <app.h>
 #include <err.h>
 #include <compiler.h>
 #include <endian.h>
 #include <platform.h>
 #include <dev/display.h>
+#include <dev/gpio.h>
 
 #include <kernel/port.h>
 
 #include <lib/font.h>
 #include <lib/gfx.h>
 
 #include <include/static_ffi.h>
 
 #include "loader.h"
 
 #if defined(WITH_LIB_CONSOLE)
 #include <lib/console.h>
 #else
 #error "dartino app needs a console"
 #endif
 
 void SensorsInit(void);
 
+int led_get_gpio(int);
+
 enum {
   MODE_RUN,
   MODE_BURN
 } dartino_mode;
 
 
 //////////////// Dart FFI setup ///////////////////////////////////////////////
 
 __WEAK status_t display_get_info(struct display_info *info) {
   return ERR_NOT_FOUND;
@@ skipping 25 matching lines @@
 DARTINO_EXPORT_TABLE_ENTRY("gfx_width", GetWidth)
 DARTINO_EXPORT_TABLE_ENTRY("gfx_height", GetHeight)
 DARTINO_EXPORT_TABLE_ENTRY("gfx_destroy", gfx_surface_destroy)
 DARTINO_EXPORT_TABLE_ENTRY("gfx_pixel", gfx_putpixel)
 DARTINO_EXPORT_TABLE_ENTRY("gfx_line", gfx_line)
 DARTINO_EXPORT_TABLE_ENTRY("gfx_clear", gfx_clear)
 DARTINO_EXPORT_TABLE_ENTRY("gfx_flush", gfx_flush)
 DARTINO_EXPORT_TABLE_ENTRY("port_open", port_open)
 DARTINO_EXPORT_TABLE_ENTRY("port_close", port_open)
 DARTINO_EXPORT_TABLE_ENTRY("port_read", port_read)
+DARTINO_EXPORT_TABLE_ENTRY("led_get_gpio", led_get_gpio)
+DARTINO_EXPORT_TABLE_ENTRY("gpio_set", gpio_set)
+DARTINO_EXPORT_TABLE_ENTRY("gpio_get", gpio_get)
 DARTINO_EXPORT_TABLE_END
 
 //////////////// Port debug ///////////////////////////////////////////////////
 
 static void DumpPacket(const port_result_t* result) {
   const port_packet_t* p = &result->packet;
   printf("[%02x %02x %02x %02x %02x %02x %02x %02x]\n",
          p->value[0], p->value[1], p->value[2], p->value[3],
          p->value[4], p->value[5], p->value[6], p->value[7]);
 }
@@ skipping 84 matching lines @@
   .init = ServicesInit,
   .entry = NULL,
   .flags = 0,
 APP_END
 
 STATIC_COMMAND_START
 STATIC_COMMAND("dartino", "dartino vm via tftp", &DartinoRunner)
 STATIC_COMMAND_END(dartinorunner);
 
 // vim: set expandtab ts=2 sw=2: