daemon: Fix 'HashSink::currentHash()'.
[jackhill/guix/guix.git] / nix / sync-with-upstream
CommitLineData
b49ffe2d 1#!/bin/sh
2357f850 2# GNU Guix --- Functional package management for GNU
8cf13c1f 3# Copyright © 2012, 2013 Ludovic Courtès <ludo@gnu.org>
b49ffe2d 4#
2357f850 5# This file is part of GNU Guix.
b49ffe2d 6#
2357f850 7# GNU Guix is free software; you can redistribute it and/or modify it
b49ffe2d
LC
8# under the terms of the GNU General Public License as published by
9# the Free Software Foundation; either version 3 of the License, or (at
10# your option) any later version.
11#
2357f850 12# GNU Guix is distributed in the hope that it will be useful, but
b49ffe2d
LC
13# WITHOUT ANY WARRANTY; without even the implied warranty of
14# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15# GNU General Public License for more details.
16#
17# You should have received a copy of the GNU General Public License
2357f850 18# along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
b49ffe2d
LC
19
20#
21# Update the local copy of Nix source code needed to build the daemon.
22# Assume GNU Coreutils and Git are available.
23#
24
25top_srcdir="${top_srcdir:-..}"
26
27log()
28{
29 echo "sync-with-upstream: $@" >&2
30}
31
32# checked_in_p FILE
33checked_in_p()
34{
35 ( cd "$top_srcdir" ;
36 git ls-tree HEAD -- "nix/$1" | grep "$1" > /dev/null )
37}
38
39if [ ! -d "$top_srcdir/build-aux" ]
40then
41 log "\`$top_srcdir' is not the valid top-level source directory"
42 exit 1
43fi
44
45set -e
46for upstream_file in `cd "$top_srcdir/nix-upstream/src" ;
47 find . -name \*.c -or -name \*.h -or -name \*.cc -or -name \*.hh \
48 -or -name \*.cpp -or -name \*.hpp -or -name \*.sql`
49do
50 if grep "$upstream_file" "$top_srcdir/daemon.am" > /dev/null
51 then
52 if checked_in_p "$upstream_file"
53 then
54 log "skipping \`$upstream_file', which has a checked-in copy"
55 else
56 ( cd "$top_srcdir/nix-upstream/src" && \
57 cp -v --parents "$upstream_file" ../../nix )
58 fi
59 else
60 log "skipping \`$upstream_file', which is not used"
61 fi
62done
63
8cf13c1f
LC
64# This file should be generated by our build system so remove it.
65rm -fv "$top_srcdir/nix/libstore/schema.sql.hh"
66
0d12bea3
AE
67cp -v "$top_srcdir/nix-upstream/COPYING" "$top_srcdir/nix"
68cp -v "$top_srcdir/nix-upstream/AUTHORS" "$top_srcdir/nix"
f5c82e15
LC
69
70# Substitutions.
71sed -i "$top_srcdir/nix/libstore/gc.cc" \
72 -e 's|/nix/find-runtime-roots\.pl|/guix/list-runtime-roots|g'
0c5028fa
LC
73
74# Our 'guix_hash_context' structure has a copy constructor, specifically to
75# handle the use case in 'HashSink::currentHash()' where the copy of the
76# context is expected to truly copy the underlying hash context. The copy
77# constructor cannot be used in 'Ctx' if that's a union, so turn it into a
78# structure (we can afford to two wasted words.)
79sed -i "$top_srcdir/nix/libutil/hash".{cc,hh} \
80 -e 's|union Ctx|struct Ctx|g'