Initial revision
diff --git a/contiki-cpc/apps/memstat.c b/contiki-cpc/apps/memstat.c
new file mode 100644
index 0000000..0b8f8b0
--- /dev/null
+++ b/contiki-cpc/apps/memstat.c
@@ -0,0 +1,148 @@
+/*
+ * Copyright (c) 2002, Adam Dunkels.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above
+ * copyright notice, this list of conditions and the following
+ * disclaimer in the documentation and/or other materials provided
+ * with the distribution.
+ * 3. The name of the author may not be used to endorse or promote
+ * products derived from this software without specific prior
+ * written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+ * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+ * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+ * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+ * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *
+ * This file is part of the Contiki desktop environment
+ *
+ * $Id: memstat.c,v 1.1 2006/04/17 15:18:19 kthacker Exp $
+ *
+ */
+
+#include <stdlib.h>
+
+#include "ctk.h"
+#include "ek.h"
+#include "loader.h"
+
+static struct ctk_window window;
+static struct ctk_label freemsg =
+ {CTK_LABEL(2, 0, 12, 1, "Free memory:")};
+static char freemem[6];
+static struct ctk_label freenum =
+ {CTK_LABEL(18, 0, 5, 1, freemem)};
+
+static struct ctk_label lblockmsg =
+ {CTK_LABEL(2, 2, 14, 1, "Largest block:")};
+static char lblock[6];
+static struct ctk_label lblocknum =
+ {CTK_LABEL(18, 2, 5, 1, lblock)};
+
+const static struct ctk_button updatebutton =
+ {CTK_BUTTON(0, 4, 6, "Update")};
+const static struct ctk_button closebutton =
+ {CTK_BUTTON(17, 4, 5, "Close")};
+
+/*static DISPATCHER_SIGHANDLER(memstat_sighandler, s, data);
+static struct dispatcher_proc p =
+ {DISPATCHER_PROC("Memory statistics", NULL, memstat_sighandler, NULL)};
+ static ek_id_t id;*/
+EK_EVENTHANDLER(memstat_eventhandler, ev, data);
+EK_PROCESS(p, "Memory statistics", EK_PRIO_NORMAL,
+ memstat_eventhandler, NULL, NULL);
+static ek_id_t id = EK_ID_NONE;
+
+/*-----------------------------------------------------------------------------------*/
+static void
+update(void)
+{
+ int mem;
+
+ mem = _heapmemavail();
+ freemem[0] = (mem/10000) % 10 + '0';
+ freemem[1] = (mem/1000) % 10 + '0';
+ freemem[2] = (mem/100) % 10 + '0';
+ freemem[3] = (mem/10) % 10 + '0';
+ freemem[4] = (mem) % 10 + '0';
+
+ mem = _heapmaxavail();
+ lblock[0] = (mem/10000) % 10 + '0';
+ lblock[1] = (mem/1000) % 10 + '0';
+ lblock[2] = (mem/100) % 10 + '0';
+ lblock[3] = (mem/10) % 10 + '0';
+ lblock[4] = (mem) % 10 + '0';
+
+}
+/*-----------------------------------------------------------------------------------*/
+LOADER_INIT_FUNC(memstat_init, arg)
+{
+ arg_free(arg);
+
+ if(id == EK_ID_NONE) {
+ id = ek_start(&p);
+
+ } else {
+ ctk_window_open(&window);
+ }
+}
+/*-----------------------------------------------------------------------------------*/
+static void
+quit(void)
+{
+ ek_exit();
+ id = EK_ID_NONE;
+ LOADER_UNLOAD();
+}
+/*-----------------------------------------------------------------------------------*/
+EK_EVENTHANDLER(memstat_eventhandler, ev, data)
+{
+ EK_EVENTHANDLER_ARGS(ev, data);
+
+ if(ev == EK_EVENT_INIT) {
+ ctk_window_new(&window, 24, 5, "Memory stats");
+ /* ctk_window_move(&window, 0, 1);*/
+
+ CTK_WIDGET_ADD(&window, &freemsg);
+ CTK_WIDGET_ADD(&window, &freenum);
+
+ CTK_WIDGET_ADD(&window, &lblockmsg);
+ CTK_WIDGET_ADD(&window, &lblocknum);
+
+ CTK_WIDGET_ADD(&window, &updatebutton);
+ CTK_WIDGET_ADD(&window, &closebutton);
+
+ CTK_WIDGET_FOCUS(&window, &updatebutton);
+
+ update();
+
+ ctk_window_open(&window);
+
+ } else if(ev == ctk_signal_button_activate) {
+ if(data == (ek_data_t)&updatebutton) {
+ update();
+ ctk_window_redraw(&window);
+ } else if(data == (ek_data_t)&closebutton) {
+ ctk_window_close(&window);
+ quit();
+ }
+ } else if((ev == ctk_signal_window_close &&
+ data == (ek_data_t)&window) ||
+ ev == EK_EVENT_REQUEST_EXIT) {
+ quit();
+ }
+}
+/*-----------------------------------------------------------------------------------*/