+++ /dev/null
-#include "putty.h"\r
-#ifndef NO_GSSAPI\r
-#include "pgssapi.h"\r
-#include "sshgss.h"\r
-#include "sshgssc.h"\r
-\r
-/* Unix code to set up the GSSAPI library list. */\r
-\r
-#if !defined NO_LIBDL && !defined NO_GSSAPI\r
-\r
-const int ngsslibs = 4;\r
-const char *const gsslibnames[4] = {\r
- "libgssapi (Heimdal)",\r
- "libgssapi_krb5 (MIT Kerberos)",\r
- "libgss (Sun)",\r
- "User-specified GSSAPI library",\r
-};\r
-const struct keyvalwhere gsslibkeywords[] = {\r
- { "libgssapi", 0, -1, -1 },\r
- { "libgssapi_krb5", 1, -1, -1 },\r
- { "libgss", 2, -1, -1 },\r
- { "custom", 3, -1, -1 },\r
-};\r
-\r
-/*\r
- * Run-time binding against a choice of GSSAPI implementations. We\r
- * try loading several libraries, and produce an entry in\r
- * ssh_gss_libraries[] for each one.\r
- */\r
-\r
-static void gss_init(struct ssh_gss_library *lib, void *dlhandle,\r
- int id, const char *msg)\r
-{\r
- lib->id = id;\r
- lib->gsslogmsg = msg;\r
- lib->handle = dlhandle;\r
-\r
-#define BIND_GSS_FN(name) \\r
- lib->u.gssapi.name = (t_gss_##name) dlsym(dlhandle, "gss_" #name)\r
-\r
- BIND_GSS_FN(delete_sec_context);\r
- BIND_GSS_FN(display_status);\r
- BIND_GSS_FN(get_mic);\r
- BIND_GSS_FN(import_name);\r
- BIND_GSS_FN(init_sec_context);\r
- BIND_GSS_FN(release_buffer);\r
- BIND_GSS_FN(release_cred);\r
- BIND_GSS_FN(release_name);\r
-\r
-#undef BIND_GSS_FN\r
-\r
- ssh_gssapi_bind_fns(lib);\r
-}\r
-\r
-/* Dynamically load gssapi libs. */\r
-struct ssh_gss_liblist *ssh_gss_setup(const Config *cfg)\r
-{\r
- void *gsslib;\r
- struct ssh_gss_liblist *list = snew(struct ssh_gss_liblist);\r
-\r
- list->libraries = snewn(4, struct ssh_gss_library);\r
- list->nlibraries = 0;\r
-\r
- /* Heimdal's GSSAPI Library */\r
- if ((gsslib = dlopen("libgssapi.so.2", RTLD_LAZY)) != NULL)\r
- gss_init(&list->libraries[list->nlibraries++], gsslib,\r
- 0, "Using GSSAPI from libgssapi.so.2");\r
-\r
- /* MIT Kerberos's GSSAPI Library */\r
- if ((gsslib = dlopen("libgssapi_krb5.so.2", RTLD_LAZY)) != NULL)\r
- gss_init(&list->libraries[list->nlibraries++], gsslib,\r
- 1, "Using GSSAPI from libgssapi_krb5.so.2");\r
-\r
- /* Sun's GSSAPI Library */\r
- if ((gsslib = dlopen("libgss.so.1", RTLD_LAZY)) != NULL)\r
- gss_init(&list->libraries[list->nlibraries++], gsslib,\r
- 2, "Using GSSAPI from libgss.so.1");\r
-\r
- /* User-specified GSSAPI library */\r
- if (cfg->ssh_gss_custom.path[0] &&\r
- (gsslib = dlopen(cfg->ssh_gss_custom.path, RTLD_LAZY)) != NULL)\r
- gss_init(&list->libraries[list->nlibraries++], gsslib,\r
- 3, dupprintf("Using GSSAPI from user-specified"\r
- " library '%s'", cfg->ssh_gss_custom.path));\r
-\r
- return list;\r
-}\r
-\r
-void ssh_gss_cleanup(struct ssh_gss_liblist *list)\r
-{\r
- int i;\r
-\r
- /*\r
- * dlopen and dlclose are defined to employ reference counting\r
- * in the case where the same library is repeatedly dlopened, so\r
- * even in a multiple-sessions-per-process context it's safe to\r
- * naively dlclose everything here without worrying about\r
- * destroying it under the feet of another SSH instance still\r
- * using it.\r
- */\r
- for (i = 0; i < list->nlibraries; i++) {\r
- dlclose(list->libraries[i].handle);\r
- if (list->libraries[i].id == 3) {\r
- /* The 'custom' id involves a dynamically allocated message.\r
- * Note that we must cast away the 'const' to free it. */\r
- sfree((char *)list->libraries[i].gsslogmsg);\r
- }\r
- }\r
- sfree(list->libraries);\r
- sfree(list);\r
-}\r
-\r
-#elif !defined NO_GSSAPI\r
-\r
-const int ngsslibs = 1;\r
-const char *const gsslibnames[1] = {\r
- "static",\r
-};\r
-const struct keyvalwhere gsslibkeywords[] = {\r
- { "static", 0, -1, -1 },\r
-};\r
-\r
-/*\r
- * Link-time binding against GSSAPI. Here we just construct a single\r
- * library structure containing pointers to the functions we linked\r
- * against.\r
- */\r
-\r
-#include <gssapi/gssapi.h>\r
-\r
-/* Dynamically load gssapi libs. */\r
-struct ssh_gss_liblist *ssh_gss_setup(const Config *cfg)\r
-{\r
- struct ssh_gss_liblist *list = snew(struct ssh_gss_liblist);\r
-\r
- list->libraries = snew(struct ssh_gss_library);\r
- list->nlibraries = 1;\r
-\r
- list->libraries[0].gsslogmsg = "Using statically linked GSSAPI";\r
-\r
-#define BIND_GSS_FN(name) \\r
- list->libraries[0].u.gssapi.name = (t_gss_##name) gss_##name\r
-\r
- BIND_GSS_FN(delete_sec_context);\r
- BIND_GSS_FN(display_status);\r
- BIND_GSS_FN(get_mic);\r
- BIND_GSS_FN(import_name);\r
- BIND_GSS_FN(init_sec_context);\r
- BIND_GSS_FN(release_buffer);\r
- BIND_GSS_FN(release_cred);\r
- BIND_GSS_FN(release_name);\r
-\r
-#undef BIND_GSS_FN\r
-\r
- ssh_gssapi_bind_fns(&list->libraries[0]);\r
-\r
- return list;\r
-}\r
-\r
-void ssh_gss_cleanup(struct ssh_gss_liblist *list)\r
-{\r
- sfree(list->libraries);\r
- sfree(list);\r
-}\r
-\r
-#endif /* NO_LIBDL */\r
-\r
-#endif /* NO_GSSAPI */\r