* [PATCH 1/1] gnu: cyrus-sasl: Fix CVE-2013-4122.
@ 2016-11-26 20:03 Leo Famulari
2016-11-26 20:08 ` Leo Famulari
0 siblings, 1 reply; 4+ messages in thread
From: Leo Famulari @ 2016-11-26 20:03 UTC (permalink / raw)
To: guix-devel
* gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch: New file.
* gnu/local.mk (dist_patch_DATA): Add it.
* gnu/packages/cyrus-sasl.scm (cyrus-sasl)[replacement]: New field.
(cyrus-sasl/fixed): New variable.
[source]: Use patch.
---
gnu/local.mk | 1 +
gnu/packages/cyrus-sasl.scm | 9 ++
.../patches/cyrus-sasl-CVE-2013-4122.patch | 130 +++++++++++++++++++++
3 files changed, 140 insertions(+)
create mode 100644 gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
diff --git a/gnu/local.mk b/gnu/local.mk
index 8ca4d93..dfa9c00 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -506,6 +506,7 @@ dist_patch_DATA = \
%D%/packages/patches/cssc-missing-include.patch \
%D%/packages/patches/clucene-contribs-lib.patch \
%D%/packages/patches/cursynth-wave-rand.patch \
+ %D%/packages/patches/cyrus-sasl-CVE-2013-4122.patch \
%D%/packages/patches/dbus-helper-search-path.patch \
%D%/packages/patches/devil-CVE-2009-3994.patch \
%D%/packages/patches/devil-fix-libpng.patch \
diff --git a/gnu/packages/cyrus-sasl.scm b/gnu/packages/cyrus-sasl.scm
index 99ff1e2..89a4a49 100644
--- a/gnu/packages/cyrus-sasl.scm
+++ b/gnu/packages/cyrus-sasl.scm
@@ -1,6 +1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2014, 2015 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2013 Andreas Enge <andreas@enge.fr>
+;;; Copyright © 2016 Leo Famulari <leo@famulari.name>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -30,6 +31,7 @@
(define-public cyrus-sasl
(package
(name "cyrus-sasl")
+ (replacement cyrus-sasl/fixed)
(version "2.1.26")
(source (origin
(method url-fetch)
@@ -64,3 +66,10 @@ server writers.")
(license (license:non-copyleft "file://COPYING"
"See COPYING in the distribution."))
(home-page "http://cyrusimap.web.cmu.edu")))
+
+(define cyrus-sasl/fixed
+ (package
+ (inherit cyrus-sasl)
+ (source (origin
+ (inherit (package-source cyrus-sasl))
+ (patches (search-patches "cyrus-sasl-CVE-2013-4122.patch"))))))
diff --git a/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch b/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
new file mode 100644
index 0000000..4e79947
--- /dev/null
+++ b/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
@@ -0,0 +1,130 @@
+Fix CVE-2013-4122.
+
+https://cve.mitre.org/cgi-bin/cvename.cgi?name=CVE-2013-4122
+
+Upstream patch:
+https://cgit.cyrus.foundation/cyrus-sasl/patch/?id=dedad73e5e7a75d01a5f3d5a6702ab8ccd2ff40d
+
+From dedad73e5e7a75d01a5f3d5a6702ab8ccd2ff40d Mon Sep 17 00:00:00 2001
+From: mancha <mancha1@hush.com>
+Date: Thu, 11 Jul 2013 10:08:07 +0100
+Subject: Handle NULL returns from glibc 2.17+ crypt()
+
+Starting with glibc 2.17 (eglibc 2.17), crypt() fails with EINVAL
+(w/ NULL return) if the salt violates specifications. Additionally,
+on FIPS-140 enabled Linux systems, DES/MD5-encrypted passwords
+passed to crypt() fail with EPERM (w/ NULL return).
+
+When using glibc's crypt(), check return value to avoid a possible
+NULL pointer dereference.
+
+Patch by mancha1@hush.com.
+---
+ pwcheck/pwcheck_getpwnam.c | 3 ++-
+ pwcheck/pwcheck_getspnam.c | 4 +++-
+ saslauthd/auth_getpwent.c | 4 +++-
+ saslauthd/auth_shadow.c | 8 +++-----
+ 4 files changed, 11 insertions(+), 8 deletions(-)
+
+diff --git a/pwcheck/pwcheck_getpwnam.c b/pwcheck/pwcheck_getpwnam.c
+index 4b34222..400289c 100644
+--- a/pwcheck/pwcheck_getpwnam.c
++++ b/pwcheck/pwcheck_getpwnam.c
+@@ -32,6 +32,7 @@ char *userid;
+ char *password;
+ {
+ char* r;
++ char* crpt_passwd;
+ struct passwd *pwd;
+
+ pwd = getpwnam(userid);
+@@ -41,7 +42,7 @@ char *password;
+ else if (pwd->pw_passwd[0] == '*') {
+ r = "Account disabled";
+ }
+- else if (strcmp(pwd->pw_passwd, crypt(password, pwd->pw_passwd)) != 0) {
++ else if (!(crpt_passwd = crypt(password, pwd->pw_passwd)) || strcmp(pwd->pw_passwd, (const char *)crpt_passwd) != 0) {
+ r = "Incorrect password";
+ }
+ else {
+diff --git a/pwcheck/pwcheck_getspnam.c b/pwcheck/pwcheck_getspnam.c
+index 2b11286..6d607bb 100644
+--- a/pwcheck/pwcheck_getspnam.c
++++ b/pwcheck/pwcheck_getspnam.c
+@@ -32,13 +32,15 @@ char *userid;
+ char *password;
+ {
+ struct spwd *pwd;
++ char *crpt_passwd;
+
+ pwd = getspnam(userid);
+ if (!pwd) {
+ return "Userid not found";
+ }
+
+- if (strcmp(pwd->sp_pwdp, crypt(password, pwd->sp_pwdp)) != 0) {
++ crpt_passwd = crypt(password, pwd->sp_pwdp);
++ if (!crpt_passwd || strcmp(pwd->sp_pwdp, (const char *)crpt_passwd) != 0) {
+ return "Incorrect password";
+ }
+ else {
+diff --git a/saslauthd/auth_getpwent.c b/saslauthd/auth_getpwent.c
+index fc8029d..d4ebe54 100644
+--- a/saslauthd/auth_getpwent.c
++++ b/saslauthd/auth_getpwent.c
+@@ -77,6 +77,7 @@ auth_getpwent (
+ {
+ /* VARIABLES */
+ struct passwd *pw; /* pointer to passwd file entry */
++ char *crpt_passwd; /* encrypted password */
+ int errnum;
+ /* END VARIABLES */
+
+@@ -105,7 +106,8 @@ auth_getpwent (
+ }
+ }
+
+- if (strcmp(pw->pw_passwd, (const char *)crypt(password, pw->pw_passwd))) {
++ crpt_passwd = crypt(password, pw->pw_passwd);
++ if (!crpt_passwd || strcmp(pw->pw_passwd, (const char *)crpt_passwd)) {
+ if (flags & VERBOSE) {
+ syslog(LOG_DEBUG, "DEBUG: auth_getpwent: %s: invalid password", login);
+ }
+diff --git a/saslauthd/auth_shadow.c b/saslauthd/auth_shadow.c
+index 677131b..1988afd 100644
+--- a/saslauthd/auth_shadow.c
++++ b/saslauthd/auth_shadow.c
+@@ -210,8 +210,8 @@ auth_shadow (
+ RETURN("NO Insufficient permission to access NIS authentication database (saslauthd)");
+ }
+
+- cpw = strdup((const char *)crypt(password, sp->sp_pwdp));
+- if (strcmp(sp->sp_pwdp, cpw)) {
++ cpw = crypt(password, sp->sp_pwdp);
++ if (!cpw || strcmp(sp->sp_pwdp, (const char *)cpw)) {
+ if (flags & VERBOSE) {
+ /*
+ * This _should_ reveal the SHADOW_PW_LOCKED prefix to an
+@@ -221,10 +221,8 @@ auth_shadow (
+ syslog(LOG_DEBUG, "DEBUG: auth_shadow: pw mismatch: '%s' != '%s'",
+ sp->sp_pwdp, cpw);
+ }
+- free(cpw);
+ RETURN("NO Incorrect password");
+ }
+- free(cpw);
+
+ /*
+ * The following fields will be set to -1 if:
+@@ -286,7 +284,7 @@ auth_shadow (
+ RETURN("NO Invalid username");
+ }
+
+- if (strcmp(upw->upw_passwd, crypt(password, upw->upw_passwd)) != 0) {
++ if (!(cpw = crypt(password, upw->upw_passwd)) || (strcmp(upw->upw_passwd, (const char *)cpw) != 0)) {
+ if (flags & VERBOSE) {
+ syslog(LOG_DEBUG, "auth_shadow: pw mismatch: %s != %s",
+ password, upw->upw_passwd);
+--
+cgit v0.12
+
--
2.10.2
^ permalink raw reply related [flat|nested] 4+ messages in thread
* Re: [PATCH 1/1] gnu: cyrus-sasl: Fix CVE-2013-4122.
2016-11-26 20:03 [PATCH 1/1] gnu: cyrus-sasl: Fix CVE-2013-4122 Leo Famulari
@ 2016-11-26 20:08 ` Leo Famulari
2016-11-26 20:34 ` Kei Kebreau
0 siblings, 1 reply; 4+ messages in thread
From: Leo Famulari @ 2016-11-26 20:08 UTC (permalink / raw)
To: guix-devel
On Sat, Nov 26, 2016 at 03:03:46PM -0500, Leo Famulari wrote:
> * gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch: New file.
> * gnu/local.mk (dist_patch_DATA): Add it.
> * gnu/packages/cyrus-sasl.scm (cyrus-sasl)[replacement]: New field.
> (cyrus-sasl/fixed): New variable.
> [source]: Use patch.
> diff --git a/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch b/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
> new file mode 100644
> index 0000000..4e79947
> --- /dev/null
> +++ b/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
> @@ -0,0 +1,130 @@
> +Fix CVE-2013-4122.
> +
> +https://cve.mitre.org/cgi-bin/cvename.cgi?name=CVE-2013-4122
> +
> +Upstream patch:
> +https://cgit.cyrus.foundation/cyrus-sasl/patch/?id=dedad73e5e7a75d01a5f3d5a6702ab8ccd2ff40d
I forgot to update this URL to the new repo:
https://github.com/cyrusimap/cyrus-sasl/commit/dedad73e5e7a75d01a5f3d5a6702ab8ccd2ff40d
I can't reach the cyrus.foundation repo.
^ permalink raw reply [flat|nested] 4+ messages in thread
* Re: [PATCH 1/1] gnu: cyrus-sasl: Fix CVE-2013-4122.
2016-11-26 20:08 ` Leo Famulari
@ 2016-11-26 20:34 ` Kei Kebreau
2016-11-26 21:32 ` Leo Famulari
0 siblings, 1 reply; 4+ messages in thread
From: Kei Kebreau @ 2016-11-26 20:34 UTC (permalink / raw)
To: Leo Famulari; +Cc: guix-devel
[-- Attachment #1: Type: text/plain, Size: 1084 bytes --]
Leo Famulari <leo@famulari.name> writes:
> On Sat, Nov 26, 2016 at 03:03:46PM -0500, Leo Famulari wrote:
>> * gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch: New file.
>> * gnu/local.mk (dist_patch_DATA): Add it.
>> * gnu/packages/cyrus-sasl.scm (cyrus-sasl)[replacement]: New field.
>> (cyrus-sasl/fixed): New variable.
>> [source]: Use patch.
>
>> diff --git a/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
>> b/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
>> new file mode 100644
>> index 0000000..4e79947
>> --- /dev/null
>> +++ b/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
>> @@ -0,0 +1,130 @@
>> +Fix CVE-2013-4122.
>> +
>> +https://cve.mitre.org/cgi-bin/cvename.cgi?name=CVE-2013-4122
>> +
>> +Upstream patch:
>> +https://cgit.cyrus.foundation/cyrus-sasl/patch/?id=dedad73e5e7a75d01a5f3d5a6702ab8ccd2ff40d
>
> I forgot to update this URL to the new repo:
>
> https://github.com/cyrusimap/cyrus-sasl/commit/dedad73e5e7a75d01a5f3d5a6702ab8ccd2ff40d
>
> I can't reach the cyrus.foundation repo.
Neither can I. This patch looks good with the new repo!
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]
^ permalink raw reply [flat|nested] 4+ messages in thread
* Re: [PATCH 1/1] gnu: cyrus-sasl: Fix CVE-2013-4122.
2016-11-26 20:34 ` Kei Kebreau
@ 2016-11-26 21:32 ` Leo Famulari
0 siblings, 0 replies; 4+ messages in thread
From: Leo Famulari @ 2016-11-26 21:32 UTC (permalink / raw)
To: Kei Kebreau; +Cc: guix-devel
[-- Attachment #1: Type: text/plain, Size: 1298 bytes --]
On Sat, Nov 26, 2016 at 03:34:23PM -0500, Kei Kebreau wrote:
> Leo Famulari <leo@famulari.name> writes:
>
> > On Sat, Nov 26, 2016 at 03:03:46PM -0500, Leo Famulari wrote:
> >> * gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch: New file.
> >> * gnu/local.mk (dist_patch_DATA): Add it.
> >> * gnu/packages/cyrus-sasl.scm (cyrus-sasl)[replacement]: New field.
> >> (cyrus-sasl/fixed): New variable.
> >> [source]: Use patch.
> >
> >> diff --git a/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
> >> b/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
> >> new file mode 100644
> >> index 0000000..4e79947
> >> --- /dev/null
> >> +++ b/gnu/packages/patches/cyrus-sasl-CVE-2013-4122.patch
> >> @@ -0,0 +1,130 @@
> >> +Fix CVE-2013-4122.
> >> +
> >> +https://cve.mitre.org/cgi-bin/cvename.cgi?name=CVE-2013-4122
> >> +
> >> +Upstream patch:
> >> +https://cgit.cyrus.foundation/cyrus-sasl/patch/?id=dedad73e5e7a75d01a5f3d5a6702ab8ccd2ff40d
> >
> > I forgot to update this URL to the new repo:
> >
> > https://github.com/cyrusimap/cyrus-sasl/commit/dedad73e5e7a75d01a5f3d5a6702ab8ccd2ff40d
> >
> > I can't reach the cyrus.foundation repo.
>
> Neither can I. This patch looks good with the new repo!
Okay, I pushed it to master and ungrafted on core-updates.
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 833 bytes --]
^ permalink raw reply [flat|nested] 4+ messages in thread
end of thread, other threads:[~2016-11-26 21:33 UTC | newest]
Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2016-11-26 20:03 [PATCH 1/1] gnu: cyrus-sasl: Fix CVE-2013-4122 Leo Famulari
2016-11-26 20:08 ` Leo Famulari
2016-11-26 20:34 ` Kei Kebreau
2016-11-26 21:32 ` Leo Famulari
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).