Re: [PATCH v2] gnu: Add rust

[ng0 <ng0@we.make.ritual.n0.is>]

Disregard this, works now.

ng0 <ng0@we.make.ritual.n0.is> writes:

> Eric Le Bihan <eric.le.bihan.dev@free.fr> writes:
>
>> Hi!
>>
>> Le Tue, 13 Sep 2016 12:09:42 +0000,
>> ng0 <ng0@we.make.ritual.n0.is> a écrit :
>>
>>> I can not apply this patch with git am. Can you resend the patch as an
>>> appended file created with git format-patch or something similar, and
>>> not inlined?
>>
>> That's surprising: the patch was generated by `git format-patch` and
>> sent via `git send-email`. My mail client is Claws Mail and it allows
>> me to save the email I previously sent to a file in mbox format, which
>> applies without problem with `git am`.
>>
>> Anyway, please find it re-attached to this mail.
>
> Thanks, worked this time.
>
>> Best regards,
>
>
> I get this output, same like I had with what jelle ended up with my
> base, produced an equal first error at some point.
>
> Okay, i just realized there was a mistake in the patch i applied, I need
> to check it again, but I've got this before.. I don't know what's wrong
> here.
>
> substitute: updating list of substitutes from 'https://mirror.hydra.gnu.org'... 100.0%
> substitute: updating list of substitutes from 'https://mirror.hydra.gnu.org'... 100.0%
> process 16829 acquired build slot '/var/guix/offload/192.168.1.198/0'
> Cannot open display "default display"
> load on machine '192.168.1.198' is 0.0 (normalized: 0.0)
> @ build-started /gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv - x86_64-linux /var/log/guix/drvs/qa//f7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv.bz2
> Cannot open display "default display"
> Cannot open display "default display"
> sending 2 store files to '192.168.1.198'...
> Cannot open display "default display"
> exporting path `/gnu/store/hpj2m538l2anjb6bwksxgbivjxz5gnzj-rust-stage0-2016-02-17-4d3eebf-linux-x86_64-d29b7607d13d64078b6324aec82926fb493f59ba.tar.bz2.drv'
> exporting path `/gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv'
> offloading '/gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv' to '192.168.1.198'...
> @ build-remote /gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv 192.168.1.198
> Cannot open display "default display"
> substitute: updating list of substitutes from 'https://mirror.hydra.gnu.org'... 100.0%
> The following derivation will be built:
>    /gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv
> @ build-started /gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv - x86_64-linux /var/log/guix/drvs/qa//f7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv.bz2
> Backtrace:
> In ice-9/boot-9.scm:
>  157: 11 [catch #t #<catch-closure 8c9560> ...]
> In unknown file:
>    ?: 10 [apply-smob/1 #<catch-closure 8c9560>]
> In ice-9/boot-9.scm:
>   63: 9 [call-with-prompt prompt0 ...]
> In ice-9/eval.scm:
>  432: 8 [eval # #]
> In ice-9/boot-9.scm:
> 2401: 7 [save-module-excursion #<procedure 8e7880 at ice-9/boot-9.scm:4045:3 ()>]
> 4050: 6 [#<procedure 8e7880 at ice-9/boot-9.scm:4045:3 ()>]
> 1724: 5 [%start-stack load-stack #<procedure 8fa7c0 at ice-9/boot-9.scm:4041:10 ()>]
> 1729: 4 [#<procedure 8fdc60 ()>]
> In unknown file:
>    ?: 3 [primitive-load "/gnu/store/x5fjjgvzbrcibsv2zwqvsay5zc4916xx-rust-stage0-2016-02-17-4d3eebf-guile-builder"]
> In ice-9/eval.scm:
>  387: 2 [eval # ()]
>  411: 1 [eval # ()]
> In unknown file:
>    ?: 0 [string-append #f "/lib/ld-linux-x86-64.so.2"]
>
> ERROR: In procedure string-append:
> ERROR: In procedure string-append: Wrong type (expecting string): #f
> builder for `/gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv' failed with exit code 1
> @ build-failed /gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv - 1 builder for `/gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv' failed with exit code 1
> guix build: error: build failed: build of `/gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv' failed
> Cannot open display "default display"
> derivation '/gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv' offloaded to '192.168.1.198' failed with exit code 1
> @ build-failed /gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv - 1 builder for `/gnu/store/qaf7fvpw6z8h6ck5ia9ignik8r6bsm0d-rust-stage0-2016-02-17-4d3eebf.drv' failed with exit code 100
> cannot build derivation `/gnu/store/0jplgx6n7a8qc93h36cjwr0bxxcksrah-rust-1.8.0.drv': 1 dependencies couldn't be built
> guix build: error: build failed: build of `/gnu/store/0jplgx6n7a8qc93h36cjwr0bxxcksrah-rust-1.8.0.drv' failed
>
>
>
>> -- 
>> ELB
>> From 4f52b3f041e040d93a0a2f178d3b4a6e8f49df9f Mon Sep 17 00:00:00 2001
>> From: Eric Le Bihan <eric.le.bihan.dev@free.fr>
>> Date: Thu, 28 Jul 2016 20:09:01 +0200
>> Subject: [PATCH v2] gnu: Add rust
>>
>> * gnu/packages/rust.scm(rust): New variable.
>>
>> Signed-off-by: Eric Le Bihan <eric.le.bihan.dev@free.fr>
>> ---
>>  gnu/packages/rust.scm | 143 ++++++++++++++++++++++++++++++++++++++++++++++++++
>>  1 file changed, 143 insertions(+)
>>  create mode 100644 gnu/packages/rust.scm
>>
>> diff --git a/gnu/packages/rust.scm b/gnu/packages/rust.scm
>> new file mode 100644
>> index 0000000..7f2edb8
>> --- /dev/null
>> +++ b/gnu/packages/rust.scm
>> @@ -0,0 +1,143 @@
>> +;;; GNU Guix --- Functional package management for GNU
>> +;;; Copyright © 2016 Eric Le Bihan <eric.le.bihan.dev@free.fr>
>> +;;;
>> +;;; 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 rust)
>> +  #:use-module (ice-9 regex)
>> +  #:use-module ((guix licenses) #:select (asl2.0 x11-style))
>> +  #:use-module (guix packages)
>> +  #:use-module (guix download)
>> +  #:use-module (guix build-system gnu)
>> +  #:use-module (gnu packages base)
>> +  #:use-module (gnu packages bootstrap)
>> +  #:use-module (gnu packages curl)
>> +  #:use-module (gnu packages elf)
>> +  #:use-module (gnu packages gcc)
>> +  #:use-module (gnu packages jemalloc)
>> +  #:use-module (gnu packages perl)
>> +  #:use-module (gnu packages python))
>> +
>> +(define rust-bootstrap-x86_64-1.9.0
>> +  (origin
>> +   (method url-fetch)
>> +   (uri
>> +    "https://static.rust-lang.org/dist/2016-05-24/rustc-1.9.0-x86_64-unknown-linux-gnu.tar.gz")
>> +   (sha256
>> +    (base32
>> +     "1i44rlvvn3pr81sli6bdbkzd78ar1ibybxx6mzpw6rkw4c84sw6h"))))
>> +
>> +(define rust-bootstrap-i686-1.9.0
>> +  (origin
>> +   (method url-fetch)
>> +   (uri
>> +    "https://static.rust-lang.org/dist/2016-05-24/rustc-1.9.0-i686-unknown-linux-gnu.tar.gz")
>> +   (sha256
>> +    (base32
>> +     "0fdf5xvh3g4hdza0y80w1r9vnfczjqnbzbvs7k878yc26p4dwl99"))))
>> +
>> +(define-public rust
>> +  (package
>> +   (name "rust")
>> +   (version "1.10.0")
>> +   (source (origin
>> +            (method url-fetch)
>> +            (uri (string-append "https://static.rust-lang.org/dist/rustc-"
>> +                                version "-src.tar.gz"))
>> +            (sha256
>> +             (base32
>> +              "0sb82xb8y2pzs8l1hk91z228bambwx3dmi2kj8isin7nyjn5l0d4"))))
>> +   (build-system gnu-build-system)
>> +   (native-inputs
>> +    `(("curl" ,curl)
>> +      ("gcc" ,gcc)
>> +      ("gcc-lib" ,gcc "lib")
>> +      ("jemalloc" ,jemalloc)
>> +      ("patchelf" ,patchelf)
>> +      ("perl" ,perl)
>> +      ("python" ,python-2)
>> +      ("rust-bootstrap"
>> +       ,(if (string-match "x86_64"
>> +                          (or (%current-target-system) (%current-system)))
>> +            rust-bootstrap-x86_64-1.9.0
>> +            rust-bootstrap-i686-1.9.0))
>> +      ("which" ,which)))
>> +   (arguments
>> +    `(#:phases
>> +      (modify-phases %standard-phases
>> +        (add-after 'unpack 'unpack-bootstrap
>> +                   (lambda* (#:key inputs #:allow-other-keys)
>> +                     (with-directory-excursion (getcwd)
>> +                       (zero? (system*
>> +                               "tar"
>> +                               "--strip-components=1"
>> +                               "-xzf"
>> +                               (assoc-ref inputs "rust-bootstrap"))))))
>> +        (replace 'configure
>> +                 (lambda* (#:key inputs outputs #:allow-other-keys)
>> +                   (let ((out (assoc-ref outputs "out"))
>> +                         (binutils (assoc-ref inputs "binutils"))
>> +                         (gcc (assoc-ref inputs "gcc"))
>> +                         (gcc-lib (assoc-ref inputs "gcc-lib"))
>> +                         (jemalloc (assoc-ref inputs "jemalloc"))
>> +                         (ld-so (string-append
>> +                                 (assoc-ref inputs "libc")
>> +                                 ,(glibc-dynamic-linker)))
>> +                         (python (assoc-ref inputs "python")))
>> +                     (setenv "SHELL" (which "sh"))
>> +                     (setenv "CONFIG_SHELL" (which "sh"))
>> +                     ;; Tell where to find libgcc_s.so
>> +                     (setenv "LD_LIBRARY_PATH" (string-append gcc-lib "/lib"))
>> +                     ;; Remove reference to "/lib64/ld-linux-x86-64.so.2" from binary
>> +                     (zero? (system*
>> +                             "patchelf"
>> +                             "--set-interpreter" ld-so
>> +                             "rustc/bin/rustc"))
>> +                     (zero? (system*
>> +                             "./configure"
>> +                             (string-append "--prefix=" out)
>> +                             (string-append "--default-linker=" gcc "/bin/gcc")
>> +                             (string-append "--default-ar=" binutils "/bin/ar")
>> +                             (string-append "--jemalloc-root=" jemalloc "/lib")
>> +                             (string-append "--enable-rpath")
>> +                             (string-append "--enable-local-rust")
>> +                             (string-append "--local-rust-root=" (getcwd) "/rustc")
>> +                             (string-append "--python=" python "/bin/python2")
>> +                             "--disable-manage-submodules")))))
>> +        (add-before 'build 'create-linker-wrapper
>> +                    (lambda _
>> +                      (let* ((bindir (string-append (getcwd) "/bin"))
>> +                             (cc (string-append bindir "/cc")))
>> +                        (mkdir bindir)
>> +                        (call-with-output-file cc
>> +                          (lambda (port)
>> +                            (format port
>> +                                    "#!~a\n\nexec gcc \"$@\"\n" (which "sh"))))
>> +                        (chmod cc #o755))))
>> +        (add-before 'build 'change-PATH
>> +                    (lambda _
>> +                      (setenv "PATH"
>> +                              (string-append (getcwd)
>> +                                             "/bin:"
>> +                                             (getenv "PATH"))))))
>> +      ;; Disable tests which can only be run from Git repository
>> +      #:tests? #f))
>> +   (synopsis "Compiler for the Rust progamming language")
>> +   (description
>> +    "Rust is a systems programming language that runs blazingly fast, prevents
>> +segfaults, and guarantees thread safety.")
>> +   (home-page "https://www.rust-lang.org")
>> +   (license (list asl2.0 (x11-style "file://LICENSE-MIT")))))
>> -- 
>> 2.4.11
>>
>
> -- 
>              ng0
>
>

-- 
             ng0