initial checkin of icode assembler

git-svn-id: svn://10.0.0.236/trunk@80889 18797224-902f-48f8-a5cc-f745e15eee43

mozilla/js/js2/icodeasm.cpp

@@ -0,0 +1,232 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express oqr
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is the JavaScript 2 Prototype.
+ *
+ * The Initial Developer of the Original Code is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *
+ * Alternatively, the contents of this file may be used under the
+ * terms of the GNU Public License (the "GPL"), in which case the
+ * provisions of the GPL are applicable instead of those above.
+ * If you wish to allow use of your version of this file only
+ * under the terms of the GPL and not to allow others to use your
+ * version of this file under the NPL, indicate your decision by
+ * deleting the provisions above and replace them with the notice
+ * and other provisions required by the GPL.  If you do not delete
+ * the provisions above, a recipient may use your version of this
+ * file under either the NPL or the GPL.
+ */
+
+#include <stdio.h>
+#include <string>
+#include <iterator>
+
+#include "icodemap.h"
+
+#define iter string::iterator
+//std::iterator<std::random_access_iterator_tag, char, ptrdiff_t>
+
+namespace JavaScript {
+namespace ICodeASM {
+    enum TokenEstimation {
+        /* guess at tokentype, based on first character of token */
+        teEOF,
+        teUnknown,
+        teIllegal,
+        teComma,
+        teNumeric,
+        teAlpha,
+        teString,
+        teNotARegister
+    };
+
+    enum TokenType {
+        /* verified token type */
+        ttUndetermined,
+        ttLabel,
+        ttInstruction,
+        ttRegister,
+        ttRegisterList,
+        ttNotARegister,
+        ttString,
+        ttNumber,
+        ttOffsetKeyword
+    };
+
+    struct ICodeParserException {
+        ICodeParserException (string aMsg, iter aPos = 0)
+                : msg(aMsg), pos(aPos) {}
+        string msg;
+        iter aPos;
+    };
+        
+    struct TokenLocation {
+        TokenLocation () : begin(0), end(0), estimate(teIllegal),
+                           type(ttUndetermined) {}
+        iter begin, end;
+        TokenEstimation estimate;
+        TokenType type;
+    };
+    
+    class ICodeParser 
+    {
+    private:
+        uint mMaxRegister;
+        
+    public:
+        void ParseSourceFromString (string source);
+        TokenLocation SeekTokenStart (iter begin, iter end);
+        iter ParseLine (iter begin, iter end);
+        void ParseLabelOrInstruction (TokenLocation tl, iter end);
+        iter ParseOperands (uint icodeID, iter start, iter end);
+        void ParseRegisterOperand (TokenLocation tl, iter end);
+        void ParseDoubleOperand (TokenLocation tl, iter end);
+    };
+
+    void
+    ICodeParser::ParseSourceFromString (string source)
+    {
+        uint lineNo = 0;
+        
+        try
+        {
+            ++lineNo;
+            ParseLine (source.begin(), source.end());
+        }
+        catch (ICodeParserException e)
+        {
+            fprintf (stderr, "Parse Error: %s at %u\n", e.msg.c_str(), lineNo);
+            return;
+        }
+    }
+
+    TokenLocation
+    ICodeParser::SeekTokenStart (iter begin, iter end)
+    {
+        TokenLocation tl;
+        iter curpos;
+
+        tl.type = ttUndetermined;
+        
+        for (curpos = begin; curpos < end; ++curpos) {
+            switch (*curpos)
+            {
+                case ' ':
+                case '\t':
+                case '\n':
+                    /* look past the whitespace */
+                    break;
+
+                case 'a'...'z':
+                case 'A'...'Z':
+                    tl.estimate = teAlpha;
+                    tl.begin = curpos;
+                    return tl;
+
+                case '0'...'1':
+                    tl.estimate = teNumeric;
+                    tl.begin = curpos;
+                    return tl;
+
+                case ',':
+                    tl.estimate = teComma;
+                    tl.begin = curpos;
+                    return tl;
+
+                case '"':
+                case '\'':
+                    tl.estimate = teString;
+                    tl.begin = curpos;
+                    return tl;
+
+                case '<':
+                    tl.estimate = teNotARegister;
+                    tl.begin = curpos;
+                    return tl;
+
+                default:
+                    tl.estimate = teUnknown;
+                    tl.begin = curpos;
+                    return tl;
+            }
+        }
+
+        tl.begin = curpos;
+        tl.estimate = teEOF;
+        return tl;
+    }
+
+    iter
+    ICodeParser::ParseLine (iter begin, iter end)
+    {
+        TokenLocation tl = SeekTokenStart (begin, end);
+
+        if (tl.estimate != teAlpha)
+            throw new ICodeParserException ("Expected an alphanumeric token (like maybe an instruction or an opcode.)");
+
+        ParseLabelOrInstruction (tl, end);
+
+        if (tl.type = ttLabel) {
+            /* XXX Do label-like things */
+            return tl.end;
+        } else {
+            string icode_str (tl.begin, tl.end);
+            for (uint i = 0; i <= icodemap_size; ++i)
+                if (icode_str.compare (icode_map[i]) == 0)
+                    return ParseOperands (i, tl.end, end);
+            
+            throw new ICodeParserException ("Unknown ICode " + icode_str);
+        }
+    }
+
+    void
+    ICodeParser::ParseLabelOrInstruction (TokenLocation tl, iter end)
+    {
+        iter curpos;
+        
+        for (curpos = tl.begin; curpos < end; ++curpos) {
+            switch (*curpos)
+            {
+                case ':':
+                    tl.type = ttLabel;
+                    tl.end = ++curpos;
+                    return;
+
+                case 'a'...'z':
+                case 'A'...'Z':
+                case '0'...'9':
+                    break;
+
+                default:
+                    tl.type = ttInstruction;
+                    tl.end = curpos;
+                    return;
+            }
+        }
+
+        tl.type = ttInstruction;
+        tl.end = curpos;
+        return;
+    }
+
+    iter ICodeParser::ParseOperands (uint icodeID, iter start, iter end)
+    {
+        iter pos = start;
+        
+        if (icode_map[icodeID].otype1 != otNone)
+}
+}

mozilla/js/js2/icodemap.h

@@ -0,0 +1,60 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express oqr
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is the JavaScript 2 Prototype.
+ *
+ * The Initial Developer of the Original Code is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *
+ * Alternatively, the contents of this file may be used under the
+ * terms of the GNU Public License (the "GPL"), in which case the
+ * provisions of the GPL are applicable instead of those above.
+ * If you wish to allow use of your version of this file only
+ * under the terms of the GPL and not to allow others to use your
+ * version of this file under the NPL, indicate your decision by
+ * deleting the provisions above and replace them with the notice
+ * and other provisions required by the GPL.  If you do not delete
+ * the provisions above, a recipient may use your version of this
+ * file under either the NPL or the GPL.
+ */
+
+/* most of this file will get auto-generated from the icode metadata */
+
+#include "vmtypes.h"
+
+enum OperandType {
+    otNone = 0,
+    otRegister,
+    otRegisterList,
+    otLabel,
+    otDouble,
+    otBool,
+    otString
+};
+        
+static uint icodemap_size = 4;
+
+static struct {
+    char *name;
+    OperandType otype1, otype2, otype3, otype4;
+} icode_map [icodemap_size] =
+{
+    {"LOAD_STRING", otRegister, otString},
+    {"CAST", otRegister, otRegister, otType},
+    {"SAVE_NAME", otString, otRegister},
+    {"CALL", otRegister, otRegister, otRegister, otRegisterList},
+    {"RETURN", otRegister}
+};

mozilla/js2/src/icodeasm.cpp

@@ -0,0 +1,232 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express oqr
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is the JavaScript 2 Prototype.
+ *
+ * The Initial Developer of the Original Code is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *
+ * Alternatively, the contents of this file may be used under the
+ * terms of the GNU Public License (the "GPL"), in which case the
+ * provisions of the GPL are applicable instead of those above.
+ * If you wish to allow use of your version of this file only
+ * under the terms of the GPL and not to allow others to use your
+ * version of this file under the NPL, indicate your decision by
+ * deleting the provisions above and replace them with the notice
+ * and other provisions required by the GPL.  If you do not delete
+ * the provisions above, a recipient may use your version of this
+ * file under either the NPL or the GPL.
+ */
+
+#include <stdio.h>
+#include <string>
+#include <iterator>
+
+#include "icodemap.h"
+
+#define iter string::iterator
+//std::iterator<std::random_access_iterator_tag, char, ptrdiff_t>
+
+namespace JavaScript {
+namespace ICodeASM {
+    enum TokenEstimation {
+        /* guess at tokentype, based on first character of token */
+        teEOF,
+        teUnknown,
+        teIllegal,
+        teComma,
+        teNumeric,
+        teAlpha,
+        teString,
+        teNotARegister
+    };
+
+    enum TokenType {
+        /* verified token type */
+        ttUndetermined,
+        ttLabel,
+        ttInstruction,
+        ttRegister,
+        ttRegisterList,
+        ttNotARegister,
+        ttString,
+        ttNumber,
+        ttOffsetKeyword
+    };
+
+    struct ICodeParserException {
+        ICodeParserException (string aMsg, iter aPos = 0)
+                : msg(aMsg), pos(aPos) {}
+        string msg;
+        iter aPos;
+    };
+        
+    struct TokenLocation {
+        TokenLocation () : begin(0), end(0), estimate(teIllegal),
+                           type(ttUndetermined) {}
+        iter begin, end;
+        TokenEstimation estimate;
+        TokenType type;
+    };
+    
+    class ICodeParser 
+    {
+    private:
+        uint mMaxRegister;
+        
+    public:
+        void ParseSourceFromString (string source);
+        TokenLocation SeekTokenStart (iter begin, iter end);
+        iter ParseLine (iter begin, iter end);
+        void ParseLabelOrInstruction (TokenLocation tl, iter end);
+        iter ParseOperands (uint icodeID, iter start, iter end);
+        void ParseRegisterOperand (TokenLocation tl, iter end);
+        void ParseDoubleOperand (TokenLocation tl, iter end);
+    };
+
+    void
+    ICodeParser::ParseSourceFromString (string source)
+    {
+        uint lineNo = 0;
+        
+        try
+        {
+            ++lineNo;
+            ParseLine (source.begin(), source.end());
+        }
+        catch (ICodeParserException e)
+        {
+            fprintf (stderr, "Parse Error: %s at %u\n", e.msg.c_str(), lineNo);
+            return;
+        }
+    }
+
+    TokenLocation
+    ICodeParser::SeekTokenStart (iter begin, iter end)
+    {
+        TokenLocation tl;
+        iter curpos;
+
+        tl.type = ttUndetermined;
+        
+        for (curpos = begin; curpos < end; ++curpos) {
+            switch (*curpos)
+            {
+                case ' ':
+                case '\t':
+                case '\n':
+                    /* look past the whitespace */
+                    break;
+
+                case 'a'...'z':
+                case 'A'...'Z':
+                    tl.estimate = teAlpha;
+                    tl.begin = curpos;
+                    return tl;
+
+                case '0'...'1':
+                    tl.estimate = teNumeric;
+                    tl.begin = curpos;
+                    return tl;
+
+                case ',':
+                    tl.estimate = teComma;
+                    tl.begin = curpos;
+                    return tl;
+
+                case '"':
+                case '\'':
+                    tl.estimate = teString;
+                    tl.begin = curpos;
+                    return tl;
+
+                case '<':
+                    tl.estimate = teNotARegister;
+                    tl.begin = curpos;
+                    return tl;
+
+                default:
+                    tl.estimate = teUnknown;
+                    tl.begin = curpos;
+                    return tl;
+            }
+        }
+
+        tl.begin = curpos;
+        tl.estimate = teEOF;
+        return tl;
+    }
+
+    iter
+    ICodeParser::ParseLine (iter begin, iter end)
+    {
+        TokenLocation tl = SeekTokenStart (begin, end);
+
+        if (tl.estimate != teAlpha)
+            throw new ICodeParserException ("Expected an alphanumeric token (like maybe an instruction or an opcode.)");
+
+        ParseLabelOrInstruction (tl, end);
+
+        if (tl.type = ttLabel) {
+            /* XXX Do label-like things */
+            return tl.end;
+        } else {
+            string icode_str (tl.begin, tl.end);
+            for (uint i = 0; i <= icodemap_size; ++i)
+                if (icode_str.compare (icode_map[i]) == 0)
+                    return ParseOperands (i, tl.end, end);
+            
+            throw new ICodeParserException ("Unknown ICode " + icode_str);
+        }
+    }
+
+    void
+    ICodeParser::ParseLabelOrInstruction (TokenLocation tl, iter end)
+    {
+        iter curpos;
+        
+        for (curpos = tl.begin; curpos < end; ++curpos) {
+            switch (*curpos)
+            {
+                case ':':
+                    tl.type = ttLabel;
+                    tl.end = ++curpos;
+                    return;
+
+                case 'a'...'z':
+                case 'A'...'Z':
+                case '0'...'9':
+                    break;
+
+                default:
+                    tl.type = ttInstruction;
+                    tl.end = curpos;
+                    return;
+            }
+        }
+
+        tl.type = ttInstruction;
+        tl.end = curpos;
+        return;
+    }
+
+    iter ICodeParser::ParseOperands (uint icodeID, iter start, iter end)
+    {
+        iter pos = start;
+        
+        if (icode_map[icodeID].otype1 != otNone)
+}
+}

mozilla/js2/src/icodemap.h

@@ -0,0 +1,60 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public
+ * License Version 1.1 (the "License"); you may not use this file
+ * except in compliance with the License. You may obtain a copy of
+ * the License at http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the License is distributed on an "AS
+ * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express oqr
+ * implied. See the License for the specific language governing
+ * rights and limitations under the License.
+ *
+ * The Original Code is the JavaScript 2 Prototype.
+ *
+ * The Initial Developer of the Original Code is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation. All
+ * Rights Reserved.
+ *
+ * Contributor(s): 
+ *
+ * Alternatively, the contents of this file may be used under the
+ * terms of the GNU Public License (the "GPL"), in which case the
+ * provisions of the GPL are applicable instead of those above.
+ * If you wish to allow use of your version of this file only
+ * under the terms of the GPL and not to allow others to use your
+ * version of this file under the NPL, indicate your decision by
+ * deleting the provisions above and replace them with the notice
+ * and other provisions required by the GPL.  If you do not delete
+ * the provisions above, a recipient may use your version of this
+ * file under either the NPL or the GPL.
+ */
+
+/* most of this file will get auto-generated from the icode metadata */
+
+#include "vmtypes.h"
+
+enum OperandType {
+    otNone = 0,
+    otRegister,
+    otRegisterList,
+    otLabel,
+    otDouble,
+    otBool,
+    otString
+};
+        
+static uint icodemap_size = 4;
+
+static struct {
+    char *name;
+    OperandType otype1, otype2, otype3, otype4;
+} icode_map [icodemap_size] =
+{
+    {"LOAD_STRING", otRegister, otString},
+    {"CAST", otRegister, otRegister, otType},
+    {"SAVE_NAME", otString, otRegister},
+    {"CALL", otRegister, otRegister, otRegister, otRegisterList},
+    {"RETURN", otRegister}
+};