Start to handle information about Git branches

Add some new pages /branches and /branch/... as well as a new git_branches
table. Also extend the email processing to enter the branch information in to
the database.

1 files changed, 119 insertions, 0 deletions

diff --git a/tests/branch-updated-emails.scm b/tests/branch-updated-emails.scm
new file mode 100644
index 0000000..0265ba4
--- /dev/null
+++ b/tests/branch-updated-emails.scm
@@ -0,0 +1,119 @@
+(define-module (test-branch-updated-emails)
+  #:use-module (srfi srfi-64)
+  #:use-module (email email)
+  #:use-module (guix-data-service database)
+  #:use-module (guix-data-service model git-repository)
+  #:use-module (guix-data-service branch-updated-emails))
+
+(define master-branch-updated-email
+  "Return-Path: <guix-commits-bounces+patchwork=mira.cbaines.net@gnu.org>
+X-Original-To: patchwork@mira.cbaines.net
+Delivered-To: patchwork@mira.cbaines.net
+Received: by mira.cbaines.net (Postfix, from userid 113)
+	id 893C316F50; Fri, 26 Apr 2019 13:19:54 +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,URIBL_BLOCKED
+	autolearn=ham autolearn_force=no version=3.4.0
+Received: from lists.gnu.org (lists.gnu.org [209.51.188.17])
+	by mira.cbaines.net (Postfix) with ESMTP id 0169916F46
+	for <patchwork@mira.cbaines.net>; Fri, 26 Apr 2019 13:19:51 +0100 (BST)
+Received: from localhost ([127.0.0.1]:46383 helo=lists.gnu.org)
+	by lists.gnu.org with esmtp (Exim 4.71)
+	(envelope-from <guix-commits-bounces+patchwork=mira.cbaines.net@gnu.org>)
+	id 1hJzpX-0004ZG-5K
+	for patchwork@mira.cbaines.net; Fri, 26 Apr 2019 08:19:51 -0400
+Received: from eggs.gnu.org ([209.51.188.92]:41385)
+	by lists.gnu.org with esmtp (Exim 4.71)
+	(envelope-from <ludo@gnu.org>) id 1hJzpT-0004WT-2H
+	for guix-commits@gnu.org; Fri, 26 Apr 2019 08:19:47 -0400
+Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
+	(envelope-from <ludo@gnu.org>) id 1hJzpS-00037m-84
+	for guix-commits@gnu.org; Fri, 26 Apr 2019 08:19:47 -0400
+Received: from vcs0.savannah.gnu.org ([209.51.188.201]:48450)
+	by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@gnu.org>)
+	id 1hJzpS-00037O-4X
+	for guix-commits@gnu.org; Fri, 26 Apr 2019 08:19:46 -0400
+Received: by vcs0.savannah.gnu.org (Postfix, from userid 68006)
+	id BD977209B1; Fri, 26 Apr 2019 08:19:45 -0400 (EDT)
+To: guix-commits@gnu.org
+Subject: branch master updated (9ca5ff8 -> 272db5b)
+MIME-Version: 1.0
+Content-Type: text/plain; charset=utf-8
+Message-ID: <20190426121944.32203.70977@vcs0.savannah.gnu.org>
+From: guix-commits@gnu.org
+Mail-Followup-To: guix-devel@gnu.org
+X-Git-Repo: guix
+X-Git-Refname: refs/heads/master
+X-Git-Reftype: branch
+X-Git-Oldrev: 9ca5ff882e2ac4eaab02eb0fde545bd784af478b
+X-Git-Newrev: 272db5bcf53d9d05d5c4b2df021d9e74f78866cd
+Auto-Submitted: auto-generated
+Date: Fri, 26 Apr 2019 08:19:45 -0400 (EDT)
+Content-Transfer-Encoding: quoted-printable
+X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
+X-Received-From: 209.51.188.201
+X-BeenThere: guix-commits@gnu.org
+X-Mailman-Version: 2.1.21
+Precedence: list
+List-Id: <guix-commits.gnu.org>
+List-Unsubscribe: <https://lists.gnu.org/mailman/options/guix-commits>,
+	<mailto:guix-commits-request@gnu.org?subject=unsubscribe>
+List-Archive: <http://lists.gnu.org/archive/html/guix-commits/>
+List-Post: <mailto:guix-commits@gnu.org>
+List-Help: <mailto:guix-commits-request@gnu.org?subject=help>
+List-Subscribe: <https://lists.gnu.org/mailman/listinfo/guix-commits>,
+	<mailto:guix-commits-request@gnu.org?subject=subscribe>
+Errors-To: guix-commits-bounces+patchwork=mira.cbaines.net@gnu.org
+Sender: \"Guix-commits\"
+	<guix-commits-bounces+patchwork=mira.cbaines.net@gnu.org>
+
+civodul pushed a change to branch master
+in repository guix.
+
+      from  9ca5ff8   bootstrap: Break automake dependency on generated f=
+iles.
+       new  504a0fc   accounts: Always honor the configured user account =
+shell.
+       new  538b99f   system: Provide a new VM image configuration.
+       new  6c849cd   installer: Run wrapped program with 'execl', not 's=
+ystem'.
+       new  9529f78   installer: Take 'guix system init' exit code into a=
+ccount.
+       new  98f0354   installer: Actually reboot when the user presses \"R=
+eboot.\"
+       new  b57dd20   doc: Add 'BASE-URL' variable.
+       new  272db5b   doc: Use ftp.gnu.org for downloads.
+
+The 7 revisions listed above as \"new\" are entirely new to this
+repository and will be described in separate emails.  The revisions
+listed as \"adds\" were already present in the repository and have only
+been added to this reference.
+
+
+Summary of changes:
+ doc/guix.texi                     | 39 ++++++++++-----
+ gnu/build/accounts.scm            |  9 ++--
+ gnu/installer.scm                 | 22 +++++++--
+ gnu/installer/final.scm           |  5 +-
+ gnu/installer/newt/final.scm      |  5 +-
+ gnu/installer/utils.scm           | 26 ++++++++--
+ gnu/system/examples/vm-image.tmpl | 99 +++++++++++++++++++++++++--------=
+------
+ 7 files changed, 140 insertions(+), 65 deletions(-)
+
+")
+
+(test-begin "test-branch-updated-emails")
+
+(with-postgresql-connection
+ (lambda (conn)
+   (test-assert "enqueue-job-for-email works"
+     (with-postgresql-transaction
+      conn
+      (lambda (conn)
+        (enqueue-job-for-email conn
+                               (parse-email master-branch-updated-email)))
+      #:always-rollback? #t))))
+
+(test-end)