initial checkin of icode assembler
git-svn-id: svn://10.0.0.236/trunk@80889 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
rginda%netscape.com
parent
801cc4adc1
commit
add1fbfa6f
232
mozilla/js/js2/icodeasm.cpp
Normal file
232
mozilla/js/js2/icodeasm.cpp
Normal file
@ -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)
|
||||
}
|
||||
}
|
||||
60
mozilla/js/js2/icodemap.h
Normal file
60
mozilla/js/js2/icodemap.h
Normal file
@ -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}
|
||||
};
|
||||
232
mozilla/js2/src/icodeasm.cpp
Normal file
232
mozilla/js2/src/icodeasm.cpp
Normal file
@ -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)
|
||||
}
|
||||
}
|
||||
60
mozilla/js2/src/icodemap.h
Normal file
60
mozilla/js2/src/icodemap.h
Normal file
@ -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}
|
||||
};
|
||||
Loading…
x
Reference in New Issue
Block a user