Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance. Project price only 1 $
You can buy this project and download/modify it how often you want.
/*
Syntax is distributed under the Revised, or 3-clause BSD license
===============================================================================
Copyright (c) 1985, 2012, 2016, Jaime Garza
All rights reserved.
Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are met:
* Redistributions of source code must retain the above copyright
notice, this list of conditions and the following disclaimer.
* Redistributions in binary form must reproduce the above copyright
notice, this list of conditions and the following disclaimer in the
documentation and/or other materials provided with the distribution.
* Neither the name of the copyright holder nor the
names of its contributors may be used to endorse or promote products
derived from this software without specific prior written permission.
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE FOR ANY
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
===============================================================================
*/
package me.jaimegarza.syntax.language;
import me.jaimegarza.syntax.EmbeddedCodeProcessor;
import me.jaimegarza.syntax.Lexer;
import me.jaimegarza.syntax.code.Fragments;
import me.jaimegarza.syntax.env.Environment;
import me.jaimegarza.syntax.env.RuntimeData;
import me.jaimegarza.syntax.model.parser.State;
import me.jaimegarza.syntax.model.parser.Symbol;
import me.jaimegarza.syntax.model.parser.Terminal;
import me.jaimegarza.syntax.model.parser.Type;
import me.jaimegarza.syntax.util.FormattingPrintStream;
/**
* Class that contains routines common to all language drivers
*
* @author [email protected]
*
*/
public abstract class BaseLanguageSupport implements LanguageSupport {
protected Environment environment;
protected RuntimeData runtime;
@Override
public boolean getDefaultIncludeFlag() {
return false;
}
@Override
public void emitLine(int lineNumber) {
}
@Override
public void emitLine(int lineNumber, String filename) {
}
@Override
public int getNumberOfSpacesPerIndent() {
return 2;
}
@Override
public String indent(FormattingPrintStream out, int n) {
StringBuilder b = new StringBuilder();
int spaces = n * getNumberOfSpacesPerIndent();
for (int i = 0; i < spaces; i++) {
b.append(' ');
}
String indentString = b.toString();
if (out != null) {
out.print(indentString);
}
return indentString;
}
@Override
public String indent(int n) {
return indent(null, n);
}
/*
* Getters and setters
*/
/**
* @return the environment
*/
public Environment getEnvironment() {
return environment;
}
/**
* @param environment the environment to set
*/
public void setEnvironment(Environment environment) {
this.environment = environment;
setRuntime(environment.getRuntimeData());
}
/**
* @return the runtime
*/
public RuntimeData getRuntime() {
return runtime;
}
/**
* @param runtime the runtime to set
*/
public void setRuntime(RuntimeData runtime) {
this.runtime = runtime;
}
/*
* Adopting the C, JAVA as the default for all languages. It may need to
* be moved as more languages are implemented
* (non-Javadoc)
* @see me.jaimegarza.syntax.language.LanguageSupport#generateRuleCode(me.jaimegarza.syntax.definition.Lexer, int, java.lang.String)
*/
@Override
public boolean generateRuleCode(Lexer lexer, EmbeddedCodeProcessor processor, int elementCount, String nonTerminalId, int sourceColumn) {
int nBracks = 0;
boolean end = false;
while (!end) {
switch (runtime.currentCharacter) {
case ';': /* final action in C & comment in ASM */
if (nBracks == 0) {
end = true;
}
break;
case '{': /* level++ in C, JAVA */
nBracks++;
break;
case '}': /* level -- in C, JAVA */
if (--nBracks <= 0) {
end = true;
}
break;
case '/': /* possible comment in C, JAVA */
environment.output.print(runtime.currentCharacter);
lexer.getCharacter();
if (runtime.currentCharacter != '*') {
continue;
}
if (!processor.skipAndOutputCompositeComment(lexer, '*', '/')) {
return false;
}
continue;
case '\'': /* constant */
case '"': /* string */
processor.generateConstant(lexer, runtime.currentCharacter);
break;
case '\n':
environment.output.print(runtime.currentCharacter);
lexer.getCharacter();
indent(environment.output, environment.getIndent() + 2);
continue;
case 0:
environment.error(-1, "Unfinished action detected.");
return false;
case '$':
int command = manageDollar(lexer, processor, elementCount, nonTerminalId);
if (command == 0) {
return false;
} else if (command > 0) {
continue;
}
break;
}
environment.output.print(runtime.currentCharacter);
lexer.getCharacter();
}
return true;
}
protected int manageDollar(Lexer lexer, EmbeddedCodeProcessor processor, int elementCount, String nonTerminalId) {
Type type = null;
int sign = 1;
lexer.getCharacter();
if (runtime.currentCharacter == '<') { /* type */
type = processor.getTypeFromStream(lexer);
if (type == null) {
return 0; // command a return false
}
}
if (runtime.currentCharacter == '$') {
if (!processor.generateDollarDollar(lexer, elementCount, nonTerminalId, type)) {
return 0; // command a return false
}
return 1; // command a continue
}
if (Character.isLetter(runtime.currentCharacter)) {
return processor.generateDollarLetter(lexer, elementCount, type, nonTerminalId) ? 1 : 0;
}
if (runtime.currentCharacter == '-') {
sign = -sign;
lexer.getCharacter();
}
if (Character.isDigit(runtime.currentCharacter)) {
return processor.generateDollarNumber(lexer, elementCount, type, sign) ? 1 : 0;
}
// fall through
environment.output.print('$');
if (sign < 0) {
environment.output.print('-');
}
return -1; // command a break
}
protected boolean lexerDollar(FormattingPrintStream output, String lexerMode, Lexer lexer, Terminal token) {
lexer.getCharacter();
if (runtime.currentCharacter == '+') {
lexer.getCharacter();
output.printFragment("getc");
return true;
} else if (runtime.currentCharacter == 'c') {
lexer.getCharacter();
output.printFragment("currentChar");
return true;
} else if (runtime.currentCharacter == 'l') {
lexer.getCharacter();
output.printFragment("lexerMode");
return true;
} else if (runtime.currentCharacter == 'v') {
lexer.getCharacter();
output.printFragment(Fragments.LEXICAL_VALUE);
return true;
} else if (runtime.currentCharacter == 't') {
lexer.getCharacter();
output.printFragment(Fragments.TOKEN, token.getName());
return true;
} else if (runtime.currentCharacter == 'm') {
lexer.getCharacter();
output.printFragment(Fragments.LEXER_FUNCTION_NAME, lexerMode);
return true;
} else if (runtime.currentCharacter == 'r') {
lexer.getCharacter();
output.printFragment(Fragments.RECOGNIZED);
return true;
}
output.print('$');
return false;
}
protected boolean lexerComment(FormattingPrintStream output, Lexer lexer, char characterToFind) {
output.print(runtime.currentCharacter);
lexer.getCharacter();
if (runtime.currentCharacter != '*') {
return true;
}
output.print(runtime.currentCharacter);
lexer.getCharacter();
boolean bBreak = false;
while (!bBreak) {
if (runtime.currentCharacter == '\0') {
environment.error(-1, "Unfinished comment.");
return false;
}
while (runtime.currentCharacter == '*') {
output.print(runtime.currentCharacter);
if ((lexer.getCharacter()) == characterToFind) {
bBreak = true;
}
}
output.print(runtime.currentCharacter);
lexer.getCharacter();
}
return true;
}
protected boolean lexerString(FormattingPrintStream output, Lexer lexer, char characterToFind) {
output.print(runtime.currentCharacter);
while ((lexer.getCharacter()) != characterToFind) {
if (runtime.currentCharacter == '\0') {
environment.error(-1, "Statement ' .. ' or \" .. \" not ended");
return false;
}
if (runtime.currentCharacter == '\n') {
environment.error(-1, "End of line reached on string literal.");
break;
}
if (runtime.currentCharacter == '\\') {
output.print(runtime.currentCharacter);
lexer.getCharacter();
}
output.print(runtime.currentCharacter);
}
return true;
}
static int modeNumber = 0;
protected String computeModeName(String lexerMode) {
modeNumber++;
if (lexerMode == null || lexerMode.length() == 0) {
return "_pe_" + modeNumber;
}
String id = "";
for (int i = 0; i < lexerMode.length(); i++) {
char c = lexerMode.charAt(i);
if (i == 0) {
if (Character.isJavaIdentifierStart(c)) {
id += c;
} else {
id = "_pe_";
}
} else {
if (Character.isJavaIdentifierPart(c)) {
id += c;
} else {
id += '_';
}
}
}
return id;
}
@Override
public boolean generateLexerCode(FormattingPrintStream output, String lexerMode, Lexer lexer, Terminal token, int additionalIndent) {
int nBracks = 0;
boolean end = false;
boolean startingString = true;
boolean startedWithBracket = false;
while (!end) {
switch (runtime.currentCharacter) {
case '$':
if (lexerDollar(output, lexerMode, lexer, token)) {
continue;
}
break;
case ';': /* finish of action */
if (nBracks <= 0) {
end = true;
}
break;
case '{': /* level++ in C */
nBracks++;
break;
case '}': /* level -- in C */
if (--nBracks <= 0 && startedWithBracket) {
end = true;
}
if (end && startedWithBracket) {
lexer.getCharacter();
continue;
}
break;
case '/': /* possible comment in C */
if(!lexerComment(output, lexer, '/')) {
return false;
}
continue;
case '\'': /* constant */
case '"': /* string */
if (!lexerString(output, lexer, runtime.currentCharacter)) {
return false;
}
break;
case '\n':
output.print(runtime.currentCharacter);
lexer.getCharacter();
indent(output, environment.getIndent() - (this instanceof C?1:0) + additionalIndent);
continue;
case 0:
environment.error(-1, "Unfinished action detected.");
return false;
}
if (startingString && runtime.currentCharacter == '{') {
startedWithBracket = true;
} else if (!startingString || runtime.currentCharacter != ' ') {
if (startingString) {
indent(output, environment.getIndent() - (this instanceof C?1:0));
}
output.print(runtime.currentCharacter);
}
if (runtime.currentCharacter > ' ') {
startingString = false;
}
lexer.getCharacter();
}
output.println();
return true;
}
protected String getErrorMessage(State I) {
int msgIndex = I.getMessage();
if (msgIndex >= 0) {
return runtime.getErrorMessages().get(msgIndex);
} else {
return "No error assigned";
}
}
protected String escapeDoubleQuotes(String error) {
return error.replaceAll("\\\"", "\\\\\"");
}
protected String getShortSymbolName(Symbol t) {
String name = t.getFullName();
if (name.startsWith("\"") || name.startsWith("\'")) {
name = name.substring(1);
}
if (name.endsWith("\"") || name.endsWith("\'")) {
name = name.substring(0, name.length()-1);
}
if (name.length() > 6) {
name = name.substring(0, 6);
}
if (name.endsWith(" ")) {
name = name.substring(0, name.length()-1);
}
return name;
}
}
