WIP

CMakeLists.txt

@@ -11,7 +11,7 @@ check_symbol_exists(RPL_OS_LINUX "rpl/platform.h" RPL_OS_LINUX)
 check_symbol_exists(RPL_OS_WINDOWS "rpl/platform.h" RPL_OS_WINDOWS)
 
 if (RPL_OS_LINUX)
-  set(RPL_LIBS pthread rt)
+  set(RPL_LIBS pthread rt dl)
 elseif(RPL_OS_WINDOWS)
   set(RPL_LIBS wsock32 ws2_32)
 endif()
@@ -25,6 +25,9 @@ target_link_libraries(test_platform rpl ${RPL_LIBS})
 add_executable(test_error test/test_error.c)
 target_link_libraries(test_error rpl ${RPL_LIBS})
 
+add_executable(test_dll test/test_dll.c)
+target_link_libraries(test_dll rpl ${RPL_LIBS})
+
 add_executable(test_udp_socket test/test_udp_socket.c)
 target_link_libraries(test_udp_socket rpl ${RPL_LIBS})
 

src/rpl/dll.c

@@ -23,6 +23,7 @@
 
 /* RPL headers. */
 #include <rpl/platform.h>
+#include <rpl/error.h>
 #include <rpl/dll.h>
 
 /* Platform headers. */
@@ -58,16 +59,28 @@ rpl_dll_free(rpl_dll_t* dll)
   *dll = NULL;
 }
 
-void
+rpl_bool_t
 rpl_dll_open(rpl_dll_t dll, const char* file)
 {
   rpl_dll_close(dll);
 
 #if defined(RPL_OS_WINDOWS)
   dll->handle = LoadLibrary(file);
+  if (dll->handle != NULL)
+    return RPL_TRUE;
+
+  rpl_error_set(GetLastError());
+
 #elif defined(RPL_OS_UNIX)
   dll->handle = dlopen(file, RTLD_NOW);
+  if (dll->handle != NULL)
+    return RPL_TRUE;
+
+  rpl_error_set(RPL_ERROR_NO_CODE);
+  rpl_error_set_message(dlerror());
 #endif
+
+  return RPL_FALSE;
 }
 
 void
@@ -104,5 +117,7 @@ rpl_dll_get(rpl_dll_t dll, const char* symbol_name)
   symbol = dlsym(dll->handle, symbol_name);
 
 #endif
+
+  return symbol;
 }
 

src/rpl/dll.h

@@ -26,6 +26,7 @@
 
 /* RPL headers. */
 #include <rpl/platform.h>
+#include <rpl/types.h>
 
 /** Dynamic-link Library object. */
 typedef struct rpl_dll* rpl_dll_t;
@@ -36,7 +37,7 @@ rpl_dll_new(void);
 void
 rpl_dll_free(rpl_dll_t* dll);
 
-void
+rpl_bool_t
 rpl_dll_open(rpl_dll_t dll, const char* file);
 
 void

src/rpl/error.c

@@ -91,6 +91,20 @@ rpl_error_set(int error)
   e->code = error;
 }
 
+void
+rpl_error_clear(void)
+{
+  struct rpl_error* e = rpl_tls_key_get_value(rpl_error_key);
+  e->code = 0;
+}
+
+void
+rpl_error_set_message(const char* message)
+{
+  struct rpl_error* e = rpl_tls_key_get_value(rpl_error_key);
+  strncpy(e->message, message, MAX_MESSAGE_SIZE);
+}
+
 const char*
 rpl_error_translate(int error)
 {
@@ -108,14 +122,23 @@ rpl_error_translate(int error)
   struct rpl_error* e = rpl_tls_key_get_value(rpl_error_key);
 
 #if defined(RPL_OS_UNIX)
+  if (e->code == RPL_ERROR_NO_CODE)
+    return e->message;
+
   if (strerror_r(error, e->message, MAX_MESSAGE_SIZE) == 0)
     return e->message;
 
 #elif defined(RPL_OS_WINDOWS)
-  WORD lang = MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT);
-  DWORD size = FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, "%0",
-                             error, lang, e->message, MAX_MESSAGE_SIZE,
-                             NULL);
+  WORD lang = 0;
+  DWORD size = 0;
+
+  if (e->code == RPL_ERROR_NO_CODE)
+    return e->message;
+
+  lang = MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT);
+  size = FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, "%0",
+                       error, lang, e->message, MAX_MESSAGE_SIZE,
+                       NULL);
   if (size > 0)
   {
       for (--size; size >= 0; --size)
@@ -132,3 +155,9 @@ rpl_error_translate(int error)
   return "unable to translate error";
 }
 
+const char*
+rpl_error_translate_last(void)
+{
+  struct rpl_error* e = rpl_tls_key_get_value(rpl_error_key);
+  return rpl_error_translate(e->code);
+}

src/rpl/error.h

@@ -25,6 +25,8 @@
 
 extern rpl_tls_key_t rpl_error_key;
 
+#define RPL_ERROR_NO_CODE 2147483647
+
 void
 rpl_error_init(void);
 
@@ -43,7 +45,16 @@ rpl_error_get(void);
 void
 rpl_error_set(int error);
 
+void
+rpl_error_clear(void);
+
+void
+rpl_error_set_message(const char* message);
+
 const char*
 rpl_error_translate(int error);
 
+const char*
+rpl_error_translate_last(void);
+
 #endif

src/rpl/rpl.h

@@ -25,6 +25,7 @@
 #include <rpl/types.h>
 #include <rpl/network/udp_socket.h>
 #include <rpl/network/tcp_socket.h>
+#include <rpl/dll.h>
 
 /**
  * @defgroup INIT Initialization