From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp10.migadu.com ([2001:41d0:8:6d80::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms5.migadu.com with LMTPS id 2LbxMzMGQWN4FwEAbAwnHQ (envelope-from ) for ; Sat, 08 Oct 2022 07:10:11 +0200 Received: from aspmx1.migadu.com ([2001:41d0:8:6d80::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp10.migadu.com with LMTPS id EKYbMzMGQWPQVgAAG6o9tA (envelope-from ) for ; Sat, 08 Oct 2022 07:10:11 +0200 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 719152770C for ; Sat, 8 Oct 2022 07:10:11 +0200 (CEST) Received: from localhost ([::1]:50682 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1oh26E-00087h-K7 for larch@yhetil.org; Sat, 08 Oct 2022 01:10:10 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:34104) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oh267-00085a-8D for guix-patches@gnu.org; Sat, 08 Oct 2022 01:10:03 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:38895) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1oh265-0001Ax-VN for guix-patches@gnu.org; Sat, 08 Oct 2022 01:10:01 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1oh265-0001vE-Pw for guix-patches@gnu.org; Sat, 08 Oct 2022 01:10:01 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#58356] [PATCH] Add xtrlock Resent-From: Maxim Cournoyer Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Sat, 08 Oct 2022 05:10:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 58356 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: Mehmet Tekman Cc: 58356@debbugs.gnu.org Received: via spool by 58356-submit@debbugs.gnu.org id=B58356.16652057427290 (code B ref 58356); Sat, 08 Oct 2022 05:10:01 +0000 Received: (at 58356) by debbugs.gnu.org; 8 Oct 2022 05:09:02 +0000 Received: from localhost ([127.0.0.1]:37968 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oh257-0001tW-Sj for submit@debbugs.gnu.org; Sat, 08 Oct 2022 01:09:02 -0400 Received: from mail-qk1-f182.google.com ([209.85.222.182]:45979) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oh256-0001t2-JI for 58356@debbugs.gnu.org; Sat, 08 Oct 2022 01:09:01 -0400 Received: by mail-qk1-f182.google.com with SMTP id y1so4050542qky.12 for <58356@debbugs.gnu.org>; Fri, 07 Oct 2022 22:09:00 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=content-transfer-encoding:mime-version:user-agent:message-id :in-reply-to:date:references:subject:cc:to:from:from:to:cc:subject :date:message-id:reply-to; bh=zYz3fiXmefOU1e6TmpbXytSUS0CSaXbg4ShGHvyNffU=; b=kmYEw3xb2H/TrwqTtnbqHIiH95zxJwNaKse9j4Hhk90kUiLI/rrwnCaAxuo8IySlfY oViXBlU6X1peHcnLq/kVXCI3sJ36LiA5mHUOnflLCDsgd3L1gkbEMVaJCJFNdz9zbp9A Xz2j+ISeHo4oCrdrz1oTpC6nUpcbKEnlRwFnlAFmXVfYq69yxek0MEye2gyisQQ1k7GQ w9Iv+ZzlqEiYzoLGEuqVsPp1hj7oIfRmuRhiX88PfIBMp+kTCPSkTZysjv7nXNKuBxpG Lrn7FXqftV0hk5imBytUQ8ZRUfFjXsgO6fYpwL9BIQk54ZoqT681s+/MEmEeF7FdWuu8 6gXA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=content-transfer-encoding:mime-version:user-agent:message-id :in-reply-to:date:references:subject:cc:to:from:x-gm-message-state :from:to:cc:subject:date:message-id:reply-to; bh=zYz3fiXmefOU1e6TmpbXytSUS0CSaXbg4ShGHvyNffU=; b=0eA2NE5r8893B1sEFV/owaRgOh2pBvR3forhkITb8w64G7c+BJq3Dcwkx0dVVlclp8 4jhrWbjrbzZNi4dvzliCOGyVNuD20TCdJrG5/16+T3vvfoGAYYdhqx0eZ6HcfLnaBZka rcWYFr1YrCigG2IkUqSBSZoTd2AvPW8G9cfSN4rStAgt1xLFneE54JlFgpu+ApQN8K85 Z0phObjqC6HBkemSuIUamcsg1S/ZOEt1t4JNM+xjq+ouL9NowwUXIrYHbU7qQbI8XlzV sDq7JD4jnqZa7citO8vaahJAkI/84iJfzVs0mb9FJ1pO5GA3Vu8YIms1dH7zbYh3TGpm jSRw== X-Gm-Message-State: ACrzQf1pN3gNmjQfaTXKrvUFNUOzl4GjLntETgE8042qgP7bV1+W7hnJ k1HI0EBRKxNzjAXRJva+9fyXMrrlcu/LXw== X-Google-Smtp-Source: AMsMyM5wq9OJvKpIlBRP2UGBBbYPVLIXuZ+rvwy4HgO7Pv3zDoG3ptE2lkO0eYb8Izcej9qOPAuJhA== X-Received: by 2002:a05:620a:99a:b0:6e3:9af2:e4bb with SMTP id x26-20020a05620a099a00b006e39af2e4bbmr6117977qkx.141.1665205734790; Fri, 07 Oct 2022 22:08:54 -0700 (PDT) Received: from hurd ([2607:fad8:4:3::1005]) by smtp.gmail.com with ESMTPSA id h10-20020a05620a284a00b006b9c9b7db8bsm3844272qkp.82.2022.10.07.22.08.53 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Fri, 07 Oct 2022 22:08:54 -0700 (PDT) From: Maxim Cournoyer References: Date: Sat, 08 Oct 2022 01:08:52 -0400 In-Reply-To: (Mehmet Tekman's message of "Fri, 7 Oct 2022 16:01:20 +0200") Message-ID: <87czb2297f.fsf@gmail.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/28.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: "Guix-patches" X-Migadu-Flow: FLOW_IN X-Migadu-Country: US ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1665205811; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:cc:mime-version:mime-version: content-type:content-type: content-transfer-encoding:content-transfer-encoding:resent-cc: resent-from:resent-sender:resent-message-id:in-reply-to:in-reply-to: references:references:list-id:list-help:list-unsubscribe: list-subscribe:list-post:dkim-signature; bh=zYz3fiXmefOU1e6TmpbXytSUS0CSaXbg4ShGHvyNffU=; b=uUgGCtn2OBROtOXhq5rMujliIC/lRw57zbPf3P9mo+xDOw+D1aPXoyKx7XdkJkR+LxE9o6 BeLWqE1ldXNw8UKAtnc+NksCEp4H7dxqGkfJlI9OM4tR7VnxRmqTVDlWS88a+UWEKcEx6W dyfZxzLP5O5qEKlfGqVsv5irWDkg0flzjGO1vwfvm9OuLbQLioFYKxc1oVa9tolvvPbDl2 1K5eKSJoc4UBshhPCqzfK0hbeuls5BourpIITdXi9FtLT05+IwcahRGUg68xbtpeXcpGV9 bcXclSQAcUI8Mu9CIJCskkvD0d2IOVvhV6TmgBoOoy5Q/LfwRVPc9p1fGEhY+Q== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1665205811; a=rsa-sha256; cv=none; b=ktsDt042XerMbPQjSIv8eofsSQarabdzVu5q162XmfdKfXE8cakRtU+zlUK96Yvr5n8kq1 WpjDuso0pb2Ge36z87BqLhJTQs5UJSZJbRTRkI024QXnvfsF0wTde59nggcyx1YZj9pdts kMIjmS/YlGIZVpgkvSvCsQ5PJ+lS85Bh3avycW/a0yVvbtSHosyH3v5oyUqtaxvufZW6Ps IKTGdwvBu3v6aoiDgny8MT2ZmTDha+FDq63NMqWiiJ6JbXCLtX9UN0CyjSwc1wP1nsc1Rd RM4C5g/hQnQxcgbsxO0728htKI9dUCB2b3k4Jng2Nllhs5QvfV6+fvnWz84xxg== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=gmail.com header.s=20210112 header.b=kmYEw3xb; dmarc=fail reason="SPF not aligned (relaxed)" header.from=gmail.com (policy=none); spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org" X-Migadu-Spam-Score: 6.12 Authentication-Results: aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=gmail.com header.s=20210112 header.b=kmYEw3xb; dmarc=fail reason="SPF not aligned (relaxed)" header.from=gmail.com (policy=none); spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org" X-Migadu-Queue-Id: 719152770C X-Spam-Score: 6.12 X-Migadu-Scanner: scn1.migadu.com X-TUID: rhw9dhlUc3w0 Hi Mehmet, Mehmet Tekman writes: > --- > gnu/packages/xtrlock.scm | 71 ++++++++++++++++++++++++++++++++++++++++ > 1 file changed, 71 insertions(+) > create mode 100644 gnu/packages/xtrlock.scm I'd put this into (gnu packages xdisorg), next to xlockmore :-). > diff --git a/gnu/packages/xtrlock.scm b/gnu/packages/xtrlock.scm > new file mode 100644 > index 0000000000..2acf45e8b3 > --- /dev/null > +++ b/gnu/packages/xtrlock.scm > @@ -0,0 +1,71 @@ > +;;; GNU Guix --- Functional package management for GNU > +;;; Copyright =C2=A9 2022 Mehmet Tekman > +;;; > +;;; 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 xtrlock) > + #:use-module (guix packages) > + #:use-module (guix download) > + #:use-module (guix build-system gnu) > + #:use-module (gnu packages xorg) > + #:use-module ((guix licenses) #:prefix license:) > + ) ^ lonely parens, and please sort lexicographically. > +(define-public xtrlock > + (let ((pkg-version "2.15") > + (pkg-hash "0mgpysbvipd5h6x6zz4hng6b13gp3qjnpgny3azyj8k8dv85bppw") > + (recipe-revision "0")) > + (package > + (name "xtrlock") > + (version (string-append pkg-version ".r" recipe-revision)) > + (source (origin > + (method url-fetch) > + (uri (string-append > + "mirror://debian/pool/main/x/xtrlock/xtrlock_" > + pkg-version ".tar.xz")) > + (sha256 (base32 pkg-hash)))) > + (build-system gnu-build-system) > + (arguments > + '(#:make-flags > + (list "LDLIBS=3D-lX11 -lcrypt -lXi" > + "CFLAGS=3D-Wall -DSHADOW_PWD -DMULTITOUCH") Does the build system not take care of the libraries link options itself? > + #:phases > + (modify-phases > + %standard-phases Nitpick: no need to put %standard-phases on a new line. > + (delete 'configure) > + (delete 'check) > + (add-after 'unpack 'rename-makefile > + (lambda _ > + (rename-file "Makefile.noimake" "Makefile") > + (rename-file "xtrlock.man" "xtrlock.1"))) > + (replace 'install > + (lambda* (#:key outputs #:allow-other-keys) > + (let* ((out (assoc-ref outputs "out"))) > + (install-file "xtrlock" (string-append out "/bin/")) > + (install-file "xtrlock.1" (string-append out > "/share/man/man1/")))))))) Use 'guix style' to have it auto-formatted. > + (native-inputs (list libx11 libxi libxfixes)) > + (home-page "https://packages.debian.org/sid/xtrlock") There must be a better home page for the upstream of xtrlock than Debian? Edit: apparently Debian is the upstream. Odd! > + (synopsis "Minimal X display lock program") > + (description "xtrlock locks the X server till the user enters > their password at the > +keyboard. While xtrlock is running, the mouse and keyboard are grabbed = and Please reflow the paragraph; M-j in Emacs for example. > +the mouse cursor becomes a padlock. Output displayed by X programs, and > +windows put up by new X clients, continue to be visible, and any new out= put is > +displayed normally. The mouse and keyboard are returned when the user t= ypes > +their password, followed by Enter or Newline. If an incorrect password = is > +entered the bell is sounded. Pressing Backspace or Delete erases one > +character of a password partially typed; pressing Escape or Clear clears > +anything that has been entered.") > + (license license:gpl3)))) This is gpl3+ (GPL 3 or later). See the license at https://salsa.debian.org/debian/xtrlock/-/blob/master/GPL-3.txt, it contains the "or any later version" text. Could you please send a v2? You could use something like: "git send-email -v2 --to=3D'58356@debbugs.gnu.org' -1" to send the tip of your branch. --=20 Thanks, Maxim