feat: wasi compilation

Author: sylefeb

antlr/antlr4-cpp-runtime-4.7.2-source/runtime/src/Parser.cpp

@@ -218,9 +218,9 @@ const atn::ATN& Parser::getATNWithBypassAlts() {
   if (serializedAtn.empty()) {
     throw UnsupportedOperationException("The current parser does not support an ATN with bypass alternatives.");
   }
-
+#if !defined(__wasi__)
   std::lock_guard<std::mutex> lck(_mutex);
-
+#endif
   // XXX: using the entire serialized ATN as key into the map is a big resource waste.
   //      How large can that thing become?
   if (bypassAltsAtnCache.find(serializedAtn) == bypassAltsAtnCache.end())
@@ -553,8 +553,9 @@ std::vector<std::string> Parser::getRuleInvocationStack(RuleContext *p) {
 std::vector<std::string> Parser::getDFAStrings() {
   atn::ParserATNSimulator *simulator = getInterpreter<atn::ParserATNSimulator>();
   if (!simulator->decisionToDFA.empty()) {
+    #if !defined(__wasi__)
     std::lock_guard<std::mutex> lck(_mutex);
-
+    #endif
     std::vector<std::string> s;
     for (size_t d = 0; d < simulator->decisionToDFA.size(); d++) {
       dfa::DFA &dfa = simulator->decisionToDFA[d];
@@ -568,7 +569,9 @@ std::vector<std::string> Parser::getDFAStrings() {
 void Parser::dumpDFA() {
   atn::ParserATNSimulator *simulator = getInterpreter<atn::ParserATNSimulator>();
   if (!simulator->decisionToDFA.empty()) {
+    #if !defined(__wasi__)
     std::lock_guard<std::mutex> lck(_mutex);
+    #endif
     bool seenOne = false;
     for (size_t d = 0; d < simulator->decisionToDFA.size(); d++) {
       dfa::DFA &dfa = simulator->decisionToDFA[d];
@@ -645,4 +648,3 @@ void Parser::InitializeInstanceFields() {
   _tracer = nullptr;
   _ctx = nullptr;
 }
-

antlr/antlr4-cpp-runtime-4.7.2-source/runtime/src/Recognizer.cpp

@@ -38,7 +38,9 @@ dfa::Vocabulary const& Recognizer::getVocabulary() const {
 std::map<std::string, size_t> Recognizer::getTokenTypeMap() {
   const dfa::Vocabulary& vocabulary = getVocabulary();
 
+  #if !defined(__wasi__)
   std::lock_guard<std::mutex> lck(_mutex);
+  #endif
   std::map<std::string, size_t> result;
   auto iterator = _tokenTypeMapCache.find(&vocabulary);
   if (iterator != _tokenTypeMapCache.end()) {
@@ -68,7 +70,9 @@ std::map<std::string, size_t> Recognizer::getRuleIndexMap() {
     throw "The current recognizer does not provide a list of rule names.";
   }
 
+  #if !defined(__wasi__)
   std::lock_guard<std::mutex> lck(_mutex);
+  #endif
   std::map<std::string, size_t> result;
   auto iterator = _ruleIndexMapCache.find(ruleNames);
   if (iterator != _ruleIndexMapCache.end()) {
@@ -164,4 +168,3 @@ void Recognizer::InitializeInstanceFields() {
   _stateNumber = ATNState::INVALID_STATE_NUMBER;
   _interpreter = nullptr;
 }
-

antlr/antlr4-cpp-runtime-4.7.2-source/runtime/src/Recognizer.h

@@ -147,7 +147,9 @@ namespace antlr4 {
     atn::ATNSimulator *_interpreter; // Set and deleted in descendants (or the profiler).
 
     // Mutex to manage synchronized access for multithreading.
+    #if !defined(__wasi__)
     std::mutex _mutex;
+    #endif
 
   private:
     static std::map<const dfa::Vocabulary*, std::map<std::string, size_t>> _tokenTypeMapCache;

antlr/antlr4-cpp-runtime-4.7.2-source/runtime/src/atn/ATN.cpp

@@ -89,7 +89,9 @@ misc::IntervalSet ATN::nextTokens(ATNState *s, RuleContext *ctx) const {
 
 misc::IntervalSet const& ATN::nextTokens(ATNState *s) const {
   if (!s->_nextTokenUpdated) {
+    #if !defined(__wasi__)
     std::unique_lock<std::mutex> lock { _mutex };
+    #endif
     if (!s->_nextTokenUpdated) {
       s->_nextTokenWithinRule = nextTokens(s, nullptr);
       s->_nextTokenUpdated = true;
@@ -206,4 +208,3 @@ std::string ATN::toString() const {
 
   return ss.str();
 }
-

antlr/antlr4-cpp-runtime-4.7.2-source/runtime/src/atn/ATN.h

@@ -105,7 +105,9 @@ namespace atn {
     std::string toString() const;
 
   private:
-    mutable std::mutex _mutex;
+  #if !defined(__wasi__)
+  mutable std::mutex _mutex;
+  #endif
   };
 
 } // namespace atn

antlr/antlr4-cpp-runtime-4.7.2-source/runtime/src/support/CPPUtils.cpp

@@ -211,30 +211,37 @@ namespace antlrcpp {
   //----------------- SingleWriteMultipleRead --------------------------------------------------------------------------
 
   void SingleWriteMultipleReadLock::readLock() {
+    #if !defined(__wasi__)
     std::unique_lock<std::mutex> lock(_mutex);
     while (_waitingWriters != 0)
       _readerGate.wait(lock);
     ++_activeReaders;
     lock.unlock();
+    #endif
   }
 
   void SingleWriteMultipleReadLock::readUnlock() {
+    #if !defined(__wasi__)
     std::unique_lock<std::mutex> lock(_mutex);
     --_activeReaders;
     lock.unlock();
     _writerGate.notify_one();
+    #endif
   }
 
   void SingleWriteMultipleReadLock::writeLock() {
+    #if !defined(__wasi__)
     std::unique_lock<std::mutex> lock(_mutex);
     ++_waitingWriters;
     while (_activeReaders != 0 || _activeWriters != 0)
       _writerGate.wait(lock);
     ++_activeWriters;
     lock.unlock();
+    #endif
   }
 
   void SingleWriteMultipleReadLock::writeUnlock() {
+    #if !defined(__wasi__)
     std::unique_lock<std::mutex> lock(_mutex);
     --_waitingWriters;
     --_activeWriters;
@@ -243,6 +250,7 @@ namespace antlrcpp {
     else
       _readerGate.notify_all();
     lock.unlock();
+    #endif
   }
 
 } // namespace antlrcpp

antlr/antlr4-cpp-runtime-4.7.2-source/runtime/src/support/CPPUtils.h

@@ -66,10 +66,12 @@ namespace antlrcpp {
     void writeUnlock();
 
   private:
+    #if !defined(__wasi__)
     std::condition_variable _readerGate;
     std::condition_variable _writerGate;
 
     std::mutex _mutex;
+    #endif
     size_t _activeReaders = 0;
     size_t _waitingWriters = 0;
     size_t _activeWriters = 0;

src/libs/lua/src/ldo.c

@@ -10,7 +10,9 @@
 #include "lprefix.h"
 
 
+#if !defined(__wasi__)
 #include <setjmp.h>
+#endif
 #include <stdlib.h>
 #include <string.h>
 
@@ -52,7 +54,15 @@
 */
 #if !defined(LUAI_THROW)				/* { */
 
-#if defined(__cplusplus) && !defined(LUA_USE_LONGJMP)	/* { */
+#if defined(__wasi__) /* { */
+
+#define LUAI_THROW(L,c) { abort(); }
+#define LUAI_TRY(L,c,a) { a }
+#define luai_jmpbuf		int  /* dummy variable */
+
+#else /* }{ */
+
+#if (defined(__cplusplus) && !defined(LUA_USE_LONGJMP))	/* { */
 
 /* C++ exceptions */
 #define LUAI_THROW(L,c)		throw(c)
@@ -78,6 +88,7 @@
 
 #endif							/* } */
 
+#endif							/* } */
 
 
 /* chain list of long jump buffers */

src/libs/lua/src/loslib.c

@@ -21,7 +21,6 @@
 #include "lauxlib.h"
 #include "lualib.h"
 
-
 /*
 ** {==================================================================
 ** List of valid conversion specifiers for the 'strftime' function;
@@ -126,12 +125,21 @@ static time_t l_checktime (lua_State *L, int arg) {
 
 #else				/* }{ */
 
+#if defined(__wasi__) /* { */
+
+#define LUA_TMPNAMBUFSIZE	32
+#define lua_tmpnam(b,e) e = 1;
+
+#else       /* }{ */
+
 /* ISO C definitions */
 #define LUA_TMPNAMBUFSIZE	L_tmpnam
 #define lua_tmpnam(b,e)		{ e = (tmpnam(b) == NULL); }
 
 #endif				/* } */
 
+#endif				/* } */
+
 #endif				/* } */
 /* }================================================================== */
 

src/silice.cpp

@@ -55,7 +55,7 @@ int main(int argc, char **argv)
 {
   try {
 
-    const std::string version_string = std::string(" 1.0.10") + " " + c_GitHash;
+    const std::string version_string = std::string(" 1.0.11") + " " + c_GitHash;
     //                                               ^ ^ ^
     //                                               | | |
     //                                               | | \_ increments with features in wip/draft (x.x.x)
@@ -100,6 +100,7 @@ int main(int argc, char **argv)
     g_SplitInouts    = splitInouts.getValue();
 
     SiliceCompiler compiler;
+
     compiler.run(
       source.getValue(),
       output.getValue(),
@@ -125,3 +126,17 @@ int main(int argc, char **argv)
 }
 
 // -------------------------------------------------
+
+#if defined(__wasi__)
+
+// well ...
+extern "C" {
+void *  __cxa_allocate_exception(size_t /*thrown_size*/) { abort(); }
+void    __cxa_throw(void */*thrown_object*/, std::type_info */*tinfo*/, void (*/*dest*/)(void *)) { abort(); }
+int     system( const char* ) {}
+clock_t clock() { return 0; }
+FILE   *tmpfile() { return NULL; }
+int     __cxa_thread_atexit(void*, void*, void*) {}
+}
+
+#endif