purple_defs and windows loader generator

CMakeLists.txt

@@ -31,10 +31,10 @@ set(event_DIR "${CMAKE_SOURCE_DIR}/cmake_modules")
 find_package(event)
 
 set(Swiften_DIR "${CMAKE_SOURCE_DIR}/cmake_modules")
-find_package(Swiften REQUIRED)
+find_package(Swiften)
 
 set(openssl_DIR "${CMAKE_SOURCE_DIR}/cmake_modules")
-find_package(openssl REQUIRED)
+find_package(openssl)
 
 set(Boost_DIR "${CMAKE_SOURCE_DIR}/cmake_modules")
 if (WIN32)

backends/libpurple/gen_dynamic_purple.py

@@ -0,0 +1,165 @@
+import sys
+import os
+
+methods = []
+definitions = []
+
+if len(sys.argv) != 2:
+	print "Usage:", sys.argv[0], "<path_to_libpurple_dir>"
+	sys.exit(1)
+
+
+def handle_file(cpp):
+	global methods
+
+	new_file = ""
+	f = open(cpp, "r")
+	for line in f.readlines():
+		new_line = ""
+		index = 0
+		while index < len(line):
+			new_line += line[index]
+			if line[index:].startswith("purple_") or line[index:].startswith("wpurple_"):
+				if line[index:].find("=") != -1 and line[index:].find("=") < line[index:].find("("):
+					index += 1
+					continue
+				if line[index-1] == "_" or line[index:].find("(") == -1:
+					index += 1
+					continue
+				m = line[index:line[index:].find("(")+index]
+				new_line += m[1:] + "_wrapped("
+				index += len(m)
+				if not m in methods and len(m) != 0:
+					methods += [m + "("]
+			index += 1
+		new_file += new_line
+	f.close()
+	return new_file
+
+def handle_header(header, method):
+	global definitions
+
+	f = open(os.path.join(sys.argv[1], header), "r")
+
+	lines = f.readlines()
+	for i in range(len(lines)):
+		line = lines[i]
+		if line.find(method) != -1:
+			m = line[:-1]
+			l = unicode(m).strip()
+			if l.endswith(")"):
+				continue
+
+			index = i;
+			while not m.endswith(";"):
+				index += 1
+				m += " " + lines[index][:-1].lstrip()
+
+			l = unicode(m).strip()
+			if (l.startswith("#") or l.startswith("*") or l.startswith("/*") or l.count("***") != 0 or l.count("&&") != 0
+				or l.endswith(")")):
+				continue;
+
+			if not m in definitions:
+				definitions += [m]
+			break
+	f.close()
+
+def get_raw_args(d):
+	return d[d.find("(")+1:-2]
+
+def get_args(d):
+	x = d[d.find("(")+1:-2]
+	x = x.split(",")
+
+	args = []
+	for arg in x:
+		y = arg.split(" ")
+		if len(y) == 1:
+			continue
+		args += [y[-1].replace("*", "")]
+
+	return args
+
+def get_name(d):
+	x = d[:d.find("(")+1].lstrip()
+	return x[x.find("purple_"):]
+
+def get_rtype(d):
+	return d[:d.find("purple_") - 1].lstrip()
+
+def output():
+	global definitions
+
+	header = open("purple_defs.h", "w")
+	print >> header, "#pragma once"
+	print >> header, "#ifdef WIN32"
+
+	for d in definitions:
+		#typedef void (WINAPI * purple_util_set_user_wrapped_func)(const char *dir);
+		print >> header, "typedef", get_rtype(d), "(WINAPI *", get_name(d)[:-1] + "spectrum_fnc)(" + get_raw_args(d) + ");"
+		#extern purple_util_set_user_wrapped_func purple_util_set_user_wrapped;
+		print >> header, "extern", get_name(d)[:-1] + "_wrapped_fnc", get_name(d)[:-1] + "_wrapped;"
+		print >> header, ""
+
+	print >> header, ""
+	print >> header, "#else"
+	print >> header, ""
+	for d in definitions:
+		#define purple_util_set_user_wrapped purple_util_set_user
+		print >> header, "#define", get_name(d)[:-1] + "_wrapped", get_name(d)[:-1]
+			
+	print >> header, "#endif"
+	print >> header, ""
+	print >> header, "bool resolvePurpleFunctions();"
+	print >> header, ""
+
+
+	cpp = open("purple_defs.cpp", "w")
+	print >> cpp, "#include \"purple_defs.h\""
+	print >> cpp, ""
+	print >> cpp, "#ifdef WIN32"
+	print >> cpp, "static HMODULE f_hPurple = NULL;"
+	for d in definitions:
+		#purple_util_set_user_wrapped_fnc purple_util_set_user_wrapped = NULL;
+		print >> cpp, get_name(d)[:-1] + "_wrapped_fnc", get_name(d)[:-1] + "_wrapped = NULL;"
+
+	print >> cpp, "#endif"
+
+	print >> cpp, "bool resolvePurpleFunctions() {"
+	print >> cpp, "#ifdef WIN32"
+	print >> cpp, "\tf_hPurple = LoadLibrary(\"libpurple.dll\");"
+	print >> cpp, "\tif (!f_hPurple)"
+	print >> cpp, "\t\t\treturn false;"
+	for d in definitions:
+		#purple_util_set_user_wrapped = (purple_util_set_user_wrapped_func)GetProcAddress(f_hPurple, "purple_util_set_user_dir");
+		print >> cpp, "\t" + get_name(d)[:-1] + "_wrapped = (" + get_name(d)[:-1] + "_wrapped_fnc)GetProcAddress(f_hPurple, \"" + get_name(d)[:-1] + "\");"
+		#if (!purple_util_set_user_wrapped)
+		print >> cpp, "\tif (!" + get_name(d)[:-1] + "_wrapped)"
+		print >> cpp, "\t\treturn false";
+		print >> cpp, ""
+	print >> cpp, "#endif"
+
+	print >> cpp, "\treturn true;"
+	print >> cpp, "}"
+	print >> cpp, ""
+
+	cpp.close()
+	header.close()
+		
+
+for f in os.listdir("."):
+	if not f.endswith(".cpp") or f.startswith("purple_defs"):
+		continue
+	new_file = handle_file(f)
+	fd = open(f, "w")
+	fd.write(new_file)
+	fd.close()
+
+for f in os.listdir(sys.argv[1]):
+	if not f.endswith(".h"):
+		continue
+	for m in methods:
+		handle_header(f, m)
+
+output()

