mirror of
git://git.savannah.gnu.org/guix.git
synced 2023-12-14 03:33:07 +01:00
e59d958a9c
* gnu/packages/patches/mit-krb5-qualify-short-hostnames.patch: New file. * gnu/local.mk (dist_patch_DATA): Adjust accordingly. * gnu/packages/kerberos.scm (mit-krb5)[source](patches): New field.
29 lines
1.2 KiB
Diff
29 lines
1.2 KiB
Diff
Fix a null pointer dereference when no DNS search path is configured.
|
|
This showed up as a segfault while running the gsasl test suite.
|
|
|
|
Taken from upstream:
|
|
https://github.com/krb5/krb5/commit/cd82bf377e7fad2409c76bf8b241920692f34fda
|
|
|
|
diff --git a/src/lib/krb5/os/dnsglue.c b/src/lib/krb5/os/dnsglue.c
|
|
index e35ca9d76c..0cd213fdd7 100644
|
|
--- a/src/lib/krb5/os/dnsglue.c
|
|
+++ b/src/lib/krb5/os/dnsglue.c
|
|
@@ -91,7 +91,7 @@ static int initparse(struct krb5int_dns_state *);
|
|
#define DECLARE_HANDLE(h) struct __res_state h
|
|
#define INIT_HANDLE(h) (memset(&h, 0, sizeof(h)), res_ninit(&h) == 0)
|
|
#define SEARCH(h, n, c, t, a, l) res_nsearch(&h, n, c, t, a, l)
|
|
-#define PRIMARY_DOMAIN(h) strdup(h.dnsrch[0])
|
|
+#define PRIMARY_DOMAIN(h) ((h.dnsrch[0] == NULL) ? NULL : strdup(h.dnsrch[0]))
|
|
#if HAVE_RES_NDESTROY
|
|
#define DESTROY_HANDLE(h) res_ndestroy(&h)
|
|
#else
|
|
@@ -104,7 +104,8 @@ static int initparse(struct krb5int_dns_state *);
|
|
#define DECLARE_HANDLE(h)
|
|
#define INIT_HANDLE(h) (res_init() == 0)
|
|
#define SEARCH(h, n, c, t, a, l) res_search(n, c, t, a, l)
|
|
-#define PRIMARY_DOMAIN(h) strdup(_res.defdname)
|
|
+#define PRIMARY_DOMAIN(h) \
|
|
+ ((_res.defdname == NULL) ? NULL : strdup(_res.defdname))
|
|
#define DESTROY_HANDLE(h)
|
|
|
|
#endif
|