Add a simple test harness for kuserok. Build it during make check but

don't run any automated tests for the moment.

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@24401 dc483132-0cff-0310-8789-dd5450dbe970

diff --git a/src/lib/krb5/os/Makefile.in b/src/lib/krb5/os/Makefile.in
index 5f7df57991b7ed56db733cf75a84f9fb55425ee9..dc9d09b1eb9c23004e6859e37520db944cad6040 100644 (file)
--- a/src/lib/krb5/os/Makefile.in
+++ b/src/lib/krb5/os/Makefile.in
@@ -155,12 +155,14 @@ clean-unix:: clean-libobjs
 shared:
        mkdir shared
 
-TEST_PROGS= t_std_conf t_an_to_ln t_locate_kdc
+TEST_PROGS= t_std_conf t_an_to_ln t_kuserok t_locate_kdc
 
 T_STD_CONF_OBJS= t_std_conf.o 
 
 T_AN_TO_LN_OBJS = t_an_to_ln.o an_to_ln.o 
 
+T_KUSEROK_OBJS = t_kuserok.o
+
 T_REALM_ITER_OBJS = t_realm_iter.o realm_iter.o
 
 t_std_conf: $(T_STD_CONF_OBJS) $(KRB5_BASE_DEPLIBS)
@@ -169,6 +171,9 @@ t_std_conf: $(T_STD_CONF_OBJS) $(KRB5_BASE_DEPLIBS)
 t_an_to_ln: $(T_AN_TO_LN_OBJS) $(KRB5_BASE_DEPLIBS)
        $(CC_LINK) -o t_an_to_ln $(T_AN_TO_LN_OBJS) $(KRB5_BASE_LIBS)
 
+t_kuserok: $(T_KUSEROK_OBJS) $(KRB5_BASE_DEPLIBS)
+       $(CC_LINK) -o t_kuserok $(T_KUSEROK_OBJS) $(KRB5_BASE_LIBS)
+
 t_realm_iter: $(T_REALM_ITER_OBJS) $(KRB5_BASE_DEPLIBS)
        $(CC_LINK) -o t_realm_iter $(T_REALM_ITER_OBJS) $(KRB5_BASE_LIBS)
 
@@ -192,7 +197,7 @@ lclint-localaddr: localaddr.c
        $(LCLINT) $(LCLINTOPTS) $(CPPFLAGS) $(LOCALINCLUDES) $(DEFS) \
                -DTEST $(srcdir)/localaddr.c
 
-check-unix:: check-unix-stdconf check-unix-locate check-unix-antoln
+check-unix:: check-unix-stdconf check-unix-locate check-unix-antoln t_kuserok
 
 check-unix-stdconf:: t_std_conf
        KRB5_CONFIG=$(srcdir)/td_krb5.conf ; export KRB5_CONFIG ;\
@@ -256,6 +261,7 @@ check-unix-antoln:: t_an_to_ln
 
 clean:: 
        $(RM) $(TEST_PROGS) test.out t_std_conf.o t_an_to_ln.o t_locate_kdc.o
+       $(RM) t_kuserok.o
 
 @libobj_frag@
 

diff --git a/src/lib/krb5/os/t_kuserok.c b/src/lib/krb5/os/t_kuserok.c
new file mode 100644 (file)
index 0000000..a16c4f5
--- /dev/null
+++ b/src/lib/krb5/os/t_kuserok.c
@@ -0,0 +1,58 @@
+/* -*- mode: c; c-basic-offset: 4; indent-tabs-mode: nil -*- */
+/*
+ * lib/krb5/os/t_kuserok.c
+ *
+ * Copyright (C) 2010 by the Massachusetts Institute of Technology.
+ * All rights reserved.
+ *
+ * Export of this software from the United States of America may
+ *   require a specific license from the United States Government.
+ *   It is the responsibility of any person or organization contemplating
+ *   export to obtain such a license before exporting.
+ *
+ * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
+ * distribute this software and its documentation for any purpose and
+ * without fee is hereby granted, provided that the above copyright
+ * notice appear in all copies and that both that copyright notice and
+ * this permission notice appear in supporting documentation, and that
+ * the name of M.I.T. not be used in advertising or publicity pertaining
+ * to distribution of the software without specific, written prior
+ * permission.  Furthermore if you modify this software you must label
+ * your software as modified software and not distribute it in such a
+ * fashion that it might be confused with the original M.I.T. software.
+ * M.I.T. makes no representations about the suitability of
+ * this software for any purpose.  It is provided "as is" without express
+ * or implied warranty.
+ *
+ *
+ * Simple test harness for krb5_kuserok.
+ */
+
+#include <krb5.h>
+#include <stdio.h>
+
+int
+main(int argc, char **argv)
+{
+    krb5_error_code ret;
+    krb5_context context;
+    krb5_principal principal;
+    krb5_boolean ok;
+    char *progname;
+
+    progname = argv[0];
+    if (argc != 3) {
+        fprintf(stderr, "Usage: %s principal localuser\n", progname);
+        return 1;
+    }
+    krb5_init_context(&context);
+    ret = krb5_parse_name(context, argv[1], &principal);
+    if (ret) {
+        com_err(progname, ret, "while parsing principal name");
+        return 1;
+    }
+    ok = krb5_kuserok(context, principal, argv[2]);
+    printf("krb5_kuserok returns %s\n", ok ? "true" : "false");
+    krb5_free_context(context);
+    return 0;
+}