klist: don't trip over referral entries when invoked with -s (#707145, RT#6915)

krb5-klist_s.patch

@@ -0,0 +1,14 @@
+Don't trip over referral entries.  RT#6915
+
+Index: krb5/src/clients/klist/klist.c
+===================================================================
+--- krb5/src/clients/klist/klist.c	(revision 24943)
++++ krb5/src/clients/klist/klist.c	(working copy)
+@@ -386,6 +386,7 @@
+             continue;
+         if (status_only) {
+             if (exit_status && creds.server->length == 2 &&
++                creds.server->realm.length > 0 &&
+                 strcmp(creds.server->realm.data, princ->realm.data) == 0 &&
+                 strcmp((char *)creds.server->data[0].data, "krbtgt") == 0 &&
+                 strcmp((char *)creds.server->data[1].data,

krb5.spec

@@ -6,7 +6,7 @@
 Summary: The Kerberos network authentication system
 Name: krb5
 Version: 1.9.1
-Release: 1%{?dist}
+Release: 2%{?dist}
 # Maybe we should explode from the now-available-to-everybody tarball instead?
 # http://web.mit.edu/kerberos/dist/krb5/1.9/krb5-1.9.1-signed.tar
 Source0: krb5-%{version}.tar.gz
@@ -52,6 +52,7 @@ Patch72: krb5-pkinit-cms2.patch
 Patch75: krb5-pkinit-debug.patch
 Patch77: krb5-1.9-paren.patch
 Patch78: krb5-trunk-chpw-err.patch
+Patch79: krb5-klist_s.patch
 
 License: MIT
 URL: http://web.mit.edu/kerberos/www/
@@ -195,6 +196,7 @@ ln -s NOTICE LICENSE
 #%patch75 -p1 -b .pkinit-debug
 %patch77 -p1 -b .paren
 %patch78 -p0 -b .chpw-err
+%patch79 -p1 -b .klist_s
 gzip doc/*.ps
 
 sed -i -e '1s!\[twoside\]!!;s!%\(\\usepackage{hyperref}\)!\1!' doc/api/library.tex
@@ -653,6 +655,10 @@ exit 0
 %{_sbindir}/uuserver
 
 %changelog
+* Wed May 25 2011 Nalin Dahyabhai <nalin@redhat.com> 1.9.1-2
+- klist: don't trip over referral entries when invoked with -s (#707145,
+  RT#6915)
+
 * Fri May  6 2011 Nalin Dahyabhai <nalin@redhat.com>
 - fixup URL in a comment
 - when built with NSS, require 3.12.10 rather than 3.12.9