From patchwork Wed Jun 8 22:22:14 2016 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: =?utf-8?q?Cl=C3=A9ment_Lassieur?= X-Patchwork-Id: 12897 Received: (qmail 80901 invoked by uid 89); 9 Jun 2016 01:01:03 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Checked: by ClamAV 0.99.1 on sourceware.org X-Virus-Found: No X-Spam-SWARE-Status: No, score=-3.3 required=5.0 tests=BAYES_00, RP_MATCHES_RCVD, SPF_PASS autolearn=ham version=3.3.2 spammy=H*RU:sk:mail.la, Hx-spam-relays-external:sk:mail.la, H*r:sk:mail.la, playback X-Spam-Status: No, score=-3.3 required=5.0 tests=BAYES_00, RP_MATCHES_RCVD, SPF_PASS autolearn=ham version=3.3.2 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on sourceware.org X-Spam-Level: X-HELO: lists.gnu.org Received: from lists.gnu.org (HELO lists.gnu.org) (208.118.235.17) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with (AES256-SHA encrypted) ESMTPS; Thu, 09 Jun 2016 01:00:52 +0000 Received: from localhost ([::1]:60131 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bAoL4-00065r-NK for patchwork@sourceware.org; Wed, 08 Jun 2016 21:00:50 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:36259) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bAlrp-0005p3-4I for guix-devel@gnu.org; Wed, 08 Jun 2016 18:22:30 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bAlrl-0006kL-0z for guix-devel@gnu.org; Wed, 08 Jun 2016 18:22:29 -0400 Received: from mail.lassieur.org ([83.152.10.219]:55006) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bAlrk-0006gE-QA for guix-devel@gnu.org; Wed, 08 Jun 2016 18:22:24 -0400 Received: from localhost.localdomain (cha92-13-88-165-248-81.fbx.proxad.net [88.165.248.81]) by mail.lassieur.org (Postfix) with ESMTPSA id 1C5F06402C8; Thu, 9 Jun 2016 00:19:04 +0200 (CEST) From: =?UTF-8?q?Cl=C3=A9ment=20Lassieur?= To: guix-devel@gnu.org Subject: [PATCH] gnu: Add woof. Date: Thu, 9 Jun 2016 00:22:14 +0200 Message-Id: <20160608222214.8111-1-clement@lassieur.org> X-Mailer: git-send-email 2.8.3 MIME-Version: 1.0 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 83.152.10.219 X-Mailman-Approved-At: Wed, 08 Jun 2016 21:00:44 -0400 X-BeenThere: guix-devel@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: =?UTF-8?q?Cl=C3=A9ment=20Lassieur?= Errors-To: guix-devel-bounces+patchwork=sourceware.org@gnu.org Sender: "Guix-devel" --- gnu/packages/web.scm | 37 +++++++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index 6ac03fc..7fae9ab 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -12,6 +12,7 @@ ;;; Copyright © 2016 Efraim Flashner ;;; Copyright © 2016 Rene Saavedra ;;; Copyright © 2016 Ben Woodcroft +;;; Copyright © 2016 Clément Lassieur ;;; ;;; This file is part of GNU Guix. ;;; @@ -41,6 +42,7 @@ #:use-module (guix build-system perl) #:use-module (guix build-system cmake) #:use-module (guix build-system r) + #:use-module (guix build-system trivial) #:use-module (gnu packages) #:use-module (gnu packages apr) #:use-module (gnu packages documentation) @@ -3350,3 +3352,38 @@ you'd expect.") HTTPS. It provides a library, libuhttpmock, which implements recording and playback of HTTP request/response traces.") (license l:lgpl2.1+))) + +(define-public woof + (package + (name "woof") + (version "2012-05-31") + (source (origin + (method url-fetch) + (uri (string-append + "http://www.home.unix-ag.org/simon/woof-" + version ".py")) + (sha256 + (base32 + "0wjmjhpg6xlid33yi59j47q2qadz20sijrqsjahj30vngz856hyq")))) + (build-system trivial-build-system) + (arguments + '(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (let* ((source (assoc-ref %build-inputs "source")) + (out (assoc-ref %outputs "out")) + (bin (string-append out "/bin")) + (python (assoc-ref %build-inputs "python"))) + (mkdir-p bin) + (with-directory-excursion bin + (copy-file source "woof") + (patch-shebang "woof" (list (string-append python "/bin"))) + (chmod "woof" #o555)))))) + (inputs `(("python" ,python-2))) + (home-page "http://www.home.unix-ag.org/simon/woof.html") + (synopsis "Single file webserver") + (description "Woof (Web Offer One File) is a small simple stupid webserver +that can easily be invoked on a single file. Your partner can access the file +with tools he trusts (e.g. wget).") + (license l:gpl2+)))