using namespace std::regex_constants;

using namespace std::chrono;

try {

if (argc < 2 or not(regex_search(

argv[1], regex(R"(\.AEC$)", ECMAScript bitor icase)))) {

if (argc >= 2 and

(ends_with(argv[1], ".aec") or

ends_with(argv[1],

".AEC"))) // Damn, CLANG on Linux is to C++ what Internet

// Explorer 6 (or, maybe better say, Opera Mini,

// because it appears to be fast by disobeying

// the standards) is to JavaScript. I don't

// understand how it manages to compile itself,

// yet it miscompiles something every now and

// then in a 5'500-lines-of-code program.

#if defined(__GNUC__) && (__GNUC__ == 4 && __GNUC_MINOR__ <= 8)

// Please do not modify the code here to try to feature-detect whether

// the compiler supports regex_error, as GCC 4.8.5 (the C++ compiler you

// get with Oracle Linux 7) compiles regex_error, but the linking fails

// then.

throw exception();

#else

throw regex_error(error_complexity);

#endif

cerr << "Please invoke this program as follows, from the command line:\n"

<< argv[0] << " name_of_the_program.aec"

<< R"(

<< endl;

#ifdef WIN32

system("PAUSE");

#endif // WIN32

return -1;

}

#if defined(__GNUC__) && (__GNUC__ == 4 && __GNUC_MINOR__ <= 8)

} catch (exception &error) {

#else

} catch (regex_error &error) {

#endif

the_cpp_runtime_library_supports_regexes = false;

cerr <<

R"(The C++ compiler this executable has been compiled

<< error.what() << endl;

}

cout << "Running the tests..." << endl;

auto beginningOfTests = chrono::high_resolution_clock::now();

runTests();

auto endOfTests = chrono::high_resolution_clock::now();

cout << "All the tests passed in "

<< ((endOfTests - beginningOfTests).count() *

high_resolution_clock::period::num * 1000 /

high_resolution_clock::period::den)

<< " milliseconds." << endl;

string rawInput;

#if defined(WIN32)

cout

<< "We will try to load the entire AEC file into RAM using Windows API..."

<< endl;

auto beginningOfReading = chrono::high_resolution_clock::now();

HANDLE inputFile = CreateFileA(argv[1], GENERIC_READ, 0, NULL, OPEN_EXISTING,

FILE_ATTRIBUTE_NORMAL, NULL);

if (inputFile == INVALID_HANDLE_VALUE) {

cerr << "Can't open the file \"" << argv[1]

<< "\" for reading! Error code: " << GetLastError() << endl;

return -1;

}

LARGE_INTEGER fileSize;

if (!GetFileSizeEx(inputFile, &fileSize)) {

cerr << "Fetching the size of the file \"" << argv[1]

<< "\" failed! Did you try to open a device file such as CON? Error "

"code: "

<< GetLastError() << endl;

CloseHandle(inputFile);

return -1;

}

HANDLE hMap = CreateFileMappingA(inputFile, NULL, PAGE_READONLY, 0, 0, NULL);

if (hMap == NULL) {

cerr << "The function \"CreateFileMappingA\" failed with the error code "

<< GetLastError() << "!" << endl;

CloseHandle(inputFile);

return -1;

}

LPVOID lpBasePtr = MapViewOfFile(hMap, FILE_MAP_READ, 0, 0, 0);

if (lpBasePtr == NULL) {

cerr << "The function \"MapViewOfFile\" failed with the error code "

<< GetLastError() << "!" << endl;

CloseHandle(hMap);

CloseHandle(inputFile);

}

char *charPtr = (char *)lpBasePtr;

rawInput = string(charPtr, fileSize.LowPart);

UnmapViewOfFile(lpBasePtr);

CloseHandle(hMap);

CloseHandle(inputFile);

#elif defined(_POSIX_MAPPED_FILES)

cout << "We will try to load the entire AEC file into RAM using the Linux "

"mmap directive."

<< endl;

auto beginningOfReading = chrono::high_resolution_clock::now();

int file_descriptor = open(argv[1], O_RDONLY);

if (file_descriptor == -1) {

cerr << "The file \"" << argv[1]

<< "\" cannot be opened for reading. Error code: " << errno << endl;

return -1;

}

struct stat sb;

if (fstat(file_descriptor, &sb) == -1) {

cerr << "Cannot fetch the size of the file \"" << argv[1]

<< "\". Error code: " << errno << endl;

close(file_descriptor);

return -1;

}

if (not(sb.st_size)) {

cerr << "The file \"" << argv[1] << "\" is empty!" << endl;

return -1;

}

void *addr =

mmap(NULL, sb.st_size, PROT_READ, MAP_PRIVATE, file_descriptor, 0);

if (addr == MAP_FAILED) {

cerr << "Mapping the file \"" << argv[1]

<< "\" into RAM failed! Error code: " << errno << endl;

close(file_descriptor);

return -1;

}

rawInput = string((char *)addr, sb.st_size);

munmap(addr,

sb.st_size); // Kind of weird here that a Linux function takes more

// arguments than a corresponding Windows function that is

// UnmapViewOfFile, isn't it? Especially since the second

// argument seems completely unnecessary (what else could

// the second argument be rather than the size of the file

// that has been mapped into RAM). I've asked a Quora

// question about that: https://qr.ae/pCbILK

close(file_descriptor);

#else

ifstream input(argv[1]);

if (!input) {

cerr << "Can't open the file \"" << argv[1] << "\" for reading!" << endl;

return -1;

}

