Initial revision

diff --git a/server/mr_glue.c b/server/mr_glue.c
new file mode 100644 (file)
index 0000000..5584295
--- /dev/null
+++ b/server/mr_glue.c
@@ -0,0 +1,127 @@
+/*
+ *     $Source$
+ *     $Author$
+ *     $Header$
+ *
+ *     Copyright (C) 1987 by the Massachusetts Institute of Technology
+ *
+ *     Glue routines to allow the database stuff to be linked in to
+ *     a program expecting a library level interface.
+ * 
+ *     $Log$
+ *     Revision 1.1  1987-07-14 00:41:18  wesommer
+ *     Initial revision
+ *
+ */
+
+#ifndef lint
+static char *rcsid_sms_glue_c = "$Header$";
+#endif lint
+
+#include "sms_server.h"
+#include <krb.h>               /* XXX for error codes */
+#include <pwd.h>
+static int already_connected = 0;
+
+#define CHECK_CONNECTED { if (!already_connected) return SMS_NOT_CONNECTED; }
+
+static client pseudo_client;
+extern int krb_err_base;
+
+sms_connect()
+{
+    register int status;
+
+    if (already_connected) return SMS_ALREADY_CONNECTED;
+
+    init_sms_err_tbl();
+    init_krb_err_tbl();
+    bzero((char *)&pseudo_client, sizeof(pseudo_client)); /* XXX */
+
+    status =  sms_open_database();
+    if (!status) already_connected = 1;
+    return status;
+}
+
+sms_disconnect()
+{
+    CHECK_CONNECTED;
+    sms_close_database();
+    already_connected = 0;
+    return 0;
+}
+
+sms_noop()
+{
+    CHECK_CONNECTED;
+    return 0;
+}
+/*
+ * This routine is rather bogus, as it only fills in who you claim to be.
+ */
+sms_auth()
+{
+    struct passwd *pw;
+    
+    CHECK_CONNECTED;
+    pw = getpwuid(getuid());
+    if (!pw) return (KDC_PR_UNKNOWN + krb_err_base); /* XXX hack (we 
+                                                   * need an extended 
+                                                   * error code table)
+                                                   */
+    strcpy(pseudo_client.kname.name, pw->pw_name);
+    get_krbrlm(pseudo_client.kname.realm, 1);
+}
+
+int sms_query(name, argc, argv, callproc, callarg)
+    char *name;                /* Query name */
+    int argc;          /* Arg count */
+    char **argv;               /* Args */
+    int (*callproc)(); /* Callback procedure */
+    char *callarg;             /* Callback argument */
+{
+    return sms_process_query(&pseudo_client, name, argc, argv,
+                            callproc, callarg);
+}
+
+int sms_access(name, argc, argv)
+    char *name;                        /* Query name */
+    int argc;                  /* Arg count */
+    char **argv;               /* Args */
+{
+    return sms_check_access(&pseudo_client, name, argc, argv);
+}
+
+int sms_query_internal(argc, argv, callproc, callarg)
+    int argc;
+    char **argv;
+    int (*callproc)();
+    char *callarg;
+{
+    return sms_process_query(&pseudo_client, argv[0], argc-1, argv+1,
+                            callproc, callarg);
+}
+
+int sms_access_internal(argc, argv)
+    int argc;
+    char **argv;
+{
+    return sms_check_access(&pseudo_client, argv[0], argc-1, argv+1);
+}
+
+sms_shutdown(why)
+    char *why;
+{
+    fprintf(stderr, "Sorry, not implemented\n");
+}
+
+/*
+ * Local Variables:
+ * mode: c
+ * c-indent-level: 4
+ * c-continued-statement-offset: 4
+ * c-brace-offset: -4
+ * c-argdecl-indent: 4
+ * c-label-offset: -4
+ * End:
+ */