KSquirrel: development

From 0292059f4a16434600564cfa3f0ad2309a508a54 Mon Sep 17 00:00:00 2001 From: tpearson Date: Wed, 24 Feb 2010 17:43:19 +0000 Subject: Added libksquirrel for KDE3 git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/libraries/libksquirrel@1095624 283d02a7-25f6-0310-bc7c-ecb5cbfe19da --- doc/html/ksquirrel-libs-olibs1.html | 129 ++++++++++++++++++++++++++++++++++++ 1 file changed, 129 insertions(+) create mode 100644 doc/html/ksquirrel-libs-olibs1.html (limited to 'doc/html/ksquirrel-libs-olibs1.html') diff --git a/doc/html/ksquirrel-libs-olibs1.html b/doc/html/ksquirrel-libs-olibs1.html new file mode 100644 index 0000000..1965e7d --- /dev/null +++ b/doc/html/ksquirrel-libs-olibs1.html @@ -0,0 +1,129 @@ + + + + KSquirrel: development + + + + + + + + +

First, write regular C program (without main()): +

+ + + + + + +
+ +
+ const char* fmt_info() + { + return "It is really cool format!"; + } +
+
+

+

Compile it +

+ + + + + + +

+ +

+       # gcc -O2 -fPIC -c module.c
+       # gcc -shared -o module.so module.o
+

+

+

Let's write a simple test +

+ + + + + + +

+ +

+  #include <unistd.h>
+  #include <string.h>
+  #include <errno.h>
+  #include <dlfcn.h>
+
+  #define PATH_LENGTH 256
+      
+  int main(int argc, char * argv[])
+  {
+      char path[PATH_LENGTH], *msg = NULL;
+      const char* (*fmt)();
+      void *module;
+      
+      getcwd(path, PATH_LENGTH);
+      strcat(path, "/");
+      strcat(path, "module.so");
+
+      /* Load module */
+      module = dlopen(path, RTLD_NOW);
+      
+      /* Error ! */
+      if(!module)
+      {
+          msg = dlerror();
+
+          if(msg != NULL)
+	  {
+              dlclose(module);
+              exit(1);
+          }
+      }
+
+      /* Try to resolve function "fmt_info()" */
+      fmt = dlsym(module, "fmt_info");
+
+      msg = dlerror();
+
+      if(msg != NULL)
+      {
+          perror(msg);
+          dlclose(module);
+          exit(1);
+      }
+      
+      /* call fmt_info() through a pointer*/
+      printf("%s\n", fmt());
+
+      /* close module */
+      if(dlclose(module))
+      {
+          perror("error");
+          exit(1);
+      }
+      
+      return 0;
+  }
+  
+  # gcc -o test main.c -ldl
+  # ./test
+  It is really cool format!
+  #
+
+

+

+

That's all! :) Our test program has just loaded module.so and called fmt_info(), located in it. It is very simple, isn't ? +

+

+ + + -- cgit v1.2.1