Move more to dynloader subdir

1 files changed, 59 insertions, 0 deletions

diff --git a/src/backend/port/dynloader/hpux.c b/src/backend/port/dynloader/hpux.c
new file mode 100644
index 0000000000..68cc085ca7
--- /dev/null
+++ b/src/backend/port/dynloader/hpux.c
@@ -0,0 +1,59 @@
+/*-------------------------------------------------------------------------
+ *
+ * dynloader.c--
+ *	  dynamic loader for HP-UX using the shared library mechanism
+ *
+ * Copyright (c) 1994, Regents of the University of California
+ *
+ *
+ * IDENTIFICATION
+ *	  $Header: /cvsroot/pgsql/src/backend/port/dynloader/hpux.c,v 1.1 1997/12/20 04:48:06 scrappy Exp $
+ *
+ *	NOTES
+ *		all functions are defined here -- it's impossible to trace the
+ *		shl_* routines from the bundled HP-UX debugger.
+ *
+ *-------------------------------------------------------------------------
+ */
+/* System includes */
+#include <stdio.h>
+#include <a.out.h>
+#include <dl.h>
+#include "c.h"
+#include "fmgr.h"
+#include "utils/dynamic_loader.h"
+#include "port-protos.h"
+
+void	   *
+pg_dlopen(char *filename)
+{
+	shl_t		handle = shl_load(filename, BIND_DEFERRED, 0);
+
+	return ((void *) handle);
+}
+
+func_ptr
+pg_dlsym(void *handle, char *funcname)
+{
+	func_ptr	f;
+
+	if (shl_findsym((shl_t *) & handle, funcname, TYPE_PROCEDURE, &f) == -1)
+	{
+		f = (func_ptr) NULL;
+	}
+	return (f);
+}
+
+void
+pg_dlclose(void *handle)
+{
+	shl_unload((shl_t) handle);
+}
+
+char	   *
+pg_dlerror()
+{
+	static char errmsg[] = "shl_load failed";
+
+	return errmsg;
+}