From 316af66d3c1bd1b7a5ddfb0e819cc35e9b8a005b Mon Sep 17 00:00:00 2001
From: Marcos Kirsch <bitbucket@kirsch.com.mx>
Date: Sun, 22 Feb 2015 16:06:06 -0600
Subject: [PATCH] Improve demo files

---
 http/file_list.lua | 25 ++++++++++++-------------
 http/index.html    | 21 +++++++++++----------
 http/node_info.lua | 20 +++++++++++---------
 3 files changed, 34 insertions(+), 32 deletions(-)
diff --git a/http/file_list.lua b/http/file_list.lua
index ddc3edf..e8bc675 100644
--- a/http/file_list.lua
+++ b/http/file_list.lua
@@ -1,21 +1,20 @@
-local function sendHeader(connection)
+return function (connection, args)
    connection:send("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\Cache-Control: private, no-store\r\n\r\n")
-end
-
-local function sendFileList(connection)
+   connection:send('<!DOCTYPE html><html lang="en"><head><meta charset="utf-8"><title>Server File Listing</title></head>')
+   connection:send('<body>')
+   connection:send('<h1>Server File Listing</h1>')
    connection:send("<ul>\n")
+
    local l = file.list()
    for name, size in pairs(l) do
-      connection:send("   <li>" .. name .. " (" .. size .. ")</li>\n")
+
+      local isHttpFile = string.match(name, "(http/)") ~= nil
+      local url = string.match(name, ".*/(.*)")
+      if isHttpFile then
+         connection:send('   <li><a href="' .. url .. '">' .. url .. "</a> (" .. size .. " bytes)</li>\n")
+      end
+
    end
    connection:send("</ul>\n")
-end
-
-return function (connection, args)
-   sendHeader(connection)
-   connection:send('<!DOCTYPE html><html lang="en"><head><meta charset="utf-8"><title>A Lua script sample</title></head>')
-   connection:send('<body>')
-   connection:send('<h1>File Listing</h1>')
-   sendFileList(connection)
    connection:send('</body></html>')
 end
diff --git a/http/index.html b/http/index.html
index 4383ee4..887bd6a 100644
--- a/http/index.html
+++ b/http/index.html
@@ -8,20 +8,21 @@
    <h1>Hello World!</h1>
    <div>
    <section>
-   <h3>nodemcu-httpserver</h3>
-   <p>This page is served by nodemcu-httpserver running on an ESP8266. One of the smallest web servers... ever!</p>
+   <p>
+      This page is served by <b>nodemcu-httpserver</b> running on an ESP8266 that uses the <a href="http://nodemcu.com/index_en.html">NodeMCU</a> firmware.
+      NodeMCU puts a <a href="http://www.lua.org">Lua</a> interpreter inside the ESP8266. This is surely one of the smallest web servers to date!
+   </p>
 
    <h3>Where's the source code?</h3>
-   <p><a href="https://github.com/marcoskirsch/nodemcu-httpserver">Right here</a></p>
+   <p>You can find the Lua code for nodemcu-httpserver in <a href="https://github.com/marcoskirsch/nodemcu-httpserver">GitHub</a></p>
 
-   <h3>Show me the demos</h3>
+   <h3>Serve me some pages!</h3>
    <ul>
-      <li><a href="index.html">This page</a> (static)</li>
-      <li><a href="file_list.lua">List all server files</a> (Lua)</li>
-      <li><a href="node_info.lua">NodeMCU info</a> (Lua)</li>
-      <li><a href="memory.lua">Memory statistics</a> (Lua)</li>
-      <li><a href="foo.html">A file not found</a> (error)</li>
-      <li><a href="args.lua?color=red&size=big&number=42">Argument parsing</a> (Lua)</li>
+      <li><a href="index.html">Index</a>: This page (static)</li>
+      <li><a href="args.lua">Arguments</a>: Parses arguments passed in the URL and prints them. (Lua)</li>
+      <li><a href="file_list.lua">List all server files</a>: Displays a list of all the server files. (Lua)</li>
+      <li><a href="node_info.lua">NodeMCU info</a>: Shows some basic NodeMCU(Lua)</li>
+      <li><a href="foo.html">Foo</a>: A file that isn't actually in the server. Should error (error)</li>
    </ul>
 </body>
 </html>
diff --git a/http/node_info.lua b/http/node_info.lua
index a563692..5d19055 100644
--- a/http/node_info.lua
+++ b/http/node_info.lua
@@ -13,15 +13,17 @@ return function (connection, args)
    connection:send('<body>')
    connection:send('<h1>Node info</h1>')
    majorVer, minorVer, devVer, chipid, flashid, flashsize, flashmode, flashspeed = node.info();
-   connection:send('<ul>Node info:')
-   sendAttr(connection, "majorVer"     , majorVer)
-   sendAttr(connection, "devVer"       , devVer)
-   sendAttr(connection, "chipid"       , chipid)
-   sendAttr(connection, "flashid"      , flashid)
-   sendAttr(connection, "flashsize"    , flashsize)
-   sendAttr(connection, "flashmode"    , flashmode)
-   sendAttr(connection, "flashspeed"   , flashspeed)
-   sendAttr(connection, "node.heap()"  , node.heap())
+   sendAttr(connection, "majorVer"              , majorVer)
+   sendAttr(connection, "devVer"                , devVer)
+   sendAttr(connection, "chipid"                , chipid)
+   sendAttr(connection, "flashid"               , flashid)
+   sendAttr(connection, "flashsize"             , flashsize)
+   sendAttr(connection, "flashmode"             , flashmode)
+   sendAttr(connection, "flashspeed"            , flashspeed)
+   sendAttr(connection, "node.heap()"           , node.heap())
+   sendAttr(connection, 'Memory in use (KB)'    , collectgarbage("count"))
+   sendAttr(connection, 'IP address'            , wifi.sta.getip())
+   sendAttr(connection, 'MAC address'           , wifi.sta.getmac())
    connection:send('</ul>')
    connection:send('</body></html>')
 end
