From mboxrd@z Thu Jan 1 00:00:00 1970 From: Andreas Enge Subject: [Patch] Bitcoin Date: Wed, 16 Sep 2015 23:36:13 +0200 Message-ID: <20150916213613.GA11110@debian> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="tKW2IUtsqtDRztdT" Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:51774) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ZcKNH-0005Oo-T9 for guix-devel@gnu.org; Wed, 16 Sep 2015 17:36:21 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1ZcKNE-0002pn-M2 for guix-devel@gnu.org; Wed, 16 Sep 2015 17:36:19 -0400 Received: from mout.kundenserver.de ([212.227.17.24]:62892) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ZcKNE-0002oP-Fn for guix-devel@gnu.org; Wed, 16 Sep 2015 17:36:16 -0400 Content-Disposition: inline List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel@gnu.org --tKW2IUtsqtDRztdT Content-Type: text/plain; charset=us-ascii Content-Disposition: inline Hello, the attached new file contains the "standard" bitcoin client. It seems to work. Comments are welcome. An alternative file name could by "currency.scm" if we intend to add more crypto currencies (I do not). Or "bitcoin.scm". Andreas --tKW2IUtsqtDRztdT Content-Type: text/plain; charset=iso-8859-15 Content-Disposition: attachment; filename="finance.scm" Content-Transfer-Encoding: 8bit ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2015 Andreas Enge ;;; ;;; 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 . (define-module (gnu packages finance) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix download) #:use-module (guix build utils) #:use-module (guix build-system gnu) #:use-module (gnu packages boost) #:use-module (gnu packages databases) #:use-module (gnu packages linux) #:use-module (gnu packages pkg-config) #:use-module (gnu packages protobuf) #:use-module (gnu packages python) #:use-module (gnu packages qt) #:use-module (gnu packages tls) #:use-module (gnu packages upnp)) (define-public bitcoin-core (package (name "bitcoin-core") (version "0.11.0") (source (origin (method url-fetch) (uri (string-append "https://bitcoin.org/bin/bitcoin-core-" version "/bitcoin-" version ".tar.gz")) (sha256 (base32 "17yh6lq13xzzi5v2i48qaxiqm40x3hrj4gwyamkib9yzmmb1gfji")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config) ("python" ,python-wrapper) ; for the tests ("util-linux" ,util-linux))) ; provides the hexdump command for tests (inputs `(("bdb" ,bdb) ("boost" ,boost) ("miniupnpc" ,miniupnpc) ("openssl" ,openssl) ("protobuf" ,protobuf) ("qt" ,qt))) (arguments `(#:configure-flags (list ;; We use a bdb version newer than 4.8. "--with-incompatible-bdb" ;; Boost is not found unless specified manually. (string-append "--with-boost=" (assoc-ref %build-inputs "boost"))) #:phases (modify-phases %standard-phases (add-before 'check 'set-home (lambda _ (setenv "HOME" (getenv "TMPDIR"))))))) ; Tests write to $HOME. (home-page "https://bitcoin.org/en/") (synopsis "Bitcoin peer-to-peer client") (description "Bitcoin is a digital currency that enables instant payments to anyone anywhere in the world. It uses peer-to-peer technology to operate without central authority: managing transactions and issuing money are carried out collectively by the network. Bitcoin Core is the reference implementation of the bitcoin protocol. This package provides the Bitcoin Core command line client and a client based on Qt.") (license license:expat))) --tKW2IUtsqtDRztdT--