[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
24/70: bootstrap: Add bash-mesboot0.
From: |
guix-commits |
Subject: |
24/70: bootstrap: Add bash-mesboot0. |
Date: |
Sun, 15 Dec 2019 08:36:43 -0500 (EST) |
janneke pushed a commit to branch wip-bootstrap
in repository guix.
commit e66f09e1a52c71b2b65a45fdd348b329cc51258d
Author: Jan Nieuwenhuizen <address@hidden>
Date: Sun Sep 22 00:53:54 2019 +0200
bootstrap: Add bash-mesboot0.
* gnu/packages/commencement.scm (bash-mesboot0): New variable.
---
gnu/packages/commencement.scm | 103 ++++++++++++++++++++++++++++++++++++++++++
1 file changed, 103 insertions(+)
diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm
index 600c0e3..bf36d0d 100644
--- a/gnu/packages/commencement.scm
+++ b/gnu/packages/commencement.scm
@@ -961,6 +961,109 @@ $MES -e '(mescc)' module/mescc.scm -- \"$@\"
(copy-file "libtcc1.a" (string-append out "/lib/tcc/libtcc1.a"))
#t))))))))
+(define bash-mesboot0
+ ;; The initial Bash
+ (package
+ (inherit static-bash)
+ (name "bash-mesboot0")
+ (version "2.05b")
+ (source (bootstrap-origin
+ (origin
+ (method url-fetch)
+ (uri (string-append "mirror://gnu/bash/bash-"
+ version ".tar.gz"))
+ (sha256
+ (base32
+ "1r1z2qdw3rz668nxrzwa14vk2zcn00hw7mpjn384picck49d80xs")))))
+ (inputs '())
+ (propagated-inputs '())
+ (native-inputs (%boot-tcc0-inputs))
+ (outputs '("out"))
+ (arguments
+ `(#:implicit-inputs? #f
+ #:guile ,%bootstrap-guile
+ #:parallel-build? #f
+ #:strip-binaries? #f ; no strip yet
+ #:configure-flags
+ (list "--build=i686-unknown-linux-gnu"
+ "--host=i686-unknown-linux-gnu"
+
+ "--without-bash-malloc"
+ "--disable-readline"
+ "--disable-history"
+ "--disable-help-builtin"
+ "--disable-progcomp"
+ "--disable-net-redirections"
+ "--disable-nls"
+
+ ;; Pretend 'dlopen' is missing so we don't build loadable
+ ;; modules and related code.
+ "ac_cv_func_dlopen=no")
+ #:make-flags '("bash")
+ #:phases
+ (modify-phases %standard-phases
+ (add-before 'configure 'setenv
+ (lambda _
+ (let* ((gash (assoc-ref %build-inputs "bash"))
+ (shell (string-append gash "/bin/gash")))
+ (setenv "CONFIG_SHELL" shell)
+ (setenv "SHELL" shell)
+ (setenv "CC" "tcc")
+ (setenv "LD" "tcc")
+ (setenv "AR" "tcc -ar")
+ (setenv "CFLAGS" "-D _POSIX_VERSION=1")
+ #t)))
+ (add-after 'unpack 'scripted-patch
+ (lambda _
+ (substitute* "Makefile.in"
+ (("mksyntax\\.c\n") "mksyntax.c -lgetopt\n")
+ (("buildversion[.]o\n") "buildversion.o -lgetopt\n")
+ ;; No size in Gash
+ (("\tsize ") "#\tsize"))
+ (substitute* "lib/sh/oslib.c"
+ (("int name, namelen;") "char *name; int namelen;"))
+ (substitute* "lib/sh/snprintf.c"
+ (("^#if (defined [(]HAVE_LOCALE_H[)])" all define)
(string-append "#if 0 //" define)))
+ (substitute* "configure"
+ ((" egrep") " grep"))
+ #t))
+ (replace 'configure
+ (lambda* (#:key configure-flags #:allow-other-keys)
+ (let ((configure-flags (filter (lambda (x)
+ (and (not (string-prefix?
"CONFIG_SHELL=" x))
+ (not (string-prefix?
"SHELL=" x))))
+ configure-flags)))
+ (format (current-error-port)
+ "running ./configure ~a\n" (string-join
configure-flags)))
+ (apply invoke (cons "./configure" configure-flags))))
+ (add-after 'configure 'configure-fixups
+ (lambda _
+ (substitute* "config.h"
+ (("#define GETCWD_BROKEN 1") "#undef GETCWD_BROKEN"))
+ (let ((config.h (open-file "config.h" "a")))
+ (display (string-append "
+// tcc: error: undefined symbol 'enable_hostname_completion'
+#define enable_hostname_completion(on_or_off) 0
+
+//
/gnu/store/cq0cmv35s9dhilx14zaghlc08gpc0hwr-tcc-boot0-0.9.26-6.c004e9a/lib/libc.a:
error: 'sigprocmask' defined twice
+#define HAVE_POSIX_SIGNALS 1
+#define endpwent(x) 0
+")
+ config.h)
+ (close config.h))
+ #t))
+ (replace 'check
+ (lambda _
+ (invoke "./bash" "--version")))
+ (replace 'install
+ (lambda _
+ (let* ((out (assoc-ref %outputs "out"))
+ (bin (string-append out "/bin")))
+ (mkdir-p bin)
+ (copy-file "bash" (string-append bin "/bash"))
+ (copy-file "bash" (string-append bin "/sh"))
+ #t))))))))
+
(define diffutils-mesboot
(package
(inherit diffutils)
- 12/70: Revert "gnu: Remove mescc-tools-0.5.2.", (continued)
- 12/70: Revert "gnu: Remove mescc-tools-0.5.2.", guix-commits, 2019/12/15
- 18/70: bootstrap: Add %bootstrap-mes-rewired., guix-commits, 2019/12/15
- 17/70: bootstrap: Add gash-core-utils-boot., guix-commits, 2019/12/15
- 15/70: bootstrap: Add %bootstrap-guile+guild., guix-commits, 2019/12/15
- 23/70: bootstrap: Add bzip2-mesboot., guix-commits, 2019/12/15
- 22/70: bootstrap: make-mesboot0: Use Gash instead of coreutils&co., guix-commits, 2019/12/15
- 20/70: bootstrap: tcc-boot0: Use Gash instead of coretutils&co., guix-commits, 2019/12/15
- 26/70: bootstrap: diffuils-mesboot: Use Gash instead of coretutils&co., guix-commits, 2019/12/15
- 27/70: bootstrap: Add patch-mesboot., guix-commits, 2019/12/15
- 21/70: bootstrap: Add gzip-mesboot., guix-commits, 2019/12/15
- 24/70: bootstrap: Add bash-mesboot0.,
guix-commits <=
- 28/70: bootstrap: Add sed-mesboot0., guix-commits, 2019/12/15
- 32/70: bootstrap: mesboot-headers: Use Gash instead of coretutils&co., guix-commits, 2019/12/15
- 31/70: bootstrap: Add gawk-mesboot0., guix-commits, 2019/12/15
- 44/70: bootstrap: Add gcc-mesboot1: Use Gash instead of coreutils&co., guix-commits, 2019/12/15
- 48/70: bootstrap: glibc-headers-mesboot: Use Gash instead of coreutils&co., guix-commits, 2019/12/15
- 16/70: bootstrap: Add gash-boot., guix-commits, 2019/12/15
- 33/70: bootstrap: glibc-mesboot0: Use Gash instead of coretutils&co., guix-commits, 2019/12/15
- 37/70: bootstrap: Add binutils-mesboot1., guix-commits, 2019/12/15
- 38/70: bootstrap: Add coreutils-mesboot0., guix-commits, 2019/12/15
- 45/70: bootstrap: Add xz-mesboot., guix-commits, 2019/12/15