GNU bug report logs - #31539
[PATCH] Add RabbitMQ package and service.

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: guix-patches; Reported by: Christopher Baines <mail@HIDDEN>; Keywords: easy; dated Sun, 20 May 2018 20:37:02 UTC; Maintainer for guix-patches is guix-patches@HIDDEN.
Added tag(s) easy. Request was from zimoun <zimon.toutoune@HIDDEN> to control <at> debbugs.gnu.org. Full text available.
Removed tag(s) moreinfo. Request was from zimoun <zimon.toutoune@HIDDEN> to control <at> debbugs.gnu.org. Full text available.

Message received at 31539 <at> debbugs.gnu.org:


Received: (at 31539) by debbugs.gnu.org; 20 Oct 2020 07:59:08 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Tue Oct 20 03:59:07 2020
Received: from localhost ([127.0.0.1]:43395 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1kUmXz-0004wW-Jp
	for submit <at> debbugs.gnu.org; Tue, 20 Oct 2020 03:59:07 -0400
Received: from mira.cbaines.net ([212.71.252.8]:58784)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1kUmXx-0004wO-RY
 for 31539 <at> debbugs.gnu.org; Tue, 20 Oct 2020 03:59:06 -0400
Received: from localhost (188.28.126.178.threembb.co.uk [188.28.126.178])
 by mira.cbaines.net (Postfix) with ESMTPSA id C9BD127BBED;
 Tue, 20 Oct 2020 08:59:04 +0100 (BST)
Received: from capella (localhost [127.0.0.1])
 by localhost (OpenSMTPD) with ESMTP id 0fd2cd1d;
 Tue, 20 Oct 2020 07:59:02 +0000 (UTC)
References: <87fu2m3w03.fsf@HIDDEN> <86zh4h8hne.fsf@HIDDEN>
User-agent: mu4e 1.4.13; emacs 27.1
From: Christopher Baines <mail@HIDDEN>
To: zimoun <zimon.toutoune@HIDDEN>
Subject: Re: [bug#31539] [PATCH] Add RabbitMQ package and service.
In-reply-to: <86zh4h8hne.fsf@HIDDEN>
Date: Tue, 20 Oct 2020 08:59:01 +0100
Message-ID: <874kmpib0a.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha512; protocol="application/pgp-signature"
X-Spam-Score: -0.0 (/)
X-Debbugs-Envelope-To: 31539
Cc: 31539 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable


zimoun <zimon.toutoune@HIDDEN> writes:

> The 2 patches [1] are more than 2 years old.  They are about adding
> RabbitMQ package and service.  Have they been fallen in the crack?
>
> Are they still relevant?  They are tagged =E2=80=99moreinfo=E2=80=99, why=
?  Because the
> package needs more work?

The service is OK, but the package needs some work before merging. It
doesn't built RabbitMQ from source.

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQKlBAEBCgCPFiEEPonu50WOcg2XVOCyXiijOwuE9XcFAl+OmMVfFIAAAAAALgAo
aXNzdWVyLWZwckBub3RhdGlvbnMub3BlbnBncC5maWZ0aGhvcnNlbWFuLm5ldDNF
ODlFRUU3NDU4RTcyMEQ5NzU0RTBCMjVFMjhBMzNCMEI4NEY1NzcRHG1haWxAY2Jh
aW5lcy5uZXQACgkQXiijOwuE9XchGRAAorynRVl58Zdn22BRy5Nfd8XbW2BgWNVk
tq7LNtTO6nLUlpQEPg++l/1AgE43TaDFTqBmXd6akKzqIhOVykXOhhOzrzn0KWf9
I1T1Gmp0uE0qYerQWoSG8oGZRHyUettMyh4D1gyYDdNJ4zsatuPrLbrvC08Gz1Rq
g9t5Yclqi+bXzeZL2tDaZlcf2al5vYWvtVpT+knM9OWRtHQxem0b5f9vMmaf2J++
iKzFaW1Y09fmyAlqCHQ4AR/JcfXrXDc5IZKGPVjTXrZg4TtCZWhJol+J2R2f0QCc
/Nbywp2/s5xw24ddIzqIkdilZJeHX+W5to/2pO5HGD2N6QjpHl1wibpS0oDRLQpp
Q05D1htBel8NREEaFGEPy68OHrky786o5WFprA6iM51Xk6Jj9n/RUMZTCZKLuVNx
E3zZL76r1QhP0eWF15MEjHJYrF1iqOgT8CUUCvR8NQnpnxryXhWX0cOSqLgVmrqn
9QeiC3LsuEQ5QQaGOL2FhmpVZkoAgWpeM4Bm1Q3rjjtq0iUb9Jn52rH2gPnS/5lT
ZrnXbROIK+i5JVVQpwYfUj3n74X0eGMgZ/6qVQ0aePOp3OovMcx0fUU4mmC0cGHx
YUJ+OVo4rC+AGHmyt3evZ5iahQQ0vtAP9lkhN6dpx8L2clSmXOSvB7uYgWz0/2U2
7AWP6r8Co/0=
=QDR5
-----END PGP SIGNATURE-----
--=-=-=--




Information forwarded to guix-patches@HIDDEN:
bug#31539; Package guix-patches. Full text available.

Message received at 31539 <at> debbugs.gnu.org:


Received: (at 31539) by debbugs.gnu.org; 20 Oct 2020 07:46:01 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Tue Oct 20 03:46:01 2020
Received: from localhost ([127.0.0.1]:43315 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1kUmLF-0004a5-Gl
	for submit <at> debbugs.gnu.org; Tue, 20 Oct 2020 03:46:01 -0400
Received: from mail-wr1-f65.google.com ([209.85.221.65]:45519)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <zimon.toutoune@HIDDEN>) id 1kUmLA-0004Zl-Pp
 for 31539 <at> debbugs.gnu.org; Tue, 20 Oct 2020 03:45:56 -0400
Received: by mail-wr1-f65.google.com with SMTP id e17so853269wru.12
 for <31539 <at> debbugs.gnu.org>; Tue, 20 Oct 2020 00:45:52 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025;
 h=from:to:cc:subject:references:date:in-reply-to:message-id
 :user-agent:mime-version:content-transfer-encoding;
 bh=ro0MURfaOY5RaIHFKrtLDDDKLJIMG9shiZUDozlq5no=;
 b=WoBDHMLStDJsLvS3xW3HdxV1OIHYF8O1W/5SWlVbhnPLWnircCksV8L9UlH23gKLSq
 yQmfUyKzNzHRFtI3xs34EgqW0Oyx2C/5NpTJT8H2FYZRf6sOnIvWKNYwohL4SNkoWmp3
 zjZ2glOMZhgDfGnA41qNKBXD1iL9HWpxYbcOGIOtCUpJSXoEqtcUuDgva1/BOBWr3BNL
 TRyv5yP2z/Elez3b8OJuj3sz3C+d6mv51ma3CLLzqfUiNoHb7eC3Z+aKcSpvLgRPorq5
 8W2JpxzUrcMlWCpKlqFs9HMQYKaco1jQ2GbHH3OJSoxOGbCyf0G1YRAWG8C1AwLlQtXE
 dHOg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:references:date:in-reply-to
 :message-id:user-agent:mime-version:content-transfer-encoding;
 bh=ro0MURfaOY5RaIHFKrtLDDDKLJIMG9shiZUDozlq5no=;
 b=KAD6yqQeu/8PEiv6Wwm9CNkqXmk/oKfwXOVvbyn/y1eFmILDiDgCUX/BVY3AAqkuZP
 aBtq6pOabyLvjbF9Ts1a/I/B1BXnX8ODxhiz9xQ0TvOp6IPxxyRopbyMMHALswFBCPVp
 23CQBSTQQeePxJHDchejNyZsGGzT/ullswCw99Vf3iB+AmQmKXGfW/1rqOqMkVtrjIiY
 l/tc0h01k3fZoRyF6MEUhG4jQd2FDOtu0l3az/5QTaCta47lqX4RUhqwFkPVkTon+9nZ
 2aMDl6HI2GlFWRPyATBv9RYMNAT97iZE4ocOZCABweOxWHQXHvLWUKdE9F9m8AIih820
 r8YA==
X-Gm-Message-State: AOAM530O+wKPTyL/RT7385DoAqIdTr8HtEwVwkQIGq/G6VqeZ6//kOCj
 vKi7XEfpiszqb3F+siI67oWuqxhM2+c=
X-Google-Smtp-Source: ABdhPJwYLTXAWA7FwmWIHvF42dWMgnj+OP5AZl7FxbAYK7+EWlfUtBAPvjKgLITq7Um3zv0hsBjo+w==
X-Received: by 2002:adf:e650:: with SMTP id b16mr1969140wrn.350.1603179946535; 
 Tue, 20 Oct 2020 00:45:46 -0700 (PDT)
Received: from lili ([2a01:e0a:59b:9120:65d2:2476:f637:db1e])
 by smtp.gmail.com with ESMTPSA id a3sm1334006wmb.46.2020.10.20.00.45.44
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 20 Oct 2020 00:45:45 -0700 (PDT)
From: zimoun <zimon.toutoune@HIDDEN>
To: Christopher Baines <mail@HIDDEN>
Subject: Re: [bug#31539] [PATCH] Add RabbitMQ package and service.
References: <87fu2m3w03.fsf@HIDDEN>
Date: Tue, 20 Oct 2020 09:45:41 +0200
In-Reply-To: <87fu2m3w03.fsf@HIDDEN> (Christopher Baines's message of
 "Sun, 20 May 2018 21:36:12 +0100")
Message-ID: <86zh4h8hne.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux)
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-Spam-Score: 0.0 (/)
X-Debbugs-Envelope-To: 31539
Cc: 31539 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

Dear,

The 2 patches [1] are more than 2 years old.  They are about adding
RabbitMQ package and service.  Have they been fallen in the crack?

Are they still relevant?  They are tagged =E2=80=99moreinfo=E2=80=99, why? =
 Because the
package needs more work?

1: <http://issues.guix.gnu.org/issue/31539>


On Sun, 20 May 2018 at 21:36, Christopher Baines <mail@HIDDEN> wrote:
> Tags: moreinfo
>
> RabbitMQ is a message broker/queuing system service. I've managed to get
> a package that builds, and a service which at least starts and seems to
> work.
>
> The package still needs more work, I haven't looked too closely at the
> source and what might need stripping out.
>
> As for the service, it's very minimal, and I don't have very much
> experience with RabbitMQ. However, this is a start, so here are some
> patches.
>
>
> Christopher Baines (2):
>   gnu: Add rabbitmq.
>   services: Add RabbitMQ.
>
>  gnu/local.mk                    |   3 +
>  gnu/packages/rabbitmq.scm       |  90 +++++++++++++++++++++++++++
>  gnu/services/message-broker.scm | 105 ++++++++++++++++++++++++++++++++
>  gnu/tests/message-broker.scm    |  86 ++++++++++++++++++++++++++
>  4 files changed, 284 insertions(+)
>  create mode 100644 gnu/packages/rabbitmq.scm
>  create mode 100644 gnu/services/message-broker.scm
>  create mode 100644 gnu/tests/message-broker.scm


All the best,
simon




Information forwarded to guix-patches@HIDDEN:
bug#31539; Package guix-patches. Full text available.

Message received at 31539 <at> debbugs.gnu.org:


Received: (at 31539) by debbugs.gnu.org; 20 May 2018 20:40:05 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun May 20 16:40:05 2018
Received: from localhost ([127.0.0.1]:42162 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1fKV7c-0006fh-AL
	for submit <at> debbugs.gnu.org; Sun, 20 May 2018 16:40:04 -0400
Received: from li622-129.members.linode.com ([212.71.249.129]:40144
 helo=mira.cbaines.net) by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1fKV7X-0006f1-ON
 for 31539 <at> debbugs.gnu.org; Sun, 20 May 2018 16:40:02 -0400
Received: by mira.cbaines.net (Postfix, from userid 113)
 id 18B5E1638D; Sun, 20 May 2018 21:39:59 +0100 (BST)
X-Spam-Checker-Version: SpamAssassin 3.4.0 (2014-02-07) on mira.cbaines.net
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,UNPARSEABLE_RELAY,
 URIBL_BLOCKED autolearn=ham autolearn_force=no version=3.4.0
Received: from localhost (cpc102582-walt20-2-0-cust14.13-2.cable.virginm.net
 [86.27.34.15])
 by mira.cbaines.net (Postfix) with ESMTPSA id 8489616374
 for <31539 <at> debbugs.gnu.org>; Sun, 20 May 2018 21:39:58 +0100 (BST)
Received: from localhost (localhost [local])
 by localhost (OpenSMTPD) with ESMTPA id d536e37d
 for <31539 <at> debbugs.gnu.org>; Sun, 20 May 2018 20:39:58 +0000 (UTC)
From: Christopher Baines <mail@HIDDEN>
To: 31539 <at> debbugs.gnu.org
Subject: [PATCH 1/2] gnu: Add rabbitmq.
Date: Sun, 20 May 2018 21:39:57 +0100
Message-Id: <20180520203958.25330-1-mail@HIDDEN>
X-Mailer: git-send-email 2.17.0
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-Debbugs-Envelope-To: 31539
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/rabbitmq.scm: New file.
* gnu/local.mk: Add gnu/packages/rabbitmq.scm.
---
 gnu/local.mk              |  1 +
 gnu/packages/rabbitmq.scm | 90 +++++++++++++++++++++++++++++++++++++++
 2 files changed, 91 insertions(+)
 create mode 100644 gnu/packages/rabbitmq.scm

diff --git a/gnu/local.mk b/gnu/local.mk
index fbdb30989..22aad6d7e 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -359,6 +359,7 @@ GNU_SYSTEM_MODULES =				\
   %D%/packages/toys.scm				\
   %D%/packages/tryton.scm			\
   %D%/packages/qt.scm				\
+  %D%/packages/rabbitmq.scm			\
   %D%/packages/ragel.scm			\
   %D%/packages/rails.scm			\
   %D%/packages/ratpoison.scm			\
diff --git a/gnu/packages/rabbitmq.scm b/gnu/packages/rabbitmq.scm
new file mode 100644
index 000000000..d453dfe10
--- /dev/null
+++ b/gnu/packages/rabbitmq.scm
@@ -0,0 +1,90 @@
+;;; GNU Guix --- Functional package management for GNU
+;;; Copyright © 2017 Christopher Baines <mail@HIDDEN>
+;;; This file is part of GNU Guix.
+;;;
+;;; GNU Guix is free software; you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation; either version 3 of the License, or (at
+;;; your option) any later version.
+;;;
+;;; GNU Guix is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;; GNU General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
+
+(define-module (gnu packages rabbitmq)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (guix utils)
+  #:use-module (guix build-system gnu)
+  #:use-module (guix download)
+  #:use-module (guix packages)
+  #:use-module (gnu packages base)
+  #:use-module (gnu packages compression)
+  #:use-module (gnu packages xml)
+  #:use-module (gnu packages rsync)
+  #:use-module (gnu packages erlang)
+  #:use-module (gnu packages elixir)
+  #:use-module (gnu packages python))
+
+(define-public rabbitmq
+  (package
+    (name "rabbitmq")
+    (version "3.7.4")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "https://github.com/rabbitmq/rabbitmq-server/releases/download/v"
+                    version
+                    "/rabbitmq-server-" version ".tar.xz"))
+              (file-name (string-append name "-" version ".tar.xz"))
+              (sha256
+               (base32
+                "0y3c3kmj2jnfic4rzfn5x0raigkgscxv94fn3ijnnk535b209iw8"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'patch-source
+           (lambda* (#:key inputs #:allow-other-keys)
+             (substitute* "deps/rabbit_common/src/vm_memory_monitor.erl"
+               (("getconf") (string-append (assoc-ref inputs "glibc")
+                                           "/bin/getconf")))
+             #t))
+         (delete 'configure)
+         (delete 'check)
+         (add-after 'install 'patch-scripts
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out")))
+               (substitute* (string-append out "/sbin/rabbitmq-server")
+                 (("uname") (which "uname"))
+                 (("mkdir") (which "mkdir"))
+                 (("cp ") (string-append (which "cp") " "))
+                 (("\\$\\{ERL\\_DIR\\}") (string-append (dirname (which "erl"))
+                                                        "/"))
+                 (("dirname") (which "dirname")))
+               (substitute* (string-append out "/sbin/rabbitmq-env")
+                 (("dirname") (which "dirname"))
+                 (("\\$\\{ERL\\_DIR\\}") (string-append (dirname (which "erl"))
+                                                        "/"))
+                 (("\\| tr") (string-append "| " (which "tr")))
+                 (("basename") (which "basename"))
+                 (("sed") (which "sed")))
+               #t))))
+       #:make-flags
+       (list (string-append "RMQ_ERLAPP_DIR=" (assoc-ref %outputs "out")))))
+    (native-inputs
+     `(("erlang" ,erlang)
+       ("elixir" ,elixir)
+       ("python" ,python-wrapper)
+       ("libxslt" ,libxslt)
+       ("rsync" ,rsync)
+       ("glibc",glibc)
+       ("zip" ,zip)))
+    (home-page "http://www.rabbitmq.com/")
+    (synopsis "TODO")
+    (description "TODO")
+    (license "TODO")))
+
-- 
2.17.0





Information forwarded to guix-patches@HIDDEN:
bug#31539; Package guix-patches. Full text available.

Message received at 31539 <at> debbugs.gnu.org:


Received: (at 31539) by debbugs.gnu.org; 20 May 2018 20:40:04 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun May 20 16:40:04 2018
Received: from localhost ([127.0.0.1]:42160 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1fKV7b-0006fe-Qv
	for submit <at> debbugs.gnu.org; Sun, 20 May 2018 16:40:04 -0400
Received: from li622-129.members.linode.com ([212.71.249.129]:40146
 helo=mira.cbaines.net) by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1fKV7X-0006f2-O2
 for 31539 <at> debbugs.gnu.org; Sun, 20 May 2018 16:40:02 -0400
Received: by mira.cbaines.net (Postfix, from userid 113)
 id 3F9F516387; Sun, 20 May 2018 21:39:59 +0100 (BST)
X-Spam-Checker-Version: SpamAssassin 3.4.0 (2014-02-07) on mira.cbaines.net
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,UNPARSEABLE_RELAY,
 URIBL_BLOCKED autolearn=ham autolearn_force=no version=3.4.0
Received: from localhost (cpc102582-walt20-2-0-cust14.13-2.cable.virginm.net
 [86.27.34.15])
 by mira.cbaines.net (Postfix) with ESMTPSA id ACB9416383
 for <31539 <at> debbugs.gnu.org>; Sun, 20 May 2018 21:39:58 +0100 (BST)
Received: from localhost (localhost [local])
 by localhost (OpenSMTPD) with ESMTPA id 55d56944
 for <31539 <at> debbugs.gnu.org>; Sun, 20 May 2018 20:39:58 +0000 (UTC)
From: Christopher Baines <mail@HIDDEN>
To: 31539 <at> debbugs.gnu.org
Subject: [PATCH 2/2] services: Add RabbitMQ.
Date: Sun, 20 May 2018 21:39:58 +0100
Message-Id: <20180520203958.25330-2-mail@HIDDEN>
X-Mailer: git-send-email 2.17.0
In-Reply-To: <20180520203958.25330-1-mail@HIDDEN>
References: <20180520203958.25330-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-Debbugs-Envelope-To: 31539
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/services/message-broker.scm: New file.
* gnu/services/message-broker.scm: New file.
* gnu/local.mk: Add entries for new files.
---
 gnu/local.mk                    |   2 +
 gnu/services/message-broker.scm | 105 ++++++++++++++++++++++++++++++++
 gnu/tests/message-broker.scm    |  86 ++++++++++++++++++++++++++
 3 files changed, 193 insertions(+)
 create mode 100644 gnu/services/message-broker.scm
 create mode 100644 gnu/tests/message-broker.scm

diff --git a/gnu/local.mk b/gnu/local.mk
index 22aad6d7e..7f5bc19e9 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -478,6 +478,7 @@ GNU_SYSTEM_MODULES =				\
   %D%/services/virtualization.scm		\
   %D%/services/mail.scm				\
   %D%/services/mcron.scm			\
+  %D%/services/message-broker.scm			\
   %D%/services/messaging.scm			\
   %D%/services/monitoring.scm			\
   %D%/services/networking.scm			\
@@ -532,6 +533,7 @@ GNU_SYSTEM_MODULES =				\
   %D%/tests/nfs.scm				\
   %D%/tests/install.scm				\
   %D%/tests/mail.scm				\
+  %D%/tests/message-broker.scm			\
   %D%/tests/messaging.scm			\
   %D%/tests/networking.scm			\
   %D%/tests/rsync.scm				\
diff --git a/gnu/services/message-broker.scm b/gnu/services/message-broker.scm
new file mode 100644
index 000000000..2685ee0fc
--- /dev/null
+++ b/gnu/services/message-broker.scm
@@ -0,0 +1,105 @@
+;;; GNU Guix --- Functional package management for GNU
+;;; Copyright © 2018 Christopher Baines <mail@HIDDEN>
+;;;
+;;; This file is part of GNU Guix.
+;;;
+;;; GNU Guix is free software; you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation; either version 3 of the License, or (at
+;;; your option) any later version.
+;;;
+;;; GNU Guix is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;; GNU General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
+
+(define-module (gnu services message-broker)
+  #:use-module (gnu services)
+  #:use-module (gnu services shepherd)
+  #:use-module (gnu system shadow)
+  #:use-module (gnu packages admin)
+  #:use-module (gnu packages rabbitmq)
+  #:use-module (guix modules)
+  #:use-module (guix records)
+  #:use-module (guix gexp)
+  #:use-module (ice-9 match)
+  #:export (<rabbitmq-configuration>
+            rabbitmq-configuration
+            rabbitmq-configuration?
+            rabbitmq-configuration-rabbitmq
+            rabbitmq-configuration-interfaces
+            rabbitmq-configuration-tcp-port
+            rabbitmq-configuration-udp-port
+            rabbitmq-configuration-additional-options
+
+            rabbitmq-service-type))
+
+
+;;;
+;;; RabbitMQ
+;;;
+
+(define-record-type* <rabbitmq-configuration>
+  rabbitmq-configuration make-rabbitmq-configuration
+  rabbitmq-configuration?
+  (rabbitmq          rabbitmq-configuration-rabbitmq ;<package>
+                      (default rabbitmq))
+  (interfaces         rabbitmq-configuration-interfaces
+                      (default '("0.0.0.0")))
+  (tcp-port           rabbitmq-configuration-tcp-port
+                      (default 11211))
+  (udp-port           rabbitmq-configuration-udp-port
+                      (default 11211))
+  (additional-options rabbitmq-configuration-additional-options
+                      (default '())))
+
+(define %rabbitmq-accounts
+  (list (user-group (name "rabbitmq") (system? #t))
+        (user-account
+         (name "rabbitmq")
+         (group "rabbitmq")
+         (system? #t)
+         (comment "Rabbitmq server user")
+         (home-directory "/var/empty")
+         (shell (file-append shadow "/sbin/nologin")))))
+
+(define rabbitmq-activation
+  #~(begin
+      (use-modules (guix build utils))
+      (let ((user (getpwnam "rabbitmq")))
+        (mkdir-p "/var/run/rabbitmq")
+        (chown "/var/run/rabbitmq"
+               (passwd:uid user) (passwd:gid user)))))
+
+(define rabbitmq-shepherd-service
+  (match-lambda
+    (($ <rabbitmq-configuration> rabbitmq interfaces tcp-port udp-port
+                                  additional-options)
+     (with-imported-modules (source-module-closure
+                             '((gnu build shepherd)))
+       (list (shepherd-service
+              (provision '(rabbitmq))
+              (documentation "Run the Rabbitmq daemon.")
+              (requirement '(user-processes loopback))
+              (modules '((gnu build shepherd)))
+              (start #~(make-forkexec-constructor
+                        `(#$(file-append rabbitmq "/sbin/rabbitmq-server"))
+                        #:pid-file "/var/run/rabbitmq/pid"
+                        #:environment-variables
+                        `("RABBITMQ_PID_FILE=/var/run/rabbitmq/pid"
+                          ,@(environ))))
+              (stop #~(make-kill-destructor))))))))
+
+(define rabbitmq-service-type
+  (service-type (name 'rabbitmq)
+                (extensions
+                 (list (service-extension shepherd-root-service-type
+                                          rabbitmq-shepherd-service)
+                       (service-extension activation-service-type
+                                          (const rabbitmq-activation))
+                       (service-extension account-service-type
+                                          (const %rabbitmq-accounts))))
+                (default-value (rabbitmq-configuration))))
diff --git a/gnu/tests/message-broker.scm b/gnu/tests/message-broker.scm
new file mode 100644
index 000000000..f2f559081
--- /dev/null
+++ b/gnu/tests/message-broker.scm
@@ -0,0 +1,86 @@
+;;; GNU Guix --- Functional package management for GNU
+;;; Copyright © 2017 Christopher Baines <mail@HIDDEN>
+;;;
+;;; This file is part of GNU Guix.
+;;;
+;;; GNU Guix is free software; you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation; either version 3 of the License, or (at
+;;; your option) any later version.
+;;;
+;;; GNU Guix is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;; GNU General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
+
+(define-module (gnu tests message-broker)
+  #:use-module (gnu tests)
+  #:use-module (gnu system)
+  #:use-module (gnu system file-systems)
+  #:use-module (gnu system shadow)
+  #:use-module (gnu system vm)
+  #:use-module (gnu services)
+  #:use-module (gnu services message-broker)
+  #:use-module (gnu services networking)
+  #:use-module (guix gexp)
+  #:use-module (guix store)
+  #:export (%test-rabbitmq))
+
+(define %rabbitmq-os
+  (simple-operating-system
+   (dhcp-client-service)
+   (service rabbitmq-service-type)))
+
+(define* (run-rabbitmq-test #:optional (port 11211))
+  "Run tests in %RABBITMQ-OS, forwarding PORT."
+  (define os
+    (marionette-operating-system
+     %rabbitmq-os
+     #:imported-modules '((gnu services herd)
+                          (guix combinators))))
+
+  (define vm
+    (virtual-machine
+     (operating-system os)
+     (port-forwardings `((11211 . ,port)))))
+
+  (define test
+    (with-imported-modules '((gnu build marionette))
+      #~(begin
+          (use-modules (srfi srfi-11) (srfi srfi-64)
+                       (gnu build marionette)
+                       (ice-9 rdelim))
+
+          (define marionette
+            (make-marionette (list #$vm)))
+
+          (mkdir #$output)
+          (chdir #$output)
+
+          (test-begin "rabbitmq")
+
+          ;; Wait for rabbitmq to be up and running.
+          (test-assert "service running"
+            (marionette-eval
+             '(begin
+                (use-modules (gnu services herd))
+                (match (start-service 'rabbitmq)
+                  (#f #f)
+                  (('service response-parts ...)
+                   (match (assq-ref response-parts 'running)
+                     ((pid) (number? pid))))))
+             marionette))
+
+          (test-end)
+          (exit (= (test-runner-fail-count (test-runner-current)) 0)))))
+
+  (gexp->derivation "rabbitmq-test" test))
+
+(define %test-rabbitmq
+  (system-test
+   (name "rabbitmq")
+   (description "Connect to a running RABBITMQ server.")
+   (value (run-rabbitmq-test))))
-- 
2.17.0





Information forwarded to guix-patches@HIDDEN:
bug#31539; Package guix-patches. Full text available.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 20 May 2018 20:36:34 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun May 20 16:36:34 2018
Received: from localhost ([127.0.0.1]:42154 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1fKV4E-0006ZX-0b
	for submit <at> debbugs.gnu.org; Sun, 20 May 2018 16:36:34 -0400
Received: from eggs.gnu.org ([208.118.235.92]:39224)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1fKV49-0006ZF-8g
 for submit <at> debbugs.gnu.org; Sun, 20 May 2018 16:36:31 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <mail@HIDDEN>) id 1fKV43-0000Ro-9r
 for submit <at> debbugs.gnu.org; Sun, 20 May 2018 16:36:24 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=disabled
 version=3.3.2
Received: from lists.gnu.org ([2001:4830:134:3::11]:49393)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32)
 (Exim 4.71) (envelope-from <mail@HIDDEN>) id 1fKV43-0000Rg-6I
 for submit <at> debbugs.gnu.org; Sun, 20 May 2018 16:36:23 -0400
Received: from eggs.gnu.org ([2001:4830:134:3::10]:58428)
 by lists.gnu.org with esmtp (Exim 4.71)
 (envelope-from <mail@HIDDEN>) id 1fKV42-0002Q2-3E
 for guix-patches@HIDDEN; Sun, 20 May 2018 16:36:22 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <mail@HIDDEN>) id 1fKV3x-0000Ih-2b
 for guix-patches@HIDDEN; Sun, 20 May 2018 16:36:22 -0400
Received: from li622-129.members.linode.com ([212.71.249.129]:50434
 helo=mira.cbaines.net) by eggs.gnu.org with esmtp (Exim 4.71)
 (envelope-from <mail@HIDDEN>) id 1fKV3w-0000Hn-Sl
 for guix-patches@HIDDEN; Sun, 20 May 2018 16:36:17 -0400
Received: by mira.cbaines.net (Postfix, from userid 113)
 id 1109A16377; Sun, 20 May 2018 21:36:16 +0100 (BST)
Received: from localhost (cpc102582-walt20-2-0-cust14.13-2.cable.virginm.net
 [86.27.34.15])
 by mira.cbaines.net (Postfix) with ESMTPSA id 7747C16318
 for <guix-patches@HIDDEN>; Sun, 20 May 2018 21:36:15 +0100 (BST)
Received: from giedi (localhost [127.0.0.1])
 by localhost (OpenSMTPD) with ESMTP id 4442dfbe
 for <guix-patches@HIDDEN>; Sun, 20 May 2018 20:36:15 +0000 (UTC)
User-agent: mu4e 1.0; emacs 25.3.1
From: Christopher Baines <mail@HIDDEN>
To: guix-patches@HIDDEN
Subject: [PATCH] Add RabbitMQ package and service.
Date: Sun, 20 May 2018 21:36:12 +0100
Message-ID: <87fu2m3w03.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha512; protocol="application/pgp-signature"
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
 [fuzzy]
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x
X-Received-From: 2001:4830:134:3::11
X-Spam-Score: -4.0 (----)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -5.0 (-----)

--=-=-=
Content-Type: text/plain

Tags: moreinfo

RabbitMQ is a message broker/queuing system service. I've managed to get
a package that builds, and a service which at least starts and seems to
work.

The package still needs more work, I haven't looked too closely at the
source and what might need stripping out.

As for the service, it's very minimal, and I don't have very much
experience with RabbitMQ. However, this is a start, so here are some
patches.


Christopher Baines (2):
  gnu: Add rabbitmq.
  services: Add RabbitMQ.

 gnu/local.mk                    |   3 +
 gnu/packages/rabbitmq.scm       |  90 +++++++++++++++++++++++++++
 gnu/services/message-broker.scm | 105 ++++++++++++++++++++++++++++++++
 gnu/tests/message-broker.scm    |  86 ++++++++++++++++++++++++++
 4 files changed, 284 insertions(+)
 create mode 100644 gnu/packages/rabbitmq.scm
 create mode 100644 gnu/services/message-broker.scm
 create mode 100644 gnu/tests/message-broker.scm

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQKTBAEBCgB9FiEEPonu50WOcg2XVOCyXiijOwuE9XcFAlsB3DxfFIAAAAAALgAo
aXNzdWVyLWZwckBub3RhdGlvbnMub3BlbnBncC5maWZ0aGhvcnNlbWFuLm5ldDNF
ODlFRUU3NDU4RTcyMEQ5NzU0RTBCMjVFMjhBMzNCMEI4NEY1NzcACgkQXiijOwuE
9XfwQw/+Omz18htxBm2dQ7uTuKhXoz/OUHUSXqt3LjfxCQgDBSIQ3fDKlMuJxVka
IAaJ7upx5z5ZW11IByHpST+hGm57LV4okiIdkcFTXR8Q+7NIsh2hOdVeimWqGf8i
q3yqPV0bEYjQmTdXrEMcM9uxEfzs+XVUEtWRvHStVpjIl9VrJO2HzIJKZos1/zvf
FbL72a8Z8Rv1cCkM73yw120oOFzoR3Glwbr787lc4R2W3USQANQtVdMeLz0lewuU
peEjM6aSvqay+96pUWJzoNnyXPPrTxdXjdP7nfHqPpFy97kRJtpCERMKMuTsfM73
aB/YLmjIwwBqdbd0gIpzhR8zpZaZtBK+KatfqEIApjLo+XzLaT/KCJrP8J8vWYue
VmeFv4Rhw2mnhpSf1sYUUDPYaQnzIGT5NeaS3nRaNTHLriF5k39EIvTCNhOY34+u
4Ny3PbgGNY13wy+RpGJW3lr/y5fqgBFGXK8fZQ1uVVFWfYJ3EmNb1sELjscCA3nk
KTojh6fEhEs7dsxidjS1KP8PiocJWnzqftVBnTTi5OU4H8Hvgg3+j0PgfI1jzELR
fNjtOdU70NFBwi2knFzxEMugPV0N4LzgmasfTxJ2t9DcErFBV1wsXMoVcalZw2Qs
4UnWOKuEqtrj7JDl7q28yY9JfZR2AC+DXq4jhI7fkihoQRw95AE=
=t6j1
-----END PGP SIGNATURE-----
--=-=-=--




Acknowledgement sent to Christopher Baines <mail@HIDDEN>:
New bug report received and forwarded. Copy sent to guix-patches@HIDDEN. Full text available.
Report forwarded to guix-patches@HIDDEN:
bug#31539; Package guix-patches. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Wed, 28 Oct 2020 17:30:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.