Add to the ss (subsystem) library the ability to dynamically link

to the readline library if it is present in the system. 

1 files changed, 17 insertions, 0 deletions

diff --git a/lib/ss/invocation.c b/lib/ss/invocation.c
index 81c70e48..748886fa 100644
--- a/lib/ss/invocation.c
+++ b/lib/ss/invocation.c
@@ -16,6 +16,9 @@
 #endif
 #include "ss_internal.h"
 #define	size	sizeof(ss_data *)
+#ifdef HAVE_DLOPEN
+#include <dlfcn.h>
+#endif
 
 int ss_create_invocation(subsystem_name, version_string, info_ptr,
 			 request_table_ptr, code_ptr)
@@ -27,6 +30,7 @@ int ss_create_invocation(subsystem_name, version_string, info_ptr,
 	register int sci_idx;
 	register ss_data *new_table;
 	register ss_data **table;
+	void *handle;
 
 	*code_ptr = 0;
 	table = _ss_table;
@@ -66,7 +70,16 @@ int ss_create_invocation(subsystem_name, version_string, info_ptr,
 		(ss_request_table **) calloc(2, sizeof(ss_request_table *));
 	*(new_table->rqt_tables) = request_table_ptr;
 	*(new_table->rqt_tables+1) = (ss_request_table *) NULL;
+
+	new_table->readline_handle = 0;
+	new_table->readline = 0;
+	new_table->add_history = 0;
+	new_table->redisplay = 0;
+	new_table->rl_completion_matches = 0;
 	_ss_table = table;
+#if defined(HAVE_DLOPEN) && defined(SHARED_ELF_LIB)
+	ss_get_readline(sci_idx);
+#endif
 	return(sci_idx);
 }
 
@@ -83,5 +96,9 @@ ss_delete_invocation(sci_idx)
 	while(t->info_dirs[0] != (char *)NULL)
 		ss_delete_info_dir(sci_idx, t->info_dirs[0], &ignored_code);
 	free((char *)t->info_dirs);
+#if defined(HAVE_DLOPEN) && defined(SHARED_ELF_LIB)
+	if (t->readline_shutdown)
+		(*t->readline_shutdown)(t);
+#endif
 	free((char *)t);
 }