Tangent Wantwight
308f586dad
An enchanted word has provenance of appearing directly in source code as-written, not the result of interpolations, quotes, or escapes.
107 lines
2.7 KiB
TypeScript
107 lines
2.7 KiB
TypeScript
import { escapeHtml } from "./helpers";
|
|
import { AtLeast, Choose, End, Pattern, Regex, Sequence, Use } from "./peg";
|
|
import {
|
|
Word as WordType,
|
|
TextWord,
|
|
EnchantedWord as EnchantedWordType,
|
|
} from "./words";
|
|
|
|
export type Command = WordType[];
|
|
export type Script = Command[];
|
|
|
|
const Comment = Regex(/#[^\n]*/y)
|
|
.expects("#")
|
|
.map(() => []);
|
|
|
|
const PreWordWhitespace = Regex(/[^\S\n;]+/y).expects("whitespace");
|
|
|
|
const EnchantedWord = Regex(/[^\]\[\}\{$\\";\s]+(?=[\s;]|$)/y)
|
|
.map(([enchanted]) => ({ enchanted } as EnchantedWordType))
|
|
.expects("ENCHANTED_WORD");
|
|
|
|
const BasicWord = Regex(/(?!\{)[^\s;]+/y)
|
|
.map(([text]) => ({ text } as TextWord))
|
|
.expects("BASIC_WORD");
|
|
|
|
const Brace: Pattern<string> = Sequence(
|
|
Regex(/\{/y).expects("{"),
|
|
AtLeast(
|
|
0,
|
|
Choose(
|
|
Use(() => Brace)
|
|
.expects("{")
|
|
.map((text) => `{${text}}`),
|
|
Regex(/[^{}]+/y)
|
|
.expects("text")
|
|
.map(([text]) => text)
|
|
)
|
|
),
|
|
Regex(/\}/y).expects("}")
|
|
).map(([_left, fragments, _right]) => fragments.join(""));
|
|
|
|
const Word = Choose<WordType>(
|
|
EnchantedWord,
|
|
BasicWord,
|
|
Brace.map((text) => ({ text } as TextWord))
|
|
);
|
|
|
|
const CommandTerminator = Regex(/[\n;]/y)
|
|
.expects("NEWLINE | ;")
|
|
.map(() => true);
|
|
|
|
const Command = Sequence(
|
|
Word,
|
|
AtLeast(
|
|
0,
|
|
Sequence(PreWordWhitespace, Word).map(([, word]) => word)
|
|
),
|
|
AtLeast(0, PreWordWhitespace)
|
|
).map(([word, moreWords]) => [word].concat(moreWords));
|
|
|
|
const Script = Sequence(
|
|
AtLeast(
|
|
0,
|
|
Choose(
|
|
PreWordWhitespace.map(() => []),
|
|
CommandTerminator.map(() => []),
|
|
Sequence(Comment, Choose(CommandTerminator, End())).map(() => []),
|
|
Sequence(Command, Choose(CommandTerminator, End())).map(
|
|
([words]) => words
|
|
)
|
|
)
|
|
),
|
|
End()
|
|
).map(([commands]) => commands.filter((command) => command.length > 0));
|
|
|
|
const ERROR_CONTEXT = /(?<=([^\n]{0,50}))([^\n]{0,50})/y;
|
|
|
|
/**
|
|
* Parse out a Notcl script into an easier-to-interpret representation.
|
|
* No script is actually executed yet.
|
|
*
|
|
* @param - code to parse
|
|
* @returns - parsed list of commands, or error message on failure
|
|
*/
|
|
export function parse(code: string): [true, Script] | [false, string] {
|
|
/* Preprocess */
|
|
// fold line endings
|
|
code = code.replace(/(?<!\\)((\\\\)*)\\\n[ \t]*/g, "$1 ");
|
|
|
|
/* Parse */
|
|
const [commands, errorPos, expected] = Script(code, 0);
|
|
|
|
if (commands) {
|
|
return [true, commands[0]];
|
|
} else {
|
|
ERROR_CONTEXT.lastIndex = errorPos;
|
|
const [, before, after] = ERROR_CONTEXT.exec(code)!;
|
|
return [
|
|
false,
|
|
`<pre>Error at position ${errorPos}
|
|
${escapeHtml(before + "" + after)}
|
|
${"-".repeat(before.length)}^
|
|
|
|
Expected: ${escapeHtml(expected)}</pre>`,
|
|
];
|
|
}
|
|
}
|