cout << "Reading the file \"" << argv[1] << "\"..." << endl;

auto beginningOfReading = chrono::high_resolution_clock::now();

while (true) {

char currentCharacter;

input.get(currentCharacter);

if (input.eof())

break;

if (currentCharacter != '\r')

rawInput += currentCharacter; // Some text editors store new-lines as

// "\r\n" instead of '\n'.

}

input.close();

#endif

auto endOfReading = chrono::high_resolution_clock::now();

cout << "All characters read in "

<< ((endOfReading - beginningOfReading).count() *

high_resolution_clock::period::num * 1000 /

high_resolution_clock::period::den)

<< " milliseconds." << endl;

cout << "Tokenizing the program..." << endl;

auto beginningOfTokenizing = chrono::high_resolution_clock::now();

vector<TreeNode> tokenized = TreeNode::tokenize(rawInput);

auto endOfTokenizing = chrono::high_resolution_clock::now();

cout << "Finished tokenizing the program in "

<< ((endOfTokenizing - beginningOfTokenizing).count() *

high_resolution_clock::period::num * 1000 /

high_resolution_clock::period::den)

<< R"( milliseconds.

<< endl;

if (tokenized.size() and

tokenized[0].text == "#") { // If we are setting the compilation target

if (tokenized.size() >= 2 and tokenized[1].text != "target") {

cerr << "Preprocessor error: Line " << tokenized[1].lineNumber

<< ", Column " << tokenized[1].columnNumber

<< ": Unrecognized preprocessor directive \"" << tokenized[1].text

<< "\"!" << endl;

exit(1);

} else if (tokenized.size() < 2) {

cerr << "Preprocessor error: Line " << tokenized[0].lineNumber

<< ", Column " << tokenized[0].columnNumber

<< ": The preprocessor directive seems to be missing!" << endl;

exit(1);

}

if (tokenized.size() >= 3 and tokenized[2].text != "browser" and

tokenized[2].text != "WASI") {

cerr << "Preprocessor error: Line " << tokenized[2].lineNumber

<< ", Column " << tokenized[2].columnNumber

<< ": Unrecognized target name \"" << tokenized[2].text

<< "\". Supported targets are \"browser\" and \"WASI\"." << endl;

exit(1);

} else if (tokenized.size() < 3) {

cerr << "Preprocessor error: Line " << tokenized[1].lineNumber

<< ", Column " << tokenized[1].columnNumber

<< ": The compilation target seems not to be specified!" << endl;

exit(1);

}

compilation_target = tokenized[2].text;

tokenized.erase(tokenized.begin(), tokenized.begin() + 3);

} else

compilation_target = "browser";

auto beginningOfParsing = chrono::high_resolution_clock::now();

vector<TreeNode> parsed = TreeNode::parse(tokenized);

auto endOfParsing = chrono::high_resolution_clock::now();

cout << "Finished parsing the program in "

<< ((endOfParsing - beginningOfParsing).count() *

high_resolution_clock::period::num * 1000 /

high_resolution_clock::period::den)

<< " milliseconds." << endl;

TreeRootNode AST = TreeRootNode();

AST.children = parsed;

cout << "Compiling the program..." << endl;

auto beginningOfCompilation = chrono::high_resolution_clock::now();

string assembly;

try {

assembly = AST.compile();

} catch (const exception &error) {

cerr << "Internal compiler error: Uncaught exception in the compiler: "

<< typeid(error).name() << ": " << error.what() << std::endl;

if (typeid(error).hash_code() ==

typeid(const CorruptCompilationContextException &).hash_code()) {

cerr << "The JSON of the compilation context, at the time of throwing "

"that exception, was:\n"

<< ((const CorruptCompilationContextException bitand)(error))

.getContext()

.JSONify()

<< std::endl;

}

if (typeid(error).hash_code() !=

typeid(const NotImplementedException &).hash_code())

cerr

<< R"(If you have time, please report this to me on GitHub as an issue:

<< std::endl;

return 1;

}

auto endOfCompilation = chrono::high_resolution_clock::now();

cout << "Compilation finished in "

<< ((endOfCompilation - beginningOfCompilation).count() *

high_resolution_clock::period::num * 1000 /

high_resolution_clock::period::den)

<< " milliseconds!" << endl;

#ifdef OUTPUT_DEBUG_COMMENTS_IN_ASSEMBLY_COMMENTS

cout << "If you want faster compilation times and smaller assembly output, "

"you can delete the\n"

"#define OUTPUT_DEBUG_COMMENTS_IN_ASSEMBLY_COMMENTS\n"

"line from the file `AECforWebAssembly.cpp` and recompile this "

"compiler."

<< endl;

#endif

string assemblyFileName =

string(argv[1]).substr(0,

string(argv[1]).size() - string(".aec").size()) +

".wat";

cout << "Saving the assembly into the file \"" << assemblyFileName << "\"..."

<< endl;

ofstream assemblyFile(assemblyFileName.c_str());

if (!assemblyFile) {

cerr << "Can't open \"" << assemblyFileName << "\" for output!" << endl;

return -1;

}

// CLANG 10 (but not GCC 9.3.0) appears to miscompile "regex_replace" on

// Oracle Linux 7.

string temporaryString;

for (unsigned int i = 0; i < assembly.size(); i++)

if (assembly[i] == '\t')

temporaryString += " ";

else

temporaryString += assembly[i];

assembly = temporaryString;

assemblyFile << assembly << endl;

assemblyFile.close();

cout << "Assembly successfully saved, quitting now." << endl;

return 0;