xref: /freebsd/crypto/heimdal/lib/krb5/parse-name-test.c (revision 1c43270ada91f3473174c2bf81fba64963b7e4ac)
18373020dSJacques Vidrine /*
28373020dSJacques Vidrine  * Copyright (c) 2002 Kungliga Tekniska H�gskolan
38373020dSJacques Vidrine  * (Royal Institute of Technology, Stockholm, Sweden).
48373020dSJacques Vidrine  * All rights reserved.
58373020dSJacques Vidrine  *
68373020dSJacques Vidrine  * Redistribution and use in source and binary forms, with or without
78373020dSJacques Vidrine  * modification, are permitted provided that the following conditions
88373020dSJacques Vidrine  * are met:
98373020dSJacques Vidrine  *
108373020dSJacques Vidrine  * 1. Redistributions of source code must retain the above copyright
118373020dSJacques Vidrine  *    notice, this list of conditions and the following disclaimer.
128373020dSJacques Vidrine  *
138373020dSJacques Vidrine  * 2. Redistributions in binary form must reproduce the above copyright
148373020dSJacques Vidrine  *    notice, this list of conditions and the following disclaimer in the
158373020dSJacques Vidrine  *    documentation and/or other materials provided with the distribution.
168373020dSJacques Vidrine  *
178373020dSJacques Vidrine  * 3. Neither the name of KTH nor the names of its contributors may be
188373020dSJacques Vidrine  *    used to endorse or promote products derived from this software without
198373020dSJacques Vidrine  *    specific prior written permission.
208373020dSJacques Vidrine  *
218373020dSJacques Vidrine  * THIS SOFTWARE IS PROVIDED BY KTH AND ITS CONTRIBUTORS ``AS IS'' AND ANY
228373020dSJacques Vidrine  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
238373020dSJacques Vidrine  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
248373020dSJacques Vidrine  * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL KTH OR ITS CONTRIBUTORS BE
258373020dSJacques Vidrine  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
268373020dSJacques Vidrine  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
278373020dSJacques Vidrine  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
288373020dSJacques Vidrine  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
298373020dSJacques Vidrine  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
308373020dSJacques Vidrine  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
318373020dSJacques Vidrine  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
328373020dSJacques Vidrine 
338373020dSJacques Vidrine #include "krb5_locl.h"
348373020dSJacques Vidrine 
351c43270aSJacques Vidrine RCSID("$Id: parse-name-test.c,v 1.3.4.1 2004/03/22 19:27:36 joda Exp $");
368373020dSJacques Vidrine 
378373020dSJacques Vidrine enum { MAX_COMPONENTS = 3 };
388373020dSJacques Vidrine 
398373020dSJacques Vidrine static struct testcase {
408373020dSJacques Vidrine     const char *input_string;
418373020dSJacques Vidrine     const char *output_string;
428373020dSJacques Vidrine     krb5_realm realm;
438373020dSJacques Vidrine     unsigned ncomponents;
448373020dSJacques Vidrine     char *comp_val[MAX_COMPONENTS];
458373020dSJacques Vidrine     int realmp;
468373020dSJacques Vidrine } tests[] = {
478373020dSJacques Vidrine     {"", "@", "", 1, {""}, FALSE},
488373020dSJacques Vidrine     {"a", "a@", "", 1, {"a"}, FALSE},
498373020dSJacques Vidrine     {"\\n", "\\n@", "", 1, {"\n"}, FALSE},
508373020dSJacques Vidrine     {"\\ ", "\\ @", "", 1, {" "}, FALSE},
518373020dSJacques Vidrine     {"\\t", "\\t@", "", 1, {"\t"}, FALSE},
528373020dSJacques Vidrine     {"\\b", "\\b@", "", 1, {"\b"}, FALSE},
538373020dSJacques Vidrine     {"\\\\", "\\\\@", "", 1, {"\\"}, FALSE},
548373020dSJacques Vidrine     {"\\/", "\\/@", "", 1, {"/"}, FALSE},
558373020dSJacques Vidrine     {"\\@", "\\@@", "", 1, {"@"}, FALSE},
568373020dSJacques Vidrine     {"@", "@", "", 1, {""}, TRUE},
578373020dSJacques Vidrine     {"a/b", "a/b@", "", 2, {"a", "b"}, FALSE},
588373020dSJacques Vidrine     {"a/", "a/@", "", 2, {"a", ""}, FALSE},
598373020dSJacques Vidrine     {"a\\//\\/", "a\\//\\/@", "", 2, {"a/", "/"}, FALSE},
608373020dSJacques Vidrine     {"/a", "/a@", "", 2, {"", "a"}, FALSE},
618373020dSJacques Vidrine     {"\\@@\\@", "\\@@\\@", "@", 1, {"@"}, TRUE},
628373020dSJacques Vidrine     {"a/b/c", "a/b/c@", "", 3, {"a", "b", "c"}, FALSE},
631c43270aSJacques Vidrine     {NULL, NULL, "", 0, { NULL }, FALSE}};
648373020dSJacques Vidrine 
658373020dSJacques Vidrine int
668373020dSJacques Vidrine main(int argc, char **argv)
678373020dSJacques Vidrine {
688373020dSJacques Vidrine     struct testcase *t;
698373020dSJacques Vidrine     krb5_context context;
708373020dSJacques Vidrine     krb5_error_code ret;
718373020dSJacques Vidrine     int val = 0;
728373020dSJacques Vidrine 
738373020dSJacques Vidrine     ret = krb5_init_context (&context);
748373020dSJacques Vidrine     if (ret)
758373020dSJacques Vidrine 	errx (1, "krb5_init_context failed: %d", ret);
768373020dSJacques Vidrine 
778373020dSJacques Vidrine     /* to enable realm-less principal name above */
788373020dSJacques Vidrine 
798373020dSJacques Vidrine     krb5_set_default_realm(context, "");
808373020dSJacques Vidrine 
818373020dSJacques Vidrine     for (t = tests; t->input_string; ++t) {
828373020dSJacques Vidrine 	krb5_principal princ;
838373020dSJacques Vidrine 	int i, j;
848373020dSJacques Vidrine 	char name_buf[1024];
858373020dSJacques Vidrine 	char *s;
868373020dSJacques Vidrine 
878373020dSJacques Vidrine 	ret = krb5_parse_name(context, t->input_string, &princ);
888373020dSJacques Vidrine 	if (ret)
898373020dSJacques Vidrine 	    krb5_err (context, 1, ret, "krb5_parse_name %s",
908373020dSJacques Vidrine 		      t->input_string);
918373020dSJacques Vidrine 	if (strcmp (t->realm, princ->realm) != 0) {
928373020dSJacques Vidrine 	    printf ("wrong realm (\"%s\" should be \"%s\")"
938373020dSJacques Vidrine 		    " for \"%s\"\n",
948373020dSJacques Vidrine 		    princ->realm, t->realm,
958373020dSJacques Vidrine 		    t->input_string);
968373020dSJacques Vidrine 	    val = 1;
978373020dSJacques Vidrine 	}
988373020dSJacques Vidrine 
998373020dSJacques Vidrine 	if (t->ncomponents != princ->name.name_string.len) {
1008373020dSJacques Vidrine 	    printf ("wrong number of components (%u should be %u)"
1018373020dSJacques Vidrine 		    " for \"%s\"\n",
1028373020dSJacques Vidrine 		    princ->name.name_string.len, t->ncomponents,
1038373020dSJacques Vidrine 		    t->input_string);
1048373020dSJacques Vidrine 	    val = 1;
1058373020dSJacques Vidrine 	} else {
1068373020dSJacques Vidrine 	    for (i = 0; i < t->ncomponents; ++i) {
1078373020dSJacques Vidrine 		if (strcmp(t->comp_val[i],
1088373020dSJacques Vidrine 			   princ->name.name_string.val[i]) != 0) {
1098373020dSJacques Vidrine 		    printf ("bad component %d (\"%s\" should be \"%s\")"
1108373020dSJacques Vidrine 			    " for \"%s\"\n",
1118373020dSJacques Vidrine 			    i,
1128373020dSJacques Vidrine 			    princ->name.name_string.val[i],
1138373020dSJacques Vidrine 			    t->comp_val[i],
1148373020dSJacques Vidrine 			    t->input_string);
1158373020dSJacques Vidrine 		    val = 1;
1168373020dSJacques Vidrine 		}
1178373020dSJacques Vidrine 	    }
1188373020dSJacques Vidrine 	}
1198373020dSJacques Vidrine 	for (j = 0; j < strlen(t->output_string); ++j) {
1208373020dSJacques Vidrine 	    ret = krb5_unparse_name_fixed(context, princ,
1218373020dSJacques Vidrine 					  name_buf, j);
1228373020dSJacques Vidrine 	    if (ret != ERANGE) {
1238373020dSJacques Vidrine 		printf ("unparse_name %s with length %d should have failed\n",
1248373020dSJacques Vidrine 			t->input_string, j);
1258373020dSJacques Vidrine 		val = 1;
1268373020dSJacques Vidrine 		break;
1278373020dSJacques Vidrine 	    }
1288373020dSJacques Vidrine 	}
1298373020dSJacques Vidrine 	ret = krb5_unparse_name_fixed(context, princ,
1308373020dSJacques Vidrine 				      name_buf, sizeof(name_buf));
1318373020dSJacques Vidrine 	if (ret)
1328373020dSJacques Vidrine 	    krb5_err (context, 1, ret, "krb5_unparse_name_fixed");
1338373020dSJacques Vidrine 
1348373020dSJacques Vidrine 	if (strcmp (t->output_string, name_buf) != 0) {
1358373020dSJacques Vidrine 	    printf ("failed comparing the re-parsed"
1368373020dSJacques Vidrine 		    " (\"%s\" should be \"%s\")\n",
1378373020dSJacques Vidrine 		    name_buf, t->output_string);
1388373020dSJacques Vidrine 	    val = 1;
1398373020dSJacques Vidrine 	}
1408373020dSJacques Vidrine 
1418373020dSJacques Vidrine 	ret = krb5_unparse_name(context, princ, &s);
1428373020dSJacques Vidrine 	if (ret)
1438373020dSJacques Vidrine 	    krb5_err (context, 1, ret, "krb5_unparse_name");
1448373020dSJacques Vidrine 
1458373020dSJacques Vidrine 	if (strcmp (t->output_string, s) != 0) {
1468373020dSJacques Vidrine 	    printf ("failed comparing the re-parsed"
1478373020dSJacques Vidrine 		    " (\"%s\" should be \"%s\"\n",
1488373020dSJacques Vidrine 		    s, t->output_string);
1498373020dSJacques Vidrine 	    val = 1;
1508373020dSJacques Vidrine 	}
1518373020dSJacques Vidrine 	free(s);
1528373020dSJacques Vidrine 
1538373020dSJacques Vidrine 	if (!t->realmp) {
1548373020dSJacques Vidrine 	    for (j = 0; j < strlen(t->input_string); ++j) {
1558373020dSJacques Vidrine 		ret = krb5_unparse_name_fixed_short(context, princ,
1568373020dSJacques Vidrine 						    name_buf, j);
1578373020dSJacques Vidrine 		if (ret != ERANGE) {
1588373020dSJacques Vidrine 		    printf ("unparse_name_short %s with length %d"
1598373020dSJacques Vidrine 			    " should have failed\n",
1608373020dSJacques Vidrine 			    t->input_string, j);
1618373020dSJacques Vidrine 		    val = 1;
1628373020dSJacques Vidrine 		    break;
1638373020dSJacques Vidrine 		}
1648373020dSJacques Vidrine 	    }
1658373020dSJacques Vidrine 	    ret = krb5_unparse_name_fixed_short(context, princ,
1668373020dSJacques Vidrine 						name_buf, sizeof(name_buf));
1678373020dSJacques Vidrine 	    if (ret)
1688373020dSJacques Vidrine 		krb5_err (context, 1, ret, "krb5_unparse_name_fixed");
1698373020dSJacques Vidrine 
1708373020dSJacques Vidrine 	    if (strcmp (t->input_string, name_buf) != 0) {
1718373020dSJacques Vidrine 		printf ("failed comparing the re-parsed"
1728373020dSJacques Vidrine 			" (\"%s\" should be \"%s\")\n",
1738373020dSJacques Vidrine 			name_buf, t->input_string);
1748373020dSJacques Vidrine 		val = 1;
1758373020dSJacques Vidrine 	    }
1768373020dSJacques Vidrine 
1778373020dSJacques Vidrine 	    ret = krb5_unparse_name_short(context, princ, &s);
1788373020dSJacques Vidrine 	    if (ret)
1798373020dSJacques Vidrine 		krb5_err (context, 1, ret, "krb5_unparse_name_short");
1808373020dSJacques Vidrine 
1818373020dSJacques Vidrine 	    if (strcmp (t->input_string, s) != 0) {
1828373020dSJacques Vidrine 		printf ("failed comparing the re-parsed"
1838373020dSJacques Vidrine 			" (\"%s\" should be \"%s\"\n",
1848373020dSJacques Vidrine 			s, t->input_string);
1858373020dSJacques Vidrine 		val = 1;
1868373020dSJacques Vidrine 	    }
1878373020dSJacques Vidrine 	    free(s);
1888373020dSJacques Vidrine 	}
1898373020dSJacques Vidrine 	krb5_free_principal (context, princ);
1908373020dSJacques Vidrine     }
1918373020dSJacques Vidrine     return val;
1928373020dSJacques Vidrine }
193