From patchwork Tue Dec 31 22:07:45 2019 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: =?utf-8?q?Maja_K=C4=85dzio=C5=82ka?= X-Patchwork-Id: 19491 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id 8E431179BD; Tue, 31 Dec 2019 22:08:10 +0000 (GMT) X-Spam-Checker-Version: SpamAssassin 3.4.0 (2014-02-07) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-0.7 required=5.0 tests=BAYES_00,RCVD_NUMERIC_HELO, URIBL_BLOCKED autolearn=no autolearn_force=no version=3.4.0 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTP id 4ED3C17963 for ; Tue, 31 Dec 2019 22:08:10 +0000 (GMT) Received: from localhost ([::1]:46602 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1imPgP-0006b2-N8 for patchwork@mira.cbaines.net; Tue, 31 Dec 2019 17:08:09 -0500 Received: from eggs.gnu.org ([2001:470:142:3::10]:41783) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1imPgJ-0006au-Tn for guix-patches@gnu.org; Tue, 31 Dec 2019 17:08:05 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1imPgI-0003Sk-Im for guix-patches@gnu.org; Tue, 31 Dec 2019 17:08:03 -0500 Received: from debbugs.gnu.org ([209.51.188.43]:57538) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1imPgI-0003S0-E7 for guix-patches@gnu.org; Tue, 31 Dec 2019 17:08:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1imPgI-0004XM-9B for guix-patches@gnu.org; Tue, 31 Dec 2019 17:08:02 -0500 X-Loop: help-debbugs@gnu.org Subject: [bug#38839] [PATCH] gnu: Add xsecurelock. Resent-From: Jakub =?utf-8?b?S8SFZHppb8WCa2E=?= Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Tue, 31 Dec 2019 22:08:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 38839 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 38839@debbugs.gnu.org X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.157783007317421 (code B ref -1); Tue, 31 Dec 2019 22:08:02 +0000 Received: (at submit) by debbugs.gnu.org; 31 Dec 2019 22:07:53 +0000 Received: from localhost ([127.0.0.1]:35278 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1imPg9-0004Wv-EI for submit@debbugs.gnu.org; Tue, 31 Dec 2019 17:07:53 -0500 Received: from lists.gnu.org ([209.51.188.17]:45041) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1imPg7-0004Wo-P0 for submit@debbugs.gnu.org; Tue, 31 Dec 2019 17:07:52 -0500 Received: from eggs.gnu.org ([2001:470:142:3::10]:41443) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1imPg6-0006ah-H5 for guix-patches@gnu.org; Tue, 31 Dec 2019 17:07:51 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1imPg4-0002nh-QM for guix-patches@gnu.org; Tue, 31 Dec 2019 17:07:50 -0500 Received: from pat.zlotemysli.pl ([37.59.186.212]:46176) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1imPg4-0002lJ-Gu for guix-patches@gnu.org; Tue, 31 Dec 2019 17:07:48 -0500 Received: (qmail 27755 invoked by uid 1009); 31 Dec 2019 23:07:47 +0100 Received: from 188.123.215.55 (kuba@kadziolka.net@188.123.215.55) by pat (envelope-from , uid 1002) with qmail-scanner-2.08st (clamdscan: 0.98.6/25679. spamassassin: 3.4.0. perlscan: 2.08st. Clear:RC:1(188.123.215.55):. Processed in 0.027893 secs); 31 Dec 2019 22:07:47 -0000 Received: from unknown (HELO zdrowyportier.kadziolka.net) (kuba@kadziolka.net@188.123.215.55) by pat.zlotemysli.pl with SMTP; 31 Dec 2019 23:07:46 +0100 Date: Tue, 31 Dec 2019 23:07:45 +0100 From: Jakub =?utf-8?b?S8SFZHppb8WCa2E=?= Message-ID: <20191231220745.2sqzwns7jk44oj7d@zdrowyportier.kadziolka.net> MIME-Version: 1.0 Content-Disposition: inline X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x [fuzzy] X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 209.51.188.43 X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: "Guix-patches" X-getmail-retrieved-from-mailbox: Patches * gnu/packages/xdisorg.scm (xsecurelock): New variable. --- gnu/packages/xdisorg.scm | 45 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 45 insertions(+) diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm index 9b198a02da..c0358b6ef7 100644 --- a/gnu/packages/xdisorg.scm +++ b/gnu/packages/xdisorg.scm @@ -72,6 +72,7 @@ #:use-module (gnu packages gl) #:use-module (gnu packages glib) #:use-module (gnu packages gnome) + #:use-module (gnu packages haskell-xyz) #:use-module (gnu packages icu4c) #:use-module (gnu packages man) #:use-module (gnu packages maths) @@ -1848,6 +1849,50 @@ colors on all monitors attached to an XRandR-capable X11 display server.") temperature of the screen.") (license (license:non-copyleft "file://sct.c")))) ; "OpenBSD" license +(define-public xsecurelock + (package + (name "xsecurelock") + (version "1.6.0") + (source (origin + (method url-fetch) + (uri (string-append + "https://github.com/google/xsecurelock/releases" + "/download/v" version "/xsecurelock-" version ".tar.gz")) + (sha256 (base32 "070gknyv0s5hz9hkc6v73m2v7ssyjwgl93b5hd4glayfqxqjbmdp")))) + (build-system gnu-build-system) + (arguments '(#:configure-flags + '("--with-pam-service-name=login" + "--with-xkb" + "--with-default-authproto-module=/run/setuid-programs/authproto_pam"))) + (native-inputs + `(("pandoc" ,ghc-pandoc) + ("pkg-config" ,pkg-config))) + (inputs + `(("fontconfig" ,fontconfig) + ("libX11" ,libx11) + ("libxcomposite" ,libxcomposite) + ("libxext" ,libxext) + ("libxfixes" ,libxfixes) + ("libxft" ,libxft) + ("libxmu" ,libxmu) + ("libxrandr" ,libxrandr) + ("libxscrnsaver" ,libxscrnsaver) + ("linux-pam" ,linux-pam))) + (home-page "https://github.com/google/xsecurelock") + (synopsis "X11 screen lock utility with the primary goal of security") + (description "@code{xsecurelock} is an X11 screen locker which uses +a modular design to avoid the usual pitfalls of screen locking utility design. + +As a consequence of the modular design, the usual screen locker service +shouldn't be used with @code{xsecurelock}. Instead, you need to add a helper +binary to setuid-binaries: +@example +(setuid-programs (cons* + (file-append xsecurelock \"/libexec/xsecurelock/authproto_pam\") + %setuid-programs)) +@end example") + (license license:asl2.0))) + (define-public wl-clipboard (package (name "wl-clipboard")