#!/bin/sh

# This hook script prevents the user from pushing to Savannah if any of the new
# commits' OpenPGP signatures cannot be verified, or if a commit is signed
# with an unauthorized key.

# Called by "git push" after it has checked the remote status, but before
# anything has been pushed.  If this script exits with a non-zero status nothing
# will be pushed.
#
# This hook is called with the following parameters:
#
# $1 -- Name of the remote to which the push is being done
# $2 -- URL to which the push is being done
#
# If pushing without using a named remote those arguments will be equal.
#
# Information about the commits which are being pushed is supplied as lines to
# the standard input in the form:
#
#   <local ref> <local sha1> <remote ref> <remote sha1>

# This is the "empty hash" used by Git when pushing a branch deletion.
z40=0000000000000000000000000000000000000000

while read local_ref local_hash remote_ref remote_hash
do
	# When deleting a remote branch, no commits are pushed to the remote, and
	# thus there are no signatures to be verified.
	if [ "$local_hash" != $z40 ]
	then
		# Only use the hook when pushing to Savannah.
		case "$2" in
		    *.gnu.org*)
			exec make authenticate check-channel-news
			exit 127
			;;
		    *)
			exit 0
			;;
		esac
	fi
done

exit 0
tests/databases.scm?id=b7210a3241cccb80ff9056ed0c087a3bef4b0327'>tree</a><a href='/guix/commit/gnu/tests/databases.scm?id=b7210a3241cccb80ff9056ed0c087a3bef4b0327'>commit</a><a href='/guix/diff/gnu/tests/databases.scm?id=b7210a3241cccb80ff9056ed0c087a3bef4b0327'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/tests/databases.scm'>
<input type='hidden' name='id' value='b7210a3241cccb80ff9056ed0c087a3bef4b0327'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=b7210a3241cccb80ff9056ed0c087a3bef4b0327'>root</a>/<a href='/guix/log/gnu?id=b7210a3241cccb80ff9056ed0c087a3bef4b0327'>gnu</a>/<a href='/guix/log/gnu/tests?id=b7210a3241cccb80ff9056ed0c087a3bef4b0327'>tests</a>/<a href='/guix/log/gnu/tests/databases.scm?id=b7210a3241cccb80ff9056ed0c087a3bef4b0327'>databases.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/tests/databases.scm?id=b7210a3241cccb80ff9056ed0c087a3bef4b0327&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2018-10-18 01:12:22 +0200'>2018-10-18</span></td><td><a href='/guix/commit/gnu/tests/databases.scm?id=39d7fdce453b0ca23ecbed72048647debbaa58a6'>services: dhcp-client: Deprecate 'dhcp-client-service' procedure.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/networking.scm (dhcp-client-service-type): Add default
value.
* gnu/system/examples/bare-bones.tmpl: Use (service
dhcp-client-service-type) instead of (dhcp-client-service).
* gnu/system/examples/beaglebone-black.tmpl: Likewise.
* gnu/tests/base.scm (%avahi-os): Likewise.
* gnu/tests/databases.scm (%memcached-os): Likewise.
(%mongodb-os): Likewise.
* gnu/tests/dict.scm (%dicod-os): Likewise.
* gnu/tests/mail.scm (%opensmtpd-os): Likewise.
(%exim-os): Likewise.
(%dovecot-os): Likewise.
* gnu/tests/messaging.scm (run-xmpp-test): Likewise.
(run-bitlbee-test): Likewise.
* gnu/tests/monitoring.scm (%prometheus-node-exporter-os): Likewise.
* gnu/tests/networking.scm (%inetd-os): Likewise.
(run-iptables-test): Likewise.
* gnu/tests/nfs.scm (%base-os): Likewise.
* gnu/tests/rsync.scm (%rsync-os): Likewise.
* gnu/tests/ssh.scm (run-ssh-test): Likewise.
* gnu/tests/version-control.scm (%cgit-os): Likewise.
(%git-http-os): Likewise.
(%gitolite-os): Likewise.
* gnu/tests/virtualization.scm (%libvirt-os): Likewise.
* gnu/tests/web.scm (%httpd-os): Likewise.
(%nginx-os): Likewise.
(%varnish-os): Likewise.
(%php-fpm-os): Likewise.
(%hpcguix-web-os): Likewise.
(%tailon-os): Likewise.
* tests/guix-system.sh: Likewise.
* doc/guix.texi (Networking Services): Document
'dhcp-client-service-type' and remove 'dhcp-client-service'.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-03-10 16:20:55 +0000'>2018-03-10</span></td><td><a href='/guix/commit/gnu/tests/databases.scm?id=69f7cf2bf4ca3ab792438a9e7fb46f78ef0f227a'>tests: databases: Add a system test for PostgreSQL.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/tests/databases.scm (%postgresql-os, %test-postgresql): New variables.
(run-postgresql-test): New procedure.
</span></span></td><td>Christopher Baines</td></tr>