From 169b92c6b3d7a4ed9722da4fe0d3279e94f4ea5d Mon Sep 17 00:00:00 2001
From: daurnimator <quae@daurnimator.com>
Date: Tue, 2 Jan 2018 00:50:59 +1100
Subject: src/lobject.js: Check string length before indexing

Strings aren't null terminated in JS
---
 src/lobject.js | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/lobject.js b/src/lobject.js
index 1b490f3..37419a9 100644
--- a/src/lobject.js
+++ b/src/lobject.js
@@ -474,12 +474,12 @@ const l_str2int = function(s) {
     if (s[i] === char['0'] && (s[i+1] === char['x'] || s[i+1] === char['X'])) {  /* hex? */
         i += 2;  /* skip '0x' */
 
-        for (; ljstype.lisxdigit(s[i]); i++) {
+        for (; i < s.length && ljstype.lisxdigit(s[i]); i++) {
             a = (a * 16 + luaO_hexavalue(s[i]))|0;
             empty = false;
         }
     } else {  /* decimal */
-        for (; ljstype.lisdigit(s[i]); i++) {
+        for (; i < s.length && ljstype.lisdigit(s[i]); i++) {
             let d = s[i] - char['0'];
             if (a >= MAXBY10 && (a > MAXBY10 || d > MAXLASTD + neg))  /* overflow? */
                 return null;  /* do not accept it (as integer) */
@@ -487,7 +487,7 @@ const l_str2int = function(s) {
             empty = false;
         }
     }
-    while (ljstype.lisspace(s[i])) i++;  /* skip trailing spaces */
+    while (i < s.length && ljstype.lisspace(s[i])) i++;  /* skip trailing spaces */
     if (empty || (i !== s.length && s[i] !== 0)) return null;  /* something wrong in the numeral */
     else {
         return {
-- 
cgit v1.2.3-70-g09d2


From dc9eceb56d1d0d37c31887bffc48816bf53ddf3c Mon Sep 17 00:00:00 2001
From: daurnimator <quae@daurnimator.com>
Date: Tue, 2 Jan 2018 00:51:52 +1100
Subject: src/ljstype.js: Add built in tables rather than using regex rules

---
 src/ljstype.js | 54 ++++++++++++++++++++++++++++++++++++++++++++++++------
 1 file changed, 48 insertions(+), 6 deletions(-)

diff --git a/src/ljstype.js b/src/ljstype.js
index 2528f74..4d46fa9 100644
--- a/src/ljstype.js
+++ b/src/ljstype.js
@@ -1,27 +1,69 @@
 "use strict";
 
+const luai_ctype_ = [
+    0x00,  /* EOZ */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* 0. */
+    0x00,  0x08,  0x08,  0x08,  0x08,  0x08,  0x00,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* 1. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
+    0x0c,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,        /* 2. */
+    0x04,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,
+    0x16,  0x16,  0x16,  0x16,  0x16,  0x16,  0x16,  0x16,        /* 3. */
+    0x16,  0x16,  0x04,  0x04,  0x04,  0x04,  0x04,  0x04,
+    0x04,  0x15,  0x15,  0x15,  0x15,  0x15,  0x15,  0x05,        /* 4. */
+    0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,
+    0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,        /* 5. */
+    0x05,  0x05,  0x05,  0x04,  0x04,  0x04,  0x04,  0x05,
+    0x04,  0x15,  0x15,  0x15,  0x15,  0x15,  0x15,  0x05,        /* 6. */
+    0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,
+    0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,  0x05,        /* 7. */
+    0x05,  0x05,  0x05,  0x04,  0x04,  0x04,  0x04,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* 8. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* 9. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* a. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* b. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* c. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* d. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* e. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,        /* f. */
+    0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00
+];
+
+const ALPHABIT = 0;
+const DIGITBIT = 1;
+const PRINTBIT = 2;
+const SPACEBIT = 3;
+const XDIGITBIT = 4;
+
 const lisdigit = function(c) {
-    return /^\d$/.test(String.fromCharCode(c));
+    return (luai_ctype_[c+1] & (1<<DIGITBIT)) !== 0;
 };
 
 const lisxdigit = function(c) {
-    return /^[0-9a-fA-F]$/.test(String.fromCharCode(c));
+    return (luai_ctype_[c+1] & (1<<XDIGITBIT)) !== 0;
 };
 
 const lisprint = function(c) {
-    return /^[\x20-\x7E]$/.test(String.fromCharCode(c));
+    return (luai_ctype_[c+1] & (1<<PRINTBIT)) !== 0;
 };
 
 const lisspace = function(c) {
-    return /^\s$/.test(String.fromCharCode(c));
+    return (luai_ctype_[c+1] & (1<<SPACEBIT)) !== 0;
 };
 
 const lislalpha = function(c) {
-    return /^[_a-zA-Z]$/.test(String.fromCharCode(c));
+    return (luai_ctype_[c+1] & (1<<ALPHABIT)) !== 0;
 };
 
 const lislalnum = function(c) {
-    return /^[_a-zA-Z0-9]$/.test(String.fromCharCode(c));
+    return (luai_ctype_[c+1] & ((1<<ALPHABIT)|(1<<DIGITBIT))) !== 0;
 };
 
 module.exports.lisdigit   = lisdigit;
-- 
cgit v1.2.3-70-g09d2