101 lines
		
	
	
		
			2.7 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			101 lines
		
	
	
		
			2.7 KiB
		
	
	
	
		
			C
		
	
	
	
| /*
 | |
|  * Copyright 2003 by MIT Student Information Processing Board
 | |
|  *
 | |
|  * Permission to use, copy, modify, and distribute this software and
 | |
|  * its documentation for any purpose is hereby granted, provided that
 | |
|  * the names of M.I.T. and the M.I.T. S.I.P.B. not be used in
 | |
|  * advertising or publicity pertaining to distribution of the software
 | |
|  * without specific, written prior permission.  M.I.T. and the
 | |
|  * M.I.T. S.I.P.B. make no representations about the suitability of
 | |
|  * this software for any purpose.  It is provided "as is" without
 | |
|  * express or implied warranty.
 | |
|  */
 | |
| 
 | |
| #include "config.h"
 | |
| #ifdef HAS_STDLIB_H
 | |
| #include <stdlib.h>
 | |
| #endif
 | |
| #include "ss_internal.h"
 | |
| #define	size	sizeof(ss_data *)
 | |
| #ifdef HAVE_DLOPEN
 | |
| #include <dlfcn.h>
 | |
| #endif
 | |
| 
 | |
| #ifdef HAVE_DLOPEN
 | |
| static void ss_release_readline(ss_data *info)
 | |
| {
 | |
| 	if (!info->readline_handle)
 | |
| 		return;
 | |
| 
 | |
| 	info->readline = 0;
 | |
| 	info->add_history = 0;
 | |
| 	info->redisplay = 0;
 | |
| 	info->rl_completion_matches = 0;
 | |
| 	dlclose(info->readline_handle);
 | |
| 	info->readline_handle = 0;
 | |
| }
 | |
| #endif
 | |
| 
 | |
| /* Libraries we will try to use for readline/editline functionality */
 | |
| #define DEFAULT_LIBPATH "libreadline.so.7:libreadline.so.6:libreadline.so.5:libreadline.so.4:libreadline.so:libedit.so.2:libedit.so:libeditline.so.0:libeditline.so"
 | |
| 
 | |
| #ifdef HAVE_DLOPEN
 | |
| void ss_get_readline(int sci_idx)
 | |
| {
 | |
| 	void	*handle = NULL;
 | |
| 	ss_data *info = ss_info(sci_idx);
 | |
| 	const char **t, *libpath = 0;
 | |
| 	char	*tmp, *cp, *next;
 | |
| 	char **(**completion_func)(const char *, int, int);
 | |
| 
 | |
| 	if (info->readline_handle)
 | |
| 		return;
 | |
| 
 | |
| 	libpath = ss_safe_getenv("SS_READLINE_PATH");
 | |
| 	if (!libpath)
 | |
| 		libpath = DEFAULT_LIBPATH;
 | |
| 	if (*libpath == 0 || !strcmp(libpath, "none"))
 | |
| 		return;
 | |
| 
 | |
| 	tmp = malloc(strlen(libpath)+1);
 | |
| 	if (!tmp)
 | |
| 		return;
 | |
| 	strcpy(tmp, libpath);
 | |
| 	for (cp = tmp; cp; cp = next) {
 | |
| 		next = strchr(cp, ':');
 | |
| 		if (next)
 | |
| 			*next++ = 0;
 | |
| 		if (*cp == 0)
 | |
| 			continue;
 | |
| 		if ((handle = dlopen(cp, RTLD_NOW))) {
 | |
| 			/* printf("Using %s for readline library\n", cp); */
 | |
| 			break;
 | |
| 		}
 | |
| 	}
 | |
| 	free(tmp);
 | |
| 	if (!handle)
 | |
| 		return;
 | |
| 
 | |
| 	info->readline_handle = handle;
 | |
| 	info->readline = (char *(*)(const char *))
 | |
| 		dlsym(handle, "readline");
 | |
| 	info->add_history = (void (*)(const char *))
 | |
| 		dlsym(handle, "add_history");
 | |
| 	info->redisplay = (void (*)(void))
 | |
| 		dlsym(handle, "rl_forced_update_display");
 | |
| 	info->rl_completion_matches = (char **(*)(const char *,
 | |
| 				    char *(*)(const char *, int)))
 | |
| 		dlsym(handle, "rl_completion_matches");
 | |
| 	if ((t = dlsym(handle, "rl_readline_name")) != NULL)
 | |
| 		*t = info->subsystem_name;
 | |
| 	if ((completion_func =
 | |
| 	     dlsym(handle, "rl_attempted_completion_function")) != NULL)
 | |
| 		*completion_func = ss_rl_completion;
 | |
| 	info->readline_shutdown = ss_release_readline;
 | |
| }
 | |
| #else
 | |
| void ss_get_readline(int sci_idx __SS_ATTR((unused)))
 | |
| {
 | |
| }
 | |
| #endif
 |