Version 0.0.2

Author: osch

rockspecs/nocurses-0.0.1-1.rockspec

@@ -1,8 +1,17 @@
 package = "nocurses"
-version = "scm-0"
+version = "0.0.2-1"
+local pkgVersion = version:gsub("^(.*)%-.-$", "%1")
+local url, dir
+if pkgVersion == "scm" then
+  url = "https://github.com/osch/lua-nocurses/archive/master.zip"
+  dir = "lua-nocurses-master"
+else 
+  url = "https://github.com/osch/lua-nocurses/archive/v"..pkgVersion..".zip"
+  dir = "lua-nocurses-"..pkgVersion
+end
 source = {
-  url = "https://github.com/osch/lua-nocurses/archive/master.zip",
-  dir = "lua-nocurses-master",
+  url = url,
+  dir = dir,
 }
 description = {
   summary = "A terminal screen manipulation library",
@@ -26,8 +35,8 @@ build = {
           "src/main.c",
           "src/nocurses_compat.c",
       },
-      defines = { "NOCURSES_VERSION="..version:gsub("^(.*)-.-$", "%1") },
+      defines = { "NOCURSES_VERSION="..pkgVersion },
     },
     ["nocurses.getkey"] = "src/nocurses/getkey.lua",
   }
-}
+}

rockspecs/nocurses-scm-0.rockspec renamed to rockspecs/nocurses-0.0.2-1.rockspec

@@ -0,0 +1,49 @@
+#!/usr/bin/lua
+
+os.setlocale("C")
+
+local pkgName = "nocurses"
+
+local format = string.format
+local lfs    = require("lfs")
+
+local version = ...
+assert(version, "missing argument version")
+local fullVersion
+if version == "scm" then
+    fullVersion = "scm-0"
+else
+    assert(version:match("^%d+%.%d+%.%d+$"), format("invalid version %q", version))
+    fullVersion = version.."-1"
+end
+
+for fileName in lfs.dir(".") do
+    local p1, v, p2 = fileName:match("^("..pkgName.."%-)(.*)(%.rockspec)$")
+    if p1 then
+        local newName = p1..fullVersion..p2
+        print(format("%-30s -> %s", fileName, newName))
+        local out = {}
+        local matched = false
+        local inFile = io.open(fileName, "r")
+        for line in inFile:lines() do
+            local l1, l2 = line:match("^(%s*version%s*%=%s*\")[^\"]*(\"%s*)$")
+            if l1 then
+                assert(not matched)
+                matched = true
+                out[#out+1] = l1..fullVersion..l2
+            else
+                out[#out+1] = line
+            end
+        end
+        out[#out+1] = ""
+        inFile:close()
+        assert(matched)
+        local newFile, err = io.open(newName, "w")
+        assert(newFile, err)
+        newFile:write(table.concat(out, "\n"))
+        newFile:close()
+        if fileName ~= newName then
+            os.remove(fileName)
+        end
+    end
+end

rockspecs/setversion.lua

@@ -672,44 +672,6 @@ static const luaL_Reg ModuleFunctions[] =
 
 /* ============================================================================================ */
 
-typedef struct {
-    const char* name;
-    const char* bytes;
-} InputSequence;
-
-static const InputSequence inputSequences[] =
-{
-    { "Up",        "\033[A"   },
-    { "Down",      "\033[B"   },
-    { "Right",     "\033[C"   },
-    { "Left",      "\033[D"   },
-    { "Home",      "\033[H"   },
-    { "End",       "\033[F"   },
-    { "Page_Up",   "\033[5~"  },
-    { "Page_Down", "\033[6~"  },
-    { "Backspace", "\177"     },
-    { "Backspace", "\010"     },
-    { "Tab",       "\011"     },
-    { "Delete",    "\033[3~"  },
-    { "Insert",    "\033[2~"  },
-    { "Escape",    "\033"     },
-    { "Enter",     "\n"       },
-    { "F1",        "\033OP"   },
-    { "F2",        "\033OQ"   },
-    { "F3",        "\033OR"   },
-    { "F4",        "\033OS"   },
-    { "F5",        "\033[15~" },
-    { "F6",        "\033[17~" },
-    { "F7",        "\033[18~" },
-    { "F8",        "\033[19~" },
-    { "F9",        "\033[20~" },
-    { "F10",       "\033[21~" },
-    { "F11",       "\033[23~" },
-    { "F12",       "\033[24~" },
-    { NULL, NULL }
-};
-
-/* ============================================================================================ */
 
 DLL_PUBLIC int luaopen_nocurses(lua_State* L)
 {
@@ -752,12 +714,6 @@ DLL_PUBLIC int luaopen_nocurses(lua_State* L)
     } else {
         luaL_setfuncs(L, ModuleFunctions, 0);
     }
-    lua_newtable(L);                     /* --> module, key */
-    for (const InputSequence* seq = inputSequences; seq->name; ++seq) {
-        lua_pushstring(L, seq->name);    /* --> module, key, bytes */
-        lua_setfield(L, -2, seq->bytes); /* --> module, key */
-    }                                    /* --> module, key */
-    lua_setfield(L, -2, "keyt");          /* --> module */
     lua_pop(L, 1);
 
     lua_pushliteral(L, NOCURSES_VERSION_STRING);