backends/libpurple/geventloop.cpp

@@ -28,6 +28,8 @@
 #include "event.h"
 #endif
 
+#include "purple_defs.h
+
 #include "transport/logging.h"
 
 DEFINE_LOGGER(logger, "EventLoop");

backends/libpurple/main.cpp

@@ -27,6 +27,8 @@
 #define getpid _getpid
 #endif
 
+#include "purple_defs.h"
+
 DEFINE_LOGGER(logger_libpurple, "libpurple");
 DEFINE_LOGGER(logger, "backend");
 
@@ -1516,6 +1518,8 @@ static void gotAttention(PurpleAccount *account, const char *who, PurpleConversa
 static bool initPurple() {
 	bool ret;
 
+	resolvePurpleFunctions();
+
 	purple_util_set_user_dir("./");
 	remove("./accounts.xml");
 	remove("./blist.xml");

backends/libpurple/purple_defs.cpp

@@ -0,0 +1,5 @@
+#include "purple_defs.h"
+bool resolvePurpleFunctions() {
+	return true;
+}
+

backends/libpurple/purple_defs.h

@@ -0,0 +1,3 @@
+#pragma once
+
+bool resolvePurpleFunctions();

backends/libpurple/utils.cpp

@@ -47,6 +47,8 @@
 #include "win32/win32dep.h"
 #endif
 
+#include "purple_defs.h"
+
 static GHashTable *ui_info = NULL;
 
 void execute_purple_plugin_action(PurpleConnection *gc, const std::string &name) {