GNU logs - #49969, boring messages


Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 0/7] gnu: desktop: Add seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Mon, 09 Aug 2021 19:04:01 +0000
Resent-Message-ID: <handler.49969.B.162853579415880 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: report 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Cc: muradm <mail@HIDDEN>
X-Debbugs-Original-To: guix-patches@HIDDEN
Received: via spool by submit <at> debbugs.gnu.org id=B.162853579415880
          (code B ref -1); Mon, 09 Aug 2021 19:04:01 +0000
Received: (at submit) by debbugs.gnu.org; 9 Aug 2021 19:03:14 +0000
Received: from localhost ([127.0.0.1]:57797 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDAYM-000483-0w
	for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:03:14 -0400
Received: from lists.gnu.org ([209.51.188.17]:42484)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDAYK-00047w-DP
 for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:03:12 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:59180)
 by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <mail@HIDDEN>) id 1mDAYI-0006aN-Mq
 for guix-patches@HIDDEN; Mon, 09 Aug 2021 15:03:11 -0400
Received: from mail-ed1-x532.google.com ([2a00:1450:4864:20::532]:40811)
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128)
 (Exim 4.90_1) (envelope-from <mail@HIDDEN>) id 1mDAYH-0006Do-4p
 for guix-patches@HIDDEN; Mon, 09 Aug 2021 15:03:10 -0400
Received: by mail-ed1-x532.google.com with SMTP id d6so26152025edt.7
 for <guix-patches@HIDDEN>; Mon, 09 Aug 2021 12:03:08 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:cc:subject:date:message-id:mime-version
 :content-transfer-encoding;
 bh=1t8GglH/QgozIBYRFxmqvT/yg8Y2jLukThyS3IW3uMc=;
 b=nTO86OoAJIzcocqiFZ5Mp9V9BEGSR4krctZBm51baN/VXEpcolNcC5ZibEuYp4EyAn
 At98yy6Qg4sUvbc15Sv4lSu94FJ4qAdVr4CBMUSeVr9q8JExohmPxfmX9TLJFW247s7m
 3AiNte62MoA61a4Crgz1fvwdHE16/3NSZNTU7vKR0C9UC3uuEWvVpURKUvqPX3Td5gt6
 04/x1vGzm+1apTdRKFTPhh4vWsxRFWJ+hQ0iHPlMut73ji0jBzUc+iF7eTsxAzmRbSDx
 aIKuRkYuHCrIQzi2lz5Z0dt7mRssqPmbJsLnHadhDaYVviKtErnGFtN+gUgT8KyF3phG
 q84w==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:mime-version
 :content-transfer-encoding;
 bh=1t8GglH/QgozIBYRFxmqvT/yg8Y2jLukThyS3IW3uMc=;
 b=n/aPzvPBzmTTl4lju8dbOXBtim5tcxaa5nsP5FvqrVoNQVaL6bhUeBKKfkRiRLHhYv
 CIKn8SxbyuArB1JxYLqIZKoXBOpU9CT7Tsfiug5+CKUQM2ooeVQU/ArRSDaGceWZOZtX
 WuajQQYeFvpKt/WXT1/yInq1Bw+pHTj1djkDjXNF9PpEOl4VVeshKrtPFmhRQE2r7ctP
 cJOGPFpwLHQuXbhF6EW8IWhTSax9fMkignJjYvsd4OAeL3suqMBl+W1nRUaN0+7obBVu
 pZbhuAZsq+MXIoG4YrP8O2xmC54tVq3K8Zyf90d5e2XgDAlz8cuNyXgamAdh72NpuI7F
 q1HQ==
X-Gm-Message-State: AOAM532SVoMvsl9Mccd5mNHxAzKw9U4gPyk8hmaxAyF6/eMuqmmAZPwi
 bvifyDfcD9A+996e0TKqKJJwcCViVfLwiA==
X-Google-Smtp-Source: ABdhPJzmNpS0M9ydQZDkcPIi89iXKnli+qXdrUYjZqC3ZVaM6Tarrewy/rm58vXC/eWPoWW8J6Jpsw==
X-Received: by 2002:aa7:d815:: with SMTP id v21mr6335649edq.262.1628535787028; 
 Mon, 09 Aug 2021 12:03:07 -0700 (PDT)
Received: from localhost.localdomain ([31.142.122.131])
 by smtp.gmail.com with ESMTPSA id bm26sm6150373ejb.16.2021.08.09.12.03.05
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 09 Aug 2021 12:03:06 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Mon,  9 Aug 2021 22:02:57 +0300
Message-Id: <20210809190257.7280-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
Received-SPF: none client-ip=2a00:1450:4864:20::532;
 envelope-from=mail@HIDDEN; helo=mail-ed1-x532.google.com
X-Spam_score_int: -18
X-Spam_score: -1.9
X-Spam_bar: -
X-Spam_report: (-1.9 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
 DKIM_VALID=-0.1, RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001,
 SPF_NONE=0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: -2.3 (--)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -3.3 (---)

This patch series introduces two new services;

 - seatd-service-type: simple seat management daemon
 - greetd-service-type: simple login daemon

Both services are very minimalistic in nature. Simple seatd daemon could
be said as replacement for elogind-service-type. greetd daemon is simple
replacement for mingetty/agetty.

In addition to the base services, special build of pam-mount module is
included as seatd-pam-mount. It is used to provide auto-(mounting/unmounting)
of XDG_RUNTIME_DIR. Special build is required to avoid interference with
default pam-mount if used in the system.

greetd provides agreety terminal greeter out of the box. Current
greetd-service-type includes configuration for greetd-agreety-session
variations, i.e. only terminal are supported at the moment.

Next step would be adding gtkgreet and/or wlgreet alternatives for
graphical greeter.

muradm (7):
  gnu: rust-enquote: Add rust-enquote 1.0.3
  gnu: rust-pam-sys: Add rust-pam-sys 0.5.6
  gnu: greetd: Add greetd 0.7.0
  gnu: seatd-pam-mount: Add seatd-pam-mount
  gnu: desktop: Add seatd-service-type
  gnu: desktop: Add greetd-service-type
  doc: Add desktop seatd-service-type and greetd-service-type.

 doc/guix.texi                | 151 +++++++++++++++++++++
 gnu/packages/admin.scm       |  20 +++
 gnu/packages/crates-io.scm   |  48 +++++++
 gnu/packages/freedesktop.scm |  71 ++++++++++
 gnu/services/desktop.scm     | 256 ++++++++++++++++++++++++++++++++++-
 5 files changed, 545 insertions(+), 1 deletion(-)

-- 
2.32.0





Message sent:


Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
Content-Type: text/plain; charset=utf-8
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: muradm <mail@HIDDEN>
Subject: bug#49969: Acknowledgement ([PATCH 0/7] gnu: desktop: Add
 seatd-service-type and greetd-service-type)
Message-ID: <handler.49969.B.162853579415880.ack <at> debbugs.gnu.org>
References: <20210809190257.7280-1-mail@HIDDEN>
X-Gnu-PR-Message: ack 49969
X-Gnu-PR-Package: guix-patches
X-Gnu-PR-Keywords: patch
Reply-To: 49969 <at> debbugs.gnu.org
Date: Mon, 09 Aug 2021 19:04:02 +0000

Thank you for filing a new bug report with debbugs.gnu.org.

This is an automatically generated reply to let you know your message
has been received.

Your message is being forwarded to the package maintainers and other
interested parties for their attention; they will reply in due course.

Your message has been sent to the package maintainer(s):
 guix-patches@HIDDEN

If you wish to submit further information on this problem, please
send it to 49969 <at> debbugs.gnu.org.

Please do not send mail to help-debbugs@HIDDEN unless you wish
to report a problem with the Bug-tracking system.

--=20
49969: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D49969
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems


Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 1/7] gnu: rust-enquote: Add rust-enquote 1.0.3
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Mon, 09 Aug 2021 19:19:01 +0000
Resent-Message-ID: <handler.49969.B49969.162853670317288 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Cc: muradm <mail@HIDDEN>
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162853670317288
          (code B ref 49969); Mon, 09 Aug 2021 19:19:01 +0000
Received: (at 49969) by debbugs.gnu.org; 9 Aug 2021 19:18:23 +0000
Received: from localhost ([127.0.0.1]:57829 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDAn0-0004Um-IQ
	for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:22 -0400
Received: from mail-ej1-f49.google.com ([209.85.218.49]:41904)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDAmx-0004UO-Qk
 for 49969 <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:21 -0400
Received: by mail-ej1-f49.google.com with SMTP id d11so6439100eja.8
 for <49969 <at> debbugs.gnu.org>; Mon, 09 Aug 2021 12:18:19 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:cc:subject:date:message-id:in-reply-to:references
 :mime-version:content-transfer-encoding;
 bh=oUgqfgTdKR92mBnhykZHIb0R5DE+Il8z2v0H69jW+bs=;
 b=NDjZxDtoxwfLU2aGXpus/jC1guSaRqysoobpBXEAfypBNV5qxpNPiqIIJsxFZpAEYj
 64jiS5+ar+0f9BhfhIIjk4cAdSNs1UFitD+4fmfHlqp3bm9ygIYIj7irhDTywN3OjoxX
 NXmJReNoSy2yC+4ahEvQ9tqHHO8IOxz+B1mifRbRrU/In5FvKHbkD9dEYqYvtXgqRaaR
 5e/UkGQ4vZWwZIy0YRKUYZJ11n/OnF6a+I+g4gTQ/9qgEo4Zpsyg99ZiipdM7pEy7wAJ
 6CWqLfPxFNlp0AFZEauhvJSbxEqGNXxISGUl08+u3WFm29NuJxjp/flFX5Qgnwo/CMdp
 DAVQ==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=oUgqfgTdKR92mBnhykZHIb0R5DE+Il8z2v0H69jW+bs=;
 b=EeKw6C9ltEM/WGN6w33FhlNLzbuawNHuif8dVGhWvkITQUbp75vhsMSjZz8n71adsA
 EAq56wjCLivD1HuR6aoJhLp+PTtrE+tsv3VgV2hI91Dn43QPSDJDqhb1Geu9PWQi2vNu
 870T2jolvc1krC4Cxiexhhd21cOh7Y9KRGcOfMljN4RJxUvzYW9/a4VV/S5MKobx1L+e
 VRBHou4S+O5ZiOM6opyWuH4NE9NUh/ai+N22sWQOQX26ecDbTJKdjsU18wCX0Oh1Ymbv
 Vp2YqEqG5nnFkdZ/i4efMuBZDU1MqV5a5MfVTvGf9E45eGG56GPxwbkxrAgSCUTETap1
 Yn9A==
X-Gm-Message-State: AOAM5324zhdbOzf725b1j9gflPGwbvi7Js+D+c14IzCKjX2Ggtwzus1Y
 j1pssVjzLyXU15OgVK+iSjB8UX9EetgYTA==
X-Google-Smtp-Source: ABdhPJw3cVKqrp50bEfTl9pXSA38PYDVFSKho0gIWbL6402vnJIFnChLkUxKbotnKyccI2g80hzcHQ==
X-Received: by 2002:a17:906:3915:: with SMTP id
 f21mr24384557eje.178.1628536693674; 
 Mon, 09 Aug 2021 12:18:13 -0700 (PDT)
Received: from localhost.localdomain ([31.142.122.131])
 by smtp.gmail.com with ESMTPSA id gv7sm6167100ejc.5.2021.08.09.12.18.12
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 09 Aug 2021 12:18:13 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Mon,  9 Aug 2021 22:17:57 +0300
Message-Id: <20210809191803.7833-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210809190257.7280-1-mail@HIDDEN>
References: <20210809190257.7280-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/crates-io.scm (rust-enquote-1): Add rust-enquote 1.0.3
---
 gnu/packages/crates-io.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 24cc772ba7..16620218b3 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -18,6 +18,7 @@
 ;;; Copyright © 2021 Antero Mejr <antero@HIDDEN>
 ;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@HIDDEN>
 ;;; Copyright © 2021 Vinicius Monego <monego@HIDDEN>
+;;; Copyright © 2021 muradm <muradm@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -56972,3 +56973,24 @@ variant of this library is available separately as @code{im}.")
     (description
       "Generate Rust register maps (`struct`s) from SVD files")
     (license (list license:expat license:asl2.0))))
+
+(define-public rust-enquote-1
+  (package
+    (name "rust-enquote")
+    (version "1.0.3")
+    (home-page "https://github.com/reujab/enquote")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "enquote" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32
+         "0vm687r2wwgc3d3l2iqhag9wgkql6k93sdvjxvmfkdpksajpij1f"))))
+    (build-system cargo-build-system)
+    (synopsis
+     "This Rust library quotes, unquotes, and unescapes strings.")
+    (description
+     "This Rust library quotes, unquotes, and unescapes strings.")
+    (license license:unlicense)))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 2/7] gnu: rust-pam-sys: Add rust-pam-sys 0.5.6
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Mon, 09 Aug 2021 19:19:02 +0000
Resent-Message-ID: <handler.49969.B49969.162853670517304 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Cc: muradm <mail@HIDDEN>
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162853670517304
          (code B ref 49969); Mon, 09 Aug 2021 19:19:02 +0000
Received: (at 49969) by debbugs.gnu.org; 9 Aug 2021 19:18:25 +0000
Received: from localhost ([127.0.0.1]:57833 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDAn2-0004V1-W0
	for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:25 -0400
Received: from mail-ej1-f52.google.com ([209.85.218.52]:45934)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDAmz-0004UQ-4n
 for 49969 <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:22 -0400
Received: by mail-ej1-f52.google.com with SMTP id qk33so30805629ejc.12
 for <49969 <at> debbugs.gnu.org>; Mon, 09 Aug 2021 12:18:21 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:cc:subject:date:message-id:in-reply-to:references
 :mime-version:content-transfer-encoding;
 bh=DAFxjLgih9tWolc/X92OU2/h6G7Gctj5GvKroxuhd50=;
 b=kuyZTbE5RPl5j5/d+bqUVx3XJT4/BAyVEOw2nkADfliLHMQo2OgjENs1p7GNH66ec/
 OhGqqEeZeJhcS3iNe1/KebUwNW80dB5wt+vDqkucVcRJeKV7XXIOIASePbGUSjMduht6
 ArGUrgqdggYXknsYlf3Xtpv4rJfK4lrgyjHv7Lme/T0qrFOvPlvNFBovKFjcLe7oKA/1
 JSDSRSIT3IT+tpPobw5nDYCpfTuKpZIV8EICbU2kOvFRPUymQdiT65/PqrWcc95A3XDm
 JTBHY2DPW10XYucyGaneqFIUDM+SuMD7Y0BgzQOwOaaFF/3y6vRUkX5UyrsKuB+pIN/F
 CRCg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=DAFxjLgih9tWolc/X92OU2/h6G7Gctj5GvKroxuhd50=;
 b=uKCpo3ul198+qoPQ8N2LWqD4S3pNJSI0JDuPiRjBIsq0LySk0KyMXIAS3VZFOlq7oq
 o1J1CmoPSU/C8jmWOJgaNcd6OU0A1r6hXFqe2y4PSChOVlQwdZW59URoAv3fnPUH1cge
 6+a0CTqDvbW1XFnb89E+shf/hr2DsrlmTRJdR6qaSEKT0c9PcLGBvJQuO+q//Q6Vwzpf
 16x1I2j767QxJh+C9Rd4XH0QGHwq3KOtFFZDAx2mvjUGbCg8PSYcWbxB6VhoKrJDPuWE
 cfe6m2IXZ4EoL+XQGeWFzSUJXrCXIwXgGbsQrKNXqDJpwFn2j4F2qTCUuiIIcGg688Nm
 ympg==
X-Gm-Message-State: AOAM532Rv43YKs4X55JiHMt5fh4XSQDP7EbjfJkxhhx/kocHGgIFlXCf
 1r1RwRV/I2yhEHl6yXYM4a1H8c3iq1NCkA==
X-Google-Smtp-Source: ABdhPJywq2tUEwWDE8LFt7uqSf2rnEDN/KCgnW9gnOIdg/MnfbwLF0yg7eHtMp8frK3Kq/la5MOwtQ==
X-Received: by 2002:a17:906:34d7:: with SMTP id
 h23mr23812876ejb.293.1628536695175; 
 Mon, 09 Aug 2021 12:18:15 -0700 (PDT)
Received: from localhost.localdomain ([31.142.122.131])
 by smtp.gmail.com with ESMTPSA id gv7sm6167100ejc.5.2021.08.09.12.18.14
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 09 Aug 2021 12:18:14 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Mon,  9 Aug 2021 22:17:58 +0300
Message-Id: <20210809191803.7833-2-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210809190257.7280-1-mail@HIDDEN>
References: <20210809190257.7280-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/crates-io.scm (rust-pam-sys): Add rust-pam-sys 0.5.6
---
 gnu/packages/crates-io.scm | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 16620218b3..fc235c2aa6 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -56994,3 +56994,29 @@ variant of this library is available separately as @code{im}.")
     (description
      "This Rust library quotes, unquotes, and unescapes strings.")
     (license license:unlicense)))
+
+(define-public rust-pam-sys-0.5.6
+  (package
+    (name "rust-pam-sys")
+    (version "0.5.6")
+    (home-page "https://github.com/1wilkens/pam-sys")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pam-sys" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32
+         "0d14501d5vybjnzxfjf96321xa5wa36x1xvf02h02zq938qmhj6d"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-libc" ,rust-libc-0.2))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)))
+    (synopsis
+     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (PAM).")
+    (description
+     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (PAM).")
+    (license (list license:expat license:asl2.0))))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 3/7] gnu: greetd: Add greetd 0.7.0
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Mon, 09 Aug 2021 19:19:02 +0000
Resent-Message-ID: <handler.49969.B49969.162853670917332 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Cc: muradm <mail@HIDDEN>
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162853670917332
          (code B ref 49969); Mon, 09 Aug 2021 19:19:02 +0000
Received: (at 49969) by debbugs.gnu.org; 9 Aug 2021 19:18:29 +0000
Received: from localhost ([127.0.0.1]:57835 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDAn3-0004V3-7G
	for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:28 -0400
Received: from mail-ed1-f47.google.com ([209.85.208.47]:41499)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDAn0-0004UT-I8
 for 49969 <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:23 -0400
Received: by mail-ed1-f47.google.com with SMTP id n12so2390478edx.8
 for <49969 <at> debbugs.gnu.org>; Mon, 09 Aug 2021 12:18:22 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:cc:subject:date:message-id:in-reply-to:references
 :mime-version:content-transfer-encoding;
 bh=DurSoItcA3PmRePSK7BRS1VgYCzKGuaxsQ11ZInsKbw=;
 b=o0q08QVds8vLoCUHAx7DXSsdbJrcFpq3BKvC1HFeYwhmbg97YmG6sMnKAYtra35T9N
 sVNsHpECYV5hEprnrlYiR3CYqSQTG+D0LT+QJFnaZHBwURrgAP2sLLrO/tlgYQcldpQT
 buYQvfUfog9OA0BzxC/eCG6I2Es9qoOrsmIrPuIQjRxB+Fq9MNbh7mUATFSu/kKGYLpj
 PTh7smjiYlfFOQchyVrT+DiPOfyjGLFlcTG3GaY2PYEN+foUs1U0a+sL0xcvF0LBHNzy
 /ETd9idwdTC12T07Y0JfqU7NqaVUvWns/pB1ilw/jDvhbMHaB7nznYym24FtbZl2J9vW
 3kNg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=DurSoItcA3PmRePSK7BRS1VgYCzKGuaxsQ11ZInsKbw=;
 b=Zs5v0Fety/3zQ8TVTagck1MGOUPX9b6wQK/gAP+9SUOSetuQYTJPds7NG2zb1vKyeE
 z5h+4BWOejPqhIP/Oqzr27Ye4lXiuJkQCsYTJgCzi0Xtr8Yvry5z5MoBnn86EDuHkyJz
 37ofaRvmW9eNII+M91uxOqV6ldprSjnjxjWyTK1NWI+z7dIGFzMbGxdzUum0RPXzlPDw
 1AyuAT4JmoNjcP7aQbSgUeWWrzhr3MSpM6dRhA11/SbJb4MA1hJK0WPVRDk8w9nyrxsl
 eDh82ef5djk7UulLT9h7Fjo1Wvi8FLPVesVFUuGBi3mfbE+wbGf9BMyY+jtK+mi6/Sow
 jOWA==
X-Gm-Message-State: AOAM533wZiA5lKco4PKpmXfB9t8yaJ3Wq0h7KY6bkZhYphvPQDHaetqE
 vtPq8DRFNxbbGam3nCvhRhUVovuLLf2IVg==
X-Google-Smtp-Source: ABdhPJytdKMVDpDiXYOhpU7jQwpzj6B0g3XdNk9IoVaRm7bPwrVeyHwZz0OxCv+Ji0b3nyRO07s2/w==
X-Received: by 2002:aa7:c4d4:: with SMTP id p20mr31693036edr.382.1628536696619; 
 Mon, 09 Aug 2021 12:18:16 -0700 (PDT)
Received: from localhost.localdomain ([31.142.122.131])
 by smtp.gmail.com with ESMTPSA id gv7sm6167100ejc.5.2021.08.09.12.18.15
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 09 Aug 2021 12:18:16 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Mon,  9 Aug 2021 22:17:59 +0300
Message-Id: <20210809191803.7833-3-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210809190257.7280-1-mail@HIDDEN>
References: <20210809190257.7280-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
---
 gnu/packages/freedesktop.scm | 71 ++++++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)

diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
index 693a79c738..62c47ad70e 100644
--- a/gnu/packages/freedesktop.scm
+++ b/gnu/packages/freedesktop.scm
@@ -24,6 +24,7 @@
 ;;; Copyright © 2020 Raghav Gururajan <raghavgururajan@HIDDEN>
 ;;; Copyright © 2021 Brendan Tildesley <mail@HIDDEN>
 ;;; Copyright © 2021 pineapples <guixuser6392@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -46,6 +47,7 @@
   #:use-module (guix packages)
   #:use-module (guix download)
   #:use-module (guix git-download)
+  #:use-module (guix build-system cargo)
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system meson)
@@ -62,6 +64,7 @@
   #:use-module (gnu packages check)
   #:use-module (gnu packages cmake)
   #:use-module (gnu packages compression)
+  #:use-module (gnu packages crates-io)
   #:use-module (gnu packages cryptsetup)
   #:use-module (gnu packages databases)
   #:use-module (gnu packages disk)
@@ -862,6 +865,74 @@ that require it.  It also provides a universal seat management library that
 allows applications to use whatever seat management is available.")
     (license license:expat)))
 
+(define-public greetd
+  (package
+    (name "greetd")
+    (version "0.7.0")
+    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url home-page)
+                    (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32 "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zbgr3g"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-nix" ,rust-nix-0.17)
+        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
+        ("rust-rpassword" ,rust-rpassword-4)
+        ("rust-users" ,rust-users-0.9)
+        ("rust-serde" ,rust-serde-1)
+        ("rust-serde-json" ,rust-serde-json-1)
+        ("rust-libc" ,rust-libc-0.2)
+        ("rust-tokio" ,rust-tokio-0.2)
+        ("rust-getopts" ,rust-getopts-0.2)
+        ("rust-thiserror" ,rust-thiserror-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
+        ("rust-enquote" ,rust-enquote-1))
+       #:phases
+       (modify-phases %standard-phases
+         (delete 'package)
+         (replace 'install
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (bin (string-append out "/bin"))
+                    (sbin (string-append out "/sbin"))
+                    (share (string-append out "/share"))
+                    (man (string-append share "/man"))
+                    (man1 (string-append man "/man1"))
+                    (man5 (string-append man "/man5"))
+                    (man7 (string-append man "/man7"))
+                    (release "target/release")
+                    (greetd-bin (string-append release "/greetd"))
+                    (agreety-bin (string-append release "/agreety")))
+               (install-file greetd-bin sbin)
+               (install-file agreety-bin bin)
+               (mkdir-p man1)
+               (mkdir-p man5)
+               (mkdir-p man7)
+               (with-directory-excursion "man"
+                 (system "scdoc < greetd-1.scd > greetd.1")
+                 (system "scdoc < greetd-5.scd > greetd.5")
+                 (system "scdoc < greetd-ipc-7.scd > greetd-ipc.7")
+                 (system "scdoc < agreety-1.scd > agreety.1"))
+               (install-file "man/greetd.1" man1)
+               (install-file "man/greetd.5" man5)
+               (install-file "man/greetd-ipc.7" man7)
+               (install-file "man/agreety.1" man1)
+               #t))))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)
+       ("scdoc" ,scdoc)))
+    (synopsis "minimal and flexible login manager daemon")
+    (description
+     "greetd is a minimal and flexible login manager daemon
+that makes no assumptions about what you want to launch.")
+    (license license:gpl3+)))
+
 (define-public packagekit
   (package
     (name "packagekit")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 4/7] gnu: seatd-pam-mount: Add seatd-pam-mount
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Mon, 09 Aug 2021 19:19:03 +0000
Resent-Message-ID: <handler.49969.B49969.162853670917339 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Cc: muradm <mail@HIDDEN>
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162853670917339
          (code B ref 49969); Mon, 09 Aug 2021 19:19:03 +0000
Received: (at 49969) by debbugs.gnu.org; 9 Aug 2021 19:18:29 +0000
Received: from localhost ([127.0.0.1]:57839 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDAn6-0004VV-Vx
	for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:29 -0400
Received: from mail-ej1-f42.google.com ([209.85.218.42]:39921)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDAn2-0004UW-AB
 for 49969 <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:25 -0400
Received: by mail-ej1-f42.google.com with SMTP id go31so30858685ejc.6
 for <49969 <at> debbugs.gnu.org>; Mon, 09 Aug 2021 12:18:24 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:cc:subject:date:message-id:in-reply-to:references
 :mime-version:content-transfer-encoding;
 bh=6nJ5CO/4u7MRn4/Z9MaGaFyO6hOZTySvOl2QbPhtEcM=;
 b=wbHTdaW9RSFVIfXo3LwUY0nkSAhlPAu11rB0fw4hvtDcidOFn6aUCipNcWBKhpeObM
 hCaY5qYpGSxJ5654IYw396l68PRh4jyHOIkQJRy/+tmZQlbPK36n3/6HpHmn11LnoMce
 X0IsV9lra4StoZy+cOC8LEFqyDJTreJ81FdQDBryuoakyUf5NwsEfo2H/yqJduDN1B3I
 FYcd0ECNWJ1TxXbSehoQeVDnvh1dINpU9T38fVt19BoCiqdUhlfqZFaulRErtOAJWmlW
 X8itSi2/PIv9xNSu5VSEcDKZ+P5yY6z2xKViHDutNbSZh15lFXY8z1OSAx1ULOdTjxWu
 /AdA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=6nJ5CO/4u7MRn4/Z9MaGaFyO6hOZTySvOl2QbPhtEcM=;
 b=dmDB2epDPMi5Z+BSuGt/7WTODy5VMuF7pv9aXAG/ClNLREo7behLzXg01alYZZ6jBD
 XumBXlrUpLfrpdSb3tRPT/lV5LGboe8rWNaxdYmdXFwbg3TGtqxpK9RQXNbpMJ5s+ZGe
 qzW95C+C+Jp/4Gq+EP0f9yauvNSyQcDlP/GB/CUd8vTzDnKoulCM6OVIr3ceBH60u6bE
 GQrqYwOBQ9AHhCk0Jere3yPdgIGMId9WnO7sfLVT91jCJ2W1sEfk3EZPe81NxbVj+M5W
 cv+mhXb5JVu1YNncFpM9oIJ82F0aUky+BdOFupCl0gDsAfLyQ79lxXaI0JSjvd0ToTeZ
 Yc7A==
X-Gm-Message-State: AOAM531ebIkjfCnWMJLEBGajndqUC3lnY0gYrAXONGMJN9js8/UrdY7C
 VRyLTG1+6gTKQzJtQJR5flNDV8PJQPIx8Q==
X-Google-Smtp-Source: ABdhPJx7DI3bZgpfhkw1nlrFsbQhZY75elznZIevh/h4ZMZGM/YFeSqkaBg2stHujM8HL8ITFMFKgw==
X-Received: by 2002:a17:906:cb95:: with SMTP id
 mf21mr24388192ejb.484.1628536698266; 
 Mon, 09 Aug 2021 12:18:18 -0700 (PDT)
Received: from localhost.localdomain ([31.142.122.131])
 by smtp.gmail.com with ESMTPSA id gv7sm6167100ejc.5.2021.08.09.12.18.17
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 09 Aug 2021 12:18:17 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Mon,  9 Aug 2021 22:18:00 +0300
Message-Id: <20210809191803.7833-4-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210809190257.7280-1-mail@HIDDEN>
References: <20210809190257.7280-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview: This package inherits pam-mount in the way that it is
 compiled
 specifically for use with seatd daemon. It uses different configuration
 location
 and name space for storing data in PAM. seatd-pam-mount is used in
 configuration
 of seatd to provide auto-(mounting/unmounting) of XDG_RUNTIME_DIR in the
 way that it will not interfere with default pam-mount configuration. 
 Content analysis details:   (2.0 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 SPF_NONE               SPF: sender does not publish an SPF Record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: selfhosted.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_MSPIKE_H3      RBL: Good reputation (+3)
 [209.85.218.42 listed in wl.mailspike.net]
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
 no trust [209.85.218.42 listed in list.dnswl.org]
 -0.0 RCVD_IN_MSPIKE_WL      Mailspike good senders
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)

This package inherits pam-mount in the way that it is compiled
specifically for use with seatd daemon. It uses different
configuration location and name space for storing data in PAM.

seatd-pam-mount is used in configuration of seatd to provide
auto-(mounting/unmounting) of XDG_RUNTIME_DIR in the way that
it will not interfere with default pam-mount configuration.

* gnu/packages/admin.scm (seatd-pam-mount): Add seatd-pam-mount
---
 gnu/packages/admin.scm | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index eda269f148..adc5f4d8fd 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -42,6 +42,7 @@
 ;;; Copyright © 2021 David Larsson <david.larsson@HIDDEN>
 ;;; Copyright © 2021 WinterHound <winterhound@HIDDEN>
 ;;; Copyright © 2021 Brice Waegeneire <brice@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -4247,6 +4248,25 @@ supports.  It can also mount encrypted LUKS volumes using the password
 supplied by the user when logging in.")
     (license (list license:gpl2+ license:lgpl2.1+))))
 
+(define-public seatd-pam-mount
+  (package
+    (inherit pam-mount)
+    (name "seatd-pam-mount")
+    (arguments
+     (substitute-keyword-arguments (package-arguments pam-mount)
+       ((#:configure-flags flags ''())
+        `(cons* "--with-rundir=/run/seatd" ,flags))
+       ((#:phases phases)
+        `(modify-phases ,phases
+           (add-after 'unpack 'patch-config-file-name
+             (lambda* (#:key inputs #:allow-other-keys)
+               (substitute* "src/pam_mount.c"
+                 ((".*define CONFIGFILE .*$")
+                  "#define CONFIGFILE \"/etc/security/seatd_pam_mount.conf.xml\"\n")
+                 (("pam_mount_config") "seatd_pam_mount_config")
+                 (("pam_mount_system_authtok") "seatd_pam_mount_system_authtok"))))))))
+    (synopsis "pam-mount specifically compiled for use with seatd/greetd")))
+
 (define-public jc
   (package
     (name "jc")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 5/7] gnu: desktop: Add seatd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Mon, 09 Aug 2021 19:19:03 +0000
Resent-Message-ID: <handler.49969.B49969.162853671317355 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Cc: muradm <mail@HIDDEN>
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162853671317355
          (code B ref 49969); Mon, 09 Aug 2021 19:19:03 +0000
Received: (at 49969) by debbugs.gnu.org; 9 Aug 2021 19:18:33 +0000
Received: from localhost ([127.0.0.1]:57842 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDAn7-0004Vc-As
	for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:33 -0400
Received: from mail-ed1-f41.google.com ([209.85.208.41]:40514)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDAn3-0004UY-ND
 for 49969 <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:26 -0400
Received: by mail-ed1-f41.google.com with SMTP id d6so26218167edt.7
 for <49969 <at> debbugs.gnu.org>; Mon, 09 Aug 2021 12:18:25 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:cc:subject:date:message-id:in-reply-to:references
 :mime-version:content-transfer-encoding;
 bh=/hDC3pxVXCM1gKMDEgcDzWDP1KxzgPUo45H2sFPeld4=;
 b=pIi8zMKTXub6yjxozBwIPWH72IxynXP9B29UPqUyy4gkHrimDecFIHaHe4qA7gX8r6
 NyvE8aFV+EXJFEKrhbPnnY4jPTQhwCcxS7YbTFNdI2pPgbvf9FQXSmtE6TXTY6p1P7SU
 wubUdIfsIi6YSGWd9sT12FU8OTeoioYwIsBR1wPR+o8jbYNH7GoiFMsbKwTz7hMDF/9Z
 hS93W8uAScrXgc8QW5Q7kaPz/PWxTypV9BPOSYzyIpoMEVD02tXfPF4IgOCAn543cM1Z
 sRlCTdjUOjfrTd3hGqOockTMAvqFzcYNPbxvsE3eG4L3ApSZTClfyDQYvqeFzapitQd4
 3hpg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=/hDC3pxVXCM1gKMDEgcDzWDP1KxzgPUo45H2sFPeld4=;
 b=ePwRgd5IQL9BayJP4NjXfFmgmdk9YLYHxM8c8LdSQ7WoxWf3uZ91SfropkOcG/wLZ6
 tdjJ1FFzz2ocwRxAmYwmZIgB7y7TI4P8TLcgSks6jA1GaE4Hj0KHRDN7Z50PGBPG3vB/
 R/P7jj7Zn3KuPdUJYaqqa0fiZJRPdppNdliKUigrmpbtsC2jMhpJB7ZQ0eQ4QchdiuSN
 A5rEK27+Ln77hKZrIbfpLnnUq4je/oIrPvkIxXeNN3SbCBmcns+I+T6v9S/x3zDJfN3C
 AjY8pvoMYRg0aSCOLxPJ5MX2WZ1fS9b3RaosdMRMEbRsXNgnzGIVRW21cYiKOMgSnXTw
 5OjQ==
X-Gm-Message-State: AOAM531tYvehWSfbmZ1w5R36mv3wgm8r30JOt+iaJaS0+YoZ1prUG0eH
 8dz3pCYi3OR1btKyso2TCem7H5s+Ff82tw==
X-Google-Smtp-Source: ABdhPJwcjF997nBvVfvp0vblaCO0S4iUhZWw55Bll2a/nHiFXB9pfN9G0EU6JnGZb17AD86bFwizyA==
X-Received: by 2002:aa7:d757:: with SMTP id a23mr31743903eds.29.1628536699785; 
 Mon, 09 Aug 2021 12:18:19 -0700 (PDT)
Received: from localhost.localdomain ([31.142.122.131])
 by smtp.gmail.com with ESMTPSA id gv7sm6167100ejc.5.2021.08.09.12.18.18
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 09 Aug 2021 12:18:19 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Mon,  9 Aug 2021 22:18:01 +0300
Message-Id: <20210809191803.7833-5-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210809190257.7280-1-mail@HIDDEN>
References: <20210809190257.7280-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

A seat management daemon, that does everything it needs to do.
Nothing more, nothing less. Depends only on libc.

* gnu/services/desktop.scm: Add seatd-service-type
---
 gnu/services/desktop.scm | 117 ++++++++++++++++++++++++++++++++++++++-
 1 file changed, 116 insertions(+), 1 deletion(-)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index 64d0e85301..cc13859532 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -13,6 +13,7 @@
 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@HIDDEN>
 ;;; Copyright © 2020 Reza Alizadeh Majd <r.majd@HIDDEN>
 ;;; Copyright © 2021 Brice Waegeneire <brice@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -39,7 +40,9 @@
   #:use-module (gnu services networking)
   #:use-module (gnu services sound)
   #:use-module ((gnu system file-systems)
-                #:select (%elogind-file-systems file-system))
+                #:select (%elogind-file-systems
+                          %control-groups
+                          file-system))
   #:use-module (gnu system)
   #:use-module (gnu system setuid)
   #:use-module (gnu system shadow)
@@ -154,6 +157,9 @@
             gnome-keyring-configuration?
             gnome-keyring-service-type
 
+            seatd-configuration
+            seatd-service-type
+
             %desktop-services))
 
 ;;; Commentary:
@@ -1182,6 +1188,115 @@ or setting its password with passwd.")))
 (define polkit-wheel-service
   (simple-service 'polkit-wheel polkit-service-type (list polkit-wheel)))
 
+
+;;;
+;;; seatd-service-type -- Seat management daemon
+;;;
+
+;; TODO: separate service-type is needed for cgroups
+(define %seatd-file-systems
+  (append
+   (list (file-system
+           (device "none")
+           (mount-point "/run/seatd/pam_mount")
+           (type "tmpfs")
+           (check? #f)
+           (flags '(no-suid no-dev no-exec))
+           (options "mode=0755")
+           (create-mount-point? #t)))
+   %control-groups))
+
+(define %seatd-pam-mount-rules
+  `((debug (@ (enable "0")))
+    (volume (@ (sgrp "users")
+               (fstype "tmpfs")
+               (mountpoint "/run/user/%(USERUID)")
+               (options "noexec,nosuid,nodev,size=1g,mode=0700,uid=%(USERUID),gid=%(USERGID)")))
+    (logout (@ (wait "0")
+               (hup "0")
+               (term "yes")
+               (kill "no")))
+    (mkmountpoint (@ (enable "1") (remove "true")))))
+
+(define-record-type* <seatd-configuration> seatd-configuration
+  make-seatd-configuration
+  seatd-configuration?
+  (seatd seatd-package (default seatd))
+  (user seatd-user (default "root"))
+  (group seatd-group (default "users"))
+  (socket seatd-socket (default "/run/seatd.sock")))
+
+(define (make-seatd-pam-mount-configuration-file config)
+  (computed-file
+   "seatd_pam_mount.conf.xml"
+   #~(begin
+       (use-modules (sxml simple))
+       (call-with-output-file #$output
+         (lambda (port)
+           (sxml->xml
+            '(*TOP*
+              (*PI* xml "version='1.0' encoding='utf-8'")
+              (pam_mount
+               #$@%seatd-pam-mount-rules
+               (pmvarrun
+                #$(file-append seatd-pam-mount
+                               "/sbin/pmvarrun -u '%(USER)' -o '%(OPERATION)'"))))
+            port))))))
+
+(define (seatd-pam-mount-etc-service config)
+  `(("security/seatd_pam_mount.conf.xml"
+     ,(make-seatd-pam-mount-configuration-file config))))
+
+(define (seatd-pam-mount-pam-service config)
+  (define optional-pam-mount
+    (pam-entry
+     (control "optional")
+     (module #~(string-append #$seatd-pam-mount "/lib/security/pam_mount.so"))))
+  (list (lambda (pam)
+          (if (member (pam-service-name pam)
+                      '("login" "su" "slim" "gdm-password"))
+              (pam-service
+               (inherit pam)
+               (auth (append (pam-service-auth pam)
+                             (list optional-pam-mount)))
+               (session (append (pam-service-session pam)
+                                (list optional-pam-mount))))
+              pam))))
+
+(define (seatd-shepherd-service config)
+  (list (shepherd-service
+         (requirement '())
+         ;; TODO: once cgroups is separate dependency
+         ;; here we should depend on it rather than elogind
+         (provision '(seatd elogind))
+         (start #~(make-forkexec-constructor
+                   (list #$(file-append (seatd-package config) "/bin/seatd")
+                         "-u" #$(seatd-user config)
+                         "-g" #$(seatd-group config)
+                         "-s" #$(seatd-socket config))))
+         (stop #~(make-kill-destructor)))))
+
+(define seatd-environment
+  (match-lambda
+    (($ <seatd-configuration> _ _ _ socket)
+     `(("SEATD_SOCK" . ,socket)))))
+
+(define seatd-service-type
+  (service-type (name 'seatd)
+                (extensions
+                 (list
+                  (service-extension session-environment-service-type
+                                     seatd-environment)
+                  (service-extension file-system-service-type
+                                     (const %seatd-file-systems))
+                  (service-extension etc-service-type
+                                     seatd-pam-mount-etc-service)
+                  (service-extension pam-root-service-type
+                                     seatd-pam-mount-pam-service)
+                  (service-extension shepherd-root-service-type
+                                     seatd-shepherd-service)))
+                (default-value (seatd-configuration))))
+
 
 ;;;
 ;;; The default set of desktop services.
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 6/7] gnu: desktop: Add greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Mon, 09 Aug 2021 19:19:03 +0000
Resent-Message-ID: <handler.49969.B49969.162853671317362 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Cc: muradm <mail@HIDDEN>
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162853671317362
          (code B ref 49969); Mon, 09 Aug 2021 19:19:03 +0000
Received: (at 49969) by debbugs.gnu.org; 9 Aug 2021 19:18:33 +0000
Received: from localhost ([127.0.0.1]:57844 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDAnB-0004Vs-6l
	for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:33 -0400
Received: from mail-ej1-f42.google.com ([209.85.218.42]:41918)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDAn5-0004Ug-99
 for 49969 <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:27 -0400
Received: by mail-ej1-f42.google.com with SMTP id d11so6439616eja.8
 for <49969 <at> debbugs.gnu.org>; Mon, 09 Aug 2021 12:18:27 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:cc:subject:date:message-id:in-reply-to:references
 :mime-version:content-transfer-encoding;
 bh=ZVxtLCxQv0YfqJRzYhcHPFN0ekGqAYGltUjBcgXQK9M=;
 b=UIfwDUNPgQwdBJIgoczAkVzwV3IA8s6dwmSklt/fhSQqXJ0JOR24NhR7qaGtIHm/hz
 43paHaKyGiApLiq3u/mMUifvNsPMyTJOQxyMdQJWfz97sntJsCK2ISMczUoJ5HLnARhk
 +ILkztKyBWSYMiu3VEBCVXgeInK7R0DHZkIN6FeiS/N52/AJa1HF9ngjH8/EY6xWhx1R
 wbCOH/BFDALgxnx2agEXT2FpBSnsORi7Mc9WA31RAfX9EpLi6MjEn8R4RKqfqymmgGmz
 TF1Kr9l/CzOADJmx3wBU9VXhFZxNROVXUtuijDsZYQy2lwkjY215CZPSsmsAmA1Zkspj
 TPug==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=ZVxtLCxQv0YfqJRzYhcHPFN0ekGqAYGltUjBcgXQK9M=;
 b=BjuOccK3KZ693Mwc6StA/5i9RUPTQDgbaaggORDLsqK/heBB8S+wS52XH4rCyA3PZ/
 TBscCD5B8uw+gMSwgl0p3RtMLC6R7yp3Zc7Z+3fXtCsaMylZ7Xr4M+Ar3UyuAP9k+na0
 7JP8nPWc7OKPIgt2/4xsU4TWle7bOnVmx+2HpKy/dQGI9h2rHOh+hH09csTdssPlERBt
 H2ethqcKqBsTgKt1eRUWgdw+vbr5Qpw2o2YU26EcNDReszL8GbK4hZXQhUxhBatNX7ky
 zct7ADcRNv2Z9YLGhuo9OOsuMIgIo5zn5+Dh4xgVWqyXMAaGrQfC8UcqM++6UB+6+ltp
 i01w==
X-Gm-Message-State: AOAM531alfBNghApYgv7zfrjznBg2rC9Cn3aHEXPBE9+IB4WZkTlcosj
 jX2KCY/LouzoSr7uIPm4+Y2CldI4Y3AKFQ==
X-Google-Smtp-Source: ABdhPJziM4u0tve4pjJAv43t3PGXjsDysubMcVEfRxIiCtk62x+LIvQilnvbqCXBDhShT3v7LRbBFg==
X-Received: by 2002:a17:907:3d91:: with SMTP id
 he17mr24172685ejc.355.1628536701446; 
 Mon, 09 Aug 2021 12:18:21 -0700 (PDT)
Received: from localhost.localdomain ([31.142.122.131])
 by smtp.gmail.com with ESMTPSA id gv7sm6167100ejc.5.2021.08.09.12.18.20
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 09 Aug 2021 12:18:20 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Mon,  9 Aug 2021 22:18:02 +0300
Message-Id: <20210809191803.7833-6-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210809190257.7280-1-mail@HIDDEN>
References: <20210809190257.7280-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

greetd is a minimal and flexible login manager daemon that makes
no assumptions about what you want to launch.

Currently, only agreety configuration is provided.

* gnu/services/desktop.scm: Add greetd-service-type
---
 gnu/services/desktop.scm | 139 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 139 insertions(+)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index cc13859532..601b9921a4 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -49,6 +49,7 @@
   #:use-module (gnu system pam)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages admin)
+  #:use-module (gnu packages bash)
   #:use-module (gnu packages cups)
   #:use-module (gnu packages freedesktop)
   #:use-module (gnu packages gnome)
@@ -160,6 +161,11 @@
             seatd-configuration
             seatd-service-type
 
+            greetd-configuration
+            greetd-agreety-tty-session
+            greetd-agreety-tty-xdg-session
+            greetd-service-type
+
             %desktop-services))
 
 ;;; Commentary:
@@ -1297,6 +1303,139 @@ or setting its password with passwd.")))
                                      seatd-shepherd-service)))
                 (default-value (seatd-configuration))))
 
+
+;;;
+;;; greetd-service-type -- minimal and flexible login manager daemon
+;;;
+
+(define %greetd-accounts
+  (list (user-account (name "greeter") (group "wheel") (system? #t))))
+
+(define-record-type* <greetd-agreety-session>
+  greetd-agreety-session make-greetd-agreety-session
+  greetd-agreety-session?
+  (package greetd-agreety-command-package (default bash))
+  (command-bin greetd-agreety-command-bin (default "/bin/bash"))
+  (command-args greetd-agreety-command-args (default '("-l")))
+  (extra-env greetd-agreety-extra-env (default '()))
+  (command-generator greetd-agreety-command-generator))
+
+(define greetd-agreety-tty-session-command
+  (match-lambda
+    (($ <greetd-agreety-session> pkg command-bin command-args extra-env)
+     (program-file
+      "agreety-tty-session-command"
+      #~(begin
+          (use-modules (ice-9 match))
+          (let* ((abs-cmd-bin #$(file-append pkg command-bin)))
+            (for-each
+             (match-lambda ((var . val) (setenv var val)))
+             (quote (#$@extra-env)))
+            (apply execl abs-cmd-bin abs-cmd-bin
+                   (list #$@command-args))))))))
+
+(define greetd-agreety-tty-xdg-session-command
+  (match-lambda
+    (($ <greetd-agreety-session> package command-bin command-args extra-env)
+     (program-file
+      "agreety-tty-xdg-session-command"
+      #~(begin
+          (use-modules (ice-9 popen) (ice-9 rdelim) (ice-9 match))
+          (let*
+              ((pmvarrun-bin #$(file-append seatd-pam-mount "/sbin/pmvarrun"))
+               (username (getenv "USER"))
+               (useruid (passwd:uid (getpwuid username)))
+               (useruid (number->string useruid))
+               (pmvarrun-cmd (string-join (list pmvarrun-bin "-u" username "-o" "0") " "))
+               (pmvarrun-port (open-input-pipe pmvarrun-cmd))
+               (session-id (read-line pmvarrun-port))
+               (session-id (string-append username "-" session-id))
+               (abs-cmd-bin #$(file-append package command-bin)))
+            (close-pipe pmvarrun-port)
+            (setenv "XDG_SESSION_ID" session-id)
+            (setenv "XDG_SESSION_TYPE" "tty")
+            (setenv "XDG_RUNTIME_DIR" (string-append "/run/user/" useruid))
+            (for-each
+             (match-lambda ((var . val) (setenv var val)))
+             (quote (#$@extra-env)))
+            (apply execl abs-cmd-bin abs-cmd-bin
+                   (list #$@command-args))))))))
+
+(define greetd-agreety-tty-session
+  (greetd-agreety-session
+   (command-generator greetd-agreety-tty-session-command)))
+
+(define greetd-agreety-tty-xdg-session
+  (greetd-agreety-session
+   (command-generator greetd-agreety-tty-xdg-session-command)))
+
+(define-record-type* <greetd-configuration> greetd-configuration
+  make-greetd-configuration
+  greetd-configuration?
+  (greetd greetd-package (default greetd))
+  (config-file-name greetd-config-file-name (thunked)
+                    (default (default-config-file-name this-record)))
+  (terminal-vt greetd-terminal-vt (default "7"))
+  (default-session-user greetd-default-session-user (default "greeter"))
+  (default-session-command greetd-default-session-command
+    (default greetd-agreety-tty-session)))
+
+(define (default-config-file-name config)
+  (string-join (list "config-" (greetd-terminal-vt config) ".toml") ""))
+
+(define make-greetd-default-session-command
+  (match-lambda
+    (($ <greetd-configuration> greetd _ _ _ default-session-command)
+     (cond ((greetd-agreety-session? default-session-command)
+            (let*
+                ((generator (greetd-agreety-command-generator
+                             default-session-command))
+                 (command (apply generator (list default-session-command)))
+                 (agreety-bin (file-append greetd "/bin/agreety")))
+              (program-file
+               "agreety-command"
+               #~(execl #$agreety-bin #$agreety-bin "-c" #$command))))
+           (else (program-file "agreety-command-exit" #~(exit #f)))))))
+
+(define (greetd-configuration-file config)
+  (let*
+      ((config-file-name (greetd-config-file-name config))
+       (terminal-vt (greetd-terminal-vt config))
+       (default-session-user (greetd-default-session-user config))
+       (default-session-command (make-greetd-default-session-command config)))
+    (mixed-text-file
+     config-file-name
+     "[terminal]\n"
+     "vt = " terminal-vt "\n"
+     "[default_session]\n"
+     "user = " default-session-user "\n"
+     "command = " default-session-command "\n")))
+
+(define (greetd-shepherd-service config)
+  (let*
+      ((greetd-bin (file-append (greetd-package config) "/sbin/greetd"))
+       (greetd-conf (greetd-configuration-file config)))
+    (list
+     (shepherd-service
+      (requirement '(user-processes host-name udev virtual-terminal))
+      (provision (list (symbol-append
+                        'term-tty
+                        (string->symbol (greetd-terminal-vt config)))))
+      (start #~(make-forkexec-constructor
+                (list #$greetd-bin "-c" #$greetd-conf)))
+      (stop #~(make-kill-destructor))))))
+
+(define greetd-service-type
+  (service-type
+   (name 'greetd)
+   (extensions
+    (list
+     (service-extension shepherd-root-service-type
+                        greetd-shepherd-service)
+     (service-extension account-service-type
+                        (const %greetd-accounts))))
+   (default-value (greetd-configuration))))
+
 
 ;;;
 ;;; The default set of desktop services.
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 7/7] doc: Add desktop seatd-service-type and greetd-service-type.
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Mon, 09 Aug 2021 19:19:04 +0000
Resent-Message-ID: <handler.49969.B49969.162853671417368 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Cc: muradm <mail@HIDDEN>
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162853671417368
          (code B ref 49969); Mon, 09 Aug 2021 19:19:04 +0000
Received: (at 49969) by debbugs.gnu.org; 9 Aug 2021 19:18:34 +0000
Received: from localhost ([127.0.0.1]:57846 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDAnB-0004Vz-Jw
	for submit <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:33 -0400
Received: from mail-ej1-f47.google.com ([209.85.218.47]:40847)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDAn7-0004Uz-0n
 for 49969 <at> debbugs.gnu.org; Mon, 09 Aug 2021 15:18:30 -0400
Received: by mail-ej1-f47.google.com with SMTP id oz16so14667029ejc.7
 for <49969 <at> debbugs.gnu.org>; Mon, 09 Aug 2021 12:18:28 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:cc:subject:date:message-id:in-reply-to:references
 :mime-version:content-transfer-encoding;
 bh=P389w8sqi/IJM0LcqkDRNvmfTHtCJM4fe+XamJNyyoo=;
 b=ASohN/wPhNLOLgADbvbjsDKZzKNN3oJNJka9N/Xdqy2NeasEBtAEfmkpyYgl5lZPKB
 mdWQF7Md0wLZLHehIjeaA6DY6iIxRGY6iUROLV+x0OKFjq3mbIvvVDc/ojIqV/Kqfh7N
 0/fNfSqI+ZMBa9o+ZEvCxS9qOCP/hkuWJz2z2/6y9Sftmcn8dfmfzEOsDPcIvnZlgLAO
 25HN26ihu1cwAMC5Tr5YOeMWeBCeJ1jD9e8ejgHdj5J8wGDK2/8EfoLWoK7vcKrH6Ksx
 zRcE+hQkLKCJCNCxLzWzEK8ZLc3J2Aa1P7hWw63rUnWNQGc6oHAP/nS8gaqkvDynI1Z9
 IGAQ==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=P389w8sqi/IJM0LcqkDRNvmfTHtCJM4fe+XamJNyyoo=;
 b=WW1LZATOT0dvPHGiKE+aeXtbHkpkBGxV+XmHC2/AYAo1ba8qWym996Ec9XvX0211WD
 PaQ4b37pJDkHc+gHLNfeCqiF5RM2e01Q4noYDFshBlClIC7FiH7d+V7dNdeLEFd3lg8K
 h1ufSRVneV8MAWqURROKTowTnd15xA4HcVMTyZLGU8lQdElwtZkUbzJuXUTYSsKsSiRN
 HLQ+uUfiARo4YLmoEKoZKlUT0fYg9LeHyW7SybYouIO1HUjWV3CB0iTksmTUR8ee5b93
 K6Vj8LRtqEulKOFmwwRAQNXMM8RF2dMhRIiKeALHcOAnl8TodkX5A3K5IK42Xrve0GiB
 E62Q==
X-Gm-Message-State: AOAM531A6baqESCp6fJXnjVYBj1WBQb/3Kg/PeChBC+rPtMt4YC1Hv+M
 dsGlf4A/PXT8Oi0SMzGeLfX8Qpt68vPGKg==
X-Google-Smtp-Source: ABdhPJwq693XUsbjm3qv85DPs/Cg2PksKEPMEGZ6Hdibq/LSdqYyAFzvNdZfpctLN/WBRZzApfP0dg==
X-Received: by 2002:a17:907:20c8:: with SMTP id
 qq8mr24250396ejb.213.1628536703102; 
 Mon, 09 Aug 2021 12:18:23 -0700 (PDT)
Received: from localhost.localdomain ([31.142.122.131])
 by smtp.gmail.com with ESMTPSA id gv7sm6167100ejc.5.2021.08.09.12.18.21
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Mon, 09 Aug 2021 12:18:22 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Mon,  9 Aug 2021 22:18:03 +0300
Message-Id: <20210809191803.7833-7-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210809190257.7280-1-mail@HIDDEN>
References: <20210809190257.7280-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* doc/guix.texi (Desktop Services): Provide documentation for
seatd-service-type and greetd-service-type including configuration
and sample usage.
---
 doc/guix.texi | 151 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 151 insertions(+)

diff --git a/doc/guix.texi b/doc/guix.texi
index 4eb5324b51..6c76a8d68a 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -94,6 +94,7 @@ Copyright @copyright{} 2021 Xinglu Chen@*
 Copyright @copyright{} 2021 Raghav Gururajan@*
 Copyright @copyright{} 2021 Domagoj Stolfa@*
 Copyright @copyright{} 2021 Hui Lu@*
+Copyright @copyright{} 2021 muradm@*
 
 Permission is granted to copy, distribute and/or modify this document
 under the terms of the GNU Free Documentation License, Version 1.3 or
@@ -19694,6 +19695,156 @@ and ``passwd'' is with the value @code{passwd}.
 @end table
 @end deftp
 
+@defvr {Scheme Variable} seatd-service-type
+A minimal seat management daemon, and a universal seat management library.
+
+Seat management takes care of mediating access to shared devices (graphics,
+input), without requiring the applications needing access to be root.
+
+In general should be used as replacement to @code{elogind-service-type}.
+And currently should be used with @code{greetd-service-type}.
+
+@lisp
+
+(append
+  (list
+   ;; make sure seatd is running
+   (service seatd-service-type)
+
+   ;; let's make terminals 1, 2 and 3 be an XDG terminal
+   ;; with XDG variables set on login.
+   (service greetd-service-type
+            (greetd-configuration
+             (terminal-vt "1")
+             (default-session-command greetd-agreety-tty-xdg-session)))
+   (service greetd-service-type
+            (greetd-configuration
+             (terminal-vt "2")
+             (default-session-command greetd-agreety-tty-xdg-session)))
+   (service greetd-service-type
+            (greetd-configuration
+             (terminal-vt "3")
+             (default-session-command greetd-agreety-tty-xdg-session)))
+
+   ;; let's make terminals 4, 5 and 6 be a plain bash terminal session
+   (service greetd-service-type
+            (greetd-configuration (terminal-vt "4")))
+   (service greetd-service-type
+            (greetd-configuration (terminal-vt "5")))
+   (service greetd-service-type
+            (greetd-configuration (terminal-vt "6"))))
+
+  (modify-services %desktop-services
+    ;; seatd/greetd combination can replace these
+    (delete elogind-service-type)
+    (delete agetty-service-type)
+    (delete mingetty-service-type)))
+
+@end lisp
+
+@end defvr
+
+@deftp {Data Type} seatd-configuration
+Configuration record for the seatd daemon service.
+
+@table @asis
+@item @code{seatd} (default: @code{seatd})
+The seatd package to use.
+
+@item @code{user} (default: @samp{"root"})
+User to own the seatd socket.
+
+@item @code{group} (default: @samp{"users"})
+Group to own the seatd socket.
+
+@item @code{socket} (default: @samp{"/run/seatd/socket"})
+Where to create the seatd socket.
+
+@end table
+@end deftp
+
+@defvr {Scheme Variable} greetd-service-type
+greetd is a minimal and flexible login manager daemon that makes no
+assumptions about what you want to launch.
+
+If you can run it from your shell in a TTY, greetd can start it. If it
+can be taught to speak a simple JSON-based IPC protocol, then it can
+be a greeter.
+@end defvr
+
+@deftp {Data Type} greetd-configuration
+Configuration record for the greetd daemon service.
+
+@table @asis
+@item @code{greetd} (default: @code{greetd})
+The greetd package to use.
+
+@item @code{config-file-name}
+Configuration file name to use for greetd daemon. Generally, autogenerated
+derivation based on @code{terminal-vt} value.
+
+@item @code{terminal-vt} (default: @samp{"7"})
+The VT to run on. Use of a specific VT with appropriate conflict avoidance
+is recommended.
+
+@item @code{default-session-user} (default: @samp{"greeter"})
+The user to use for running the greeter.
+
+@item @code{default-session-command} (default: @code{greetd-agreety-tty-session})
+The command-line to run to start the default session.
+
+Possible values are:
+
+@itemize @bullet
+@item
+@code{greetd-agreety-tty-session} - bash terminal session
+
+@item
+@code{greetd-agreety-tty-xdg-session} - bash terminal session with XDG environment
+
+@item
+@code{greetd-agreety-session} - custom instance of terminal session
+@end itemize
+
+@end table
+@end deftp
+
+@deftp {Data Type} greetd-agreety-session
+Configuration record for the agreety greetd greeter.
+
+@table @asis
+@item @code{package} (default: @code{bash})
+The package of command.
+
+@item @code{command-bin} (default: @samp{"/bin/bash"})
+Path to binary relative to @code{package}.
+
+@item @code{command-args} (default: @code{'("-l")})
+Command arguments to pass to command.
+
+@item @code{extra-env} (default: @code{'()})
+Extra environment variables to set on login.
+
+@item @code{command-generator}
+Function that receives instance of this configuration as an argument and
+returns @code{program-file} that can be used with @code{agreety} greeter.
+
+Both @code{greetd-agreety-tty-session} and @code{greetd-agreety-tty-xdg-session}
+uses @code{greetd-agreety-session} under the hood.
+
+@end table
+@end deftp
+
+@defvr {Scheme Variable} greetd-agreety-tty-session
+Provides instance of @code{greetd-agreety-session} which starts @samp{"bash -l"}
+on login.
+@end defvr
+
+@defvr {Scheme Variable} greetd-agreety-tty-xdg-session
+Provides instance of @code{greetd-agreety-session} which starts @samp{"bash -l"}
+on login. Additionally, will set @code{XDG_SESSION_ID}, @code{XDG_SESSION_TYPE} and
+@code{XDG_RUNTIME_DIR} environment variables for session.
+@end defvr
 
 @node Sound Services
 @subsection Sound Services
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 0/7] gnu: desktop: Add seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Tue, 10 Aug 2021 19:37:02 +0000
Resent-Message-ID: <handler.49969.B49969.162862420524638 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162862420524638
          (code B ref 49969); Tue, 10 Aug 2021 19:37:02 +0000
Received: (at 49969) by debbugs.gnu.org; 10 Aug 2021 19:36:45 +0000
Received: from localhost ([127.0.0.1]:60851 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDXYK-0006PK-Rs
	for submit <at> debbugs.gnu.org; Tue, 10 Aug 2021 15:36:45 -0400
Received: from mail-ed1-f46.google.com ([209.85.208.46]:39898)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDXYG-0006P1-Oj
 for 49969 <at> debbugs.gnu.org; Tue, 10 Aug 2021 15:36:43 -0400
Received: by mail-ed1-f46.google.com with SMTP id t1so5387419edd.6
 for <49969 <at> debbugs.gnu.org>; Tue, 10 Aug 2021 12:36:40 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=lYjCSO93s3Vd0lgBJ8vP+cY4O/0/yFayrivoxrCM9tE=;
 b=Yzaoz2hefaZIivHzCwV5g3hkHOVihi+j8LubrmuzjMvvS3ENKfL26fNXYHtH3KXdtt
 /Z/F3mJTiWYvvoJv75mQ2k/Cy+L0Jpbytz8nysElApxbwboopFi7ByzIZHI4xrB0I3Va
 DipMhms4qTDv/rhZtnckvYB4RetmyikG3VQSpwVgfiUwAMyVWgtiHZ4fvIIjtY0bjo28
 4CSym3O7s2H1ocV7EZE6BBp1/SoAnxcDFoXNipa9CIXEeHn5T/oAmaemrJ+zfPEvzayq
 /wyop7/rsiXyPt7j74eYBrHHE6poZ07HH6R4YYnQdfoOHv2qGKMWWeKujF0R9WCaRK+o
 hwGw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=lYjCSO93s3Vd0lgBJ8vP+cY4O/0/yFayrivoxrCM9tE=;
 b=XyPudn8LdiXeeJ19uyAjqoHmcHCY9DgiXMNaIK37UNiOTmwjItcvAeu5Hc+MfQ23/X
 VOfhL8jZzWjxoQzgksCUSKApl3BoYmHd3uYVKoBIO7JWb4D0TYtBUWnmSIou7dS63Jaa
 54y5dRyMoIAkcYYSBCBqlxQswSVqLwZqgtW68nNZmFCf/96td1TKqPduRtUxW2aaRnB1
 fP231QLcfANHdjDzuXs8vGCa/UFYbhaqgW8P9BwifRzZDJJf0iA8Aw9Oz30bd2cfS52V
 4eUExlOw9fi5iuq4/fBFHSee6DzdWmzYjaOJncxyRIsvLNqQsj80SorJ+3aak9dAbN/H
 KiQg==
X-Gm-Message-State: AOAM531eYz+2g+MeCBpyCB620+dIpR53QvP+WTcYgCcjkT6vPjuPmbc5
 zyOREoOMN8zMg7k5g9dwEgCn3r7Ayh4ACA==
X-Google-Smtp-Source: ABdhPJzNBPkdxMW3NQuia4tOGClbPBBO2gaUTC8czZ6OcySgxFyYNeahIAZBJYyiKBniSF8NLcNEwQ==
X-Received: by 2002:aa7:d04c:: with SMTP id n12mr6867400edo.342.1628624194451; 
 Tue, 10 Aug 2021 12:36:34 -0700 (PDT)
Received: from localhost.localdomain ([31.142.54.188])
 by smtp.gmail.com with ESMTPSA id e7sm10203575edk.3.2021.08.10.12.36.31
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 10 Aug 2021 12:36:33 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Tue, 10 Aug 2021 22:36:26 +0300
Message-Id: <20210810193626.9186-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210809190257.7280-1-mail@HIDDEN>
References: <20210809190257.7280-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

This patch series introduces two new services;

 - seatd-service-type: simple seat management daemon
 - greetd-service-type: simple login daemon

Both services are very minimalistic in nature. Simple seatd daemon
could be said as replacement for elogind-service-type. greetd daemon
is simple replacement for mingetty/agetty.

In addition to the base services, special build of pam-mount module is
included as greetd-pam-mount. It is used to provide
auto-(mounting/unmounting) of XDG_RUNTIME_DIR. Special build is
required to avoid interference with default pam-mount, if used in
the system.

greetd provides agreety terminal greeter out of the box. Current
greetd-service-type includes configuration for greetd-agreety-session
variations, i.e. only terminal are supported at the moment.

Next step would be adding gtkgreet and/or wlgreet alternatives for
graphical greeter.

muradm (7):
  gnu: crates-io: Add rust-enquote 1.0.3
  gnu: crates-io: Add rust-pam-sys 0.5.6
  gnu: freedesktop: Add greetd 0.7.0
  gnu: admin: Add greetd-pam-mount
  gnu: desktop: Add seatd-service-type
  gnu: desktop: Add greetd-service-type
  doc: Add desktop seatd-service-type and greetd-service-type

 doc/guix.texi                | 183 ++++++++++++++++++++++++
 gnu/packages/admin.scm       |  20 +++
 gnu/packages/crates-io.scm   |  49 +++++++
 gnu/packages/freedesktop.scm |  80 +++++++++++
 gnu/services/desktop.scm     | 269 ++++++++++++++++++++++++++++++++++-
 5 files changed, 600 insertions(+), 1 deletion(-)

-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 2/7] gnu: crates-io: Add rust-pam-sys 0.5.6
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Tue, 10 Aug 2021 20:09:02 +0000
Resent-Message-ID: <handler.49969.B49969.162862609527504 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162862609527504
          (code B ref 49969); Tue, 10 Aug 2021 20:09:02 +0000
Received: (at 49969) by debbugs.gnu.org; 10 Aug 2021 20:08:15 +0000
Received: from localhost ([127.0.0.1]:60873 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDY2o-00079Y-Rv
	for submit <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:15 -0400
Received: from mail-ej1-f53.google.com ([209.85.218.53]:42502)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDY2n-00079I-SA
 for 49969 <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:14 -0400
Received: by mail-ej1-f53.google.com with SMTP id e19so37656645ejs.9
 for <49969 <at> debbugs.gnu.org>; Tue, 10 Aug 2021 13:08:13 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=OsYa1NfLVeJnB+RD2QLBDFSwgZI2JZ2nBHY4M+MIyYE=;
 b=VnzEwONglEtC8hhxmAj6+Fw44dU12MVzRmGFDRs8nHKwEED+IuHMBukmVeOrtIGq+7
 16S4hdHSqsPC2XTxdD0eB3vMwgE/dvdm1/FPYe8GXWzlm4sqbMEH2Vxs7Z2U4qkLOt9a
 BQX5VZj6ot1Wm+z/gTz2e/wauyZVoph6Z/xqQjHz47VCTTet4V1qOKe3HOM45/cyaWpM
 pWxSVqgzLFIcZbCEgy+EwLHpFUxwIH8ceF0/yem3YvA9+5X2YtpgU5Mx5F9G4tuOe55S
 wY35TD7i9EumRBwc+QaV42ac4Cj+1EMor7EIXtV9yY/tnjB+LaoBmG3FXT3zaIlnYtSl
 czpg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=OsYa1NfLVeJnB+RD2QLBDFSwgZI2JZ2nBHY4M+MIyYE=;
 b=Vm2Pw0PQ1s98i410ZCUFZsjeHtRCY3wANqaba3Sl+ttMYoOoGQsaBGbkQRUKcRsPFo
 X8VlgnrcPksJ38IGqCm+34iqnVHarYi31hiCMth6ITOzTTxvf6WhHYBCGRAFSv+b0ZO+
 GeH9NjGuWte5YZKZJAx9dC5sUp76mIqsUwRrSsiVdxvYDVzaNTf3cusfypXr82V+kN5O
 i4YS7dR6HqeIyRjpB3uog9W1+l//V2Hud8zSCIH0w3LGAybEOn6ZPz9ZEdNqkHFosF5c
 nYB3w60Zfw5PzuPNLI+arBQ9FuPwLo/DaJMj9zYepKqsWEIOBDIpUcg0Ubs8qxRwoA2q
 azrw==
X-Gm-Message-State: AOAM531did0JfEtc8xWYq+lFXDDtttlaQTQBTSy/Qm/oPGXZyMizao7q
 KkCXI/NYRiAex9AUkFG8Ef3wcD5bE2fCFA==
X-Google-Smtp-Source: ABdhPJzMGr5uecD7x4kDnCyP1HyyhlJ3UZtCHxbZh7GflmtSmHM8ma5sbdKCLVU66yU99z4K6u18Lg==
X-Received: by 2002:a17:906:6490:: with SMTP id
 e16mr205122ejm.467.1628626087864; 
 Tue, 10 Aug 2021 13:08:07 -0700 (PDT)
Received: from localhost.localdomain ([31.142.54.188])
 by smtp.gmail.com with ESMTPSA id qa34sm7247582ejc.120.2021.08.10.13.08.06
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 10 Aug 2021 13:08:07 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Tue, 10 Aug 2021 23:07:51 +0300
Message-Id: <20210810200756.9581-2-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/crates-io.scm (rust-pam-sys): Add rust-pam-sys 0.5.6
---
 gnu/packages/crates-io.scm | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index b458080ca7..b365a2c8c0 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -56,6 +56,7 @@
   #:use-module (gnu packages image)
   #:use-module (gnu packages jemalloc)
   #:use-module (gnu packages llvm)
+  #:use-module (gnu packages linux)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages nettle)
   #:use-module (gnu packages pcre)
@@ -56994,3 +56995,29 @@ variant of this library is available separately as @code{im}.")
     (description
      "This Rust library quotes, unquotes, and unescapes strings.")
     (license license:unlicense)))
+
+(define-public rust-pam-sys-0.5.6
+  (package
+    (name "rust-pam-sys")
+    (version "0.5.6")
+    (home-page "https://github.com/1wilkens/pam-sys")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pam-sys" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32
+         "0d14501d5vybjnzxfjf96321xa5wa36x1xvf02h02zq938qmhj6d"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-libc" ,rust-libc-0.2))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)))
+    (synopsis
+     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (PAM).")
+    (description
+     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (PAM).")
+    (license (list license:expat license:asl2.0))))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 1/7] gnu: crates-io: Add rust-enquote 1.0.3
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Tue, 10 Aug 2021 20:09:02 +0000
Resent-Message-ID: <handler.49969.B49969.162862610427555 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162862610427555
          (code B ref 49969); Tue, 10 Aug 2021 20:09:02 +0000
Received: (at 49969) by debbugs.gnu.org; 10 Aug 2021 20:08:24 +0000
Received: from localhost ([127.0.0.1]:60878 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDY2s-00079p-2W
	for submit <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:24 -0400
Received: from mail-ej1-f46.google.com ([209.85.218.46]:35403)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDY2m-00079G-RV
 for 49969 <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:17 -0400
Received: by mail-ej1-f46.google.com with SMTP id w5so13539020ejq.2
 for <49969 <at> debbugs.gnu.org>; Tue, 10 Aug 2021 13:08:12 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=IA2tm41JOw833UoybHSGJxPeblBYkg5VYWriA0hu6q8=;
 b=BWUraOzkPj4zqfO2ohPzNc3bxQRtykqbZB0wwo35SWSGR/5WH9zOWCz4tRhoeXYS4V
 Ii+z7OB0vgZKVsrr/QE1IY3gaXjNANUH/kjmBUINXcfViuVvWQcUcZp4dJDijZBjwvsy
 F1kYTsBFg5iScheIuqlDkZevSNNEOPUQ3SsZ7bfKkLMlCA6wtj/s5IjpnWZ9omSw1y2T
 RowGBOenNc1dMBcn19Y4nSuBsYoJmewipJgqvUe9lXZFEU89azUe7alg4ssJ2hay2L4K
 j0VpWyzD21OCpGmZ1jq9tzZZGKzYrJH9CCI0BcRjjyjDjwD/B0gsJCD15eBnLV9dOFr4
 IYYw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=IA2tm41JOw833UoybHSGJxPeblBYkg5VYWriA0hu6q8=;
 b=dqluWWaxvEYpnFLk4DPlt28n7hsdBbu+Wmaj1gw4IVKjWCgUJyta/1OTEbsHg6+FDD
 0N9P4317O3BKojgBZRuEsW9zaxofaRBu+2wT51AplnsXc+bRWE0l8hmeoSs4+wOJ/E+l
 XhNLRbolTVDyL2xlWTk+ImSdlPRRV9rfxvTTfCcEjZTwJkTzOPWYDwl2mlScjPf7BRqd
 gxIStqSYdHNAUEa3EP8iwWKWo+qWAeCHdPDwJ9Xlmq1t5TDwdeZRflUgmdKaEg78Em5e
 Qk52iOVCRGxeEzV7sMpk4uEnUiZm0ZCNix8+Mxd1844E/HTAOFwKo4ClgkKFEkzcuAFl
 lnCA==
X-Gm-Message-State: AOAM532Ayyg8HM5JHUkkwqBcpFjXbCfSWaYpdN23QiHUjwb9hs6yXYir
 6LBhMWT+ez2uX0ZN+JTnTzKXyIBiT5WSbA==
X-Google-Smtp-Source: ABdhPJxEHne9ds6OaZ8yrk4zM/Jf9gBbmnt3nU3LyivOqmHUGHTdEjTj+yOxL1JFhcQmZ6/dacRzFA==
X-Received: by 2002:a17:906:4dd5:: with SMTP id
 f21mr268925ejw.284.1628626086535; 
 Tue, 10 Aug 2021 13:08:06 -0700 (PDT)
Received: from localhost.localdomain ([31.142.54.188])
 by smtp.gmail.com with ESMTPSA id qa34sm7247582ejc.120.2021.08.10.13.08.04
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 10 Aug 2021 13:08:05 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Tue, 10 Aug 2021 23:07:50 +0300
Message-Id: <20210810200756.9581-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/crates-io.scm (rust-enquote-1): Add rust-enquote 1.0.3
---
 gnu/packages/crates-io.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 24cc772ba7..b458080ca7 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -18,6 +18,7 @@
 ;;; Copyright © 2021 Antero Mejr <antero@HIDDEN>
 ;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@HIDDEN>
 ;;; Copyright © 2021 Vinicius Monego <monego@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -56972,3 +56973,24 @@ variant of this library is available separately as @code{im}.")
     (description
       "Generate Rust register maps (`struct`s) from SVD files")
     (license (list license:expat license:asl2.0))))
+
+(define-public rust-enquote-1
+  (package
+    (name "rust-enquote")
+    (version "1.0.3")
+    (home-page "https://github.com/reujab/enquote")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "enquote" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32
+         "0vm687r2wwgc3d3l2iqhag9wgkql6k93sdvjxvmfkdpksajpij1f"))))
+    (build-system cargo-build-system)
+    (synopsis
+     "This Rust library quotes, unquotes, and unescapes strings.")
+    (description
+     "This Rust library quotes, unquotes, and unescapes strings.")
+    (license license:unlicense)))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 3/7] gnu: freedesktop: Add greetd 0.7.0
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Tue, 10 Aug 2021 20:09:02 +0000
Resent-Message-ID: <handler.49969.B49969.162862610927566 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162862610927566
          (code B ref 49969); Tue, 10 Aug 2021 20:09:02 +0000
Received: (at 49969) by debbugs.gnu.org; 10 Aug 2021 20:08:29 +0000
Received: from localhost ([127.0.0.1]:60882 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDY2y-0007AO-75
	for submit <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:28 -0400
Received: from mail-ej1-f47.google.com ([209.85.218.47]:36557)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDY2p-00079K-2G
 for 49969 <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:19 -0400
Received: by mail-ej1-f47.google.com with SMTP id o23so4489338ejc.3
 for <49969 <at> debbugs.gnu.org>; Tue, 10 Aug 2021 13:08:15 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=VNGnseJDWam81ZBvjmqRKojMs5N5/djUyydulj9nhTg=;
 b=otJZRG1Uc03vdRMfOTaqJlsHFkWKDPbT//+6QDdQQOu/V1OrEvxSUQIZg8LfJOjz5y
 I+ixPsU56rWkjYX9NIytEHcvyTKo+IQv+PW0ryB1v4081BZvJwqmfIGmzJ70VGQy9/Fa
 jQ9lueKVEj5lcflG7jiT4XweLPBOhRcrcEd+/TK89rpexBUDrEIEoKOETRakpH2gqreI
 4cTwZi5QJhbXq+mtSA/xqAHxPDdgJOWFWjuTh5R68CbTw02RIP59QdTvnN1UMP6vKhbH
 AXWBH7BLrsBfeWd7wrVxoUw2hPFG4H4Ope1QDb3vrgVVZyGsHFgUq2YFUrBmVA2nyDcx
 MmNQ==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=VNGnseJDWam81ZBvjmqRKojMs5N5/djUyydulj9nhTg=;
 b=kZqV9vRo0KlXl8ODKnF0BSlY7Pe7+mzpr4ktuM4cSbiTlbiBAoHkzot8+D9g07EGMI
 UbgHrYZ2/Fzs7aZ7Ql4OO9T8+WZOYhHjrI1GPIzU9evCGYuJF6rigYnzsxLnEln6n+X2
 /zPchY0FJEkLX8l5eM/QPnrjsjqu5DsHranFAwS4P1LyDJnXaXPFF+g0qCvMGRDPDQpe
 7vbCHx/U/+i0FW9s3MP/+maWmMuRLWMp0iAzNVVmxvQnu/2VEoFZ8CfquS0NAlwLf/S7
 pGMSo9gbNjwKja9bRlLJbsxsZcTA+EURuL4+7ObweNbpck/H9lzpH6Y0ivOP+nwzDBob
 y4zA==
X-Gm-Message-State: AOAM531kj6gYC8PE6/T67Cj5llLdEo10BZ71+ORCvHIheEoHXK9kELQH
 oGBHLpEYE+kZSuyrRUN0M0idZV1RdzQ/7w==
X-Google-Smtp-Source: ABdhPJyfs9qnbuIzv8Td3WAv1Dg1JDuVH95Bvky8g51iv8JZyLHYKwCg+jkVzsXzUx3GOjTKsy/YTw==
X-Received: by 2002:a17:906:fa10:: with SMTP id
 lo16mr268603ejb.154.1628626089270; 
 Tue, 10 Aug 2021 13:08:09 -0700 (PDT)
Received: from localhost.localdomain ([31.142.54.188])
 by smtp.gmail.com with ESMTPSA id qa34sm7247582ejc.120.2021.08.10.13.08.08
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 10 Aug 2021 13:08:08 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Tue, 10 Aug 2021 23:07:52 +0300
Message-Id: <20210810200756.9581-3-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
---
 gnu/packages/freedesktop.scm | 80 ++++++++++++++++++++++++++++++++++++
 1 file changed, 80 insertions(+)

diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
index 693a79c738..631d36e765 100644
--- a/gnu/packages/freedesktop.scm
+++ b/gnu/packages/freedesktop.scm
@@ -24,6 +24,7 @@
 ;;; Copyright © 2020 Raghav Gururajan <raghavgururajan@HIDDEN>
 ;;; Copyright © 2021 Brendan Tildesley <mail@HIDDEN>
 ;;; Copyright © 2021 pineapples <guixuser6392@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -46,6 +47,7 @@
   #:use-module (guix packages)
   #:use-module (guix download)
   #:use-module (guix git-download)
+  #:use-module (guix build-system cargo)
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system meson)
@@ -62,6 +64,7 @@
   #:use-module (gnu packages check)
   #:use-module (gnu packages cmake)
   #:use-module (gnu packages compression)
+  #:use-module (gnu packages crates-io)
   #:use-module (gnu packages cryptsetup)
   #:use-module (gnu packages databases)
   #:use-module (gnu packages disk)
@@ -862,6 +865,83 @@ that require it.  It also provides a universal seat management library that
 allows applications to use whatever seat management is available.")
     (license license:expat)))
 
+(define-public greetd
+  (package
+    (name "greetd")
+    (version "0.7.0")
+    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url home-page)
+                    (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32 "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zbgr3g"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-nix" ,rust-nix-0.17)
+        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
+        ("rust-rpassword" ,rust-rpassword-4)
+        ("rust-users" ,rust-users-0.9)
+        ("rust-serde" ,rust-serde-1)
+        ("rust-serde-json" ,rust-serde-json-1)
+        ("rust-libc" ,rust-libc-0.2)
+        ("rust-tokio" ,rust-tokio-0.2)
+        ("rust-getopts" ,rust-getopts-0.2)
+        ("rust-thiserror" ,rust-thiserror-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
+        ("rust-enquote" ,rust-enquote-1))
+       #:phases
+       (modify-phases %standard-phases
+         ;; once https://todo.sr.ht/~kennylevinsen/greetd/25
+         ;; is solved, below patch can be removed
+         (add-after 'unpack 'patch-terminal-switch
+           (lambda* (#:key inputs #:allow-other-keys)
+             (substitute* "greetd/src/server.rs"
+               (("switch: true,")
+                "switch: false,"))))
+         (delete 'package)
+         (replace 'install
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (bin (string-append out "/bin"))
+                    (sbin (string-append out "/sbin"))
+                    (share (string-append out "/share"))
+                    (man (string-append share "/man"))
+                    (man1 (string-append man "/man1"))
+                    (man5 (string-append man "/man5"))
+                    (man7 (string-append man "/man7"))
+                    (release "target/release")
+                    (greetd-bin (string-append release "/greetd"))
+                    (agreety-bin (string-append release "/agreety")))
+               (install-file greetd-bin sbin)
+               (install-file agreety-bin bin)
+               (mkdir-p man1)
+               (mkdir-p man5)
+               (mkdir-p man7)
+               (with-directory-excursion "man"
+                 (system "scdoc < greetd-1.scd > greetd.1")
+                 (system "scdoc < greetd-5.scd > greetd.5")
+                 (system "scdoc < greetd-ipc-7.scd > greetd-ipc.7")
+                 (system "scdoc < agreety-1.scd > agreety.1"))
+               (install-file "man/greetd.1" man1)
+               (install-file "man/greetd.5" man5)
+               (install-file "man/greetd-ipc.7" man7)
+               (install-file "man/agreety.1" man1)
+               #t))))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)
+       ("scdoc" ,scdoc)))
+    (synopsis
+     "greetd is a minimal and flexible login manager daemon
+that makes no assumptions about what you want to launch.")
+    (description
+     "greetd is a minimal and flexible login manager daemon
+that makes no assumptions about what you want to launch.")
+    (license license:gpl3+)))
+
 (define-public packagekit
   (package
     (name "packagekit")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 4/7] gnu: admin: Add greetd-pam-mount
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Tue, 10 Aug 2021 20:09:03 +0000
Resent-Message-ID: <handler.49969.B49969.162862611327579 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162862611327579
          (code B ref 49969); Tue, 10 Aug 2021 20:09:03 +0000
Received: (at 49969) by debbugs.gnu.org; 10 Aug 2021 20:08:33 +0000
Received: from localhost ([127.0.0.1]:60884 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDY32-0007AZ-RR
	for submit <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:33 -0400
Received: from mail-ej1-f53.google.com ([209.85.218.53]:36567)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDY2q-00079M-Bh
 for 49969 <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:22 -0400
Received: by mail-ej1-f53.google.com with SMTP id o23so4489450ejc.3
 for <49969 <at> debbugs.gnu.org>; Tue, 10 Aug 2021 13:08:16 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=Ji/0u8o52Eleku7bBaveyVCcBuSY/EtVjU0+md9XL9M=;
 b=bCnXt6VTR4bU/JzOo5shBVRbenRt//2ZsiiHiW5edoBO9LH+vKo3WB4AHqfkiCbuyn
 d4fisI6f2UfSRX90/27qrOdp5yibJTc0cytiteCqFZ4fa4aDI5SXhQzVu+Lxvo0ml9c3
 gIaedP3YO7VVJPJPEXFEZkWgbT2fgaPFGQTE7dk9cApEVc/wlzEsITRO0fkZdEekLVwN
 ujvvtBAiXLPFpw9LPIwLpVcyoxYO8VEj1zxONuyF3ij2CsRVzgbHoNXY42gNPbYKxBsE
 peMZ9YWpA5ef0Hh63X2JZi+sIVKOZeDkpl6FTdqERnJgJoSBRDT9FXhJMTsk8jnMUPO2
 xwLw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=Ji/0u8o52Eleku7bBaveyVCcBuSY/EtVjU0+md9XL9M=;
 b=tz3S58nz+tsF6alcKMNJjWmMdSBnrLfRWlra42TMaXokfVRil3fzCHM4eOX0vz2d0L
 MiqojPqaYmgOjEJJ9k24TY5SLSAU/BJ4IKg+wV7VDD9uzi2DY0czcuYAXrtSh/L/iY9i
 vIv9waFmDKS2sVaSzEI+lPOLxS/45AgfhsV9GL1l44bSMQCz5OYOwU5HB7vAsQx08hES
 R1SgDcZmrA2EsXVWmjBk6susei5tHAzIFL7CiqoOpCJFt383ui3mof3JU0jDA/7fcsMD
 fNZRVkV1Z19ytzgOoGaqxxgYV4qBjvxH02B3oo3V2YZazWGguLbUxS+mKQt88QFsxH71
 T5AQ==
X-Gm-Message-State: AOAM532M5Y5vII3q7WMGIf1HnLUZhCW5FTiNGXXUXSf2vDB96ix2akiG
 zNI2XwB2yixZcSRWaEx9nXTz8blSpEGUDw==
X-Google-Smtp-Source: ABdhPJyTI+oEpR2zmYGh3dU+7fdN4xJIai2bm9DrYP4Rb5kb62Oo3CD4se/kgbUfilHHSdc9uzCACA==
X-Received: by 2002:a17:907:3e05:: with SMTP id
 hp5mr205123ejc.527.1628626090555; 
 Tue, 10 Aug 2021 13:08:10 -0700 (PDT)
Received: from localhost.localdomain ([31.142.54.188])
 by smtp.gmail.com with ESMTPSA id qa34sm7247582ejc.120.2021.08.10.13.08.09
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 10 Aug 2021 13:08:10 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Tue, 10 Aug 2021 23:07:53 +0300
Message-Id: <20210810200756.9581-4-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview: This package inherits pam-mount in the way that it is
 compiled
 specifically for use with greetd daemon. It uses different configuration
 location and name space for storing data in PAM. greetd-pam-mount is used
 in configuration of greetd to provide auto-(mounting/unmounting) of
 XDG_RUNTIME_DIR
 in the way that it will not interfere with default pam-mount configuration.
 Content analysis details:   (2.0 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 RCVD_IN_MSPIKE_H3      RBL: Good reputation (+3)
 [209.85.218.53 listed in wl.mailspike.net]
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
 no trust [209.85.218.53 listed in list.dnswl.org]
 0.0 SPF_NONE               SPF: sender does not publish an SPF Record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: selfhosted.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_MSPIKE_WL      Mailspike good senders
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)

This package inherits pam-mount in the way that it is compiled
specifically for use with greetd daemon. It uses different
configuration location and name space for storing data in PAM.

greetd-pam-mount is used in configuration of greetd to provide
auto-(mounting/unmounting) of XDG_RUNTIME_DIR in the way that
it will not interfere with default pam-mount configuration.

* gnu/packages/admin.scm (greetd-pam-mount): Add greetd-pam-mount
---
 gnu/packages/admin.scm | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index eda269f148..e805b219c5 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -42,6 +42,7 @@
 ;;; Copyright © 2021 David Larsson <david.larsson@HIDDEN>
 ;;; Copyright © 2021 WinterHound <winterhound@HIDDEN>
 ;;; Copyright © 2021 Brice Waegeneire <brice@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -4247,6 +4248,25 @@ supports.  It can also mount encrypted LUKS volumes using the password
 supplied by the user when logging in.")
     (license (list license:gpl2+ license:lgpl2.1+))))
 
+(define-public greetd-pam-mount
+  (package
+    (inherit pam-mount)
+    (name "greetd-pam-mount")
+    (arguments
+     (substitute-keyword-arguments (package-arguments pam-mount)
+       ((#:configure-flags flags ''())
+        `(cons* "--with-rundir=/run/greetd" ,flags))
+       ((#:phases phases)
+        `(modify-phases ,phases
+           (add-after 'unpack 'patch-config-file-name
+             (lambda* (#:key inputs #:allow-other-keys)
+               (substitute* "src/pam_mount.c"
+                 ((".*define CONFIGFILE .*$")
+                  "#define CONFIGFILE \"/etc/security/greetd_pam_mount.conf.xml\"\n")
+                 (("pam_mount_config") "greetd_pam_mount_config")
+                 (("pam_mount_system_authtok") "greetd_pam_mount_system_authtok"))))))))
+    (synopsis "pam-mount specifically compiled for use with greetd")))
+
 (define-public jc
   (package
     (name "jc")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 5/7] gnu: desktop: Add seatd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Tue, 10 Aug 2021 20:09:03 +0000
Resent-Message-ID: <handler.49969.B49969.162862611727590 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162862611727590
          (code B ref 49969); Tue, 10 Aug 2021 20:09:03 +0000
Received: (at 49969) by debbugs.gnu.org; 10 Aug 2021 20:08:37 +0000
Received: from localhost ([127.0.0.1]:60886 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDY37-0007Am-AZ
	for submit <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:37 -0400
Received: from mail-ej1-f46.google.com ([209.85.218.46]:46818)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDY2r-00079P-U7
 for 49969 <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:22 -0400
Received: by mail-ej1-f46.google.com with SMTP id gs8so37607069ejc.13
 for <49969 <at> debbugs.gnu.org>; Tue, 10 Aug 2021 13:08:17 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=JLAQyW2C1YP3WI4eDDJWM2Ywvm62IDNoDCygivZzhz8=;
 b=eAIEYM6EOSMAj7XFyPpkzpxVPA7DqQ5PawhG+rrOGKq9kM5MYfxzUBrO/hwfAPUxvq
 Xz5CfnjSnqojX7YyOBli87KnneMtHBRux7uY2Iiwb4XczfPw/qvY1tGfd24RVObSZ5hC
 CcQ+ueHPZGCIOI0sLV5dLOUAsRDgJ4UAPfZ/NSdurW7wCiwl/W6IINHzMQwLN/m1pUZk
 gZ5Osee4RotflMqUDKSmp96jyqU3Szzq9hwvHuz1YGPEMm03MPBnWwu17m72e6gugLQN
 0g8IHgxLadifNKh9sJKwZ0MaIjUtNnewaZv2il9AvK4zgh+1T9oS1/7c2syLV/FUVVlC
 u1ag==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=JLAQyW2C1YP3WI4eDDJWM2Ywvm62IDNoDCygivZzhz8=;
 b=rPlMNqNDhPF5Z9uERl+XDKqwNnIc8TbBx4gyRrt1SNFdC901k6ptfySak1fFfv2fwd
 5en0H+RtfezMPv9QPngWF7mh1liW4KsGDHGDIsD77ctLZEcS3Bp9l2oQEaebU22XIT7/
 n0V9Sv2PI0THGu4vN314WMVv/TX3uy7E2I4kstrFNHtgzAMmY4Kdoif7QOP9GlpufeSH
 tzWdmU39o8SjseagE0whesGLwMbZIXkEzOxWSZYq/05X6xV3lAiToBHMEDJdHoC6124q
 54uXaGA3Ymj71qsDMOq2CvWdqG/r7MpGM2IIzTn7f1sKl43gjeE0L8fQnqpZ6uDVm8oq
 WPvQ==
X-Gm-Message-State: AOAM531DZj7faKgF2RY4kpQuf8vbnhPeFCqdnccaND+OMswPkMFYHJlm
 De7Cp4271hZO+C3NudPu32BG4XKlWMVFjg==
X-Google-Smtp-Source: ABdhPJxWwHfbi7w/CV1LGrv9rsNKOqTF+f4R4F9QlaUdlI8HOwZqnfds6ltRMWljpk0uLgizXeNxeA==
X-Received: by 2002:a17:906:b09:: with SMTP id u9mr247806ejg.496.1628626092089; 
 Tue, 10 Aug 2021 13:08:12 -0700 (PDT)
Received: from localhost.localdomain ([31.142.54.188])
 by smtp.gmail.com with ESMTPSA id qa34sm7247582ejc.120.2021.08.10.13.08.10
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 10 Aug 2021 13:08:11 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Tue, 10 Aug 2021 23:07:54 +0300
Message-Id: <20210810200756.9581-5-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

A seat management daemon, that does everything it needs to do.
Nothing more, nothing less. Depends only on libc.

* gnu/services/desktop.scm: Add seatd-service-type
---
 gnu/services/desktop.scm | 59 +++++++++++++++++++++++++++++++++++++++-
 1 file changed, 58 insertions(+), 1 deletion(-)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index 64d0e85301..bfba9bccec 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -13,6 +13,7 @@
 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@HIDDEN>
 ;;; Copyright © 2020 Reza Alizadeh Majd <r.majd@HIDDEN>
 ;;; Copyright © 2021 Brice Waegeneire <brice@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -39,7 +40,9 @@
   #:use-module (gnu services networking)
   #:use-module (gnu services sound)
   #:use-module ((gnu system file-systems)
-                #:select (%elogind-file-systems file-system))
+                #:select (%control-groups
+                          %elogind-file-systems
+                          file-system))
   #:use-module (gnu system)
   #:use-module (gnu system setuid)
   #:use-module (gnu system shadow)
@@ -154,6 +157,9 @@
             gnome-keyring-configuration?
             gnome-keyring-service-type
 
+            seatd-configuration
+            seatd-service-type
+
             %desktop-services))
 
 ;;; Commentary:
@@ -1182,6 +1188,57 @@ or setting its password with passwd.")))
 (define polkit-wheel-service
   (simple-service 'polkit-wheel polkit-service-type (list polkit-wheel)))
 
+
+;;;
+;;; seatd-service-type -- minimal seat management daemon
+;;;
+
+(define-record-type* <seatd-configuration> seatd-configuration
+  make-seatd-configuration
+  seatd-configuration?
+  (seatd seatd-package (default seatd))
+  (user seatd-user (default "root"))
+  (group seatd-group (default "users"))
+  (socket seatd-socket (default "/run/seatd/socket"))
+  (loglevel seatd-loglevel (default "error")))
+
+(define (seatd-shepherd-service config)
+  (list (shepherd-service
+         (requirement '())
+         ;; TODO: once cgroups is separate dependency
+         ;; here we should depend on it rather than elogind
+         (provision '(seatd elogind))
+         (start #~(make-forkexec-constructor
+                   (list #$(file-append (seatd-package config) "/bin/seatd")
+                         "-u" #$(seatd-user config)
+                         "-g" #$(seatd-group config)
+                         "-s" #$(seatd-socket config))
+                   #:environment-variables
+                   (list (string-append "SEATD_LOGLEVEL="
+                                        #$(seatd-loglevel config)))
+                   #:log-file "/tmp/seatd.log"))
+         (stop #~(make-kill-destructor)))))
+
+(define seatd-environment
+  (match-lambda
+    (($ <seatd-configuration> _ _ _ socket)
+     `(("SEATD_SOCK" . ,socket)))))
+
+(define seatd-service-type
+  (service-type
+   (name 'seatd)
+   (extensions
+    (list
+     (service-extension session-environment-service-type
+                        seatd-environment)
+     ;; TODO: once cgroups is separate dependency
+     ;; we should not mount it here
+     (service-extension file-system-service-type
+                        (const %control-groups))
+     (service-extension shepherd-root-service-type
+                        seatd-shepherd-service)))
+   (default-value (seatd-configuration))))
+
 
 ;;;
 ;;; The default set of desktop services.
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 7/7] doc: Add desktop seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Tue, 10 Aug 2021 20:09:04 +0000
Resent-Message-ID: <handler.49969.B49969.162862611827598 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162862611827598
          (code B ref 49969); Tue, 10 Aug 2021 20:09:04 +0000
Received: (at 49969) by debbugs.gnu.org; 10 Aug 2021 20:08:38 +0000
Received: from localhost ([127.0.0.1]:60888 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDY3B-0007Ax-Mh
	for submit <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:38 -0400
Received: from mail-ej1-f54.google.com ([209.85.218.54]:46838)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDY2v-00079g-CM
 for 49969 <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:22 -0400
Received: by mail-ej1-f54.google.com with SMTP id gs8so37607329ejc.13
 for <49969 <at> debbugs.gnu.org>; Tue, 10 Aug 2021 13:08:21 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=UKAcPMRx55FH/riFmKry6ODo8gDXhvsR3WcroQQur7Y=;
 b=LmxdYY5IaXChowF2PMAB2ugRmwb/eJRMGHNENcIi7YGkuxs5xWxOLwfAqzf7nyknlc
 C4FeGOYyu3+vJLaG/aeiEhAUlipmpk+crqadQYZ7FBASBHlaXLBLpeewYVK4qI/oT7jz
 XuTz3XuX25kuP5YY0hWoNbfrqSYVIgQNnDJAglrP1n8vR6Hmo7AeNN63mlNQEZYGaNPU
 ib0/Xnje9FRYBkV1Zizeqfr53qb48nLfHhszWDSeimvqandJm5CwQPIJz/IP2c3Dn90d
 eSZ8Q7z1ocW942MgdN1Xs1x98pjEkdJGI0dhqDK1I1iOzDUIj/z4jz0dTXPi4WNsriHO
 f5Jg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=UKAcPMRx55FH/riFmKry6ODo8gDXhvsR3WcroQQur7Y=;
 b=fgQIMpaNx0lPN7gPQmgKw275pkELMdNsMCpOtsB9iybs3mt7IberJdiv0feUyTsMiV
 EfADUMg5ArNqtaXBZtcP3vBbJe2vbBNir8q3wStDBHmJkjbbCa0tSGVQiRTuy052zSWw
 2zf5cTSW18nCKcZGXbkMJdXJoyh5uEmPQd60bhjUpZREh+dFvalFqrjOV+7Rp8eBnMLE
 iJMdmc+S22VJ7WaBCiSIAArKYdm4IwKeLOPNq0gSEVmGdo6TaDRYyEQvWiq83pq2wloR
 aa5tJ3yxgAzgo/y89wzEOvHgunYJt2IjahoK6AiWUe5dC+lTidWjyj8vQz10q+eCMdu6
 KM7w==
X-Gm-Message-State: AOAM5339CiQeQxKaMO/QiKm+hlqc+HWy5V1YfUbzgGcVDEY/EMNBJ3n8
 LZ/EIHQ8x+iBhDomwFkBO8aBWmlsH21a+g==
X-Google-Smtp-Source: ABdhPJwgxxGWxR/tFtgnTOdUdGjCY9cIn1xDP4pd5Ule+z4A80/6ngCDvGGCEg5b8IFnifjgz7gSQw==
X-Received: by 2002:a17:906:9c84:: with SMTP id
 fj4mr262708ejc.356.1628626095408; 
 Tue, 10 Aug 2021 13:08:15 -0700 (PDT)
Received: from localhost.localdomain ([31.142.54.188])
 by smtp.gmail.com with ESMTPSA id qa34sm7247582ejc.120.2021.08.10.13.08.14
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 10 Aug 2021 13:08:14 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Tue, 10 Aug 2021 23:07:56 +0300
Message-Id: <20210810200756.9581-7-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* doc/guix.texi (Desktop Services): Provide documentation for
seatd-service-type and greetd-service-type including configuration
and sample usage.
---
 doc/guix.texi | 183 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 183 insertions(+)

diff --git a/doc/guix.texi b/doc/guix.texi
index 4eb5324b51..586b879608 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -94,6 +94,7 @@ Copyright @copyright{} 2021 Xinglu Chen@*
 Copyright @copyright{} 2021 Raghav Gururajan@*
 Copyright @copyright{} 2021 Domagoj Stolfa@*
 Copyright @copyright{} 2021 Hui Lu@*
+Copyright @copyright{} 2021 muradm@*
 
 Permission is granted to copy, distribute and/or modify this document
 under the terms of the GNU Free Documentation License, Version 1.3 or
@@ -19694,6 +19695,188 @@ and ``passwd'' is with the value @code{passwd}.
 @end table
 @end deftp
 
+@defvr {Scheme Variable} seatd-service-type
+A minimal seat management daemon, and a universal seat management library.
+
+Seat management takes care of mediating access to shared devices (graphics,
+input), without requiring the applications needing access to be root.
+
+In general should be used as replacement to @code{elogind-service-type}.
+
+@lisp
+(append
+  (list
+   ;; make sure seatd is running
+   (service seatd-service-type)
+
+   (service greetd-service-type
+            (greetd-configuration
+             (terminals
+              (list
+               ;; lets have terminals 1, 2 and 3 run default XDG terminal session
+               (greetd-terminal-configuration (terminal-vt "1"))
+               (greetd-terminal-configuration (terminal-vt "2"))
+               (greetd-terminal-configuration (terminal-vt "3"))
+               ;; and terminals 4, 5 and 6 plain bash terminal session
+               ;; although not so plain, just to illustrate flexibility
+               (greetd-terminal-configuration
+                (terminal-vt "4")
+                (default-session-command greetd-agreety-tty-session))
+               (greetd-terminal-configuration
+                (terminal-vt "5")
+                (default-session-command greetd-agreety-tty-session))
+               (greetd-terminal-configuration
+                (terminal-vt "6")
+                (default-session-command greetd-agreety-tty-session))))))
+
+  ;; normaly one would want %base-services
+  (modify-services %desktop-services
+    ;; seatd/greetd combination can replace these
+    (delete elogind-service-type)
+    (delete agetty-service-type)
+    (delete mingetty-service-type)))
+
+@end lisp
+
+@end defvr
+
+@deftp {Data Type} seatd-configuration
+Configuration record for the seatd daemon service.
+
+@table @asis
+@item @code{seatd} (default: @code{seatd})
+The seatd package to use.
+
+@item @code{user} (default: @samp{"root"})
+User to own the seatd socket.
+
+@item @code{group} (default: @samp{"users"})
+Group to own the seatd socket.
+
+@item @code{socket} (default: @samp{"/run/seatd/socket"})
+Where to create the seatd socket.
+
+@item @code{loglevel} (default: @samp{"error"})
+Log level to output logs. Possible values: @samp{"silent"}, @samp{"error"},
+@samp{"info"} and @samp{"debug"}.
+
+@end table
+@end deftp
+
+@defvr {Scheme Variable} greetd-service-type
+greetd is a minimal and flexible login manager daemon that makes no
+assumptions about what you want to launch.
+
+If you can run it from your shell in a TTY, greetd can start it. If it
+can be taught to speak a simple JSON-based IPC protocol, then it can
+be a greeter.
+
+@code{<greetd-service-type>} provides necessary infrastructure for
+logging in users, including:
+
+@itemize @bullet
+@item
+@code{greetd} PAM service
+
+@item
+Special variation of @code{pam-mount} to mount @code{XDG_RUNTIME_DIR}
+
+@end itemize
+
+@end defvr
+
+@deftp {Data Type} greetd-configuration
+Configuration record for the greetd service.
+
+@table @asis
+@item @code{motd}
+A file-like object containing the ``message of the day''.
+
+@item @code{allow-empty-passwords?} (default: @code{#t})
+Allow empty passwords by default so that first-time users can log in when
+the 'root' account has just been created.
+
+@item @code{terminals} (default: @code{'()})
+List of @code{<greetd-terminal-configuration>} per terminal for which
+@code{greetd} should be started.
+
+@end table
+@end deftp
+
+@deftp {Data Type} greetd-terminal-configuration
+Configuration record for per terminal greetd daemon service.
+
+@table @asis
+@item @code{greetd} (default: @code{greetd})
+The greetd package to use.
+
+@item @code{config-file-name}
+Configuration file name to use for greetd daemon. Generally, autogenerated
+derivation based on @code{terminal-vt} value.
+
+@item @code{terminal-vt} (default: @samp{"7"})
+The VT to run on. Use of a specific VT with appropriate conflict avoidance
+is recommended.
+
+@item @code{default-session-user} (default: @samp{"greeter"})
+The user to use for running the greeter.
+
+@item @code{default-session-command} (default: @code{greetd-agreety-tty-xdg-session})
+The command-line to run to start the default session.
+
+Possible values are:
+
+@itemize @bullet
+@item
+@code{greetd-agreety-tty-session} - bash terminal session
+
+@item
+@code{greetd-agreety-tty-xdg-session} - bash terminal session with XDG environment
+
+@item
+@code{greetd-agreety-session} - custom instance of terminal session
+@end itemize
+
+@end table
+@end deftp
+
+@deftp {Data Type} greetd-agreety-session
+Configuration record for the agreety greetd greeter.
+
+@table @asis
+@item @code{package} (default: @code{bash})
+The package of command.
+
+@item @code{command-bin} (default: @samp{"/bin/bash"})
+Path to binary relative to @code{package}.
+
+@item @code{command-args} (default: @code{'("-l")})
+Command arguments to pass to command.
+
+@item @code{extra-env} (default: @code{'()})
+Extra environment variables to set on login.
+
+@item @code{command-generator}
+Function that receives instance of this configuration as an argument and
+returns @code{program-file} that can be used with @code{agreety} greeter.
+
+Both @code{greetd-agreety-tty-session} and @code{greetd-agreety-tty-xdg-session}
+uses @code{greetd-agreety-session} under the hood.
+
+@end table
+@end deftp
+
+@defvr {Scheme Variable} greetd-agreety-tty-session
+Provides instance of @code{greetd-agreety-session} which starts @samp{"bash -l"}
+on login.
+@end defvr
+
+@defvr {Scheme Variable} greetd-agreety-tty-xdg-session
+Provides instance of @code{greetd-agreety-session} which starts @samp{"bash -l"}
+on login. Additionally, will set @code{XDG_SESSION_TYPE} and
+@code{XDG_RUNTIME_DIR} environment variables for session.
+@end defvr
+
 
 @node Sound Services
 @subsection Sound Services
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 6/7] gnu: desktop: Add greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Tue, 10 Aug 2021 20:09:04 +0000
Resent-Message-ID: <handler.49969.B49969.162862612227607 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162862612227607
          (code B ref 49969); Tue, 10 Aug 2021 20:09:04 +0000
Received: (at 49969) by debbugs.gnu.org; 10 Aug 2021 20:08:42 +0000
Received: from localhost ([127.0.0.1]:60890 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDY3C-0007B5-5j
	for submit <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:42 -0400
Received: from mail-ed1-f48.google.com ([209.85.208.48]:35341)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDY2t-00079W-QH
 for 49969 <at> debbugs.gnu.org; Tue, 10 Aug 2021 16:08:23 -0400
Received: by mail-ed1-f48.google.com with SMTP id cf5so32002032edb.2
 for <49969 <at> debbugs.gnu.org>; Tue, 10 Aug 2021 13:08:19 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=cAWqjx1luy/LK+TvIV8A4Hm5Au/ElAxpxaRdBE/u1pc=;
 b=0TqpGzujv8FQmG0s003Zq+1rDbGzcqnBbJmMAwR7+goeK93QJsfBNrrhYPvV9v7Gk+
 aD+G/yJY3761/yaB5HtAI6SYVawaOYazv6wk39TEEV2YtlieAVFlXtzBQ7RB/CpLaK+I
 XuF0FJ0Tg5XQ4WSnori7FxAaA+u8Of5YFcgEXWQCTMrH7aPOREuj4PcAeVJtFBQARo7r
 Cb3qsA+oAZIz1C7WVakpU6vxx99TnafeW7pgn9+FFRD+TfpCkikUu6/TB0HTIKVenv2p
 hLE84RG8DnHsLXdL/ijTuuFQkDKCJuuCXEETmXbcepHkJDD+jgKv+TBfFSP0mP3lid9R
 4bYA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=cAWqjx1luy/LK+TvIV8A4Hm5Au/ElAxpxaRdBE/u1pc=;
 b=RRoS3StvQHUiBSzdtotuL1wXp4BRdEwoqChY+V9Yk8DOr31B6z5aPukji5fGjWCbqT
 6fRRutzat6B/qmHImxMvX/++j5dW2W9jRgHQyRZrP/o4DIVNOiGNQvqVWEuxbszP8tg+
 lc9Zhe+pQMGFV7u7ig1wSzaCIcfrbhe/JtkDd41Tn3zkyVpNodif+Scf7OiILdZmKEo0
 LpgKVMPMuwUVyTY+1KRUZFQTTelSgaZiJ6g+C1Y1N0OdABVPZazpi8AE76NgiBBliGoi
 e3VNSPs2PR/dPtGzEsVUuQQ6xzRZ/GMjcJ5c3WKLQwaEFIO3/5WWkWVshRvpf89ymxgf
 8sag==
X-Gm-Message-State: AOAM531HPEUNXilRl6F+0fwRxiOcPOaKJU7KnhrFYc28TJWSGbKep69q
 CrcLfER8bTcGkqPwS9rl08BGIgmggHx1eQ==
X-Google-Smtp-Source: ABdhPJz42R/qinbZemqQUC1kxn0L9ZI92y6MqWOkqfeRyyT4+LcZscaCiG5Ey0W6ztSwlc7B+vnEow==
X-Received: by 2002:a05:6402:39a:: with SMTP id
 o26mr4695884edv.64.1628626093759; 
 Tue, 10 Aug 2021 13:08:13 -0700 (PDT)
Received: from localhost.localdomain ([31.142.54.188])
 by smtp.gmail.com with ESMTPSA id qa34sm7247582ejc.120.2021.08.10.13.08.12
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Tue, 10 Aug 2021 13:08:13 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Tue, 10 Aug 2021 23:07:55 +0300
Message-Id: <20210810200756.9581-6-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

greetd is a minimal and flexible login manager daemon that makes
no assumptions about what you want to launch.

Currently, only agreety configuration is provided.

* gnu/services/desktop.scm: Add greetd-service-type
---
 gnu/services/desktop.scm | 210 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 210 insertions(+)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index bfba9bccec..be6bb0a86f 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -49,6 +49,7 @@
   #:use-module (gnu system pam)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages admin)
+  #:use-module (gnu packages bash)
   #:use-module (gnu packages cups)
   #:use-module (gnu packages freedesktop)
   #:use-module (gnu packages gnome)
@@ -1239,6 +1240,215 @@ or setting its password with passwd.")))
                         seatd-shepherd-service)))
    (default-value (seatd-configuration))))
 
+
+;;;
+;;; greetd-service-type -- minimal and flexible login manager daemon
+;;;
+
+(define-record-type* <greetd-agreety-session>
+  greetd-agreety-session make-greetd-agreety-session
+  greetd-agreety-session?
+  (package greetd-agreety-command-package (default bash))
+  (command-bin greetd-agreety-command-bin (default "/bin/bash"))
+  (command-args greetd-agreety-command-args (default '("-l")))
+  (extra-env greetd-agreety-extra-env (default '()))
+  (command-generator greetd-agreety-command-generator))
+
+(define greetd-agreety-tty-session-command
+  (match-lambda
+    (($ <greetd-agreety-session> pkg command-bin command-args extra-env)
+     (program-file
+      "agreety-tty-session-command"
+      #~(begin
+          (use-modules (ice-9 match))
+          (let* ((abs-cmd-bin #$(file-append pkg command-bin)))
+            (for-each
+             (match-lambda ((var . val) (setenv var val)))
+             (quote (#$@extra-env)))
+            (apply execl abs-cmd-bin abs-cmd-bin
+                   (list #$@command-args))))))))
+
+(define greetd-agreety-tty-xdg-session-command
+  (match-lambda
+    (($ <greetd-agreety-session> package command-bin command-args extra-env)
+     (program-file
+      "agreety-tty-xdg-session-command"
+      #~(begin
+          (use-modules (ice-9 popen) (ice-9 rdelim) (ice-9 match))
+          (let*
+              ((username (getenv "USER"))
+               (useruid (passwd:uid (getpwuid username)))
+               (useruid (number->string useruid))
+               (abs-cmd-bin #$(file-append package command-bin)))
+            (setenv "XDG_SESSION_TYPE" "tty")
+            (setenv "XDG_RUNTIME_DIR" (string-append "/run/user/" useruid))
+            (for-each
+             (match-lambda ((var . val) (setenv var val)))
+             (quote (#$@extra-env)))
+            (apply execl abs-cmd-bin abs-cmd-bin
+                   (list #$@command-args))))))))
+
+(define greetd-agreety-tty-session
+  (greetd-agreety-session
+   (command-generator greetd-agreety-tty-session-command)))
+
+(define greetd-agreety-tty-xdg-session
+  (greetd-agreety-session
+   (command-generator greetd-agreety-tty-xdg-session-command)))
+
+(define-record-type* <greetd-terminal-configuration>
+  greetd-terminal-configuration make-greetd-terminal-configuration
+  greetd-terminal-configuration?
+  (greetd greetd-package (default greetd))
+  (config-file-name greetd-config-file-name (thunked)
+                    (default (default-config-file-name this-record)))
+  (terminal-vt greetd-terminal-vt (default "7"))
+  (default-session-user greetd-default-session-user (default "greeter"))
+  (default-session-command greetd-default-session-command
+    (default greetd-agreety-tty-xdg-session)))
+
+(define (default-config-file-name config)
+  (string-join (list "config-" (greetd-terminal-vt config) ".toml") ""))
+
+(define make-greetd-terminal-default-session-command
+  (match-lambda
+    (($ <greetd-terminal-configuration> greetd _ _ _ default-session-command)
+     (cond ((greetd-agreety-session? default-session-command)
+            (let*
+                ((generator (greetd-agreety-command-generator
+                             default-session-command))
+                 (command (apply generator (list default-session-command)))
+                 (agreety-bin (file-append greetd "/bin/agreety")))
+              (program-file
+               "agreety-command"
+               #~(execl #$agreety-bin #$agreety-bin "-c" #$command))))
+           (else (program-file "agreety-command-exit" #~(exit #f)))))))
+
+(define (make-greetd-terminal-configuration-file config)
+  (let*
+      ((config-file-name (greetd-config-file-name config))
+       (terminal-vt (greetd-terminal-vt config))
+       (default-session-user (greetd-default-session-user config))
+       (default-session-command (make-greetd-terminal-default-session-command config)))
+    (mixed-text-file
+     config-file-name
+     "[terminal]\n"
+     "vt = " terminal-vt "\n"
+     "[default_session]\n"
+     "user = " default-session-user "\n"
+     "command = " default-session-command "\n")))
+
+(define %default-motd
+  (plain-file "motd" "This is the GNU operating system, welcome!\n\n"))
+
+(define %greetd-accounts
+  (list (user-account (name "greeter") (group "wheel") (system? #t))))
+
+(define %greetd-file-systems
+  (list (file-system
+          (device "none")
+          (mount-point "/run/greetd/pam_mount")
+          (type "tmpfs")
+          (check? #f)
+          (flags '(no-suid no-dev no-exec))
+          (options "mode=0755")
+          (create-mount-point? #t))))
+
+(define %greetd-pam-mount-rules
+  `((debug (@ (enable "0")))
+    (volume (@ (sgrp "users")
+               (fstype "tmpfs")
+               (mountpoint "/run/user/%(USERUID)")
+               (options "noexec,nosuid,nodev,size=1g,mode=0700,uid=%(USERUID),gid=%(USERGID)")))
+    (logout (@ (wait "0")
+               (hup "0")
+               (term "yes")
+               (kill "no")))
+    (mkmountpoint (@ (enable "1") (remove "true")))))
+
+(define-record-type* <greetd-configuration>
+  greetd-configuration make-greetd-configuration
+  greetd-configuration?
+  (motd greetd-motd (default %default-motd))
+  (allow-empty-passwords? greetd-allow-empty-passwords? (default #t))
+  (terminals greetd-terminals (default '())))
+
+(define (make-greetd-pam-mount-conf-file config)
+  (computed-file
+   "greetd_pam_mount.conf.xml"
+   #~(begin
+       (use-modules (sxml simple))
+       (call-with-output-file #$output
+         (lambda (port)
+           (sxml->xml
+            '(*TOP*
+              (*PI* xml "version='1.0' encoding='utf-8'")
+              (pam_mount
+               #$@%greetd-pam-mount-rules
+               (pmvarrun
+                #$(file-append greetd-pam-mount
+                               "/sbin/pmvarrun -u '%(USER)' -o '%(OPERATION)'"))))
+            port))))))
+
+(define (greetd-etc-service config)
+  `(("security/greetd_pam_mount.conf.xml"
+     ,(make-greetd-pam-mount-conf-file config))))
+
+(define (greetd-pam-service config)
+  (define optional-pam-mount
+    (pam-entry
+     (control "optional")
+     (module #~(string-append #$greetd-pam-mount "/lib/security/pam_mount.so"))))
+
+  (list
+   (unix-pam-service "greetd"
+                     #:login-uid? #t
+                     #:allow-empty-passwords?
+                     (greetd-allow-empty-passwords? config)
+                     #:motd
+                     (greetd-motd config))
+   (lambda (pam)
+     (if (member (pam-service-name pam)
+                 '("login" "greetd" "su" "slim" "gdm-password"))
+         (pam-service
+          (inherit pam)
+          (auth (append (pam-service-auth pam)
+                        (list optional-pam-mount)))
+          (session (append (pam-service-session pam)
+                           (list optional-pam-mount))))
+         pam))))
+
+(define (greetd-shepherd-services config)
+  (map
+   (lambda (tc)
+     (let*
+         ((greetd-bin (file-append (greetd-package tc) "/sbin/greetd"))
+          (greetd-conf (make-greetd-terminal-configuration-file tc))
+          (greetd-vt (greetd-terminal-vt tc)))
+       (shepherd-service
+        (requirement '(user-processes host-name udev virtual-terminal))
+        (provision (list (symbol-append
+                          'term-tty
+                          (string->symbol (greetd-terminal-vt tc)))))
+        (start #~(make-forkexec-constructor
+                  (list #$greetd-bin "-c" #$greetd-conf)
+                  #:log-file
+                  (string-append "/tmp/greetd." #$greetd-vt ".log")))
+        (stop #~(make-kill-destructor)))))
+   (greetd-terminals config)))
+
+(define greetd-service-type
+  (service-type
+   (name 'greetd)
+   (extensions
+    (list
+     (service-extension account-service-type (const %greetd-accounts))
+     (service-extension file-system-service-type (const %greetd-file-systems))
+     (service-extension etc-service-type greetd-etc-service)
+     (service-extension pam-root-service-type greetd-pam-service)
+     (service-extension shepherd-root-service-type greetd-shepherd-services)))
+   (default-value (greetd-configuration))))
+
 
 ;;;
 ;;; The default set of desktop services.
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 1/7] gnu: crates-io: Add rust-enquote 1.0.3
Resent-From: Xinglu Chen <public@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 11:17:02 +0000
Resent-Message-ID: <handler.49969.B49969.16286805897553 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: muradm <mail@HIDDEN>, 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16286805897553
          (code B ref 49969); Wed, 11 Aug 2021 11:17:02 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 11:16:29 +0000
Received: from localhost ([127.0.0.1]:33576 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDmDk-0001xZ-Vt
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:16:29 -0400
Received: from h87-96-130-155.cust.a3fiber.se ([87.96.130.155]:54392
 helo=mail.yoctocell.xyz) by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <public@HIDDEN>) id 1mDmDi-0001rO-VM
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:16:28 -0400
From: Xinglu Chen <public@HIDDEN>
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=yoctocell.xyz;
 s=mail; t=1628680577;
 bh=R/tefWRzYa1TY6/k+x0ahXQORtfMGCTLVqId3yx8Ucg=;
 h=From:To:Subject:In-Reply-To:References:Date;
 b=qRBxfRLrF4gxysHXpMTZYI9nLYESwSg6q+MRG9wq3Nm3RV6qsgPEb+qxDi9am6HRx
 GEUmcq2DiyT/oiF9Ep9MkRvVGdQFE+JvF7Z4kzp7f0i2CZfxZb3IUZjNmokrQHhMI7
 AOWfQTdfw+5RhqA0zaUf6n6mNO5ScROISGrWRSU8=
In-Reply-To: <20210810200756.9581-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-1-mail@HIDDEN>
Date: Wed, 11 Aug 2021 13:16:14 +0200
Message-ID: <87o8a41bb5.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  On Tue, Aug 10 2021,
 muradm wrote: > * gnu/packages/crates-io.scm
 (rust-enquote-1): Add rust-enquote 1.0.3 > --- > gnu/packages/crates-io.scm
 | 22 ++++++++++++++++++++++ > 1 file changed, 22 insertions(+) > > diff --git
 a/gnu/packages/ [...] 
 Content analysis details:   (2.9 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
 0.4 RDNS_DYNAMIC           Delivered to internal network by host with
 dynamic-looking rDNS
 0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  On Tue, Aug 10 2021, muradm wrote: > * gnu/packages/crates-io.scm
    (rust-enquote-1): Add rust-enquote 1.0.3 > --- > gnu/packages/crates-io.scm
    | 22 ++++++++++++++++++++++ > 1 file changed, 22 insertions(+) > > diff --git
    a/gnu/packages/ [...] 
 
 Content analysis details:   (2.9 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: yoctocell.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
  0.4 RDNS_DYNAMIC           Delivered to internal network by host with
                             dynamic-looking rDNS
  1.0 BULK_RE_SUSP_NTLD      Precedence bulk and RE: from a suspicious TLD
 -1.0 MAILING_LIST_MULTI     Multiple indicators imply a widely-seen list
                             manager
  0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable

On Tue, Aug 10 2021, muradm wrote:

> * gnu/packages/crates-io.scm (rust-enquote-1): Add rust-enquote 1.0.3
> ---
>  gnu/packages/crates-io.scm | 22 ++++++++++++++++++++++
>  1 file changed, 22 insertions(+)
>
> diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
> index 24cc772ba7..b458080ca7 100644
> --- a/gnu/packages/crates-io.scm
> +++ b/gnu/packages/crates-io.scm
> @@ -18,6 +18,7 @@
>  ;;; Copyright =C2=A9 2021 Antero Mejr <antero@HIDDEN>
>  ;;; Copyright =C2=A9 2021 Maxim Cournoyer <maxim.cournoyer@HIDDEN>
>  ;;; Copyright =C2=A9 2021 Vinicius Monego <monego@HIDDEN>
> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -56972,3 +56973,24 @@ variant of this library is available separately =
as @code{im}.")
>      (description
>        "Generate Rust register maps (`struct`s) from SVD files")
>      (license (list license:expat license:asl2.0))))
> +
> +(define-public rust-enquote-1
> +  (package
> +    (name "rust-enquote")
> +    (version "1.0.3")
> +    (home-page "https://github.com/reujab/enquote")
> +    (source
> +     (origin
> +       (method url-fetch)
> +       (uri (crate-uri "enquote" version))
> +       (file-name
> +        (string-append name "-" version ".tar.gz"))
> +       (sha256
> +        (base32
> +         "0vm687r2wwgc3d3l2iqhag9wgkql6k93sdvjxvmfkdpksajpij1f"))))
> +    (build-system cargo-build-system)
> +    (synopsis
> +     "This Rust library quotes, unquotes, and unescapes strings.")

The synopsis should not end with a period.  =E2=80=9CThis=E2=80=9D doesn=E2=
=80=99t really bring
anything, maybe something like

  Rust library that quotes, unquotes, and unescapes strings

See =E2=80=9C16.4.4 Synopses and Descriptions=E2=80=9D in the manual for mo=
re details.

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQJJBAEBCAAzFiEEAVhh4yyK5+SEykIzrPUJmaL7XHkFAmETsX4VHHB1YmxpY0B5
b2N0b2NlbGwueHl6AAoJEKz1CZmi+1x5NkAP/2kUoyRibQ28hvTWHn647Oc6Pq2D
9fnR+rRkBxHOCkbqwh0u8enwClaKQb2YKIbIHR/qAw0RkJ1T8148hVl6PHUSM74M
Itz9kS5ybdirSpH0hlJoVX18ORUpwhLIYbWDo3tEr/ETPSjPGCU2k8HaI275I7y0
dM8odQmm5Ep32sHOu+t9jJQFVNzRDEVyc49l3cqyFhksuagdVmkaDfG95ZYinTRu
eq2K36ZtNNYFGryzb6F+IvcickkcGBqVOAw0HmOhQn5HqEwPj345EPlOhbqlq4JZ
+urdGsdXfli98e+Ko58h3JW0reiTUl9cdqjPJCg1ro8eJi/tZqhsjgNR9PzMl92X
awsaLCgboum6FIl41ynokBSCr+Bh/QgDcpjpMO4VJLV2rjSdnRW2MZZ4ObIGcXks
W4acMLa10TW/8Eb+QzttVI5TllqqF6Tw2eB23xYPMStZcPdvpAfGZBeKv4gRIexy
4JHOB+ZCb+aqnCScoCOz2jiAhinu3sCyGlc8wIbNNkU0uGxkPypmAMygjfGLkefb
pWNNKWvx5ngs5XU3k7sJLU9BkcApFLuZaHY/n/CSWGEFp8aJobu/WlH/BP1ao4U3
+eMtLMNggWmlbp6HQdRw7M1pOGO4ouSbXAFyQB0PvRSiZZhd6Y6sUbsZ3/pSDw4Q
IWqJL1VCUAxW7dFo
=Gf13
-----END PGP SIGNATURE-----
--=-=-=--




Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 2/7] gnu: crates-io: Add rust-pam-sys 0.5.6
Resent-From: Xinglu Chen <public@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 11:21:02 +0000
Resent-Message-ID: <handler.49969.B49969.162868083711461 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: muradm <mail@HIDDEN>, 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162868083711461
          (code B ref 49969); Wed, 11 Aug 2021 11:21:02 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 11:20:37 +0000
Received: from localhost ([127.0.0.1]:33593 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDmHk-0002yn-TP
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:20:37 -0400
Received: from h87-96-130-155.cust.a3fiber.se ([87.96.130.155]:54482
 helo=mail.yoctocell.xyz) by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <public@HIDDEN>) id 1mDmHg-0002yK-PD
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:20:33 -0400
From: Xinglu Chen <public@HIDDEN>
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=yoctocell.xyz;
 s=mail; t=1628680824;
 bh=5uK5GG+GVPS/aj0sDNitd462siiySqnnZ+0KIMSNwsE=;
 h=From:To:Subject:In-Reply-To:References:Date;
 b=rPp1dUQd+Hu9e3JgXwPx6PlGO0zy3hzDtUmW6Cu+ZOPP7KG25QcVLQE0Dacrp5DVh
 vfMnbyWAVWOWK4MFnNiq3mnric15J8X1qczMuUrH+7XG3StwZ+TjWf0rszHM/fRY4n
 +Adtn5tTONNCEmaVIQgX5+SKopZo8BmDXmRqajOc=
In-Reply-To: <20210810200756.9581-2-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-2-mail@HIDDEN>
Date: Wed, 11 Aug 2021 13:20:23 +0200
Message-ID: <87lf581b48.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  On Tue, Aug 10 2021,
 muradm wrote: > * gnu/packages/crates-io.scm
 (rust-pam-sys): Add rust-pam-sys 0.5.6 > --- > gnu/packages/crates-io.scm
 | 27 +++++++++++++++++++++++++++ > 1 file changed, 27 insertions(+) > > diff
 --git a/gnu/packag [...] 
 Content analysis details:   (2.9 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
 0.4 RDNS_DYNAMIC           Delivered to internal network by host with
 dynamic-looking rDNS
 0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  On Tue, Aug 10 2021, muradm wrote: > * gnu/packages/crates-io.scm
    (rust-pam-sys): Add rust-pam-sys 0.5.6 > --- > gnu/packages/crates-io.scm
    | 27 +++++++++++++++++++++++++++ > 1 file changed, 27 insertions(+) > > diff
    --git a/gnu/packag [...] 
 
 Content analysis details:   (2.9 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: yoctocell.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
  0.4 RDNS_DYNAMIC           Delivered to internal network by host with
                             dynamic-looking rDNS
  1.0 BULK_RE_SUSP_NTLD      Precedence bulk and RE: from a suspicious TLD
 -1.0 MAILING_LIST_MULTI     Multiple indicators imply a widely-seen list
                             manager
  0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable

On Tue, Aug 10 2021, muradm wrote:

> * gnu/packages/crates-io.scm (rust-pam-sys): Add rust-pam-sys 0.5.6
> ---
>  gnu/packages/crates-io.scm | 27 +++++++++++++++++++++++++++
>  1 file changed, 27 insertions(+)
>
> diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
> index b458080ca7..b365a2c8c0 100644
> --- a/gnu/packages/crates-io.scm
> +++ b/gnu/packages/crates-io.scm
> @@ -56,6 +56,7 @@
>    #:use-module (gnu packages image)
>    #:use-module (gnu packages jemalloc)
>    #:use-module (gnu packages llvm)
> +  #:use-module (gnu packages linux)
>    #:use-module (gnu packages multiprecision)
>    #:use-module (gnu packages nettle)
>    #:use-module (gnu packages pcre)
> @@ -56994,3 +56995,29 @@ variant of this library is available separately =
as @code{im}.")
>      (description
>       "This Rust library quotes, unquotes, and unescapes strings.")
>      (license license:unlicense)))
> +
> +(define-public rust-pam-sys-0.5.6
> +  (package
> +    (name "rust-pam-sys")
> +    (version "0.5.6")
> +    (home-page "https://github.com/1wilkens/pam-sys")
> +    (source
> +     (origin
> +       (method url-fetch)
> +       (uri (crate-uri "pam-sys" version))
> +       (file-name
> +        (string-append name "-" version ".tar.gz"))
> +       (sha256
> +        (base32
> +         "0d14501d5vybjnzxfjf96321xa5wa36x1xvf02h02zq938qmhj6d"))))
> +    (build-system cargo-build-system)
> +    (arguments
> +     `(#:cargo-inputs
> +       (("rust-libc" ,rust-libc-0.2))))
> +    (native-inputs
> +     `(("linux-pam" ,linux-pam)))
> +    (synopsis
> +     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (=
PAM).")

The synopsis should not end with a period.

> +    (description
> +     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (=
PAM).")

The description should contain one or more complete sentences, see
=E2=80=9C16.4.4 Synopses and Descriptions=E2=80=9D in the manual.

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQJJBAEBCAAzFiEEAVhh4yyK5+SEykIzrPUJmaL7XHkFAmETsncVHHB1YmxpY0B5
b2N0b2NlbGwueHl6AAoJEKz1CZmi+1x5IN4P/A9KDh2SAPQBcFGqr4NmWPW9+rqc
bWHTIWc9swbwpO67L9b0io313B7UuTDsOch7bbVzQ+avX88jS8fgGWQVgKT80YAz
zZPuJR1mTGNpVz2PFNReZz1jI3E/uL43m79GJOuOJKJoa+h4uo1ZWKw5WPYr9kCW
O2pYd14g0Xa/Iik19gYSXixNE1yw2jbawFZroZx+HoBnn+qf0RiZG5bnZszAEsE6
8ZtufSk0UU+ZgWJkryFbw1Pv/6+4uO3AAjBMDMftJ+KeBLm+3YJDDN5REyiRiY8k
yYI0gdUv522jKHb4BWvMB0jh3sOkdLB/277goyOTwZ8Ky1S3lggVRFGytNqDTsC/
qHA0V+XhUyKxHctrRfwGxLppzm/1XWrBagnjcKzXbwjcA0m10rLw0WWaOkXUtwq5
XS/hMKClb9cZ4PMCNnovWOTy5RdFalHojuh1LaCU5DApOX6Fj/pT+7iOs+qe3it9
Aqp6GemzJgCrjKvj1PI/lad4RddLT1FN0ErGDKpFX0xpiJiAfCGzHgFA3CeSS91h
VdCUJ7yhHxWOe7DQVOJQ17tk/33psDWne/YCL+hb6GiCiOYt5OJ6AXK610sfrFqq
HVDEh92Uip9EHrAdSchVeSgss+U1fRX9KgeWHXjyz3p7BYkyEgeFu8Ks++KRtub+
9ho2gRCcKViK5/b7
=uPj6
-----END PGP SIGNATURE-----
--=-=-=--




Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 3/7] gnu: freedesktop: Add greetd 0.7.0
Resent-From: Xinglu Chen <public@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 11:30:01 +0000
Resent-Message-ID: <handler.49969.B49969.162868136312292 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: muradm <mail@HIDDEN>, 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162868136312292
          (code B ref 49969); Wed, 11 Aug 2021 11:30:01 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 11:29:23 +0000
Received: from localhost ([127.0.0.1]:33607 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDmQ9-0003C6-Iw
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:29:23 -0400
Received: from h87-96-130-155.cust.a3fiber.se ([87.96.130.155]:54722
 helo=mail.yoctocell.xyz) by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <public@HIDDEN>) id 1mDmQ7-0003Bs-JB
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:29:16 -0400
From: Xinglu Chen <public@HIDDEN>
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=yoctocell.xyz;
 s=mail; t=1628681347;
 bh=sYzCCfHDUg2LuaOrjy5pVFc9N9LKSUzVud/2tgXI5vI=;
 h=From:To:Subject:In-Reply-To:References:Date;
 b=Ibe4c2y5P1KiJZ89srZGYg2xbNxKNke+AYXWvgaR4ZU/gGo+ObaqGkxHrdaqC/msw
 C+vgFHS4285nmwlFGWXGOpQ1dRw0ZQXBexkhq6BYFr6tFU/vNbOP9hSWMZtG3os7gC
 OTRCWgIEnGro6SAZaAQ8JAyZPstgPK4vI22CN64I=
In-Reply-To: <20210810200756.9581-3-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-3-mail@HIDDEN>
Date: Wed, 11 Aug 2021 13:29:06 +0200
Message-ID: <87im0c1app.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  On Tue, Aug 10 2021,
 muradm wrote: > * gnu/packages/freedesktop.scm
 (greetd): Add greetd 0.7.0 > --- > gnu/packages/freedesktop.scm | 80
 ++++++++++++++++++++++++++++++++++++
 > 1 file changed, 80 insertions(+) > > diff --git a/gnu/packa [...] 
 Content analysis details:   (2.9 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
 0.4 RDNS_DYNAMIC           Delivered to internal network by host with
 dynamic-looking rDNS
 0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  On Tue, Aug 10 2021, muradm wrote: > * gnu/packages/freedesktop.scm
    (greetd): Add greetd 0.7.0 > --- > gnu/packages/freedesktop.scm | 80 ++++++++++++++++++++++++++++++++++++
    > 1 file changed, 80 insertions(+) > > diff --git a/gnu/packa [...] 
 
 Content analysis details:   (2.9 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: yoctocell.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
  0.4 RDNS_DYNAMIC           Delivered to internal network by host with
                             dynamic-looking rDNS
  1.0 BULK_RE_SUSP_NTLD      Precedence bulk and RE: from a suspicious TLD
 -1.0 MAILING_LIST_MULTI     Multiple indicators imply a widely-seen list
                             manager
  0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable

On Tue, Aug 10 2021, muradm wrote:

> * gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
> ---
>  gnu/packages/freedesktop.scm | 80 ++++++++++++++++++++++++++++++++++++
>  1 file changed, 80 insertions(+)
>
> diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
> index 693a79c738..631d36e765 100644
> --- a/gnu/packages/freedesktop.scm
> +++ b/gnu/packages/freedesktop.scm
> @@ -24,6 +24,7 @@
>  ;;; Copyright =C2=A9 2020 Raghav Gururajan <raghavgururajan@HIDDEN>
>  ;;; Copyright =C2=A9 2021 Brendan Tildesley <mail@HIDDEN>
>  ;;; Copyright =C2=A9 2021 pineapples <guixuser6392@HIDDEN>
> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -46,6 +47,7 @@
>    #:use-module (guix packages)
>    #:use-module (guix download)
>    #:use-module (guix git-download)
> +  #:use-module (guix build-system cargo)
>    #:use-module (guix build-system cmake)
>    #:use-module (guix build-system gnu)
>    #:use-module (guix build-system meson)
> @@ -62,6 +64,7 @@
>    #:use-module (gnu packages check)
>    #:use-module (gnu packages cmake)
>    #:use-module (gnu packages compression)
> +  #:use-module (gnu packages crates-io)
>    #:use-module (gnu packages cryptsetup)
>    #:use-module (gnu packages databases)
>    #:use-module (gnu packages disk)
> @@ -862,6 +865,83 @@ that require it.  It also provides a universal seat =
management library that
>  allows applications to use whatever seat management is available.")
>      (license license:expat)))
>=20=20
> +(define-public greetd
> +  (package
> +    (name "greetd")
> +    (version "0.7.0")
> +    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
> +    (source (origin
> +              (method git-fetch)
> +              (uri (git-reference
> +                    (url home-page)
> +                    (commit version)))
> +              (file-name (git-file-name name version))
> +              (sha256
> +               (base32 "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zb=
gr3g"))))
> +    (build-system cargo-build-system)
> +    (arguments
> +     `(#:cargo-inputs
> +       (("rust-nix" ,rust-nix-0.17)
> +        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
> +        ("rust-rpassword" ,rust-rpassword-4)
> +        ("rust-users" ,rust-users-0.9)
> +        ("rust-serde" ,rust-serde-1)
> +        ("rust-serde-json" ,rust-serde-json-1)
> +        ("rust-libc" ,rust-libc-0.2)
> +        ("rust-tokio" ,rust-tokio-0.2)
> +        ("rust-getopts" ,rust-getopts-0.2)
> +        ("rust-thiserror" ,rust-thiserror-1)
> +        ("rust-async-trait" ,rust-async-trait-0.1)
> +        ("rust-enquote" ,rust-enquote-1))
> +       #:phases
> +       (modify-phases %standard-phases
> +         ;; once https://todo.sr.ht/~kennylevinsen/greetd/25
> +         ;; is solved, below patch can be removed
> +         (add-after 'unpack 'patch-terminal-switch
> +           (lambda* (#:key inputs #:allow-other-keys)
> +             (substitute* "greetd/src/server.rs"
> +               (("switch: true,")
> +                "switch: false,"))))
> +         (delete 'package)
> +         (replace 'install
> +           (lambda* (#:key inputs outputs #:allow-other-keys)
> +             (let* ((out (assoc-ref outputs "out"))
> +                    (bin (string-append out "/bin"))
> +                    (sbin (string-append out "/sbin"))
> +                    (share (string-append out "/share"))
> +                    (man (string-append share "/man"))
> +                    (man1 (string-append man "/man1"))
> +                    (man5 (string-append man "/man5"))
> +                    (man7 (string-append man "/man7"))
> +                    (release "target/release")
> +                    (greetd-bin (string-append release "/greetd"))
> +                    (agreety-bin (string-append release "/agreety")))
> +               (install-file greetd-bin sbin)
> +               (install-file agreety-bin bin)
> +               (mkdir-p man1)
> +               (mkdir-p man5)
> +               (mkdir-p man7)

No need to =E2=80=98mkdir-p=E2=80=99 if you will call =E2=80=98install-file=
=E2=80=99 on the directory.

> +               (with-directory-excursion "man"
> +                 (system "scdoc < greetd-1.scd > greetd.1")
> +                 (system "scdoc < greetd-5.scd > greetd.5")
> +                 (system "scdoc < greetd-ipc-7.scd > greetd-ipc.7")
> +                 (system "scdoc < agreety-1.scd > agreety.1"))
> +               (install-file "man/greetd.1" man1)
> +               (install-file "man/greetd.5" man5)
> +               (install-file "man/greetd-ipc.7" man7)
> +               (install-file "man/agreety.1" man1)

Why not put these four lines inside the (with-directory-excursion "man"
=E2=80=A6) form, and remove the "man" prefix?

> +               #t))))))

Phases don=E2=80=99t need to return #t once the =E2=80=98core-updates=E2=80=
=99 branch gets
merged.

> +    (native-inputs
> +     `(("linux-pam" ,linux-pam)
> +       ("scdoc" ,scdoc)))
> +    (synopsis
> +     "greetd is a minimal and flexible login manager daemon
> +that makes no assumptions about what you want to launch.")

The synosis is a bit long, maybe

  Minimal and flexible login manager daemon

> +    (description
> +     "greetd is a minimal and flexible login manager daemon
> +that makes no assumptions about what you want to launch.")

=E2=80=9Cwhat you want to launch=E2=80=9D sounds a bit vague, is it referri=
ng to desktop
environment, window manager, or something else?

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQJJBAEBCAAzFiEEAVhh4yyK5+SEykIzrPUJmaL7XHkFAmETtIMVHHB1YmxpY0B5
b2N0b2NlbGwueHl6AAoJEKz1CZmi+1x5m84P/j/tu5uMTWDt79GVQUok5vcWdBjJ
Mzrehd6oSTMG3xzV8CJQtJ02r81faxlTzNiAAc2RxYj9uzSKC4XwU8u4ZUbdSrlf
EqN4NtaM2ooC7aJZS8JNvAZWIDQUTZ6Y1oRBqvkBRrSKu/gP+cGFyBnM1rahXwrK
jgzYWhRZeTuDA3zI05mx8oBRruKqL/KqeI9YhWD6eWfluSupzqqNCMdeDeSD3xL1
5Dq7dnCfmbFiznUq+Q1IqODpgS8el7QD5Xs2CXn/yHvr7cJxOj5pIpJYfkXm9vjW
/NJCB3N0Y1SAJ+iiulB0QHMJMZvng0fkpnYspA0G0+OetabhxzyfIfXzzkqFsJ+T
KtWmbOu507AvWnfedyrvuTqtLcaNg2cS8kmcseDNoHU55/Qqvn7ajB5swFGf9JMJ
zGfLIzDiD9v9h23ulxr+huXHaE3jTwSv1Q6TdGn/z+Wov7YPvleOD+HzIyqL18Zz
9Xn1ktdoZ8NJ/jmSgAjuV2Ct6jnnUesGkkowpkwcTVpGjk5rJVG18RiUVU3sqV5M
47AwJ2O4OwdhYhDpfZSbDt1WzCYCo0ABlBBvw9STnaF5u+LsPpJYbq4Nazpa6HcV
9CtoFmCM8x66FfEX8iAC9MPJxEZxLWnjZS9ilFccvbTGDfxzEPKywirMBDwAe1Or
/Kgn71SuoHfr8XvN
=zh3E
-----END PGP SIGNATURE-----
--=-=-=--




Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 4/7] gnu: admin: Add greetd-pam-mount
Resent-From: Xinglu Chen <public@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 11:33:02 +0000
Resent-Message-ID: <handler.49969.B49969.162868153919118 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: muradm <mail@HIDDEN>, 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162868153919118
          (code B ref 49969); Wed, 11 Aug 2021 11:33:02 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 11:32:19 +0000
Received: from localhost ([127.0.0.1]:33611 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDmT4-0004y1-SP
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:32:19 -0400
Received: from h87-96-130-155.cust.a3fiber.se ([87.96.130.155]:54788
 helo=mail.yoctocell.xyz) by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <public@HIDDEN>) id 1mDmT2-0004u2-Ox
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:32:17 -0400
From: Xinglu Chen <public@HIDDEN>
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=yoctocell.xyz;
 s=mail; t=1628681529;
 bh=yZDjuFgxmiTc+q4oKXvrF/0VhgAnvZGDtp880aR+4ew=;
 h=From:To:Subject:In-Reply-To:References:Date;
 b=MB6VMAiyBA3bUcSStcEb3CrCJHkyeXGij3D5z/+uY/RJiRcyJlpiSQ5DU9WOawD0o
 3gSpTnxoXHMVDMpPjcN/Tscz82SzQxS/REAz3/rK4PQbTnsJAfFUP/aznKnqBm3yWP
 lVYCgrY10aBM0XqLdaVAshWQvj0qBXeeSn41KsCo=
In-Reply-To: <20210810200756.9581-4-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-4-mail@HIDDEN>
Date: Wed, 11 Aug 2021 13:32:08 +0200
Message-ID: <87fsvg1akn.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  On Tue, Aug 10 2021, muradm wrote: > This package inherits
 pam-mount in the way that it is compiled > specifically for use with greetd
 daemon. It uses different > configuration location and name space for storing
 data in PAM. > > greet [...] 
 Content analysis details:   (2.9 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
 0.4 RDNS_DYNAMIC           Delivered to internal network by host with
 dynamic-looking rDNS
 0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  On Tue, Aug 10 2021, muradm wrote: > This package inherits
    pam-mount in the way that it is compiled > specifically for use with greetd
    daemon. It uses different > configuration location and name space for storing
    data in PAM. > > greet [...] 
 
 Content analysis details:   (2.9 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: selfhosted.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
  0.4 RDNS_DYNAMIC           Delivered to internal network by host with
                             dynamic-looking rDNS
  1.0 BULK_RE_SUSP_NTLD      Precedence bulk and RE: from a suspicious TLD
 -1.0 MAILING_LIST_MULTI     Multiple indicators imply a widely-seen list
                             manager
  0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable

On Tue, Aug 10 2021, muradm wrote:

> This package inherits pam-mount in the way that it is compiled
> specifically for use with greetd daemon. It uses different
> configuration location and name space for storing data in PAM.
>
> greetd-pam-mount is used in configuration of greetd to provide
> auto-(mounting/unmounting) of XDG_RUNTIME_DIR in the way that
> it will not interfere with default pam-mount configuration.

It might be a good idea to put this in a comment in the code too.  :-)

> * gnu/packages/admin.scm (greetd-pam-mount): Add greetd-pam-mount
> ---
>  gnu/packages/admin.scm | 20 ++++++++++++++++++++
>  1 file changed, 20 insertions(+)
>
> diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
> index eda269f148..e805b219c5 100644
> --- a/gnu/packages/admin.scm
> +++ b/gnu/packages/admin.scm
> @@ -42,6 +42,7 @@
>  ;;; Copyright =C2=A9 2021 David Larsson <david.larsson@HIDDEN>
>  ;;; Copyright =C2=A9 2021 WinterHound <winterhound@HIDDEN>
>  ;;; Copyright =C2=A9 2021 Brice Waegeneire <brice@HIDDEN>
> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -4247,6 +4248,25 @@ supports.  It can also mount encrypted LUKS volume=
s using the password
>  supplied by the user when logging in.")
>      (license (list license:gpl2+ license:lgpl2.1+))))
>=20=20
> +(define-public greetd-pam-mount
> +  (package
> +    (inherit pam-mount)
> +    (name "greetd-pam-mount")
> +    (arguments
> +     (substitute-keyword-arguments (package-arguments pam-mount)
> +       ((#:configure-flags flags ''())
> +        `(cons* "--with-rundir=3D/run/greetd" ,flags))
> +       ((#:phases phases)
> +        `(modify-phases ,phases
> +           (add-after 'unpack 'patch-config-file-name
> +             (lambda* (#:key inputs #:allow-other-keys)
> +               (substitute* "src/pam_mount.c"
> +                 ((".*define CONFIGFILE .*$")
> +                  "#define CONFIGFILE \"/etc/security/greetd_pam_mount.c=
onf.xml\"\n")
> +                 (("pam_mount_config") "greetd_pam_mount_config")
> +                 (("pam_mount_system_authtok") "greetd_pam_mount_system_=
authtok"))))))))
> +    (synopsis "pam-mount specifically compiled for use with greetd")))

The description should also be updated.

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQJJBAEBCAAzFiEEAVhh4yyK5+SEykIzrPUJmaL7XHkFAmETtTgVHHB1YmxpY0B5
b2N0b2NlbGwueHl6AAoJEKz1CZmi+1x5jCoP/ApifqyH998ZCkKAtzBckcr1aPC3
W9R9Z2+GuDtZerAQ2/ab2H3kaHEIpThK+vWxq7DY1OeiOuiaTeon7ZZ9PADoIYN6
2Zto/OFhiL+4+WXD9uYkCdp9rVW3QnN05inrnlGcjNg/tqH80dzeQJgSlyGkbEKu
NicD/PutIr1nGFrQVxNtk5cBKfsCkzMI0eJ1bYrCP96xHRAACKl1k8wjk0USvxpn
u7eZldVkVDj/WXuGTIWh63kkqIf5LBOVkPXcMp5ehX0+XMuuFIsjKONy2QJL3IlR
bmdAt5TvcGA0JpwMBBIAJ2bPfEjwSWf5mpKZAxX4yKRld/VH54vmr/ByK6SRqo7t
bv0tGDeo8pQDTZFX3tANAx9AgblwjXkVl6wv3/EdP1ItJZXEbshweIa0FzJPxkJJ
7/7g7HXf+MTP2iwNiiFvkeHNt3e96V9YVbc47Ap1uggt6zHML+JK6DylJek7SIjO
mAS7QsBVyZm4s4Oz7B7/jg+TiIyL6n8YqRvGenqZsFmlrGya0QGXJ82cggwioQ+B
ZFGtnayd8f/FbQPYyqmRGJZ8puKvaqDES/4uQXabVbcsbwSbETTcaLCxASHPrFwO
DKFGijpylXVP06AuRypIKh/pZIevgoGJO5Sr783CnTSLZpTwlcFPiHpEqTvcMOaZ
ojRfnKaTDtsg+FtY
=4rXY
-----END PGP SIGNATURE-----
--=-=-=--




Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 5/7] gnu: desktop: Add seatd-service-type
Resent-From: Xinglu Chen <public@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 11:53:02 +0000
Resent-Message-ID: <handler.49969.B49969.162868277131439 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: muradm <mail@HIDDEN>, 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162868277131439
          (code B ref 49969); Wed, 11 Aug 2021 11:53:02 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 11:52:51 +0000
Received: from localhost ([127.0.0.1]:33686 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDmmw-0008B0-Pk
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:52:51 -0400
Received: from h87-96-130-155.cust.a3fiber.se ([87.96.130.155]:55302
 helo=mail.yoctocell.xyz) by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <public@HIDDEN>) id 1mDmmt-0008Ag-SK
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 07:52:49 -0400
From: Xinglu Chen <public@HIDDEN>
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=yoctocell.xyz;
 s=mail; t=1628682758;
 bh=mUu3ZYNbj0rEuCPTSW05wUSPGH2rYcvj/IIYe8STTEQ=;
 h=From:To:Subject:In-Reply-To:References:Date;
 b=oXIqPlW+aJnV/hCxGJPLeXCSiVzqF1wVPFnNqU7xpB0nkv/ol3wEBlLj/uAFeFkAh
 IfDR6fCww+xc3C4ck7J42PgGkDcDqaP/ubZV3fyhMpeCBd8Qn0XvGPP0Y8KnggS0Es
 h7nU/QYjNHfZAKZGmeMepVjOdZUV3iFpivSuqzL8=
In-Reply-To: <20210810200756.9581-5-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-5-mail@HIDDEN>
Date: Wed, 11 Aug 2021 13:52:37 +0200
Message-ID: <87czqk19mi.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  On Tue, Aug 10 2021, muradm wrote: > A seat management daemon,
    that does everything it needs to do. > Nothing more, nothing less. Depends
    only on libc. I =?UTF-8?Q?don=E2=80=99t?= it is necessary to put this in the commit log. 
 
 Content analysis details:   (2.9 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: yoctocell.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
  0.4 RDNS_DYNAMIC           Delivered to internal network by host with
                             dynamic-looking rDNS
  0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  On Tue, Aug 10 2021, muradm wrote: > A seat management daemon,
    that does everything it needs to do. > Nothing more, nothing less. Depends
    only on libc. I =?UTF-8?Q?don=E2=80=99t?= it is necessary to put this in the commit log. 
 
 Content analysis details:   (2.9 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: yoctocell.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
  0.4 RDNS_DYNAMIC           Delivered to internal network by host with
                             dynamic-looking rDNS
  1.0 BULK_RE_SUSP_NTLD      Precedence bulk and RE: from a suspicious TLD
 -1.0 MAILING_LIST_MULTI     Multiple indicators imply a widely-seen list
                             manager
  0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable

On Tue, Aug 10 2021, muradm wrote:

> A seat management daemon, that does everything it needs to do.
> Nothing more, nothing less. Depends only on libc.

I don=E2=80=99t it is necessary to put this in the commit log.

> * gnu/services/desktop.scm: Add seatd-service-type
> ---
>  gnu/services/desktop.scm | 59 +++++++++++++++++++++++++++++++++++++++-
>  1 file changed, 58 insertions(+), 1 deletion(-)
>
> diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
> index 64d0e85301..bfba9bccec 100644
> --- a/gnu/services/desktop.scm
> +++ b/gnu/services/desktop.scm
> @@ -13,6 +13,7 @@
>  ;;; Copyright =C2=A9 2020 Tobias Geerinckx-Rice <me@HIDDEN>
>  ;;; Copyright =C2=A9 2020 Reza Alizadeh Majd <r.majd@HIDDEN>
>  ;;; Copyright =C2=A9 2021 Brice Waegeneire <brice@HIDDEN>
> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -39,7 +40,9 @@
>    #:use-module (gnu services networking)
>    #:use-module (gnu services sound)
>    #:use-module ((gnu system file-systems)
> -                #:select (%elogind-file-systems file-system))
> +                #:select (%control-groups
> +                          %elogind-file-systems
> +                          file-system))
>    #:use-module (gnu system)
>    #:use-module (gnu system setuid)
>    #:use-module (gnu system shadow)
> @@ -154,6 +157,9 @@
>              gnome-keyring-configuration?
>              gnome-keyring-service-type
>=20=20
> +            seatd-configuration
> +            seatd-service-type
> +
>              %desktop-services))
>=20=20
>  ;;; Commentary:
> @@ -1182,6 +1188,57 @@ or setting its password with passwd.")))
>  (define polkit-wheel-service
>    (simple-service 'polkit-wheel polkit-service-type (list polkit-wheel)))
>=20=20
> +
> +;;;
> +;;; seatd-service-type -- minimal seat management daemon
> +;;;
> +
> +(define-record-type* <seatd-configuration> seatd-configuration
> +  make-seatd-configuration
> +  seatd-configuration?
> +  (seatd seatd-package (default seatd))
> +  (user seatd-user (default "root"))
> +  (group seatd-group (default "users"))
> +  (socket seatd-socket (default "/run/seatd/socket"))
> +  (loglevel seatd-loglevel (default "error")))
> +
> +(define (seatd-shepherd-service config)
> +  (list (shepherd-service
> +         (requirement '())
> +         ;; TODO: once cgroups is separate dependency
> +         ;; here we should depend on it rather than elogind
> +         (provision '(seatd elogind))
> +         (start #~(make-forkexec-constructor
> +                   (list #$(file-append (seatd-package config) "/bin/sea=
td")
> +                         "-u" #$(seatd-user config)
> +                         "-g" #$(seatd-group config)
> +                         "-s" #$(seatd-socket config))
> +                   #:environment-variables
> +                   (list (string-append "SEATD_LOGLEVEL=3D"
> +                                        #$(seatd-loglevel config)))
> +                   #:log-file "/tmp/seatd.log"))
> +         (stop #~(make-kill-destructor)))))

=E2=80=98documentation=E2=80=99 field is missing.

> +
> +(define seatd-environment
> +  (match-lambda
> +    (($ <seatd-configuration> _ _ _ socket)
> +     `(("SEATD_SOCK" . ,socket)))))
> +
> +(define seatd-service-type
> +  (service-type
> +   (name 'seatd)
> +   (extensions
> +    (list
> +     (service-extension session-environment-service-type
> +                        seatd-environment)
> +     ;; TODO: once cgroups is separate dependency
> +     ;; we should not mount it here
> +     (service-extension file-system-service-type
> +                        (const %control-groups))
> +     (service-extension shepherd-root-service-type
> +                        seatd-shepherd-service)))
> +   (default-value (seatd-configuration))))

Missing =E2=80=98description=E2=80=99 field.

It might also be a good idea to write a system test for the service, you
can look at the (gnu tests =E2=80=A6) modules for examples.

I am not familiar with how seatd works, so I can=E2=80=99t really comment t=
oo
much.  :-)

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQJJBAEBCAAzFiEEAVhh4yyK5+SEykIzrPUJmaL7XHkFAmETugUVHHB1YmxpY0B5
b2N0b2NlbGwueHl6AAoJEKz1CZmi+1x5g/sP/09zoh8FJFVKkhKxz8A12hXJ2zbK
7t7mF4zCif13GMTtGEtE5RQSTufyDg8nuI/i2cuhsFkdFNzviTUD2ch13uNyljzQ
lIsURJZAMtW4gU3WMhmI3hoXuIrlplvAroKZgruP449C7v5qR6PS21ywZdXHuRew
JC9KTylWh3neIk8Dzdj87ti15UuMOWQeGbllEJc93lPj1n3OLcKkeNjgPJ+5InOg
jWgVGx8gBTKMdayShk22U8EpxgpqvqRHDVXbGQsl8NdCS+ucR+014BpD1UI4B+ly
rv7VsNCay0/vye+xxl9oj23ftGeiXupQKFNv1jiFgxHGxm5X60c4nqg67P70MUGO
MuesnFDvqX6gySi/LCWgZ0AHNCVeJAgZUJ0TufVn7lgAYA6JpGsmsZw5ifTjgdOP
h6B8r7H45UkM+SLP9t7KzNMWIJy9HB7bdacqeFiQw7vgD8yuz/FynQDnY55bNgMM
XnStazcSkpfR+lYFQ0xIkK+6X9XCxfJZzAiGpxNVBIiEf+iRObnaBL3uqfXbsLMc
RA9+oHzFvLYqT4DBc1gmPpijSJ9GnGesTVtKaCFDZRnk8/JJvQXnog/egbUBb9VD
iG2NbUN3dCiJxQCeaSaIdTBoiNjyZQqoZ+JTjSY0cpGVz7o1SqHnVw45XqfCpdH/
Dw0sUQwHDMC5n2+X
=/VUR
-----END PGP SIGNATURE-----
--=-=-=--




Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 1/7] gnu: crates-io: Add rust-enquote 1.0.3
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 19:13:01 +0000
Resent-Message-ID: <handler.49969.B49969.162870916515894 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: Xinglu Chen <public@HIDDEN>
Cc: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162870916515894
          (code B ref 49969); Wed, 11 Aug 2021 19:13:01 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 19:12:45 +0000
Received: from localhost ([127.0.0.1]:36639 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDtef-00048I-EL
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 15:12:45 -0400
Received: from mail-ed1-f54.google.com ([209.85.208.54]:40588)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDtec-000482-77
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 15:12:44 -0400
Received: by mail-ed1-f54.google.com with SMTP id d6so5335041edt.7
 for <49969 <at> debbugs.gnu.org>; Wed, 11 Aug 2021 12:12:42 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=references:user-agent:from:to:cc:subject:in-reply-to:date
 :message-id:mime-version:content-transfer-encoding;
 bh=ss2P1dboyFntl6n7thVPAI2UZCIwm/mq6UkI3tZfcjM=;
 b=MdYQgwNjdnNo0UoJwksCGVt153ouxEdfEJENkJRioSwNByixMHudey44+mG0DfPgxb
 dv9ieSkK2kEtvn8EOYbpzEBU89HMJMKSWi3HvPFLlqzQI+9dzTC4pouPNhjs9ASYEDh/
 wfhCy/8OwkM4hJ6FOGyILkvKkJT1MAomA8/eHv/nmk/Mv4r9K4yswsHg7MT7WXC/m1V3
 xE2oTYK8dhI1b/wZmUOypIio2mbaiNluk7++RjZfURdg9OACK4+w1njzztumxvkB9qnr
 CD2MJvtb7tm/MCMbXBtsH4eNXbuEcDPO3iIsPG0kguiG2YqNf6Txo6nTYgFIkXegVXDB
 e9Eg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:references:user-agent:from:to:cc:subject
 :in-reply-to:date:message-id:mime-version:content-transfer-encoding;
 bh=ss2P1dboyFntl6n7thVPAI2UZCIwm/mq6UkI3tZfcjM=;
 b=oU9Zv7h++pySpli+MEUdJ9EXirMyS9MZxypTAccHZ8mR90nGrMnJueCIPiszu/H1FA
 4E1VLfcpN3PF4szJ42XqLKDKSotF1pndoqxYC+PlcEV5hN+6jwv2Us27coSxigLAZOYl
 bBgzYQbk9fdpIbJeBV4bkCpph+oD97rV02f6lwveuggUh/IHclvtGsra7yjuc812ahdY
 vH7SJ27kCEKwGMw+/BP+zCVjHdImULue6LHdUkAuyXyNedDhTIrtA8XQhqneqnrLzXb4
 9bQO11LBFVekMA2XOfzn7AQE1oW/r/K8+zAsEeoOt9xDGUzPh+5zxcOd4x7iZAOlabd3
 uSRQ==
X-Gm-Message-State: AOAM530MkLu+SPn3QFDhuWTjXAprG2fxV2/Bk9gdujgHRbFO5+c2MVmi
 z/qL4X766rhpA34cxr/N5IU1QGWEYHanog==
X-Google-Smtp-Source: ABdhPJy443ysiVF6/WK1ov2vpJ97uUxosLMNFjSVDMKLmdglNKKAyGoF5656WWyh7533jXvlSncmsA==
X-Received: by 2002:a05:6402:42ce:: with SMTP id
 i14mr486962edc.345.1628709155715; 
 Wed, 11 Aug 2021 12:12:35 -0700 (PDT)
Received: from nomad-lp1 ([31.142.104.228])
 by smtp.gmail.com with ESMTPSA id t19sm97929ejs.32.2021.08.11.12.12.34
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Wed, 11 Aug 2021 12:12:35 -0700 (PDT)
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-1-mail@HIDDEN> <87o8a41bb5.fsf@HIDDEN>
User-agent: mu4e 1.4.15; emacs 28.0.50
From: muradm <mail@HIDDEN>
In-reply-to: <87o8a41bb5.fsf@HIDDEN>
Date: Wed, 11 Aug 2021 22:12:31 +0300
Message-ID: <87pmuj6bj4.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: quoted-printable
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Noted for next update,
 thanks Xinglu Chen <public@HIDDEN>
 writes: > On Tue, Aug 10 2021, muradm wrote: > >> * gnu/packages/crates-io.scm
 (rust-enquote-1): Add rust-enquote >> 1.0.3 >> --- >>
 gnu/packages/crates-io.scm
 | 22 ++++++++++++++++++++++ >> 1 file changed, 2 [...] 
 Content analysis details:   (2.0 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 SPF_NONE               SPF: sender does not publish an SPF Record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
 no trust [209.85.208.54 listed in list.dnswl.org]
 -0.0 RCVD_IN_MSPIKE_H2      RBL: Average reputation (+2)
 [209.85.208.54 listed in wl.mailspike.net]
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)


Noted for next update, thanks

Xinglu Chen <public@HIDDEN> writes:

> On Tue, Aug 10 2021, muradm wrote:
>
>> * gnu/packages/crates-io.scm (rust-enquote-1): Add rust-enquote=20
>> 1.0.3
>> ---
>>  gnu/packages/crates-io.scm | 22 ++++++++++++++++++++++
>>  1 file changed, 22 insertions(+)
>>
>> diff --git a/gnu/packages/crates-io.scm=20
>> b/gnu/packages/crates-io.scm
>> index 24cc772ba7..b458080ca7 100644
>> --- a/gnu/packages/crates-io.scm
>> +++ b/gnu/packages/crates-io.scm
>> @@ -18,6 +18,7 @@
>>  ;;; Copyright =C2=A9 2021 Antero Mejr <antero@HIDDEN>
>>  ;;; Copyright =C2=A9 2021 Maxim Cournoyer=20
>>  <maxim.cournoyer@HIDDEN>
>>  ;;; Copyright =C2=A9 2021 Vinicius Monego <monego@HIDDEN>
>> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>>  ;;;
>>  ;;; This file is part of GNU Guix.
>>  ;;;
>> @@ -56972,3 +56973,24 @@ variant of this library is available=20
>> separately as @code{im}.")
>>      (description
>>        "Generate Rust register maps (`struct`s) from SVD=20
>>        files")
>>      (license (list license:expat license:asl2.0))))
>> +
>> +(define-public rust-enquote-1
>> +  (package
>> +    (name "rust-enquote")
>> +    (version "1.0.3")
>> +    (home-page "https://github.com/reujab/enquote")
>> +    (source
>> +     (origin
>> +       (method url-fetch)
>> +       (uri (crate-uri "enquote" version))
>> +       (file-name
>> +        (string-append name "-" version ".tar.gz"))
>> +       (sha256
>> +        (base32
>> +         "0vm687r2wwgc3d3l2iqhag9wgkql6k93sdvjxvmfkdpksajpij1f"))))
>> +    (build-system cargo-build-system)
>> +    (synopsis
>> +     "This Rust library quotes, unquotes, and unescapes=20
>> strings.")
>
> The synopsis should not end with a period.  =E2=80=9CThis=E2=80=9D doesn=
=E2=80=99t=20
> really bring
> anything, maybe something like
>
>   Rust library that quotes, unquotes, and unescapes strings
>
> See =E2=80=9C16.4.4 Synopses and Descriptions=E2=80=9D in the manual for =
more=20
> details.





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 2/7] gnu: crates-io: Add rust-pam-sys 0.5.6
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 19:14:02 +0000
Resent-Message-ID: <handler.49969.B49969.162870918515951 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: Xinglu Chen <public@HIDDEN>
Cc: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162870918515951
          (code B ref 49969); Wed, 11 Aug 2021 19:14:02 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 19:13:05 +0000
Received: from localhost ([127.0.0.1]:36643 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDtey-00049C-NG
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 15:13:04 -0400
Received: from mail-ed1-f49.google.com ([209.85.208.49]:42727)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDtew-00048b-Fl
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 15:13:03 -0400
Received: by mail-ed1-f49.google.com with SMTP id bo19so5313155edb.9
 for <49969 <at> debbugs.gnu.org>; Wed, 11 Aug 2021 12:13:02 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=references:user-agent:from:to:cc:subject:in-reply-to:date
 :message-id:mime-version:content-transfer-encoding;
 bh=E9FF5CMuqaSoGYirMlF1WdaiYuXcAB2ZnJUO9a5u1wk=;
 b=G4Fp7xn+Rd6ynRaLlNuWZh2w3RINQNy+Nd5Wp9CydlbMIYI/kiyq8yrbcJL8VPGWwg
 yWokZdGY369waPoKvkKZ1eX/OtUvIPU8LPV72uaSGyE4UF6JKuiP8SKseBM/I1/zrZt7
 HcOODhZBpQWjjqcgYnCgdCqOdoEEzhO2GctNRzRq2Uw8Bvs7H75bW7C+MzVT81pN0hcn
 bga/VHqXj5XLx5gadEQLyB/EEBMnI5LF1oR/O+JcNjV9pbl819vsGDXa21R2/AT+vKQ6
 E4DRJF8whg5GvwyHZJ2q9f3z2sW5t+QtaDxM0SSHvUdCLnR21FmD3ZBeDvk0U+2sXRRL
 cf0Q==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:references:user-agent:from:to:cc:subject
 :in-reply-to:date:message-id:mime-version:content-transfer-encoding;
 bh=E9FF5CMuqaSoGYirMlF1WdaiYuXcAB2ZnJUO9a5u1wk=;
 b=cMyOFh7Qw9oEu4PsMy0EUpeXDuIl/bupoZG2nRMR7nzs31ZLvNfrQvnWIbK7HhMn6Y
 dizLgKlf4eZAUGjSHBgpDreo0Fq9egmNBcVfPyvuoYXyyS16YTwuhQBTVo0qD+bhgDBE
 XDfFHD453MemhRYBdikD7vX5ZR/IcgCy5uYeZ3Rtw/ZS4+HLMV4RNt3cwcUvCCbqP3vt
 hvSnas7iBd6VJkfPDFmcWhwXCCo7ayyWxbiSVw4PXFN7m2CROeMkrQ408+5aQpk8tUVP
 TCNdXDo2vlETGj69qui93jy95epbDezBSSmS7T/ovs6HUrHPw2+c1Hk7W7OyH7AJhrwY
 7n2g==
X-Gm-Message-State: AOAM531jJqlIja1qUFB9BftanEB5VhpS9c90vKH6mfwt4syqRmPoS35u
 XhuYXLdjNcVODSIVcYM6xbdK0/Rm9gzxkw==
X-Google-Smtp-Source: ABdhPJwbzN1DDzVBUcg8Oe5TsfnioYNxnYc4XWQ3hGheYlKgA4kIcLGhs0QJiS9r5A94g+mUZD/FWg==
X-Received: by 2002:a05:6402:4cf:: with SMTP id
 n15mr489558edw.269.1628709176531; 
 Wed, 11 Aug 2021 12:12:56 -0700 (PDT)
Received: from nomad-lp1 ([31.142.104.228])
 by smtp.gmail.com with ESMTPSA id d2sm99933ejo.13.2021.08.11.12.12.55
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Wed, 11 Aug 2021 12:12:55 -0700 (PDT)
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-2-mail@HIDDEN> <87lf581b48.fsf@HIDDEN>
User-agent: mu4e 1.4.15; emacs 28.0.50
From: muradm <mail@HIDDEN>
In-reply-to: <87lf581b48.fsf@HIDDEN>
Date: Wed, 11 Aug 2021 22:12:53 +0300
Message-ID: <87mtpn6bii.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: quoted-printable
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Noted for next update,
 thanks Xinglu Chen <public@HIDDEN>
 writes: > On Tue, Aug 10 2021, muradm wrote: > >> * gnu/packages/crates-io.scm
 (rust-pam-sys): Add rust-pam-sys >> 0.5.6 >> --- >> gnu/packages/crates-io.scm
 | 27 +++++++++++++++++++++++++++ >> 1 file changed [...] 
 Content analysis details:   (2.0 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 SPF_NONE               SPF: sender does not publish an SPF Record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_MSPIKE_H2      RBL: Average reputation (+2)
 [209.85.208.49 listed in wl.mailspike.net]
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
 no trust [209.85.208.49 listed in list.dnswl.org]
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)


Noted for next update, thanks

Xinglu Chen <public@HIDDEN> writes:

> On Tue, Aug 10 2021, muradm wrote:
>
>> * gnu/packages/crates-io.scm (rust-pam-sys): Add rust-pam-sys=20
>> 0.5.6
>> ---
>>  gnu/packages/crates-io.scm | 27 +++++++++++++++++++++++++++
>>  1 file changed, 27 insertions(+)
>>
>> diff --git a/gnu/packages/crates-io.scm=20
>> b/gnu/packages/crates-io.scm
>> index b458080ca7..b365a2c8c0 100644
>> --- a/gnu/packages/crates-io.scm
>> +++ b/gnu/packages/crates-io.scm
>> @@ -56,6 +56,7 @@
>>    #:use-module (gnu packages image)
>>    #:use-module (gnu packages jemalloc)
>>    #:use-module (gnu packages llvm)
>> +  #:use-module (gnu packages linux)
>>    #:use-module (gnu packages multiprecision)
>>    #:use-module (gnu packages nettle)
>>    #:use-module (gnu packages pcre)
>> @@ -56994,3 +56995,29 @@ variant of this library is available=20
>> separately as @code{im}.")
>>      (description
>>       "This Rust library quotes, unquotes, and unescapes=20
>>       strings.")
>>      (license license:unlicense)))
>> +
>> +(define-public rust-pam-sys-0.5.6
>> +  (package
>> +    (name "rust-pam-sys")
>> +    (version "0.5.6")
>> +    (home-page "https://github.com/1wilkens/pam-sys")
>> +    (source
>> +     (origin
>> +       (method url-fetch)
>> +       (uri (crate-uri "pam-sys" version))
>> +       (file-name
>> +        (string-append name "-" version ".tar.gz"))
>> +       (sha256
>> +        (base32
>> +         "0d14501d5vybjnzxfjf96321xa5wa36x1xvf02h02zq938qmhj6d"))))
>> +    (build-system cargo-build-system)
>> +    (arguments
>> +     `(#:cargo-inputs
>> +       (("rust-libc" ,rust-libc-0.2))))
>> +    (native-inputs
>> +     `(("linux-pam" ,linux-pam)))
>> +    (synopsis
>> +     "Rust FFI wrappers for the Linux Pluggable Authentication=20
>> Modules (PAM).")
>
> The synopsis should not end with a period.
>
>> +    (description
>> +     "Rust FFI wrappers for the Linux Pluggable Authentication=20
>> Modules (PAM).")
>
> The description should contain one or more complete sentences,=20
> see
> =E2=80=9C16.4.4 Synopses and Descriptions=E2=80=9D in the manual.





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 3/7] gnu: freedesktop: Add greetd 0.7.0
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 20:11:01 +0000
Resent-Message-ID: <handler.49969.B49969.16287126596202 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: Xinglu Chen <public@HIDDEN>
Cc: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16287126596202
          (code B ref 49969); Wed, 11 Aug 2021 20:11:01 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 20:10:59 +0000
Received: from localhost ([127.0.0.1]:36697 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDuYu-0001br-TG
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 16:10:58 -0400
Received: from mail-ej1-f41.google.com ([209.85.218.41]:42815)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDuYs-0001bb-Kl
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 16:10:51 -0400
Received: by mail-ej1-f41.google.com with SMTP id e19so6635096ejs.9
 for <49969 <at> debbugs.gnu.org>; Wed, 11 Aug 2021 13:10:50 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=references:user-agent:from:to:cc:subject:in-reply-to:date
 :message-id:mime-version:content-transfer-encoding;
 bh=Zwh7Vq/uY/0clqVX5DDuKNqzLTh+8XiCTfmEcW9RryI=;
 b=Dxj7x8w/VATlM9aRvxw6PUrgLXbGNZIm9oVowVswIkr6IiauvGrkk/Ib7HCvUU/o0j
 osb7SQ20stwHmH7pdVI8OGAxSaCHFrpsCw9efx9kElFfHY/lIumlWDM6/IGq2cguvPl/
 GFEHiWFTjIoPoDwnpZThCHalEtUmz/+qlaxVN1eNNbjqxpQzsuZA14Z3qpxWopGk2n+p
 O2L2Vnt7Zlcb5JIxd1VcZWhFmjsz+gbSHJ7jTpFIZTWikgY6NPOzowKuHmh6UT0/CkSL
 HuHH8eAmgl6zscpFU001ies9Q5y6cwQ7y06+vGN1mmUOKCZfgRBBRYY2rSbcmvDuVeom
 I/Vg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:references:user-agent:from:to:cc:subject
 :in-reply-to:date:message-id:mime-version:content-transfer-encoding;
 bh=Zwh7Vq/uY/0clqVX5DDuKNqzLTh+8XiCTfmEcW9RryI=;
 b=YSSR/fHWZSxkDRfQ/mrGpy+9nES2XtzN/GxVpJJrZiijcn4nuKU/SimxH5tl/W80v3
 C22gsjawuyZxQeb6YKKyv6gYfVmRmjguSzSx3LVFXr4mmcubXGygmW3Qf0S/5srTRwMi
 kS4adY4TNDxpTdk06nj8TYcod53osFuAo35Ypg4QoO6cFPe+xugT8EE0z9dl4qpVqALC
 1u7cdSMnia+1lu3uUFlp2DuM2JZDiCuVzKjBhlaB66eGj0sUEJkoDbnl3thytgGTy+KM
 cFIVHsYUydm6F9fCtCpawQv242EJduqBxk4wvWO/hyutIizkX5i01SbL7Pw5ILlVX+ln
 gp2A==
X-Gm-Message-State: AOAM5336bFf5+ipdNBNfSB68hv18xuZHN0OrE2hI572OsZIh4/Ucm7ef
 W1Jw1ViwoVb8oLEMKa8cCaIVR3B7aAeWTA==
X-Google-Smtp-Source: ABdhPJwyB7YAqWhtd7wdMQ5Cdiw83WKrkyzFzXz2ioiNelh9dseW+Rb37zURTX/fp+pYQlrMp4gL1Q==
X-Received: by 2002:a17:906:9616:: with SMTP id
 s22mr282294ejx.136.1628712644103; 
 Wed, 11 Aug 2021 13:10:44 -0700 (PDT)
Received: from nomad-lp1 ([31.142.104.228])
 by smtp.gmail.com with ESMTPSA id ck3sm118574edb.80.2021.08.11.13.10.42
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Wed, 11 Aug 2021 13:10:43 -0700 (PDT)
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-3-mail@HIDDEN> <87im0c1app.fsf@HIDDEN>
User-agent: mu4e 1.4.15; emacs 28.0.50
From: muradm <mail@HIDDEN>
In-reply-to: <87im0c1app.fsf@HIDDEN>
Date: Wed, 11 Aug 2021 23:10:40 +0300
Message-ID: <87k0kr68u7.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: quoted-printable
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Xinglu Chen <public@HIDDEN> writes: > On Tue, Aug 10
 2021, muradm wrote: > >> * gnu/packages/freedesktop.scm (greetd): Add greetd
 0.7.0 >> --- >> gnu/packages/freedesktop.scm | 80 >>
 ++++++++++++++++++++++++++++++++++++ >> 1 file change [...] 
 Content analysis details:   (2.0 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 SPF_NONE               SPF: sender does not publish an SPF Record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
 no trust [209.85.218.41 listed in list.dnswl.org]
 -0.0 RCVD_IN_MSPIKE_H3      RBL: Good reputation (+3)
 [209.85.218.41 listed in wl.mailspike.net]
 -0.0 RCVD_IN_MSPIKE_WL      Mailspike good senders
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)


Xinglu Chen <public@HIDDEN> writes:

> On Tue, Aug 10 2021, muradm wrote:
>
>> * gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
>> ---
>>  gnu/packages/freedesktop.scm | 80=20
>>  ++++++++++++++++++++++++++++++++++++
>>  1 file changed, 80 insertions(+)
>>
>> diff --git a/gnu/packages/freedesktop.scm=20
>> b/gnu/packages/freedesktop.scm
>> index 693a79c738..631d36e765 100644
>> --- a/gnu/packages/freedesktop.scm
>> +++ b/gnu/packages/freedesktop.scm
>> @@ -24,6 +24,7 @@
>>  ;;; Copyright =C2=A9 2020 Raghav Gururajan=20
>>  <raghavgururajan@HIDDEN>
>>  ;;; Copyright =C2=A9 2021 Brendan Tildesley <mail@HIDDEN>
>>  ;;; Copyright =C2=A9 2021 pineapples <guixuser6392@HIDDEN>
>> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>>  ;;;
>>  ;;; This file is part of GNU Guix.
>>  ;;;
>> @@ -46,6 +47,7 @@
>>    #:use-module (guix packages)
>>    #:use-module (guix download)
>>    #:use-module (guix git-download)
>> +  #:use-module (guix build-system cargo)
>>    #:use-module (guix build-system cmake)
>>    #:use-module (guix build-system gnu)
>>    #:use-module (guix build-system meson)
>> @@ -62,6 +64,7 @@
>>    #:use-module (gnu packages check)
>>    #:use-module (gnu packages cmake)
>>    #:use-module (gnu packages compression)
>> +  #:use-module (gnu packages crates-io)
>>    #:use-module (gnu packages cryptsetup)
>>    #:use-module (gnu packages databases)
>>    #:use-module (gnu packages disk)
>> @@ -862,6 +865,83 @@ that require it.  It also provides a=20
>> universal seat management library that
>>  allows applications to use whatever seat management is=20
>>  available.")
>>      (license license:expat)))
>>
>> +(define-public greetd
>> +  (package
>> +    (name "greetd")
>> +    (version "0.7.0")
>> +    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
>> +    (source (origin
>> +              (method git-fetch)
>> +              (uri (git-reference
>> +                    (url home-page)
>> +                    (commit version)))
>> +              (file-name (git-file-name name version))
>> +              (sha256
>> +               (base32=20
>> "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zbgr3g"))))
>> +    (build-system cargo-build-system)
>> +    (arguments
>> +     `(#:cargo-inputs
>> +       (("rust-nix" ,rust-nix-0.17)
>> +        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
>> +        ("rust-rpassword" ,rust-rpassword-4)
>> +        ("rust-users" ,rust-users-0.9)
>> +        ("rust-serde" ,rust-serde-1)
>> +        ("rust-serde-json" ,rust-serde-json-1)
>> +        ("rust-libc" ,rust-libc-0.2)
>> +        ("rust-tokio" ,rust-tokio-0.2)
>> +        ("rust-getopts" ,rust-getopts-0.2)
>> +        ("rust-thiserror" ,rust-thiserror-1)
>> +        ("rust-async-trait" ,rust-async-trait-0.1)
>> +        ("rust-enquote" ,rust-enquote-1))
>> +       #:phases
>> +       (modify-phases %standard-phases
>> +         ;; once https://todo.sr.ht/~kennylevinsen/greetd/25
>> +         ;; is solved, below patch can be removed
>> +         (add-after 'unpack 'patch-terminal-switch
>> +           (lambda* (#:key inputs #:allow-other-keys)
>> +             (substitute* "greetd/src/server.rs"
>> +               (("switch: true,")
>> +                "switch: false,"))))
>> +         (delete 'package)
>> +         (replace 'install
>> +           (lambda* (#:key inputs outputs #:allow-other-keys)
>> +             (let* ((out (assoc-ref outputs "out"))
>> +                    (bin (string-append out "/bin"))
>> +                    (sbin (string-append out "/sbin"))
>> +                    (share (string-append out "/share"))
>> +                    (man (string-append share "/man"))
>> +                    (man1 (string-append man "/man1"))
>> +                    (man5 (string-append man "/man5"))
>> +                    (man7 (string-append man "/man7"))
>> +                    (release "target/release")
>> +                    (greetd-bin (string-append release=20
>> "/greetd"))
>> +                    (agreety-bin (string-append release=20
>> "/agreety")))
>> +               (install-file greetd-bin sbin)
>> +               (install-file agreety-bin bin)
>> +               (mkdir-p man1)
>> +               (mkdir-p man5)
>> +               (mkdir-p man7)
>
> No need to =E2=80=98mkdir-p=E2=80=99 if you will call =E2=80=98install-fi=
le=E2=80=99 on the=20
> directory.
>

Didn't work for me, without it I get:
In procedure copy-file: No such file or directory

>> +               (with-directory-excursion "man"
>> +                 (system "scdoc < greetd-1.scd > greetd.1")
>> +                 (system "scdoc < greetd-5.scd > greetd.5")
>> +                 (system "scdoc < greetd-ipc-7.scd >=20
>> greetd-ipc.7")
>> +                 (system "scdoc < agreety-1.scd > agreety.1"))
>> +               (install-file "man/greetd.1" man1)
>> +               (install-file "man/greetd.5" man5)
>> +               (install-file "man/greetd-ipc.7" man7)
>> +               (install-file "man/agreety.1" man1)
>
> Why not put these four lines inside the=20
> (with-directory-excursion "man"
> =E2=80=A6) form, and remove the "man" prefix?
>

Refactored, scdoc moved to 'build-man-pages after 'build, install=20
minimized

         (add-after 'build 'build-man-pages
           (lambda* (#:key inputs #:allow-other-keys)
             (define (scdoc-cmd doc lvl)
               (system (string-append "scdoc < "
                                      doc "-" lvl ".scd > "
                                      doc "." lvl)))
             (with-directory-excursion "man"
               (scdoc-cmd "greetd" "1")
               (scdoc-cmd "greetd" "5")
               (scdoc-cmd "greetd-ipc" "7")
               (scdoc-cmd "agreety" "1"))))
         (replace 'install
           (lambda* (#:key inputs outputs #:allow-other-keys)
             (let* ((out (assoc-ref outputs "out"))
                    (bin (string-append out "/bin"))
                    (sbin (string-append out "/sbin"))
                    (share (string-append out "/share"))
                    (man (string-append share "/man"))
                    (man1 (string-append man "/man1"))
                    (man5 (string-append man "/man5"))
                    (man7 (string-append man "/man7"))
                    (release "target/release")
                    (greetd-bin (string-append release "/greetd"))
                    (agreety-bin (string-append release=20
                    "/agreety")))
               (install-file greetd-bin sbin)
               (install-file agreety-bin bin)
               (with-directory-excursion "man"
                 (install-file "greetd.1" man1)
                 (install-file "greetd.5" man5)
                 (install-file "greetd-ipc.7" man7)
                 (install-file "agreety.1" man1))))))))

Noted for next update, thanks

>> +               #t))))))
>
> Phases don=E2=80=99t need to return #t once the =E2=80=98core-updates=E2=
=80=99 branch=20
> gets
> merged.
>

Left over, i was using this to fail package build, noted for next=20
update, thanks

>> +    (native-inputs
>> +     `(("linux-pam" ,linux-pam)
>> +       ("scdoc" ,scdoc)))
>> +    (synopsis
>> +     "greetd is a minimal and flexible login manager daemon
>> +that makes no assumptions about what you want to launch.")
>
> The synosis is a bit long, maybe
>
>   Minimal and flexible login manager daemon
>

Noted for next update, thanks

>> +    (description
>> +     "greetd is a minimal and flexible login manager daemon
>> +that makes no assumptions about what you want to launch.")
>
> =E2=80=9Cwhat you want to launch=E2=80=9D sounds a bit vague, is it refer=
ring to=20
> desktop
> environment, window manager, or something else?

As description says anything, it is from official documentation.=20
Launches any thing,
could be DE, WM, Emacs, top etc. literally any thing :)




Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 4/7] gnu: admin: Add greetd-pam-mount
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 20:16:01 +0000
Resent-Message-ID: <handler.49969.B49969.16287129559887 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: Xinglu Chen <public@HIDDEN>
Cc: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16287129559887
          (code B ref 49969); Wed, 11 Aug 2021 20:16:01 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 20:15:55 +0000
Received: from localhost ([127.0.0.1]:36706 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDudj-0002VR-JR
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 16:15:55 -0400
Received: from mail-ej1-f45.google.com ([209.85.218.45]:39451)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDudg-0002O0-M5
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 16:15:50 -0400
Received: by mail-ej1-f45.google.com with SMTP id go31so6677826ejc.6
 for <49969 <at> debbugs.gnu.org>; Wed, 11 Aug 2021 13:15:48 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=references:user-agent:from:to:cc:subject:in-reply-to:date
 :message-id:mime-version:content-transfer-encoding;
 bh=sumltW8gSHKURlHK2kAu5i3GSNa9OgwOKfbQ0SKHGCg=;
 b=XXgyusNI5gJbYNH9sG+/gChYj+aOzg8r+PYcQKmmjfRyv7uxGBvQ/hpGrPvXyUdIpL
 9U/ewl3kBJPkPfLrz58XtZVXVFCwOCEwJUTGIC7e5dmWohT0hRzeHDQ6241rJT8xOTK3
 7rylOAvn0ZMv592tAoBlf9ojbtXW99fEafr6qLY720uo4WV4bz6wEhTiwqRkGZlkgL2g
 juhGNXQAXnfc4537ikOdbvEZ7rVcYaFZvMqLf1xf0vb1/yzdcJARR8GvXvaZUvFAmj7U
 T/oHrl3bKWLdx8fJJ7EbJOTkK7TsWPaMwWMyiGjcpbbXP3u5/VH96ehb5Q6OTORavS5E
 QNTw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:references:user-agent:from:to:cc:subject
 :in-reply-to:date:message-id:mime-version:content-transfer-encoding;
 bh=sumltW8gSHKURlHK2kAu5i3GSNa9OgwOKfbQ0SKHGCg=;
 b=Pv2rQZ93N8zw/DZR5EwAgo2+8dos5fspo3Euc5tSPMnyRkYzfMKGn9MBFPFTe9f+lK
 d3r7SVmrAd3PFrO7Yr06CfMAsFkiv0kJ8vHrXbBqQ0CAJtzolv+Lkt5XqETLXde//0ZN
 uzCS+1qsbF6Gj+q77ARO8GqblemM51X+ZOLfVOZQyNujPuM27SPB9JmC6NeEvKHuBAt0
 9zeOggcHB1F4EIbGfDJv6my09HzPOexI6VezXjQtB2hpE5ummVDAlmj8aWJqoxniM9iP
 PEpAV5npN06LRQgGvsVfzIiQ5ulgfopfUFwrXpdqVM/J4T9luOKzUCyKdvw1+WeLp+A1
 0Lcg==
X-Gm-Message-State: AOAM532Uxx72YNwpIkk0PUgbhrhRoQP9EoHI24qQKLJSva/8ecgqP6kt
 4SVXA49Bryx31yxa9lb5lo/bXxeQ+HdW+w==
X-Google-Smtp-Source: ABdhPJyUIXGJ7UC+sCFTblhuj7EUXqZrwHKUptWzUz+WJMZFLFR78n4gCGFyWt50bEqi9nX9XKGvFA==
X-Received: by 2002:a17:906:6b1b:: with SMTP id
 q27mr252049ejr.169.1628712942660; 
 Wed, 11 Aug 2021 13:15:42 -0700 (PDT)
Received: from nomad-lp1 ([31.142.104.228])
 by smtp.gmail.com with ESMTPSA id dh8sm130829edb.14.2021.08.11.13.15.41
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Wed, 11 Aug 2021 13:15:42 -0700 (PDT)
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-4-mail@HIDDEN> <87fsvg1akn.fsf@HIDDEN>
User-agent: mu4e 1.4.15; emacs 28.0.50
From: muradm <mail@HIDDEN>
In-reply-to: <87fsvg1akn.fsf@HIDDEN>
Date: Wed, 11 Aug 2021 23:15:39 +0300
Message-ID: <87h7fv68lw.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: quoted-printable
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Noted for next update,
 thanks Xinglu Chen <public@HIDDEN>
 writes: > On Tue, Aug 10 2021,
 muradm wrote: > >> This package inherits pam-mount
 in the way that it is compiled >> specifically for use with greetd daemon.
 It uses different >> configuration location and nam [...] 
 Content analysis details:   (2.0 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 SPF_NONE               SPF: sender does not publish an SPF Record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: selfhosted.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
 no trust [209.85.218.45 listed in list.dnswl.org]
 -0.0 RCVD_IN_MSPIKE_H3      RBL: Good reputation (+3)
 [209.85.218.45 listed in wl.mailspike.net]
 -0.0 RCVD_IN_MSPIKE_WL      Mailspike good senders
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)


Noted for next update, thanks

Xinglu Chen <public@HIDDEN> writes:

> On Tue, Aug 10 2021, muradm wrote:
>
>> This package inherits pam-mount in the way that it is compiled
>> specifically for use with greetd daemon. It uses different
>> configuration location and name space for storing data in PAM.
>>
>> greetd-pam-mount is used in configuration of greetd to provide
>> auto-(mounting/unmounting) of XDG_RUNTIME_DIR in the way that
>> it will not interfere with default pam-mount configuration.
>
> It might be a good idea to put this in a comment in the code=20
> too.  :-)
>
>> * gnu/packages/admin.scm (greetd-pam-mount): Add=20
>> greetd-pam-mount
>> ---
>>  gnu/packages/admin.scm | 20 ++++++++++++++++++++
>>  1 file changed, 20 insertions(+)
>>
>> diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
>> index eda269f148..e805b219c5 100644
>> --- a/gnu/packages/admin.scm
>> +++ b/gnu/packages/admin.scm
>> @@ -42,6 +42,7 @@
>>  ;;; Copyright =C2=A9 2021 David Larsson=20
>>  <david.larsson@HIDDEN>
>>  ;;; Copyright =C2=A9 2021 WinterHound <winterhound@HIDDEN>
>>  ;;; Copyright =C2=A9 2021 Brice Waegeneire <brice@HIDDEN>
>> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>>  ;;;
>>  ;;; This file is part of GNU Guix.
>>  ;;;
>> @@ -4247,6 +4248,25 @@ supports.  It can also mount encrypted=20
>> LUKS volumes using the password
>>  supplied by the user when logging in.")
>>      (license (list license:gpl2+ license:lgpl2.1+))))
>>
>> +(define-public greetd-pam-mount
>> +  (package
>> +    (inherit pam-mount)
>> +    (name "greetd-pam-mount")
>> +    (arguments
>> +     (substitute-keyword-arguments (package-arguments=20
>> pam-mount)
>> +       ((#:configure-flags flags ''())
>> +        `(cons* "--with-rundir=3D/run/greetd" ,flags))
>> +       ((#:phases phases)
>> +        `(modify-phases ,phases
>> +           (add-after 'unpack 'patch-config-file-name
>> +             (lambda* (#:key inputs #:allow-other-keys)
>> +               (substitute* "src/pam_mount.c"
>> +                 ((".*define CONFIGFILE .*$")
>> +                  "#define CONFIGFILE=20
>> \"/etc/security/greetd_pam_mount.conf.xml\"\n")
>> +                 (("pam_mount_config")=20
>> "greetd_pam_mount_config")
>> +                 (("pam_mount_system_authtok")=20
>> "greetd_pam_mount_system_authtok"))))))))
>> +    (synopsis "pam-mount specifically compiled for use with=20
>> greetd")))
>
> The description should also be updated.





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 5/7] gnu: desktop: Add seatd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Wed, 11 Aug 2021 20:33:02 +0000
Resent-Message-ID: <handler.49969.B49969.162871392516824 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: Xinglu Chen <public@HIDDEN>
Cc: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162871392516824
          (code B ref 49969); Wed, 11 Aug 2021 20:33:02 +0000
Received: (at 49969) by debbugs.gnu.org; 11 Aug 2021 20:32:05 +0000
Received: from localhost ([127.0.0.1]:36737 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mDutN-0004Mo-60
	for submit <at> debbugs.gnu.org; Wed, 11 Aug 2021 16:32:05 -0400
Received: from mail-ed1-f46.google.com ([209.85.208.46]:44648)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mDutG-0004MN-QI
 for 49969 <at> debbugs.gnu.org; Wed, 11 Aug 2021 16:31:59 -0400
Received: by mail-ed1-f46.google.com with SMTP id z11so5666832edb.11
 for <49969 <at> debbugs.gnu.org>; Wed, 11 Aug 2021 13:31:54 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=references:user-agent:from:to:cc:subject:in-reply-to:date
 :message-id:mime-version:content-transfer-encoding;
 bh=cAnU0+oTEvRv+0C0+oifOooHRuVbO4IagIY/Pc6QO88=;
 b=RGSLYCP4btlc95APRE8ouMgLnBtKUL7F2Pf1vCnOlDAD+EPKw5+Ceh9cuTg3PAzBlc
 yu82vjMFtjsUd3gMTHF59e7uZ15ALWdA5ve8cS+GbiMRI9DVPjwX/LJ1HXPr5gYvEd4T
 qpSRKZTXbTsrcs8JKB4G4bGNgB7DmaoaMdof/c3QUukVgCmGhHuqf1Sv+0JiQUeoJ+hY
 lQfSGu8wrDDS9YsgnxZY+09rHv9/ZUSfKoa1rddFTqzXuqsWctGPAxPYJIK1ed41Si8/
 jYYmq4srlF7U1MK1Gl0YGo3ENj0BUOR8qcDko63iGDfK6h6V1hJ6dFVKD5/SL3btN3+I
 ph9A==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:references:user-agent:from:to:cc:subject
 :in-reply-to:date:message-id:mime-version:content-transfer-encoding;
 bh=cAnU0+oTEvRv+0C0+oifOooHRuVbO4IagIY/Pc6QO88=;
 b=i49388/Q4TjjpWwlYAsXgcYN4D8O4mMYURBAeTLK6Km/ykMPbHw+B8fa0HmwqAkZb9
 PzP8KQIgQjFimzqwZlcfORSIpYXfxrG5GC0G1FSq2IEemJLDDiNEGYVayVSK8pC9vc4j
 Hp5cZfyuWATd8Nh+V7oqixbM0XtSs7rl9LBJxDmWqSxCOc51R0pWdQKYAO+lDf8mQAIi
 3n7tmEFUeF73n9YxtjtUC7mdidtwHfBrkTryc559i3VjVeB5sHNiWW1sKtv+22pkbThS
 5J0re+QJ8Dbi47VNUTYdkCijmgPIPbWioAEgk3J0FR0d0p+7eVahEOXGXrq6xuUuCqa/
 /iAA==
X-Gm-Message-State: AOAM5328w2ED+8+8VwDDKBahtLgs3yTB3zVqB5BUc5oB2jN1XIHqa2VM
 dN462Fombg1LRW95rsNnIgAzijPJM004Tw==
X-Google-Smtp-Source: ABdhPJzJRsu4aIq80PMz/4hVTyPO2EBYU1yRZ4KVXF/Ppu9bbzcZm9zt5QqTdBErm9vOrNy2B5X0Tw==
X-Received: by 2002:a50:a69e:: with SMTP id e30mr905804edc.332.1628713908289; 
 Wed, 11 Aug 2021 13:31:48 -0700 (PDT)
Received: from nomad-lp1 ([31.142.104.228])
 by smtp.gmail.com with ESMTPSA id j13sm137126edr.89.2021.08.11.13.31.46
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Wed, 11 Aug 2021 13:31:47 -0700 (PDT)
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-5-mail@HIDDEN> <87czqk19mi.fsf@HIDDEN>
User-agent: mu4e 1.4.15; emacs 28.0.50
From: muradm <mail@HIDDEN>
In-reply-to: <87czqk19mi.fsf@HIDDEN>
Date: Wed, 11 Aug 2021 23:31:44 +0300
Message-ID: <87eeaz67v3.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: quoted-printable
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  Noted for next update, thanks Xinglu Chen <public@HIDDEN>
    writes: > On Tue, Aug 10 2021, muradm wrote: > >> A seat management daemon,
    that does everything it needs to do. >> Nothing more, nothing less. Depends
    only on libc. > > I =?UTF-8?Q?don=E2=80=99t?= it is necessary to put this [...] 
 
 Content analysis details:   (2.0 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 RCVD_IN_MSPIKE_H2      RBL: Average reputation (+2)
                             [209.85.208.46 listed in wl.mailspike.net]
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: yoctocell.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  0.0 T_SPF_TEMPERROR        SPF: test of record failed (temperror)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)


Noted for next update, thanks

Xinglu Chen <public@HIDDEN> writes:

> On Tue, Aug 10 2021, muradm wrote:
>
>> A seat management daemon, that does everything it needs to do.
>> Nothing more, nothing less. Depends only on libc.
>
> I don=E2=80=99t it is necessary to put this in the commit log.
>
>> * gnu/services/desktop.scm: Add seatd-service-type
>> ---
>>  gnu/services/desktop.scm | 59=20
>>  +++++++++++++++++++++++++++++++++++++++-
>>  1 file changed, 58 insertions(+), 1 deletion(-)
>>
>> diff --git a/gnu/services/desktop.scm=20
>> b/gnu/services/desktop.scm
>> index 64d0e85301..bfba9bccec 100644
>> --- a/gnu/services/desktop.scm
>> +++ b/gnu/services/desktop.scm
>> @@ -13,6 +13,7 @@
>>  ;;; Copyright =C2=A9 2020 Tobias Geerinckx-Rice <me@HIDDEN>
>>  ;;; Copyright =C2=A9 2020 Reza Alizadeh Majd <r.majd@HIDDEN>
>>  ;;; Copyright =C2=A9 2021 Brice Waegeneire <brice@HIDDEN>
>> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>>  ;;;
>>  ;;; This file is part of GNU Guix.
>>  ;;;
>> @@ -39,7 +40,9 @@
>>    #:use-module (gnu services networking)
>>    #:use-module (gnu services sound)
>>    #:use-module ((gnu system file-systems)
>> -                #:select (%elogind-file-systems file-system))
>> +                #:select (%control-groups
>> +                          %elogind-file-systems
>> +                          file-system))
>>    #:use-module (gnu system)
>>    #:use-module (gnu system setuid)
>>    #:use-module (gnu system shadow)
>> @@ -154,6 +157,9 @@
>>              gnome-keyring-configuration?
>>              gnome-keyring-service-type
>>
>> +            seatd-configuration
>> +            seatd-service-type
>> +
>>              %desktop-services))
>>
>>  ;;; Commentary:
>> @@ -1182,6 +1188,57 @@ or setting its password with passwd.")))
>>  (define polkit-wheel-service
>>    (simple-service 'polkit-wheel polkit-service-type (list=20
>>    polkit-wheel)))
>>
>> +
>> +;;;
>> +;;; seatd-service-type -- minimal seat management daemon
>> +;;;
>> +
>> +(define-record-type* <seatd-configuration> seatd-configuration
>> +  make-seatd-configuration
>> +  seatd-configuration?
>> +  (seatd seatd-package (default seatd))
>> +  (user seatd-user (default "root"))
>> +  (group seatd-group (default "users"))
>> +  (socket seatd-socket (default "/run/seatd/socket"))
>> +  (loglevel seatd-loglevel (default "error")))
>> +
>> +(define (seatd-shepherd-service config)
>> +  (list (shepherd-service
>> +         (requirement '())
>> +         ;; TODO: once cgroups is separate dependency
>> +         ;; here we should depend on it rather than elogind
>> +         (provision '(seatd elogind))
>> +         (start #~(make-forkexec-constructor
>> +                   (list #$(file-append (seatd-package config)=20
>> "/bin/seatd")
>> +                         "-u" #$(seatd-user config)
>> +                         "-g" #$(seatd-group config)
>> +                         "-s" #$(seatd-socket config))
>> +                   #:environment-variables
>> +                   (list (string-append "SEATD_LOGLEVEL=3D"
>> +                                        #$(seatd-loglevel=20
>> config)))
>> +                   #:log-file "/tmp/seatd.log"))
>> +         (stop #~(make-kill-destructor)))))
>
> =E2=80=98documentation=E2=80=99 field is missing.
>
>> +
>> +(define seatd-environment
>> +  (match-lambda
>> +    (($ <seatd-configuration> _ _ _ socket)
>> +     `(("SEATD_SOCK" . ,socket)))))
>> +
>> +(define seatd-service-type
>> +  (service-type
>> +   (name 'seatd)
>> +   (extensions
>> +    (list
>> +     (service-extension session-environment-service-type
>> +                        seatd-environment)
>> +     ;; TODO: once cgroups is separate dependency
>> +     ;; we should not mount it here
>> +     (service-extension file-system-service-type
>> +                        (const %control-groups))
>> +     (service-extension shepherd-root-service-type
>> +                        seatd-shepherd-service)))
>> +   (default-value (seatd-configuration))))
>
> Missing =E2=80=98description=E2=80=99 field.
>
> It might also be a good idea to write a system test for the=20
> service, you
> can look at the (gnu tests =E2=80=A6) modules for examples.
>
> I am not familiar with how seatd works, so I can=E2=80=99t really=20
> comment too
> much.  :-)





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 3/7] gnu: freedesktop: Add greetd 0.7.0
Resent-From: Xinglu Chen <public@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 11:46:01 +0000
Resent-Message-ID: <handler.49969.B49969.162876874827262 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: muradm <mail@HIDDEN>
Cc: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162876874827262
          (code B ref 49969); Thu, 12 Aug 2021 11:46:01 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 11:45:48 +0000
Received: from localhost ([127.0.0.1]:37709 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mE99a-00075Y-Cp
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 07:45:48 -0400
Received: from h87-96-130-155.cust.a3fiber.se ([87.96.130.155]:60414
 helo=mail.yoctocell.xyz) by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <public@HIDDEN>) id 1mE99U-00075H-W1
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 07:45:41 -0400
From: Xinglu Chen <public@HIDDEN>
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=yoctocell.xyz;
 s=mail; t=1628768726;
 bh=zp977slDqrzJCYy+jJPvbKt9W1xQJ66ViZFE3jORWlk=;
 h=From:To:Cc:Subject:In-Reply-To:References:Date;
 b=mvRpKDb4g8V8EVq7k/kniRe8sgfDO8haOAFZeKMsDBk5fpr4HuWAn2uJW+0KX0vIh
 VqKLH32chbUD3pwoaUTHSJA9K20PWbi7sDEWZyObmBRUW0KS9ykhLNOSO09d6ItQ1r
 g6U3ApVf5OELKpd/4g0GQqlilTm2cN10jHSrUKps=
In-Reply-To: <87k0kr68u7.fsf@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-3-mail@HIDDEN> <87im0c1app.fsf@HIDDEN>
 <87k0kr68u7.fsf@HIDDEN>
Date: Thu, 12 Aug 2021 13:45:25 +0200
Message-ID: <8735rej38q.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  On Wed, Aug 11 2021,
 muradm wrote: > Xinglu Chen <public@HIDDEN>
 writes: > >> On Tue, Aug 10 2021,
 muradm wrote: >> >>> * gnu/packages/freedesktop.scm
 (greetd): Add greetd 0.7.0 >>> --- >>> gnu/packages/freedesktop.scm | 80
 >>> [...] 
 Content analysis details:   (2.9 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
 0.4 RDNS_DYNAMIC           Delivered to internal network by host with
 dynamic-looking rDNS
 0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 2.9 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  On Wed, Aug 11 2021, muradm wrote: > Xinglu Chen <public@HIDDEN>
    writes: > >> On Tue, Aug 10 2021, muradm wrote: >> >>> * gnu/packages/freedesktop.scm
    (greetd): Add greetd 0.7.0 >>> --- >>> gnu/packages/freedesktop.scm | 80
   >>> [...] 
 
 Content analysis details:   (2.9 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
 -0.0 SPF_PASS               SPF: sender matches SPF record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: yoctocell.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
  0.5 FROM_SUSPICIOUS_NTLD   From abused NTLD
  0.4 RDNS_DYNAMIC           Delivered to internal network by host with
                             dynamic-looking rDNS
  1.0 BULK_RE_SUSP_NTLD      Precedence bulk and RE: from a suspicious TLD
 -1.0 MAILING_LIST_MULTI     Multiple indicators imply a widely-seen list
                             manager
  0.0 PDS_RDNS_DYNAMIC_FP    RDNS_DYNAMIC with FP steps

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable

On Wed, Aug 11 2021, muradm wrote:

> Xinglu Chen <public@HIDDEN> writes:
>
>> On Tue, Aug 10 2021, muradm wrote:
>>
>>> * gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
>>> ---
>>>  gnu/packages/freedesktop.scm | 80=20
>>>  ++++++++++++++++++++++++++++++++++++
>>>  1 file changed, 80 insertions(+)
>>>
>>> diff --git a/gnu/packages/freedesktop.scm=20
>>> b/gnu/packages/freedesktop.scm
>>> index 693a79c738..631d36e765 100644
>>> --- a/gnu/packages/freedesktop.scm
>>> +++ b/gnu/packages/freedesktop.scm
>>> @@ -24,6 +24,7 @@
>>>  ;;; Copyright =C2=A9 2020 Raghav Gururajan=20
>>>  <raghavgururajan@HIDDEN>
>>>  ;;; Copyright =C2=A9 2021 Brendan Tildesley <mail@HIDDEN>
>>>  ;;; Copyright =C2=A9 2021 pineapples <guixuser6392@HIDDEN>
>>> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>>>  ;;;
>>>  ;;; This file is part of GNU Guix.
>>>  ;;;
>>> @@ -46,6 +47,7 @@
>>>    #:use-module (guix packages)
>>>    #:use-module (guix download)
>>>    #:use-module (guix git-download)
>>> +  #:use-module (guix build-system cargo)
>>>    #:use-module (guix build-system cmake)
>>>    #:use-module (guix build-system gnu)
>>>    #:use-module (guix build-system meson)
>>> @@ -62,6 +64,7 @@
>>>    #:use-module (gnu packages check)
>>>    #:use-module (gnu packages cmake)
>>>    #:use-module (gnu packages compression)
>>> +  #:use-module (gnu packages crates-io)
>>>    #:use-module (gnu packages cryptsetup)
>>>    #:use-module (gnu packages databases)
>>>    #:use-module (gnu packages disk)
>>> @@ -862,6 +865,83 @@ that require it.  It also provides a=20
>>> universal seat management library that
>>>  allows applications to use whatever seat management is=20
>>>  available.")
>>>      (license license:expat)))
>>>
>>> +(define-public greetd
>>> +  (package
>>> +    (name "greetd")
>>> +    (version "0.7.0")
>>> +    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
>>> +    (source (origin
>>> +              (method git-fetch)
>>> +              (uri (git-reference
>>> +                    (url home-page)
>>> +                    (commit version)))
>>> +              (file-name (git-file-name name version))
>>> +              (sha256
>>> +               (base32=20
>>> "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zbgr3g"))))
>>> +    (build-system cargo-build-system)
>>> +    (arguments
>>> +     `(#:cargo-inputs
>>> +       (("rust-nix" ,rust-nix-0.17)
>>> +        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
>>> +        ("rust-rpassword" ,rust-rpassword-4)
>>> +        ("rust-users" ,rust-users-0.9)
>>> +        ("rust-serde" ,rust-serde-1)
>>> +        ("rust-serde-json" ,rust-serde-json-1)
>>> +        ("rust-libc" ,rust-libc-0.2)
>>> +        ("rust-tokio" ,rust-tokio-0.2)
>>> +        ("rust-getopts" ,rust-getopts-0.2)
>>> +        ("rust-thiserror" ,rust-thiserror-1)
>>> +        ("rust-async-trait" ,rust-async-trait-0.1)
>>> +        ("rust-enquote" ,rust-enquote-1))
>>> +       #:phases
>>> +       (modify-phases %standard-phases
>>> +         ;; once https://todo.sr.ht/~kennylevinsen/greetd/25
>>> +         ;; is solved, below patch can be removed
>>> +         (add-after 'unpack 'patch-terminal-switch
>>> +           (lambda* (#:key inputs #:allow-other-keys)
>>> +             (substitute* "greetd/src/server.rs"
>>> +               (("switch: true,")
>>> +                "switch: false,"))))
>>> +         (delete 'package)
>>> +         (replace 'install
>>> +           (lambda* (#:key inputs outputs #:allow-other-keys)
>>> +             (let* ((out (assoc-ref outputs "out"))
>>> +                    (bin (string-append out "/bin"))
>>> +                    (sbin (string-append out "/sbin"))
>>> +                    (share (string-append out "/share"))
>>> +                    (man (string-append share "/man"))
>>> +                    (man1 (string-append man "/man1"))
>>> +                    (man5 (string-append man "/man5"))
>>> +                    (man7 (string-append man "/man7"))
>>> +                    (release "target/release")
>>> +                    (greetd-bin (string-append release=20
>>> "/greetd"))
>>> +                    (agreety-bin (string-append release=20
>>> "/agreety")))
>>> +               (install-file greetd-bin sbin)
>>> +               (install-file agreety-bin bin)
>>> +               (mkdir-p man1)
>>> +               (mkdir-p man5)
>>> +               (mkdir-p man7)
>>
>> No need to =E2=80=98mkdir-p=E2=80=99 if you will call =E2=80=98install-f=
ile=E2=80=99 on the=20
>> directory.
>>
>
> Didn't work for me, without it I get:
> In procedure copy-file: No such file or directory

Hmm, weird, the docs for =E2=80=98install-file=E2=80=99 says

   -- Scheme Procedure: install-file FILE DIRECTORY
       Create DIRECTORY if it does not exist and copy FILE in there under
       the same name.

>>> +               (with-directory-excursion "man"
>>> +                 (system "scdoc < greetd-1.scd > greetd.1")
>>> +                 (system "scdoc < greetd-5.scd > greetd.5")
>>> +                 (system "scdoc < greetd-ipc-7.scd >=20
>>> greetd-ipc.7")
>>> +                 (system "scdoc < agreety-1.scd > agreety.1"))
>>> +               (install-file "man/greetd.1" man1)
>>> +               (install-file "man/greetd.5" man5)
>>> +               (install-file "man/greetd-ipc.7" man7)
>>> +               (install-file "man/agreety.1" man1)
>>
>> Why not put these four lines inside the=20
>> (with-directory-excursion "man"
>> =E2=80=A6) form, and remove the "man" prefix?
>>
>
> Refactored, scdoc moved to 'build-man-pages after 'build, install=20
> minimized
>
>          (add-after 'build 'build-man-pages
>            (lambda* (#:key inputs #:allow-other-keys)
>              (define (scdoc-cmd doc lvl)
>                (system (string-append "scdoc < "
>                                       doc "-" lvl ".scd > "
>                                       doc "." lvl)))
>              (with-directory-excursion "man"
>                (scdoc-cmd "greetd" "1")
>                (scdoc-cmd "greetd" "5")
>                (scdoc-cmd "greetd-ipc" "7")
>                (scdoc-cmd "agreety" "1"))))
>          (replace 'install
>            (lambda* (#:key inputs outputs #:allow-other-keys)
>              (let* ((out (assoc-ref outputs "out"))
>                     (bin (string-append out "/bin"))
>                     (sbin (string-append out "/sbin"))
>                     (share (string-append out "/share"))
>                     (man (string-append share "/man"))
>                     (man1 (string-append man "/man1"))
>                     (man5 (string-append man "/man5"))
>                     (man7 (string-append man "/man7"))
>                     (release "target/release")
>                     (greetd-bin (string-append release "/greetd"))
>                     (agreety-bin (string-append release=20
>                     "/agreety")))
>                (install-file greetd-bin sbin)
>                (install-file agreety-bin bin)
>                (with-directory-excursion "man"
>                  (install-file "greetd.1" man1)
>                  (install-file "greetd.5" man5)
>                  (install-file "greetd-ipc.7" man7)
>                  (install-file "agreety.1" man1))))))))
>
> Noted for next update, thanks

The phases LGTM!

>>> +    (description
>>> +     "greetd is a minimal and flexible login manager daemon
>>> +that makes no assumptions about what you want to launch.")
>>
>> =E2=80=9Cwhat you want to launch=E2=80=9D sounds a bit vague, is it refe=
rring to=20
>> desktop
>> environment, window manager, or something else?
>
> As description says anything, it is from official documentation.=20
> Launches any thing,
> could be DE, WM, Emacs, top etc. literally any thing :)

Ah, OK, then maybe =E2=80=9Cwhat program=E2=80=9D instead of just =E2=80=9C=
what=E2=80=9D?  Someone might
try to launch a missile with it ;-)

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQJJBAEBCAAzFiEEAVhh4yyK5+SEykIzrPUJmaL7XHkFAmEVCdUVHHB1YmxpY0B5
b2N0b2NlbGwueHl6AAoJEKz1CZmi+1x5T8gP/2WB5hJuPYczu+Svb8oiRP44rUfZ
EdCjnAlz52c80pU2ljB/gS+lr0s5bZrgzgA9DFVUP+4OpPqH4b4+CY5FqzcciXEK
cDT8uGQVuZWvoOH5jUm2gLx9tmf+TptGZrTxJkuJzuMBAg1mi8wgFYPoiEH8S3Qt
YkdxSr3bTPOk/hMgo0yL4SWiqzDlqN3btldNPbimWWT8/tNFowsKySUN96KXH5bl
L+q7JLbNsd7LzWrB95m/CXXG6L+D9dlmhQby5vlbrQeMDOFHbqfSRr2mrD00AcKP
SNHcZ/8RKLOrklBOq1wFcPQQhLZ/F5rh+WPM6CQm+Xz+NxxHAenPA+z7BihvlS/Q
ipde6EOfE6xd6p07vurAzGbhCgBpC+YpmUgTT5E5AQ6f/kWBeeXHue7zyOAqRdap
bEmIUcoEa40voKQLbQ8o/pFBgRzWfvsoM6OUnM+Nn6OCL5uY8FkYCchpBI/D34SG
r62sqgCjVg/tzVvzmtoFg5Su4S42j2+zIgV4qGdnUwpaXmfU/JzmaXm/+KLMTFs8
Q6GncMLdGXeh38jXzu7t0BqVg1p2qJ3kWwajuhUeGyLmbfWiTZt0J29l+14C4vYb
V0e1woHuCIcpbzfpy3tm5GCotct2ut2ufayrDqXzgxZh7XyR1Ao/8EX/e4anCT0s
g5+FfpBxyAvvTpFe
=FG85
-----END PGP SIGNATURE-----
--=-=-=--




Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v2 3/7] gnu: freedesktop: Add greetd 0.7.0
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 19:53:02 +0000
Resent-Message-ID: <handler.49969.B49969.162879793830575 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: Xinglu Chen <public@HIDDEN>
Cc: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162879793830575
          (code B ref 49969); Thu, 12 Aug 2021 19:53:02 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 19:52:18 +0000
Received: from localhost ([127.0.0.1]:39947 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEGkO-0007wu-0L
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 15:52:18 -0400
Received: from mail-ed1-f46.google.com ([209.85.208.46]:35448)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEGkH-0007wL-Ql
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 15:52:11 -0400
Received: by mail-ed1-f46.google.com with SMTP id dj8so3635926edb.2
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 12:52:05 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=references:user-agent:from:to:cc:subject:in-reply-to:date
 :message-id:mime-version:content-transfer-encoding;
 bh=nmjG7UmE7PRsOXZWDAkSICjL8SvES14xpX5bJ0GN+RU=;
 b=f5cYdaVJJ94W+uXok/kx8rDZTpGw1ULJy1ARCabEgJSJy9N/S6HQHL/774C7Kum6Zc
 QTNFUSL8at1ln3G0vCSyL1eM9H1j2N9ZTWX/1KqDOP64LMps9fQNv0zju+IShgqKYXLy
 JKYZtsw5OYGCMcakjmMd+lEFgaDLkgKsxcO4qMI8KKvnaiRAnf6rwL91Q3QtMIV+VPOx
 XUfUpV/cJvx3KfDDAJa8JhLl62AbNbwtw3oTHnCW0BIOtYnW8MLlrBsDG9zeoimIVEOj
 8rplPiwjtpL5l9FJFtWF0kVKoxhqXOOEK0pvqLDHImGLAzrdA/lj/z3U9aX8avop3nex
 0CYg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:references:user-agent:from:to:cc:subject
 :in-reply-to:date:message-id:mime-version:content-transfer-encoding;
 bh=nmjG7UmE7PRsOXZWDAkSICjL8SvES14xpX5bJ0GN+RU=;
 b=LynfrfeaBMBmfy8mzvJ8NqgemarrQCp3Nl6vkuT9kVT9sYDvcy4hongi3dO/MyrA3t
 nhaYyCZnGrTU6eweT2qg0towYFSiEXRtu0MLtGKiJqa4PLpkd9TMGS98jlO2+jgs/DlN
 VLsQhWzi1f/9kSAuMd/Ka+KLnQtvL9mIhiiJjmj6SnIoYHzXtqm8yISpdKCfo9R221Oh
 tKEx34qtW41XqR3JhbsB5gEpYFKelaCR730F8M8A+UKdKwCmdVFhU6dCdkwECbdVt1G/
 F/660SMZYBbFwBPeJ3T0/j6v+DYvRBgYc6x/+q/REtMqMWLqvXYGkb1r0zPTCkZOwulg
 DZUQ==
X-Gm-Message-State: AOAM533BgSVZN//Vr17/FrPFtgIab/1MCo9eimvZuD8pEpDgBaVKlD/P
 gardcz+gLDNxaZQTXHw+HMIdDtOLApw2Jw==
X-Google-Smtp-Source: ABdhPJxwPIF7DUpPOOU9tqekFudo3cEaKRt6hQiCO76EJ76S0cbpa0iRIoJOQmup9+co0sbN2ag6NQ==
X-Received: by 2002:aa7:ccc1:: with SMTP id y1mr7446227edt.321.1628797918670; 
 Thu, 12 Aug 2021 12:51:58 -0700 (PDT)
Received: from nomad-lp1 ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id jy17sm1171747ejc.112.2021.08.12.12.51.57
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 12:51:58 -0700 (PDT)
References: <20210810193626.9186-1-mail@HIDDEN>
 <20210810200756.9581-3-mail@HIDDEN> <87im0c1app.fsf@HIDDEN>
 <87k0kr68u7.fsf@HIDDEN> <8735rej38q.fsf@HIDDEN>
User-agent: mu4e 1.4.15; emacs 28.0.50
From: muradm <mail@HIDDEN>
In-reply-to: <8735rej38q.fsf@HIDDEN>
Date: Thu, 12 Aug 2021 22:51:55 +0300
Message-ID: <87bl62qw4k.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: quoted-printable
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Xinglu Chen <public@HIDDEN> writes: > On Wed, Aug 11
 2021, muradm wrote: > >> Xinglu Chen <public@HIDDEN> writes: >> >>>
 On Tue, Aug 10 2021, muradm wrote: >>> >>>> * gnu/packages/freedesktop.scm
 (greetd): Add greetd 0.7.0 >>>> - [...] 
 Content analysis details:   (2.0 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 SPF_NONE               SPF: sender does not publish an SPF Record
 2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
 [URI: yoctocell.xyz (xyz)]
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_MSPIKE_H2      RBL: Average reputation (+2)
 [209.85.208.46 listed in wl.mailspike.net]
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
 no trust [209.85.208.46 listed in list.dnswl.org]
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)


Xinglu Chen <public@HIDDEN> writes:

> On Wed, Aug 11 2021, muradm wrote:
>
>> Xinglu Chen <public@HIDDEN> writes:
>>
>>> On Tue, Aug 10 2021, muradm wrote:
>>>
>>>> * gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
>>>> ---
>>>>  gnu/packages/freedesktop.scm | 80
>>>>  ++++++++++++++++++++++++++++++++++++
>>>>  1 file changed, 80 insertions(+)
>>>>
>>>> diff --git a/gnu/packages/freedesktop.scm
>>>> b/gnu/packages/freedesktop.scm
>>>> index 693a79c738..631d36e765 100644
>>>> --- a/gnu/packages/freedesktop.scm
>>>> +++ b/gnu/packages/freedesktop.scm
>>>> @@ -24,6 +24,7 @@
>>>>  ;;; Copyright =C2=A9 2020 Raghav Gururajan
>>>>  <raghavgururajan@HIDDEN>
>>>>  ;;; Copyright =C2=A9 2021 Brendan Tildesley <mail@HIDDEN>
>>>>  ;;; Copyright =C2=A9 2021 pineapples=20
>>>>  <guixuser6392@HIDDEN>
>>>> +;;; Copyright =C2=A9 2021 muradm <mail@HIDDEN>
>>>>  ;;;
>>>>  ;;; This file is part of GNU Guix.
>>>>  ;;;
>>>> @@ -46,6 +47,7 @@
>>>>    #:use-module (guix packages)
>>>>    #:use-module (guix download)
>>>>    #:use-module (guix git-download)
>>>> +  #:use-module (guix build-system cargo)
>>>>    #:use-module (guix build-system cmake)
>>>>    #:use-module (guix build-system gnu)
>>>>    #:use-module (guix build-system meson)
>>>> @@ -62,6 +64,7 @@
>>>>    #:use-module (gnu packages check)
>>>>    #:use-module (gnu packages cmake)
>>>>    #:use-module (gnu packages compression)
>>>> +  #:use-module (gnu packages crates-io)
>>>>    #:use-module (gnu packages cryptsetup)
>>>>    #:use-module (gnu packages databases)
>>>>    #:use-module (gnu packages disk)
>>>> @@ -862,6 +865,83 @@ that require it.  It also provides a
>>>> universal seat management library that
>>>>  allows applications to use whatever seat management is
>>>>  available.")
>>>>      (license license:expat)))
>>>>
>>>> +(define-public greetd
>>>> +  (package
>>>> +    (name "greetd")
>>>> +    (version "0.7.0")
>>>> +    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
>>>> +    (source (origin
>>>> +              (method git-fetch)
>>>> +              (uri (git-reference
>>>> +                    (url home-page)
>>>> +                    (commit version)))
>>>> +              (file-name (git-file-name name version))
>>>> +              (sha256
>>>> +               (base32
>>>> "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zbgr3g"))))
>>>> +    (build-system cargo-build-system)
>>>> +    (arguments
>>>> +     `(#:cargo-inputs
>>>> +       (("rust-nix" ,rust-nix-0.17)
>>>> +        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
>>>> +        ("rust-rpassword" ,rust-rpassword-4)
>>>> +        ("rust-users" ,rust-users-0.9)
>>>> +        ("rust-serde" ,rust-serde-1)
>>>> +        ("rust-serde-json" ,rust-serde-json-1)
>>>> +        ("rust-libc" ,rust-libc-0.2)
>>>> +        ("rust-tokio" ,rust-tokio-0.2)
>>>> +        ("rust-getopts" ,rust-getopts-0.2)
>>>> +        ("rust-thiserror" ,rust-thiserror-1)
>>>> +        ("rust-async-trait" ,rust-async-trait-0.1)
>>>> +        ("rust-enquote" ,rust-enquote-1))
>>>> +       #:phases
>>>> +       (modify-phases %standard-phases
>>>> +         ;; once https://todo.sr.ht/~kennylevinsen/greetd/25
>>>> +         ;; is solved, below patch can be removed
>>>> +         (add-after 'unpack 'patch-terminal-switch
>>>> +           (lambda* (#:key inputs #:allow-other-keys)
>>>> +             (substitute* "greetd/src/server.rs"
>>>> +               (("switch: true,")
>>>> +                "switch: false,"))))
>>>> +         (delete 'package)
>>>> +         (replace 'install
>>>> +           (lambda* (#:key inputs outputs=20
>>>> #:allow-other-keys)
>>>> +             (let* ((out (assoc-ref outputs "out"))
>>>> +                    (bin (string-append out "/bin"))
>>>> +                    (sbin (string-append out "/sbin"))
>>>> +                    (share (string-append out "/share"))
>>>> +                    (man (string-append share "/man"))
>>>> +                    (man1 (string-append man "/man1"))
>>>> +                    (man5 (string-append man "/man5"))
>>>> +                    (man7 (string-append man "/man7"))
>>>> +                    (release "target/release")
>>>> +                    (greetd-bin (string-append release
>>>> "/greetd"))
>>>> +                    (agreety-bin (string-append release
>>>> "/agreety")))
>>>> +               (install-file greetd-bin sbin)
>>>> +               (install-file agreety-bin bin)
>>>> +               (mkdir-p man1)
>>>> +               (mkdir-p man5)
>>>> +               (mkdir-p man7)
>>>
>>> No need to =E2=80=98mkdir-p=E2=80=99 if you will call =E2=80=98install-=
file=E2=80=99 on the
>>> directory.
>>>
>>
>> Didn't work for me, without it I get:
>> In procedure copy-file: No such file or directory
>
> Hmm, weird, the docs for =E2=80=98install-file=E2=80=99 says
>
>    -- Scheme Procedure: install-file FILE DIRECTORY
>        Create DIRECTORY if it does not exist and copy FILE in=20
>        there under
>        the same name.
>

Yeah, you are right, there was wrong excursions when i tested,
now works as expected, i think i just forgot to delete this=20
comment,
thanks.

>>>> +               (with-directory-excursion "man"
>>>> +                 (system "scdoc < greetd-1.scd > greetd.1")
>>>> +                 (system "scdoc < greetd-5.scd > greetd.5")
>>>> +                 (system "scdoc < greetd-ipc-7.scd >
>>>> greetd-ipc.7")
>>>> +                 (system "scdoc < agreety-1.scd >=20
>>>> agreety.1"))
>>>> +               (install-file "man/greetd.1" man1)
>>>> +               (install-file "man/greetd.5" man5)
>>>> +               (install-file "man/greetd-ipc.7" man7)
>>>> +               (install-file "man/agreety.1" man1)
>>>
>>> Why not put these four lines inside the
>>> (with-directory-excursion "man"
>>> =E2=80=A6) form, and remove the "man" prefix?
>>>
>>
>> Refactored, scdoc moved to 'build-man-pages after 'build,=20
>> install
>> minimized
>>
>>          (add-after 'build 'build-man-pages
>>            (lambda* (#:key inputs #:allow-other-keys)
>>              (define (scdoc-cmd doc lvl)
>>                (system (string-append "scdoc < "
>>                                       doc "-" lvl ".scd > "
>>                                       doc "." lvl)))
>>              (with-directory-excursion "man"
>>                (scdoc-cmd "greetd" "1")
>>                (scdoc-cmd "greetd" "5")
>>                (scdoc-cmd "greetd-ipc" "7")
>>                (scdoc-cmd "agreety" "1"))))
>>          (replace 'install
>>            (lambda* (#:key inputs outputs #:allow-other-keys)
>>              (let* ((out (assoc-ref outputs "out"))
>>                     (bin (string-append out "/bin"))
>>                     (sbin (string-append out "/sbin"))
>>                     (share (string-append out "/share"))
>>                     (man (string-append share "/man"))
>>                     (man1 (string-append man "/man1"))
>>                     (man5 (string-append man "/man5"))
>>                     (man7 (string-append man "/man7"))
>>                     (release "target/release")
>>                     (greetd-bin (string-append release=20
>>                     "/greetd"))
>>                     (agreety-bin (string-append release
>>                     "/agreety")))
>>                (install-file greetd-bin sbin)
>>                (install-file agreety-bin bin)
>>                (with-directory-excursion "man"
>>                  (install-file "greetd.1" man1)
>>                  (install-file "greetd.5" man5)
>>                  (install-file "greetd-ipc.7" man7)
>>                  (install-file "agreety.1" man1))))))))
>>
>> Noted for next update, thanks
>
> The phases LGTM!
>
>>>> +    (description
>>>> +     "greetd is a minimal and flexible login manager daemon
>>>> +that makes no assumptions about what you want to launch.")
>>>
>>> =E2=80=9Cwhat you want to launch=E2=80=9D sounds a bit vague, is it ref=
erring=20
>>> to
>>> desktop
>>> environment, window manager, or something else?
>>
>> As description says anything, it is from official=20
>> documentation.
>> Launches any thing,
>> could be DE, WM, Emacs, top etc. literally any thing :)
>
> Ah, OK, then maybe =E2=80=9Cwhat program=E2=80=9D instead of just =E2=80=
=9Cwhat=E2=80=9D?=20
> Someone might
> try to launch a missile with it ;-)

/gnu/store/....-missiles-1.01/bin/launch why not? :D

in next update, i will try to put some more sentences from greetd
description, it might be more useful may be.




Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 00/10] gnu: desktop: Add seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 21:57:02 +0000
Resent-Message-ID: <handler.49969.B49969.162880537510163 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880537510163
          (code B ref 49969); Thu, 12 Aug 2021 21:57:02 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 21:56:15 +0000
Received: from localhost ([127.0.0.1]:40014 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIgR-0002dr-6o
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 17:56:15 -0400
Received: from mail-ej1-f53.google.com ([209.85.218.53]:45764)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIgO-0002db-Kb
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 17:56:13 -0400
Received: by mail-ej1-f53.google.com with SMTP id qk33so14361664ejc.12
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 14:56:12 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=jbYP/8V2ps6VBWu0DNAJvSe2+7kqeptcoLM5geqo4rQ=;
 b=aJTSc7Nqh0kOvDEP1OBE2RjgBer0Wyxk1UCCxR0fZ81aHsBHO3pz+/SONSKu4EZ9SL
 uKx3GdfMjbhGEt+jUPfPSaYf7iISdsarVY6OKZUVczYSxhYo5y5t2q03dtr7BE99jWpQ
 cd+WO7TYBklWBNJGLVi1izdrAgMCARpxZjb16zG+urF/Y5boysx2hXoG1V0YYvMV39nh
 JLUForuw6j4FKPh3XiG3zFU0WFx5rQBJhpR3w7QnDrbQOW4DMc7G7fMs8CtEn4zDguFN
 w1O9eTdXMNDcgsDdid9YDY7uswCPcwmh9z8zRszVryEONHEqu8oz/1qJr2Fv9uEf6AVv
 q0cw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=jbYP/8V2ps6VBWu0DNAJvSe2+7kqeptcoLM5geqo4rQ=;
 b=RYAf+txWcbM5Tp8hyCdWrQ4mnRT9mOYuWsAQnPN3r+mXIKUO/o0QRvYU2Qm3YTugj1
 ybj59f34l+WMvkfNCUAgAsIqZyiLe4cny7p489HUTLfzhwh+WH4bCy7LpcdQT6OZMWWt
 HJMUQwHjf7tr/p2V3oLRUKf9s5zPjcx5iM3mJXRZY6qkgCZxWo3YdCfki7X2Z6EfdufB
 +gPfmot6q1v6E5ckgzmLqCOiq5V1imeON2EKQNN+fafbukg3OT56S8JHGDnJBY9jyMuQ
 QOF+pkOh2oNZdkpedyGFliK+sgSgFgEAGEdKxHexKuVwU8phdTkYW50t0fxLlTdjXKC/
 xUNg==
X-Gm-Message-State: AOAM532ePJabxWvatjhsxI7znPkCyAyyALGk9oN/D5ykH9jBo0UwO7QN
 PH6UO8vKMLqgs0xBHe+j6nyUzwxrAcQ0WQ==
X-Google-Smtp-Source: ABdhPJw75yhv7Cp25cOattpKYWja1PNROMp88cfwLuPFXrX6+AGW0ZMwfzBk8/3RLjsfx2N4ajhvlg==
X-Received: by 2002:a17:907:16a1:: with SMTP id
 hc33mr5674318ejc.536.1628805366341; 
 Thu, 12 Aug 2021 14:56:06 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o17sm1251768ejb.84.2021.08.12.14.56.04
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 14:56:05 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 00:55:57 +0300
Message-Id: <20210812215557.23835-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

This patch series introduces two new services;

 - seatd-service-type: simple seat management daemon
 - greetd-service-type: simple login daemon

Both services are very minimalistic in nature. Simple seatd daemon
could be said as replacement for elogind-service-type. greetd daemon
is simple replacement for mingetty.

In addition to the base services, special build of pam-mount module is
included as greetd-pam-mount. It is used to provide
auto-(mounting/unmounting) of XDG_RUNTIME_DIR. Special build is
required to avoid interference with default pam-mount, if used in
the system.

greetd provides agreety terminal greeter out of the box. Current
greetd-service-type includes configuration for greetd-agreety-session
variations, i.e. only terminal are supported at the moment.

Next step would be adding gtkgreet and/or wlgreet alternatives for
graphical greeter.

muradm (10):
  gnu: crates-io: Add rust-enquote 1.0.3
  gnu: crates-io: Add rust-pam-sys 0.5.6
  gnu: freedesktop: Add greetd 0.7.0
  gnu: admin: Add greetd-pam-mount
  gnu: desktop: Add seatd-service-type
  gnu: desktop: Add greetd-service-type
  gnu: base: Add greetd to applied PAM services
  gnu: pam-mount: Add greetd to applied PAM services
  gnu: tests: Add seatd/greetd based minimal desktop system tests
  doc: Add desktop seatd-service-type and greetd-service-type

 doc/guix.texi                | 183 ++++++++++++++++++++++
 gnu/packages/admin.scm       |  33 ++++
 gnu/packages/crates-io.scm   |  49 ++++++
 gnu/packages/freedesktop.scm |  86 +++++++++++
 gnu/services/base.scm        |   3 +-
 gnu/services/desktop.scm     | 285 ++++++++++++++++++++++++++++++++++-
 gnu/services/pam-mount.scm   |   3 +-
 gnu/tests/desktop.scm        | 191 ++++++++++++++++++++++-
 8 files changed, 829 insertions(+), 4 deletions(-)

-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 00/10] gnu: desktop: Add seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:01:02 +0000
Resent-Message-ID: <handler.49969.B49969.162880563810675 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880563810675
          (code B ref 49969); Thu, 12 Aug 2021 22:01:02 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:00:38 +0000
Received: from localhost ([127.0.0.1]:40019 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIkf-0002m6-O4
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:00:37 -0400
Received: from mail-ej1-f48.google.com ([209.85.218.48]:45973)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIkd-0002lt-QE
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:00:36 -0400
Received: by mail-ej1-f48.google.com with SMTP id qk33so14381895ejc.12
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:00:35 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=jbYP/8V2ps6VBWu0DNAJvSe2+7kqeptcoLM5geqo4rQ=;
 b=goWSvUFjg238ScgFLE1sTcN4I+Ms8yLHeSfOz/lueqEuT39d/sDkAhl1Ir0LVZwnRQ
 zzI15eyaU8t/Jw4Ugi9Zl7HtojjiLVADdFJ6o7kDcn4K0+6Jta7e8OAqLLzpKVHPCr19
 mXRN2V+QEDARk9faHyFlGVjN8ufexV7QYXp//qcvdF/vEguVpgBc+yDcLhoMDcA/04tQ
 Mj58liP7S9BKbnV+hlFMZ4WK088ftprtpAD5JDlJ7NrLRVcBadH5QJXuivyCaBvTt7E8
 MPnzuaPqHoPNQkSH7xWWC5hw3RrWM6fR2C4unRb4ZEcJBcoar5v75giv/6HP75Fg+yrn
 3ZEg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=jbYP/8V2ps6VBWu0DNAJvSe2+7kqeptcoLM5geqo4rQ=;
 b=KG3LSNyiNh8rEd0T/NOQotrfz4B6LwwlABKiX91Vqe6cglEnMa6UJ+TzUCJ832XKl5
 SHU1Rn/YEpeY7Ef6h1bqJoKcP0ca3e80Yl9qvD3p76LP7v+k/Izc6noTP+BG8KzQaO0O
 dqHfQdfULocdKdLuuiQuaS92qWhuAJPlwR+QO/EQ3QECJEFSs71ylDrHKQMPAhHrjzFK
 /kRu8svvxLqz12Aib7UBTzKJNT45qbvIIVA4v53hGZ9YJ6yOcc+c5E38RM+SPKIbK14j
 WFa02iE0ao0mDjDxeITvuV5At2mTyFajfGaKv7/etbXTkWhkJD173o8K0gNKMKMDjrTo
 t5NA==
X-Gm-Message-State: AOAM533PBOm1g+q9Zbmt8V+RcXrgPPcUKOm7Zfx+l1d3qV77sCgHwivZ
 4MpW1Y2IKG6o1ipHpRhOoxhOxGJTG4bqAQ==
X-Google-Smtp-Source: ABdhPJxFTlJX+m5JbmAyekioENgX1lfs/gcAe+4wRGFZofy32D+7cq+MC+Jdh5rxOJAO0rcb6L0TPA==
X-Received: by 2002:a17:906:5384:: with SMTP id
 g4mr5787909ejo.27.1628805629702; 
 Thu, 12 Aug 2021 15:00:29 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id m21sm1707596edc.5.2021.08.12.15.00.28
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:00:29 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:00:22 +0300
Message-Id: <20210812220022.24025-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210810193626.9186-1-mail@HIDDEN>
References: <20210810193626.9186-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

This patch series introduces two new services;

 - seatd-service-type: simple seat management daemon
 - greetd-service-type: simple login daemon

Both services are very minimalistic in nature. Simple seatd daemon
could be said as replacement for elogind-service-type. greetd daemon
is simple replacement for mingetty.

In addition to the base services, special build of pam-mount module is
included as greetd-pam-mount. It is used to provide
auto-(mounting/unmounting) of XDG_RUNTIME_DIR. Special build is
required to avoid interference with default pam-mount, if used in
the system.

greetd provides agreety terminal greeter out of the box. Current
greetd-service-type includes configuration for greetd-agreety-session
variations, i.e. only terminal are supported at the moment.

Next step would be adding gtkgreet and/or wlgreet alternatives for
graphical greeter.

muradm (10):
  gnu: crates-io: Add rust-enquote 1.0.3
  gnu: crates-io: Add rust-pam-sys 0.5.6
  gnu: freedesktop: Add greetd 0.7.0
  gnu: admin: Add greetd-pam-mount
  gnu: desktop: Add seatd-service-type
  gnu: desktop: Add greetd-service-type
  gnu: base: Add greetd to applied PAM services
  gnu: pam-mount: Add greetd to applied PAM services
  gnu: tests: Add seatd/greetd based minimal desktop system tests
  doc: Add desktop seatd-service-type and greetd-service-type

 doc/guix.texi                | 183 ++++++++++++++++++++++
 gnu/packages/admin.scm       |  33 ++++
 gnu/packages/crates-io.scm   |  49 ++++++
 gnu/packages/freedesktop.scm |  86 +++++++++++
 gnu/services/base.scm        |   3 +-
 gnu/services/desktop.scm     | 285 ++++++++++++++++++++++++++++++++++-
 gnu/services/pam-mount.scm   |   3 +-
 gnu/tests/desktop.scm        | 191 ++++++++++++++++++++++-
 8 files changed, 829 insertions(+), 4 deletions(-)

-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 01/10] gnu: crates-io: Add rust-enquote 1.0.3
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:02 +0000
Resent-Message-ID: <handler.49969.B49969.162880587811085 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880587811085
          (code B ref 49969); Thu, 12 Aug 2021 22:05:02 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:38 +0000
Received: from localhost ([127.0.0.1]:40029 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIoY-0002sh-DJ
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:38 -0400
Received: from mail-ej1-f44.google.com ([209.85.218.44]:45653)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIoU-0002s7-Fi
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:37 -0400
Received: by mail-ej1-f44.google.com with SMTP id qk33so14403009ejc.12
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:34 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=hVMJiMZrCDmRRBKI4Op5PPeRX5HGfsylxhPwiGBmOYw=;
 b=ngzTrP3jgme++mO01GD0A4lc2IsAJsqGFLE5DBQ02hr0upENyaOS0T2XRdo+vfBTZK
 1GCqbvjcq+Cfli8Tsm3G4NAWOqIzPcp+lja7FXZFXKSo82yJBGtT3ZpSByYh6zGy+Tte
 XX2tytKaoYhX4TdhVBQ11Qjn4mR0zS52NHZxq3QkD/PV3pm/Bdu//unnXbmPvXFeY95m
 Ofu+Yq3vqmXlXLkeTtwcZccZrYRSdeoq9zOuTfAOA7FfIu0COvOa0qEzPMl8bFnPAQBu
 3aoWmYXx53XPDZ+tk/N0tUN3oVv9yFfkJfB9SodqTcJZUAnH6ae9+A9n+QmAQZyzZYgK
 UDyA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=hVMJiMZrCDmRRBKI4Op5PPeRX5HGfsylxhPwiGBmOYw=;
 b=ZhprMqZExv5e8fM+UeAzedccsyLACft25vGBCTXQjuWrasFyfu2LcJqAIRwbH248VB
 owX1WLQz0gG+45xG+ya6l2CoQ2G2uiJ8gvryngErqp/zzBTHoKNhsnNejuEQwLY3Tpqx
 cgOvpoTU13Osi36E9fCqb9OwOoQsc+AlGaoq4GbrnwBlg+LXpgsNOgNCFGaXC6v3ypgt
 UZfZVjf3H6ey6Bsxon+uARdf4O0aORSYlOqz5I3k7ENg1ccQsibDiwUAk4g7Q3j0CRX5
 1mIejocpySmaF6s7MfCqFt4IlqoRswFraUbEQsqPuTtN6Vr7KQCzf3xebfP4kLCis8+v
 x33Q==
X-Gm-Message-State: AOAM531jxwazGkJdiRqI2JMezdVmQ1ermZN/9qnDPSoYsCfYMUHqq8p4
 H+gTESgDH/GVEDBVMc/ouIAGkdu5iJ/mvw==
X-Google-Smtp-Source: ABdhPJy0ZwTSur6iYJfqH+rO3Eig/ie0x5LyE+CZDPkkZG9vnCBCt5/yQn71ItE5mv74KPJzBWXhvA==
X-Received: by 2002:a17:906:2c45:: with SMTP id
 f5mr5652359ejh.464.1628805868580; 
 Thu, 12 Aug 2021 15:04:28 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.27
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:28 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:11 +0300
Message-Id: <20210812220420.24118-2-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/crates-io.scm (rust-enquote-1): Add rust-enquote 1.0.3
---
 gnu/packages/crates-io.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 24cc772ba7..6484d4c4fc 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -18,6 +18,7 @@
 ;;; Copyright © 2021 Antero Mejr <antero@HIDDEN>
 ;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@HIDDEN>
 ;;; Copyright © 2021 Vinicius Monego <monego@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -56972,3 +56973,24 @@ variant of this library is available separately as @code{im}.")
     (description
       "Generate Rust register maps (`struct`s) from SVD files")
     (license (list license:expat license:asl2.0))))
+
+(define-public rust-enquote-1
+  (package
+    (name "rust-enquote")
+    (version "1.0.3")
+    (home-page "https://github.com/reujab/enquote")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "enquote" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32
+         "0vm687r2wwgc3d3l2iqhag9wgkql6k93sdvjxvmfkdpksajpij1f"))))
+    (build-system cargo-build-system)
+    (synopsis
+     "A Rust library quotes, unquotes, and unescapes strings")
+    (description
+     "A Rust library quotes, unquotes, and unescapes strings")
+    (license license:unlicense)))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 02/10] gnu: crates-io: Add rust-pam-sys 0.5.6
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:02 +0000
Resent-Message-ID: <handler.49969.B49969.162880587911092 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880587911092
          (code B ref 49969); Thu, 12 Aug 2021 22:05:02 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:39 +0000
Received: from localhost ([127.0.0.1]:40031 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIoY-0002sk-LL
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:38 -0400
Received: from mail-ej1-f43.google.com ([209.85.218.43]:34703)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIoW-0002sB-DH
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:37 -0400
Received: by mail-ej1-f43.google.com with SMTP id u3so14495601ejz.1
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:36 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=5UKAphfDxOzm3bwyBiHJxbodPH6X2Jnn4XQw6tMBdHI=;
 b=yErM6EqsqnsFXScoZgBqn/FBZsj6oIpSmEflC6G5pKMpP7MJkw7bK5ybpN2Z1AccPg
 AQNIAawAbedX66GCcVbkWIFgcrxy+BaZvlEMU8XLxNwtWsvAFFEdz+XXjI9zJCEApj/X
 2Jy/6okN53bdwVMLlsGCgUrsM5vVcvCUCRuulQhxGn3Uwgm4cEK12KgrbXjSxbGR+xpc
 40vt8j3NNwGJR30dhsLfPiQzvVawHHK4cOIaRFOU1kog/w0x09ozmHMs411CbEKqUN7W
 IMQHP21+5l5ydXLLvJXdSBe0Hq8n1HlUPs5uc96qCdceA1D8ym21X19ZtXj56mkr7eO7
 CFzQ==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=5UKAphfDxOzm3bwyBiHJxbodPH6X2Jnn4XQw6tMBdHI=;
 b=l/JaDcMixglvFUj1hSscjPNQo5QvCnyAa8cXkOmckR+BlEsYMH1/rfQ73oQSkhFUk8
 yRyNqPIcYNesDC+d1Rr3Jp2G4EaEe2hy2U+4C+wGH4p6Dv67szg1DLOX9kuDgzlyYr7K
 1iOMQYGDF6reBwEqdZ4UUQ31M9GcAqLJLISEtFnZfRizlnQnUp1KEINP+bZ01aYCnJ5V
 Tx9RhJ3TS8q/LmuvfMk6IvM2iTADXJZPJKozX9qPKfxIthgLkDnw/tZ/jk/5dTQ/4I6V
 HOR0BL9qKHDEV6cxUZGjNJ0c9LUrWFc9kENbS347nvQYJjmlNcA7hMyK1Wr/vjhBYQn9
 Bc4Q==
X-Gm-Message-State: AOAM532V1wCKlc/irWS5k3wLMBGrWerzEeBZtsm3WoSJhlk0WfjTgezf
 TgA0gWEW7+n/2Gn8PqvtUFRAe66GqRX/Dw==
X-Google-Smtp-Source: ABdhPJxv36MQjCqe3gcSX9of2fhOkXhIRZopBaad3uH9iXxTh+LucyYc24lLY7WWT+ynrsxgy3pt8g==
X-Received: by 2002:a17:906:8a6a:: with SMTP id
 hy10mr5774792ejc.319.1628805870137; 
 Thu, 12 Aug 2021 15:04:30 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.28
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:29 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:12 +0300
Message-Id: <20210812220420.24118-3-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/crates-io.scm (rust-pam-sys): Add rust-pam-sys 0.5.6
---
 gnu/packages/crates-io.scm | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 6484d4c4fc..d91417d76f 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -55,6 +55,7 @@
   #:use-module (gnu packages glib)
   #:use-module (gnu packages image)
   #:use-module (gnu packages jemalloc)
+  #:use-module (gnu packages linux)
   #:use-module (gnu packages llvm)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages nettle)
@@ -56994,3 +56995,29 @@ variant of this library is available separately as @code{im}.")
     (description
      "A Rust library quotes, unquotes, and unescapes strings")
     (license license:unlicense)))
+
+(define-public rust-pam-sys-0.5.6
+  (package
+    (name "rust-pam-sys")
+    (version "0.5.6")
+    (home-page "https://github.com/1wilkens/pam-sys")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pam-sys" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32
+         "0d14501d5vybjnzxfjf96321xa5wa36x1xvf02h02zq938qmhj6d"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-libc" ,rust-libc-0.2))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)))
+    (synopsis
+     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (PAM)")
+    (description
+     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (PAM)")
+    (license (list license:expat license:asl2.0))))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 00/10] gnu: desktop: Add seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:03 +0000
Resent-Message-ID: <handler.49969.B49969.162880587911099 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880587911099
          (code B ref 49969); Thu, 12 Aug 2021 22:05:03 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:39 +0000
Received: from localhost ([127.0.0.1]:40034 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIoY-0002sr-V5
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:39 -0400
Received: from mail-ej1-f52.google.com ([209.85.218.52]:39853)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIoT-0002s5-JZ
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:37 -0400
Received: by mail-ej1-f52.google.com with SMTP id go31so14448990ejc.6
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:33 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=jbYP/8V2ps6VBWu0DNAJvSe2+7kqeptcoLM5geqo4rQ=;
 b=bjujq/U6EiN0YgbZZHcbbOPPinAW8ZGpUbUx6WItsazM/RSUr4c0CO2iiz3hVsqkcO
 cZkMrgnHcvur6EpkPn4EsQGz/cl4fwGWCR+jn8S1Ln1/VSSC/o7Hp6Z4EmHglYlD71kO
 5OtZN5X9e75YAV2KWSx9xjCucgqX3lvjMGumdUT/LIW8jqXU4cNY1Ugg4vS1yujP+fS1
 LdDnhCUnObnNSmuVZoDbD+XQQvxTp1By18YcMsoUc4H1KxXR99WnJvolunIg7vZEq/8k
 9WEarYX1ZlHp/9gU94BLOM7sR1oAYcyhregZ6m4kchkLJws3wN5qOwsFb9NQQwgdhVvF
 5gvw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=jbYP/8V2ps6VBWu0DNAJvSe2+7kqeptcoLM5geqo4rQ=;
 b=GJG26O/6Sudibp/sQ4vjQpXST9PBoU6Kem68FUTReMNzlz2EXaDxqZObiXLn5PfQK0
 +1fZF4E7Esfy8dsprkbd+rQRhev2FlWYGeZoMsPvcEeaKjMSgNGdBmVhDVJ+b606qTjn
 LVT58Ngi2A+76Rfm0syA3WO43jc5IplMa4JeXuErD2GzgF/neUH7r1vCoGqpYbw95Fpc
 umYkx8VkC1xY3VKKFeEbuRp2S4ZOsTTirKRYzAfql+w3YPleJMCuOX1u5EbzbjkVIWAR
 bpOKO/c/Nnok6OEMtUnPWyuyn58GFe4ZFWb/Oe8w84HeBqtmiqp+w4WBvTB6TSBAILko
 Ibsw==
X-Gm-Message-State: AOAM531RYp6OGqFTRr2biIW5PJCYokuJtjdsJpT4XGmLWyUYO2CSR4tH
 hmsaDeNqHNxTu/v/p/8BPJ8BTG0pLbRpRQ==
X-Google-Smtp-Source: ABdhPJywCyTdbHKMSrlRAF3dFf15gF4KMhq/Dt62rlpkrl+YA4aXEO2iuUq7welzxTVV/u1nUwZwhQ==
X-Received: by 2002:a17:906:cd02:: with SMTP id
 oz2mr5752302ejb.227.1628805867086; 
 Thu, 12 Aug 2021 15:04:27 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.26
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:26 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:10 +0300
Message-Id: <20210812220420.24118-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

This patch series introduces two new services;

 - seatd-service-type: simple seat management daemon
 - greetd-service-type: simple login daemon

Both services are very minimalistic in nature. Simple seatd daemon
could be said as replacement for elogind-service-type. greetd daemon
is simple replacement for mingetty.

In addition to the base services, special build of pam-mount module is
included as greetd-pam-mount. It is used to provide
auto-(mounting/unmounting) of XDG_RUNTIME_DIR. Special build is
required to avoid interference with default pam-mount, if used in
the system.

greetd provides agreety terminal greeter out of the box. Current
greetd-service-type includes configuration for greetd-agreety-session
variations, i.e. only terminal are supported at the moment.

Next step would be adding gtkgreet and/or wlgreet alternatives for
graphical greeter.

muradm (10):
  gnu: crates-io: Add rust-enquote 1.0.3
  gnu: crates-io: Add rust-pam-sys 0.5.6
  gnu: freedesktop: Add greetd 0.7.0
  gnu: admin: Add greetd-pam-mount
  gnu: desktop: Add seatd-service-type
  gnu: desktop: Add greetd-service-type
  gnu: base: Add greetd to applied PAM services
  gnu: pam-mount: Add greetd to applied PAM services
  gnu: tests: Add seatd/greetd based minimal desktop system tests
  doc: Add desktop seatd-service-type and greetd-service-type

 doc/guix.texi                | 183 ++++++++++++++++++++++
 gnu/packages/admin.scm       |  33 ++++
 gnu/packages/crates-io.scm   |  49 ++++++
 gnu/packages/freedesktop.scm |  86 +++++++++++
 gnu/services/base.scm        |   3 +-
 gnu/services/desktop.scm     | 285 ++++++++++++++++++++++++++++++++++-
 gnu/services/pam-mount.scm   |   3 +-
 gnu/tests/desktop.scm        | 191 ++++++++++++++++++++++-
 8 files changed, 829 insertions(+), 4 deletions(-)

-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH 03/10] gnu: freedesktop: Add greetd 0.7.0
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:03 +0000
Resent-Message-ID: <handler.49969.B49969.162880588711134 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880588711134
          (code B ref 49969); Thu, 12 Aug 2021 22:05:03 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:47 +0000
Received: from localhost ([127.0.0.1]:40036 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIoe-0002tL-B3
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:47 -0400
Received: from mail-ej1-f52.google.com ([209.85.218.52]:39864)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIoX-0002sD-Cc
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:38 -0400
Received: by mail-ej1-f52.google.com with SMTP id go31so14449311ejc.6
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:37 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=3V8DMCKbRSqdR3wtMv+7Ro3Vrt3PCoHfrpfXzhJ1GgI=;
 b=grhrcvS0tLAB3HL7AuJ+KYQKrq6qtMvlTehC/+pqo5UKigQVnR6SoMG9nth3XVPHzw
 sZRJofnlNO9VhQ/NP/m+93aJgAFf5b3mhUoPfWQWXLf88h4KtXzerIockjcibHhlgRF6
 rZ86x8JFWtXB9EWZ6CpXY2ZwUaBlaiUcQvLRahnf+6YCyh1VRpZDkI8eatrBUy2xtLqu
 z7t1Ux22PjStRJSqfkMFfmi2Qlt6eYtFttu9VWrYJESJpJ/MR+9gA9A4PXSPO88cU7yh
 FUDdKIGvcRfUN4GMBf88nQZIQ4460lbCtuxAcSDpLhcKrTSmdN8oKmWYcN4prTaneLN1
 nV7A==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=3V8DMCKbRSqdR3wtMv+7Ro3Vrt3PCoHfrpfXzhJ1GgI=;
 b=ARV0H3Ky65Q21Zi9H7hFWxYC6eOcfnjkOU6IoTu0+mXYqYo0bgYHWm5IhT2B6m8QJS
 OG3YpwPUj+P3zm97s2HfLGV4Mhh+JO0V4TNFML9SeOBnT+sjX3SLAYFbr6jp0Xp8xSeH
 cyv7WVILr/RAacG4bCSx+37L+0ODDnN3m1MPY7FMQaqox+/4O1RQ69ZaTWXiKQ1faHVl
 vDSFyD2SGzk08OQTYjRLle26R+d6UmZSikBVsofeLIgqhTk67NmlgLadNSx4Zr9UqbuL
 e/fF1vdMUiav/ohgkzJ4WX4FwpNzx7oPR0N0/SbKkcj/fd0ulNLX50ufJEGkHMsqh/EF
 0/9Q==
X-Gm-Message-State: AOAM533sdyaH6KKwqRWRy2b22nZVaHACtHuZ3dE7CQqUe4qRarfb+19h
 +hFL3UkZnytHFoKDzSX/Jg5fqsejJxG3FQ==
X-Google-Smtp-Source: ABdhPJyr34SGerVd3NsghbX5ffl98agzRWEeFB+K4sTN+4tkmczZJtgSAkY2EBEzMuCM7n9eDrjjBg==
X-Received: by 2002:a17:906:32cf:: with SMTP id
 k15mr5842332ejk.68.1628805871599; 
 Thu, 12 Aug 2021 15:04:31 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.30
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:31 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:13 +0300
Message-Id: <20210812220420.24118-4-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
---
 gnu/packages/freedesktop.scm | 86 ++++++++++++++++++++++++++++++++++++
 1 file changed, 86 insertions(+)

diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
index 693a79c738..0be7d0fe4d 100644
--- a/gnu/packages/freedesktop.scm
+++ b/gnu/packages/freedesktop.scm
@@ -24,6 +24,7 @@
 ;;; Copyright © 2020 Raghav Gururajan <raghavgururajan@HIDDEN>
 ;;; Copyright © 2021 Brendan Tildesley <mail@HIDDEN>
 ;;; Copyright © 2021 pineapples <guixuser6392@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -46,6 +47,7 @@
   #:use-module (guix packages)
   #:use-module (guix download)
   #:use-module (guix git-download)
+  #:use-module (guix build-system cargo)
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system meson)
@@ -62,6 +64,7 @@
   #:use-module (gnu packages check)
   #:use-module (gnu packages cmake)
   #:use-module (gnu packages compression)
+  #:use-module (gnu packages crates-io)
   #:use-module (gnu packages cryptsetup)
   #:use-module (gnu packages databases)
   #:use-module (gnu packages disk)
@@ -862,6 +865,89 @@ that require it.  It also provides a universal seat management library that
 allows applications to use whatever seat management is available.")
     (license license:expat)))
 
+(define-public greetd
+  (package
+    (name "greetd")
+    (version "0.7.0")
+    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url home-page)
+                    (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32 "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zbgr3g"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-nix" ,rust-nix-0.17)
+        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
+        ("rust-rpassword" ,rust-rpassword-4)
+        ("rust-users" ,rust-users-0.9)
+        ("rust-serde" ,rust-serde-1)
+        ("rust-serde-json" ,rust-serde-json-1)
+        ("rust-libc" ,rust-libc-0.2)
+        ("rust-tokio" ,rust-tokio-0.2)
+        ("rust-getopts" ,rust-getopts-0.2)
+        ("rust-thiserror" ,rust-thiserror-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
+        ("rust-enquote" ,rust-enquote-1))
+       #:phases
+       (modify-phases %standard-phases
+         ;; once https://todo.sr.ht/~kennylevinsen/greetd/25
+         ;; is solved, below patch can be removed
+         (add-after 'unpack 'patch-terminal-switch
+           (lambda* (#:key inputs #:allow-other-keys)
+             (substitute* "greetd/src/server.rs"
+               (("switch: true,")
+                "switch: false,"))))
+         (delete 'package)
+         (add-after 'build 'build-man-pages
+           (lambda* (#:key inputs #:allow-other-keys)
+             (define (scdoc-cmd doc lvl)
+               (system (string-append "scdoc < "
+                                      doc "-" lvl ".scd > "
+                                      doc "." lvl)))
+             (with-directory-excursion "man"
+               (scdoc-cmd "greetd" "1")
+               (scdoc-cmd "greetd" "5")
+               (scdoc-cmd "greetd-ipc" "7")
+               (scdoc-cmd "agreety" "1"))))
+         (replace 'install
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (bin (string-append out "/bin"))
+                    (sbin (string-append out "/sbin"))
+                    (share (string-append out "/share"))
+                    (man (string-append share "/man"))
+                    (man1 (string-append man "/man1"))
+                    (man5 (string-append man "/man5"))
+                    (man7 (string-append man "/man7"))
+                    (release "target/release")
+                    (greetd-bin (string-append release "/greetd"))
+                    (agreety-bin (string-append release "/agreety")))
+               (install-file greetd-bin sbin)
+               (install-file agreety-bin bin)
+               (with-directory-excursion "man"
+                 (install-file "greetd.1" man1)
+                 (install-file "greetd.5" man5)
+                 (install-file "greetd-ipc.7" man7)
+                 (install-file "agreety.1" man1))))))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)
+       ("scdoc" ,scdoc)))
+    (synopsis "minimal and flexible login manager daemon")
+    (description
+     "greetd is a minimal and flexible login manager daemon
+that makes no assumptions about what you want to launch.
+
+If you can run it from your shell in a TTY, greetd can start it.
+
+If it can be taught to speak a simple JSON-based IPC protocol,
+then it can be a greeter.")
+    (license license:gpl3+)))
+
 (define-public packagekit
   (package
     (name "packagekit")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 04/10] gnu: admin: Add greetd-pam-mount
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:04 +0000
Resent-Message-ID: <handler.49969.B49969.162880588811141 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880588811141
          (code B ref 49969); Thu, 12 Aug 2021 22:05:04 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:48 +0000
Received: from localhost ([127.0.0.1]:40040 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIoh-0002tX-Nf
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:47 -0400
Received: from mail-ej1-f54.google.com ([209.85.218.54]:35613)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIoY-0002sF-Mc
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:39 -0400
Received: by mail-ej1-f54.google.com with SMTP id w5so14469138ejq.2
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:38 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=pK0Xo5knw/WPuOhCSupK0HXcx0+IBEMDHq9i6ENLVnA=;
 b=oyxcmQjVoC8Y1emVariCYvIkxXVaUtoa4Lh00LN/vRDZUvzJzYLsZxSm32CvrIZBwu
 LnXadNF2sIjTUi1xD1wle0lNvbV1mI1E0YZwBbWb8y5AB3k9IqUz7seRXZ5PCHUBZYi8
 S/j6PAfw3iADfMW050MXWr7i094iJOAzXcyPo8Jm41csUI3bDRtpIgMXVWFY1c03Snzh
 hIKqP5IVjPEseffh0g3S3TznIeS2rc6eaEDF6zooVU4pTZ5zMdsIV6FOU3fhut9rk3rX
 hgvm93gPXYlRMB6o2tngl/KASSrpDafJW3Az/wn4d1HbH37mxqxjRzZG0kGOPZJ2n1Jx
 U9XA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=pK0Xo5knw/WPuOhCSupK0HXcx0+IBEMDHq9i6ENLVnA=;
 b=o5BmVZG+zNVLUgi4XvZLYGs+O/Y80ddO6WUflbjIUzG2GEfd6jGqQGr/8fZMCv6zeD
 xlMiCEDz7qiu5z2dSjPV2rPb5egJ96/6r/0vI3kB2TK76gYwothEFXyNcejAr7aBEwY9
 ogG7ahrwQBUcRxZJ7v7Mds/SQ8DvIrUgxjIi+IoA0xh+/0LHZ0D4Xv23EjgFFlt5t3rM
 Ieg/wNPy+7cwQme3gEydMvMUOEaDP1wIX3LeseJc8YJkysxc0w3QAa4ak1GLzYH7yWzE
 BeGVAGchTnxvfYD66TCh5lizznwUeKvmKalgIRRNMQegqUyEPeAMNHNLmCLll/uIhCuo
 Q9yA==
X-Gm-Message-State: AOAM532MMXVSAYo5AxhTGL4DowN6tf39q6agyQhSQQVEpbuyK5q81ok0
 prblpXRjgVVD/t9Oyu7ttMqHQKV9J2KcxA==
X-Google-Smtp-Source: ABdhPJw2/YyrBWwx1tyrMHBuX75eg3AX9aE5FzcS/XT0clZ0ekX3p7i8cLkudNV22WW0KDy9lRnm6Q==
X-Received: by 2002:a17:906:3bc3:: with SMTP id
 v3mr5680499ejf.482.1628805872808; 
 Thu, 12 Aug 2021 15:04:32 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.31
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:32 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:14 +0300
Message-Id: <20210812220420.24118-5-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  * gnu/packages/admin.scm (greetd-pam-mount): Add greetd-pam-mount
    --- gnu/packages/admin.scm | 33 +++++++++++++++++++++++++++++++++ 1 file
   changed, 33 insertions(+) diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
    index eda269f148..e5ed1785d8 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm
    @@ -42,6 +42,7 @@ ;;; Copyright =?UTF-8?Q?=C2=A9?= 2021 David [...] 
 
 Content analysis details:   (2.0 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
  0.0 SPF_NONE               SPF: sender does not publish an SPF Record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: selfhosted.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
                              no trust
                             [209.85.218.54 listed in list.dnswl.org]
 -0.0 RCVD_IN_MSPIKE_H3      RBL: Good reputation (+3)
                             [209.85.218.54 listed in wl.mailspike.net]
 -0.0 RCVD_IN_MSPIKE_WL      Mailspike good senders
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)

* gnu/packages/admin.scm (greetd-pam-mount): Add greetd-pam-mount
---
 gnu/packages/admin.scm | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index eda269f148..e5ed1785d8 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -42,6 +42,7 @@
 ;;; Copyright © 2021 David Larsson <david.larsson@HIDDEN>
 ;;; Copyright © 2021 WinterHound <winterhound@HIDDEN>
 ;;; Copyright © 2021 Brice Waegeneire <brice@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -4247,6 +4248,38 @@ supports.  It can also mount encrypted LUKS volumes using the password
 supplied by the user when logging in.")
     (license (list license:gpl2+ license:lgpl2.1+))))
 
+(define-public greetd-pam-mount
+  (package
+    (inherit pam-mount)
+    (name "greetd-pam-mount")
+    (arguments
+     (substitute-keyword-arguments (package-arguments pam-mount)
+       ((#:configure-flags flags ''())
+        `(cons* "--with-rundir=/run/greetd" ,flags))
+       ((#:phases phases)
+        `(modify-phases ,phases
+           (add-after 'unpack 'patch-config-file-name
+             (lambda* (#:key inputs #:allow-other-keys)
+               (substitute* "src/pam_mount.c"
+                 ((".*define CONFIGFILE .*$")
+                  "#define CONFIGFILE \"/etc/security/greetd_pam_mount.conf.xml\"\n")
+                 (("pam_mount_config") "greetd_pam_mount_config")
+                 (("pam_mount_system_authtok") "greetd_pam_mount_system_authtok"))))))))
+    (synopsis "pam-mount specifically compiled for use with greetd")
+    (description
+     "Pam-mount is a PAM module that can mount volumes when a user logs in.
+It supports mounting local filesystems of any kind the normal mount utility
+supports.  It can also mount encrypted LUKS volumes using the password
+supplied by the user when logging in.
+
+This package inherits pam-mount in the way that it is compiled specifically
+for use with greetd daemon. It uses different configuration location and
+name space for storing data in PAM.
+
+greetd-pam-mount is used in configuration of greetd to provide
+auto-(mounting/unmounting) of XDG_RUNTIME_DIR in the way that it will not
+interfere with default pam-mount configuration.")))
+
 (define-public jc
   (package
     (name "jc")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 05/10] gnu: desktop: Add seatd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:04 +0000
Resent-Message-ID: <handler.49969.B49969.162880588811148 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880588811148
          (code B ref 49969); Thu, 12 Aug 2021 22:05:04 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:48 +0000
Received: from localhost ([127.0.0.1]:40042 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIoi-0002te-07
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:48 -0400
Received: from mail-ej1-f48.google.com ([209.85.218.48]:43914)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIof-0002tA-Hq
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:46 -0400
Received: by mail-ej1-f48.google.com with SMTP id b15so14421973ejg.10
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:45 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=VBcyOm+hs1UvnMoo/bXfZIc2oTwGkhWXIaWrIjHUG/0=;
 b=vO5yqmRSOWcnyk6tjyTmlTwrTjECx9Q+OE/urwozjCh5peWCR8Qi8U9D/oakYDvna6
 ivAT8rwstmzoSbkqFkO5jmNYiAphRMny944IOneg+y8SjOL/KCPdRJ4fMr6J46++Pl67
 hxmUKxlDmZ/Y/kd27JfC1DSF5psVhpkkHmvQR6UvfGtuN1b9TMCt30zOu4IH+bIR/Dzg
 oUXfxbYXY57qp1ax1Z+P7ws/DmkUZhALOMoY8SnNy19iSzuv41MUUh2sdo7hLID8bx9G
 En9OcxHpb2716CXX/W+FRM5XHXbFHTSk37Je9ZoAbz1y7jcBagYVqQu4MvCwHmdWDhw+
 VqDA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=VBcyOm+hs1UvnMoo/bXfZIc2oTwGkhWXIaWrIjHUG/0=;
 b=Avq2ZcSyKqYefUFFCkpWEg3BOHE2gGBO2SbEkIwpTp+hmUXtY/PDpVCDExvKkBfyYI
 erMQMmU8X8uygKfPYd0KNV3AIO5kUuzhheHCquQrC0l7MKI2joTNEvWRWChaShWRGxpX
 HS6UFFU4CW/sx984m76rCcwaSIM/arpq84UnVGZbcyuqh8T0NfKzIEUBR4/loYTjt55o
 mWo8dahhnMQp/BSCFPxcGv0rs257X36vDD5f6WBXyScsQ2WF8FjnZm4TXA4qurrzG5xA
 EFL2iLZ4FQXzzWnzWE1Kc1W9Ck6kzdb9kuArAfUAgghDk74vtjiHaxC896Jkds3yV+gB
 anXA==
X-Gm-Message-State: AOAM531P6aWuwcYBdkKAvTR9VAVE3YRkNFvffvml120mZAo1YvE0E+em
 Vl9OJ5NvqQOMcB3gsT/uD9zJ+xwGSeStPQ==
X-Google-Smtp-Source: ABdhPJylIDtaRjwsrY0LQiLmlxEnIqzuBQVp3sXGDBWN0CiSA5l3H1qAesCyZEyLKYLdUQtah3A//w==
X-Received: by 2002:a17:906:d7af:: with SMTP id
 pk15mr5724446ejb.51.1628805874311; 
 Thu, 12 Aug 2021 15:04:34 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.33
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:33 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:15 +0300
Message-Id: <20210812220420.24118-6-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/services/desktop.scm: Add seatd-service-type
---
 gnu/services/desktop.scm | 60 +++++++++++++++++++++++++++++++++++++++-
 1 file changed, 59 insertions(+), 1 deletion(-)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index 64d0e85301..a63a2936a7 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -13,6 +13,7 @@
 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@HIDDEN>
 ;;; Copyright © 2020 Reza Alizadeh Majd <r.majd@HIDDEN>
 ;;; Copyright © 2021 Brice Waegeneire <brice@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -39,7 +40,9 @@
   #:use-module (gnu services networking)
   #:use-module (gnu services sound)
   #:use-module ((gnu system file-systems)
-                #:select (%elogind-file-systems file-system))
+                #:select (%control-groups
+                          %elogind-file-systems
+                          file-system))
   #:use-module (gnu system)
   #:use-module (gnu system setuid)
   #:use-module (gnu system shadow)
@@ -154,6 +157,9 @@
             gnome-keyring-configuration?
             gnome-keyring-service-type
 
+            seatd-configuration
+            seatd-service-type
+
             %desktop-services))
 
 ;;; Commentary:
@@ -1182,6 +1188,58 @@ or setting its password with passwd.")))
 (define polkit-wheel-service
   (simple-service 'polkit-wheel polkit-service-type (list polkit-wheel)))
 
+
+;;;
+;;; seatd-service-type -- minimal seat management daemon
+;;;
+
+(define-record-type* <seatd-configuration> seatd-configuration
+  make-seatd-configuration
+  seatd-configuration?
+  (seatd seatd-package (default seatd))
+  (user seatd-user (default "root"))
+  (group seatd-group (default "users"))
+  (socket seatd-socket (default "/run/seatd.sock"))
+  (loglevel seatd-loglevel (default "error")))
+
+(define (seatd-shepherd-service config)
+  (list (shepherd-service
+         (documentation "Minimal seat management daemon")
+         (requirement '())
+         ;; TODO: once cgroups is separate dependency
+         ;; here we should depend on it rather than elogind
+         (provision '(seatd elogind))
+         (start #~(make-forkexec-constructor
+                   (list #$(file-append (seatd-package config) "/bin/seatd")
+                         "-u" #$(seatd-user config)
+                         "-g" #$(seatd-group config)
+                         "-s" #$(seatd-socket config))
+                   #:environment-variables
+                   (list (string-append "SEATD_LOGLEVEL="
+                                        #$(seatd-loglevel config)))
+                   #:log-file "/tmp/seatd.log"))
+         (stop #~(make-kill-destructor)))))
+
+(define seatd-environment
+  (match-lambda
+    (($ <seatd-configuration> _ _ _ socket)
+     `(("SEATD_SOCK" . ,socket)))))
+
+(define seatd-service-type
+  (service-type
+   (name 'seatd)
+   (description "Seat management takes care of mediating access
+to shared devices (graphics, input), without requiring the
+applications needing access to be root.")
+   (extensions
+    (list
+     (service-extension session-environment-service-type seatd-environment)
+     ;; TODO: once cgroups is separate dependency
+     ;; we should not mount it here
+     (service-extension file-system-service-type (const %control-groups))
+     (service-extension shepherd-root-service-type seatd-shepherd-service)))
+   (default-value (seatd-configuration))))
+
 
 ;;;
 ;;; The default set of desktop services.
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 07/10] gnu: base: Add greetd to applied PAM services
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:05 +0000
Resent-Message-ID: <handler.49969.B49969.162880589111175 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880589111175
          (code B ref 49969); Thu, 12 Aug 2021 22:05:05 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:51 +0000
Received: from localhost ([127.0.0.1]:40047 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIol-0002u7-DS
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:51 -0400
Received: from mail-ed1-f48.google.com ([209.85.208.48]:47046)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIoi-0002tF-1Z
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:49 -0400
Received: by mail-ed1-f48.google.com with SMTP id r19so8792377eds.13
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:48 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=dh/8N+CXmlWZw91Zsb/y/jh8BpZ7QLm1nQKa/aRV3eI=;
 b=pQC/fjCZHbv5UG5REpUz3beeQNcDxztscz/UarX053dVTAnLUcoyfdiHFQz2QxVms3
 lEEzk0VEf/m1RZDEgJkjKCjSayHCf+hSX7Z01Qnf1VySGcMKP+ttDTxHB/X0E6sBZPbL
 Hv5/WOwXu6wZ95/XbrP0tSTQf27BU8iobsePEUqQq1ZpMUL+TN3xHX/hivexfqEnfFId
 3kf82RjW8v0ZnCGkmPqnJMd+RPYafHvMWo/E4ilmovRoddyS4zSFI+FTIL6MwFBVxxB+
 1RRCYG8IRfkG7wAlcClTKbzYHgggBou1Ai0NwNS7Ex7zdBlCNSxxlI/72WPCEv+kY0QX
 79sA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=dh/8N+CXmlWZw91Zsb/y/jh8BpZ7QLm1nQKa/aRV3eI=;
 b=WcKmr2RcHjwT6owxg6Ynf3Sj4yEju8luCWbzypT6SJRvjVr5kkqzxE9dZSwVJgMYul
 MYQJShN4GFNKE+ShIaHmHf6DLEo/xQrDkWCQT9/bwk/DyR8c7oYaV8WDNUqqcgMGm3tA
 KcsE2h/c1OmvMn3DXkGpAcqSPKNqyoTqKQFOrZxSpOE/VM8mpFSKGdlII+I6km367Sey
 el45Gzn3451KS1rENpTX2LkYTCx9FvRUTrTjx3wjpOIQtkU/f68f1zQJ7bwUzjSF4CZH
 1MmqZwmpsopt5HsspwXaGVCUp1gPVgHzrrdXO1kXgeYYeDWhAyMXwbjeD+CQBtZoewsT
 ARVQ==
X-Gm-Message-State: AOAM530uR0+Y0YJjL0Wkq9X0vy6RAwBqGPuG/UOSknSuKpOQe4u3vCAi
 ga5FSvv9DISb9SSH+DwdDnFOrBgC8Tnbrw==
X-Google-Smtp-Source: ABdhPJyL3OZx65vCMAnVfhZmSn+CQzEGdrOK6xuNuJgi6n6szpd1F5jkUWutjz9yeFwwzdyJOrqa0g==
X-Received: by 2002:aa7:cb19:: with SMTP id s25mr8437444edt.194.1628805882171; 
 Thu, 12 Aug 2021 15:04:42 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.41
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:41 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:17 +0300
Message-Id: <20210812220420.24118-8-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/services/base.scm (pam-limits-service-type): add greetd PAM
service to applicable PAM services
---
 gnu/services/base.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index c784d312b1..446ecc30f8 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -15,6 +15,7 @@
 ;;; Copyright © 2020, 2021 Brice Waegeneire <brice@HIDDEN>
 ;;; Copyright © 2021 qblade <qblade@HIDDEN>
 ;;; Copyright © 2021 Hui Lu <luhuins@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1392,7 +1393,7 @@ information on the configuration file syntax."
                               (module "pam_limits.so")
                               (arguments '("conf=/etc/security/limits.conf")))))
              (if (member (pam-service-name pam)
-                         '("login" "su" "slim" "gdm-password" "sddm"))
+                         '("login" "greetd" "su" "slim" "gdm-password" "sddm"))
                  (pam-service
                   (inherit pam)
                   (session (cons pam-limits
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 08/10] gnu: pam-mount: Add greetd to applied PAM services
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:05 +0000
Resent-Message-ID: <handler.49969.B49969.162880589511220 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880589511220
          (code B ref 49969); Thu, 12 Aug 2021 22:05:05 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:55 +0000
Received: from localhost ([127.0.0.1]:40050 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIoo-0002uR-Nf
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:54 -0400
Received: from mail-ed1-f52.google.com ([209.85.208.52]:39790)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIoj-0002tJ-BE
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:51 -0400
Received: by mail-ed1-f52.google.com with SMTP id cn28so262712edb.6
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:49 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=6iBM8ZI3T3fHzn8rEzUJ2i4QvCgwKO7iPLoH5R+yrGg=;
 b=tD02Ii43NXjOM7I01qolqC9hKdVviCf6guhVarJlV7g6QguhVKBl9SdKcDTb4hhye9
 WC4BNRZZEBoBtmqwLQpc2oE8SwEOIdDldtJaaGPAlYlLiKM+B5SCQUbuG2lIMwLByZcF
 9PPQ1xSSWkbgQ9WOVlm2p7CKMWr26iDxJhcaOZrfVKkDHDxl6BUJJfFTg3tjM4JE8BFd
 U9mS7Ywe7ZwvGr6lmoEv5ji/d8bhQkyPfHZWI+G0TeCgZtVkB2YuVPEXoNAxJwljdlP6
 BCxKPc/WeJWV+DJeWseIeLDiSrqpBsjQhsLkZgu2nexQUwNs+NzXVanPDsFm1Vl9YRJe
 cxSQ==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=6iBM8ZI3T3fHzn8rEzUJ2i4QvCgwKO7iPLoH5R+yrGg=;
 b=KlfDfuPJUlqYI8/sZ/kyPNXGXJY8Drbar5n31v1g55Nuqzq5EW+y31rnqaoKdHxdqJ
 GSOYbsivTmMmbQw0T9ArMpf8te4NnkpxfNTGgM6ZaeZhVZnXjamFB9ewfvDoLAWdv/HW
 HJ1IBjdgqgPZ1W28qfn2tOiOytny14PbZ8SdCSnLv37V6gbcOIVDvxi0/GPC0/BuisjB
 Kly4PuM+I4s9k4NIJyCpVUDD8k2eL4B5Mm744DlkjQGOb2TMCHSLauhDWa8EXf9+my1Y
 e9UL2CSy+UHxxofd+wuE5484lB2fGVqNBkxGsVsQf+J+d9cXotO2hUiOwnZGT2WqITgF
 Kf8w==
X-Gm-Message-State: AOAM5310xRXnG+8E1fggLS6ybvRQrp8xo+sdhhYe9Lew+ELZ2x2v/Rux
 /9KvZYhSa8acHMRP+6taCWwjgXkyLoNE5w==
X-Google-Smtp-Source: ABdhPJyTulipd7tKiMtohO+XGmb1o2PBbC+Urq4/OdJNYbA8V09hTnt3tr5FnhnSWuNVkPL1p8RauQ==
X-Received: by 2002:aa7:d3cf:: with SMTP id o15mr8091496edr.98.1628805883545; 
 Thu, 12 Aug 2021 15:04:43 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.42
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:43 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:18 +0300
Message-Id: <20210812220420.24118-9-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/services/pam-mount.scm (pam-mount-service-type): add greetd PAM
service to applicable PAM services
---
 gnu/services/pam-mount.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/services/pam-mount.scm b/gnu/services/pam-mount.scm
index 98611462c2..7b25efeb50 100644
--- a/gnu/services/pam-mount.scm
+++ b/gnu/services/pam-mount.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2019 Guillaume Le Vaillant <glv@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -90,7 +91,7 @@
      (module #~(string-append #$pam-mount "/lib/security/pam_mount.so"))))
   (list (lambda (pam)
           (if (member (pam-service-name pam)
-                      '("login" "su" "slim" "gdm-password"))
+                      '("login" "greetd" "su" "slim" "gdm-password"))
               (pam-service
                (inherit pam)
                (auth (append (pam-service-auth pam)
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 09/10] gnu: tests: Add seatd/greetd based minimal desktop system tests
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:06 +0000
Resent-Message-ID: <handler.49969.B49969.162880589511228 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880589511228
          (code B ref 49969); Thu, 12 Aug 2021 22:05:06 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:55 +0000
Received: from localhost ([127.0.0.1]:40052 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIoo-0002uv-UY
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:55 -0400
Received: from mail-ed1-f41.google.com ([209.85.208.41]:41670)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIok-0002tN-MD
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:51 -0400
Received: by mail-ed1-f41.google.com with SMTP id n12so12098914edx.8
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:50 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=V2suJjcVy17tTRnQKeIyUBEEZxZKyYpC1Cq3fO+PSqE=;
 b=oJkJuZmdBANM4JyHb0aQ/zWm9+6Bqnvb9a+2vEwTDWaxLtQRAz2iGW+VKQUd5lVB1J
 uYffecLfhEZeROgHx8blGq65EN9sEakks+XZceX31CctApEClHHC54JzgPk0GakoH3iR
 lxOWGkQ1vJ7IDmnDoDSIqHYmdtz/NKhu2fV4KzJf39T32I3WK0pc10FL3LG+NHsPhHaV
 7/mpwcgIVvpJbMbsFhUquKdrUVLoZY76tpDYyuXP1wie4lLnm5+B67nx3IbJEXCbJC5E
 6/KE9HYGVGNcV4uoW1cjb7EOvyF/DARdZxz71e6MRIgWbE3wWr7+KBtU/k3k4jf0mvpZ
 Rryg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=V2suJjcVy17tTRnQKeIyUBEEZxZKyYpC1Cq3fO+PSqE=;
 b=lozrdvhT5b51lhbDhxKa1zbKKTgA+IHhWBx83cjiRPFLmOdL1F55PViEzyQAZ5d6Ex
 DASfrsxJpuB6qrrf1cqxvQe2zr6dVTv7kA8AeoRQTvlZHS0ArnPF1XiKCAh1fh1fxuE/
 2QieJFA5jShVgKcAmdoIRRkyzXUR9a5iQj+ZxbSv1r2ne3mADu+UE4RHQnJ8/Ag9kl1R
 pwTAg+2/zScUc+UQNr0/6T/wErdKzLewnREn+xTheI+mSSGQ9pv2lQ7x3HT6c1Cv5cDy
 V/gO9psgtlE1/cp9xkMz0biVZogdlh4NvBJvHIA0nHOpQYpg7XGsHa27bCj4Ac1sY2wx
 29Xw==
X-Gm-Message-State: AOAM533ixNgqFoSVEMUnpTN1crcQ4G3qhR0Q1ygRnLxE2ktYrtBEcTfP
 CaDxkSDyK2r+waeWy/iASQpQ8xQWyU4RTw==
X-Google-Smtp-Source: ABdhPJzDh9FvC9rOS8GLn2EtcPCOTbW+9HHcrvwNuDX4wlQOou9MvYCHHXktCdcPyUBn70CptXnzXA==
X-Received: by 2002:aa7:cad9:: with SMTP id l25mr8292300edt.351.1628805884833; 
 Thu, 12 Aug 2021 15:04:44 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.43
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:44 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:19 +0300
Message-Id: <20210812220420.24118-10-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/tests/desktop.scm (minimal-desktop): seatd/greetd based minimal desktop
---
 gnu/tests/desktop.scm | 191 +++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 190 insertions(+), 1 deletion(-)

diff --git a/gnu/tests/desktop.scm b/gnu/tests/desktop.scm
index 6aa22fd49b..c57c4a4462 100644
--- a/gnu/tests/desktop.scm
+++ b/gnu/tests/desktop.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2017 Ludovic Courtès <ludo@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -19,12 +20,15 @@
 (define-module (gnu tests desktop)
   #:use-module (gnu tests)
   #:use-module (gnu services)
+  #:use-module (gnu services base)
   #:use-module (gnu services dbus)
   #:use-module (gnu services desktop)
+  #:use-module (gnu system)
   #:use-module (gnu system vm)
   #:use-module (guix gexp)
   #:use-module (srfi srfi-1)
-  #:export (%test-elogind))
+  #:export (%test-elogind
+            %test-minimal-desktop))
 
 
 ;;;
@@ -103,3 +107,188 @@
                #:imported-modules '((gnu services herd)
                                     (guix combinators)))))
       (run-elogind-test (virtual-machine os))))))
+
+
+;;;
+;;; Seatd/greetd based minimal desktop
+;;;
+
+(define %minimal-services
+  (append
+   (list
+    (service seatd-service-type)
+    (service greetd-service-type
+             (greetd-configuration
+              (terminals
+               (list
+                (greetd-terminal-configuration (terminal-vt "1"))
+                (greetd-terminal-configuration (terminal-vt "2"))
+                (greetd-terminal-configuration (terminal-vt "3"))
+                (greetd-terminal-configuration (terminal-vt "4"))
+                (greetd-terminal-configuration (terminal-vt "5"))
+                (greetd-terminal-configuration (terminal-vt "6")))))))
+   (modify-services %base-services
+     (delete login-service-type)
+     (delete mingetty-service-type))))
+
+(define-syntax-rule (minimal-operating-system user-services ...)
+  "Return an operating system that includes USER-SERVICES in addition to
+minimal %BASE-SERVICES."
+  (operating-system (inherit %simple-os)
+                    (services (cons* user-services ... %minimal-services))))
+
+(define (run-minimal-desktop-test os vm)
+  (define test
+    (with-imported-modules '((gnu build marionette)
+                             (guix build syscalls))
+      #~(begin
+          (use-modules (gnu build marionette)
+                       (guix build syscalls)
+                       (srfi srfi-1)
+                       (srfi srfi-64)
+                       (ice-9 pretty-print))
+
+          (define marionette
+            (make-marionette #$vm))
+
+          (define (file-get-all-strings fname)
+            (marionette-eval '(use-modules (rnrs io ports)) marionette)
+            (wait-for-file fname marionette #:read 'get-string-all))
+
+          (define (wait-for-unix-socket-m socket)
+            (wait-for-unix-socket socket marionette))
+
+          (mkdir #$output)
+          (chdir #$output)
+
+          (test-begin "minimal-desktop")
+
+          (test-assert "seatd is ready"
+            (wait-for-unix-socket-m "/run/seatd.sock"))
+
+          (test-equal "login user on tty1"
+            "alice\n"
+            (begin
+              ;; Wait for tty1.
+              (marionette-eval
+               '(begin
+                  (use-modules (gnu services herd))
+                  (start-service 'term-tty1))
+               marionette)
+              (marionette-control "sendkey ctrl-alt-f1" marionette)
+
+              ;; login as root change alice password and exit
+              ;; then login as alice
+              (for-each
+               (lambda (cmd) (marionette-type cmd marionette) (sleep 1))
+               (list
+                "root\n"
+                "\n"
+                "passwd alice\n"
+                "alice\n"
+                "alice\n"
+                "exit\n"
+                "alice\n"
+                "alice\n"
+                "id -un > logged-in\n"))
+
+              (file-get-all-strings "/home/alice/logged-in")))
+
+          (test-equal "validate user environment"
+            '("SEATD_SOCK=/run/seatd.sock"
+              "XDG_RUNTIME_DIR=/run/user/1000"
+              "XDG_SEAT=seat0"
+              "XDG_VTNR=1")
+
+            (begin
+              (marionette-type "env > env\n" marionette)
+              (sleep 1)
+
+              (define user-env (string-tokenize
+                                (file-get-all-strings "/home/alice/env")))
+
+              (define (expected-var var)
+                (any (lambda (s) (string-contains var s))
+                     '("SEATD_SOCK"
+                       "XDG_RUNTIME_DIR"
+                       "XDG_SEAT"
+                       "XDG_VTNR")))
+
+              (sort (filter expected-var user-env) string<?)))
+
+          (test-assert "validate SEATD_SOCK and GREETD_SOCK"
+            (begin
+              (marionette-type "env > env\n" marionette)
+              (sleep 1)
+
+              (define (sock-var? var)
+                (any (lambda (s) (string-contains var s))
+                     '("SEATD_SOCK" "GREETD_SOCK")))
+
+              (define (sock-var-sock var)
+                (car (cdr (string-split var #\=))))
+
+              (let*
+                  ((out (file-get-all-strings "/home/alice/env"))
+                   (out (string-tokenize out))
+                   (out (filter sock-var? out))
+                   (socks (map sock-var-sock out))
+                   (socks (map wait-for-unix-socket-m socks)))
+                (and (= 2 (length socks)) (every identity socks)))))
+
+          (test-assert "greetd is ready"
+            (begin
+              (marionette-type "ps -C greetd -o pid,args --no-headers > ps-greetd\n"
+                               marionette)
+              (sleep 1)
+
+              (define (greetd-daemon? cmd)
+                (string-contains cmd "config"))
+
+              (define (greetd-cmd-to-pid cmd)
+                (car (string-split cmd #\space)))
+
+              (define (greetd-pid-to-sock pid)
+                (string-append "/run/greetd-" pid ".sock"))
+
+              (let* ((out (file-get-all-strings "/home/alice/ps-greetd"))
+                     (out (string-split out #\newline))
+                     (out (map string-trim-both out))
+                     (out (filter greetd-daemon? out))
+                     (pids (map greetd-cmd-to-pid out))
+                     (socks (map greetd-pid-to-sock pids))
+                     (socks (map wait-for-unix-socket-m socks)))
+                (every identity socks))))
+
+          ;; a bit weak, but tests everything at once actually
+          (test-equal "check /run/user/<uid> mounted and writable"
+            "alice\n"
+            (begin
+              (marionette-type "echo alice > /run/user/1000/test\n" marionette)
+              (file-get-all-strings "/run/user/1000/test")))
+
+          (test-assert "screendump"
+            (begin
+              (marionette-control (string-append "screendump " #$output
+                                                 "/tty1.ppm")
+                                  marionette)
+              (file-exists? "tty1.ppm")))
+
+          (test-end)
+          (exit (= (test-runner-fail-count (test-runner-current)) 0)))))
+
+  (gexp->derivation "minimal-desktop" test))
+
+(define %test-minimal-desktop
+  (system-test
+   (name "minimal-desktop")
+   (description
+    "Test whether we can log in when seatd and greetd is enabled")
+   (value
+    (let* ((os (marionette-operating-system
+                (minimal-operating-system)
+                #:imported-modules '((gnu services herd)
+                                     (guix combinators))))
+           (vm (virtual-machine os)))
+      (run-minimal-desktop-test (virtualized-operating-system os '())
+                                #~(list #$vm))))))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 10/10] doc: Add desktop seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:06 +0000
Resent-Message-ID: <handler.49969.B49969.162880589611234 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880589611234
          (code B ref 49969); Thu, 12 Aug 2021 22:05:06 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:04:56 +0000
Received: from localhost ([127.0.0.1]:40054 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIop-0002v3-Et
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:55 -0400
Received: from mail-ed1-f43.google.com ([209.85.208.43]:37714)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIol-0002tR-Tr
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:04:52 -0400
Received: by mail-ed1-f43.google.com with SMTP id g21so12144870edb.4
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:51 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=PhTX7jcScgkGl1cYJiOkS0WUjZf4D6PwHWC4hMrfT+g=;
 b=k2P8zjxWpiI4661DnLRuw2A/FipVAv8xVZUbLK6Cw1wwPDySLGQNA2/mJAp6T5tTcq
 WtFoQGWx0P8V6YQ47XJOoDzhPSQ7PwHqNBCBaWYacl+kcqCbrEYE3OWl1mCUbSsYA33R
 g3B25VCVfRTtJiqfAPc5q4jL9Ha8bNO8s7N9QfZq7da8O7DV/OCLCrqXEdeXryJrP/Jr
 rYxZutUMLhAvASwZNhVepDoOLkqoPU/y7mXH0OzOMlbgmaq/fcGk5PIpxLJJGyF1LHW9
 xGtKdT+3ljPao1LtxtxrzZLf0LhdkS5cBYTPNMxdZWsbatZ0IbVqC8tteJC8oDZt3oRb
 /2yg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=PhTX7jcScgkGl1cYJiOkS0WUjZf4D6PwHWC4hMrfT+g=;
 b=k0ITEGPadV3RaFVeSueZh9e9MaTYZOhFydtD9c9NLN3mJLIHHcqEzNotR8uphe5rJt
 BIFzQtKAJdMdABaM/AoFuu4lSHa1nouUVmGoBq0GoO2a8X65eVE1efm6rg6hZ9BUcBTA
 z1iHrrBWWZifIfvqg/UxsDCBH+KR9wIgZiD3OSGq0M2k4UuCgoWCsVeHyZus9vbr7KZm
 rFvUANxerOn3Vg7iIBFDq+HD9l1OE5sma8j9f56Pgxw73NM/ZEb3ThfE+1jIFS8431mG
 wJKVAWqS4L1slp7thFqUvlpu786rlutb1xLxGkJWxSPwSXGEvTxZz/cSt37Z4RjYCbmK
 lWLg==
X-Gm-Message-State: AOAM532TMZbKaOe0uz4vsa6AZ7bpMq3hbmO24RCyIUhlv2idPjwBdDST
 B/93KuFmGH/MnInM3fTGGK3H1FgbO//LVA==
X-Google-Smtp-Source: ABdhPJx0IjIJYkAtUA9ij+wdw6hhO0meJC1W6bEQoOowFMh2hTLYqYUNUxIaRz2BtxHHYyb2qu8AMA==
X-Received: by 2002:a05:6402:2937:: with SMTP id
 ee55mr709731edb.91.1628805886068; 
 Thu, 12 Aug 2021 15:04:46 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.45
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:45 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:20 +0300
Message-Id: <20210812220420.24118-11-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* doc/guix.texi (Desktop Services): Provide documentation for
seatd-service-type and greetd-service-type including configuration
and sample usage.
---
 doc/guix.texi | 183 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 183 insertions(+)

diff --git a/doc/guix.texi b/doc/guix.texi
index 78c1c09858..1e5838ce32 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -94,6 +94,7 @@ Copyright @copyright{} 2021 Xinglu Chen@*
 Copyright @copyright{} 2021 Raghav Gururajan@*
 Copyright @copyright{} 2021 Domagoj Stolfa@*
 Copyright @copyright{} 2021 Hui Lu@*
+Copyright @copyright{} 2021 muradm@*
 
 Permission is granted to copy, distribute and/or modify this document
 under the terms of the GNU Free Documentation License, Version 1.3 or
@@ -19694,6 +19695,188 @@ and ``passwd'' is with the value @code{passwd}.
 @end table
 @end deftp
 
+@defvr {Scheme Variable} seatd-service-type
+A minimal seat management daemon, and a universal seat management library.
+
+Seat management takes care of mediating access to shared devices (graphics,
+input), without requiring the applications needing access to be root.
+
+In general should be used as replacement to @code{elogind-service-type}.
+
+@lisp
+(append
+  (list
+   ;; make sure seatd is running
+   (service seatd-service-type)
+
+   (service greetd-service-type
+            (greetd-configuration
+             (terminals
+              (list
+               ;; lets have terminals 1, 2 and 3 run default XDG terminal session
+               (greetd-terminal-configuration (terminal-vt "1"))
+               (greetd-terminal-configuration (terminal-vt "2"))
+               (greetd-terminal-configuration (terminal-vt "3"))
+               ;; and terminals 4, 5 and 6 plain bash terminal session
+               ;; although not so plain, just to illustrate flexibility
+               (greetd-terminal-configuration
+                (terminal-vt "4")
+                (default-session-command greetd-agreety-tty-session))
+               (greetd-terminal-configuration
+                (terminal-vt "5")
+                (default-session-command greetd-agreety-tty-session))
+               (greetd-terminal-configuration
+                (terminal-vt "6")
+                (default-session-command greetd-agreety-tty-session))))))
+
+  ;; normaly one would want %base-services
+  (modify-services %base-services
+    ;; seatd/greetd combination can replace these
+    ;; greetd provides its own PAM service
+    (delete login-service-type)
+    (delete mingetty-service-type)))
+
+@end lisp
+
+@end defvr
+
+@deftp {Data Type} seatd-configuration
+Configuration record for the seatd daemon service.
+
+@table @asis
+@item @code{seatd} (default: @code{seatd})
+The seatd package to use.
+
+@item @code{user} (default: @samp{"root"})
+User to own the seatd socket.
+
+@item @code{group} (default: @samp{"users"})
+Group to own the seatd socket.
+
+@item @code{socket} (default: @samp{"/run/seatd.sock"})
+Where to create the seatd socket.
+
+@item @code{loglevel} (default: @samp{"error"})
+Log level to output logs. Possible values: @samp{"silent"}, @samp{"error"},
+@samp{"info"} and @samp{"debug"}.
+
+@end table
+@end deftp
+
+@defvr {Scheme Variable} greetd-service-type
+greetd is a minimal and flexible login manager daemon that makes no
+assumptions about what you want to launch.
+
+If you can run it from your shell in a TTY, greetd can start it. If it
+can be taught to speak a simple JSON-based IPC protocol, then it can
+be a greeter.
+
+@code{<greetd-service-type>} provides necessary infrastructure for
+logging in users, including:
+
+@itemize @bullet
+@item
+@code{greetd} PAM service
+
+@item
+Special variation of @code{pam-mount} to mount @code{XDG_RUNTIME_DIR}
+
+@end itemize
+
+@end defvr
+
+@deftp {Data Type} greetd-configuration
+Configuration record for the greetd service.
+
+@table @asis
+@item @code{motd}
+A file-like object containing the ``message of the day''.
+
+@item @code{allow-empty-passwords?} (default: @code{#t})
+Allow empty passwords by default so that first-time users can log in when
+the 'root' account has just been created.
+
+@item @code{terminals} (default: @code{'()})
+List of @code{<greetd-terminal-configuration>} per terminal for which
+@code{greetd} should be started.
+
+@end table
+@end deftp
+
+@deftp {Data Type} greetd-terminal-configuration
+Configuration record for per terminal greetd daemon service.
+
+@table @asis
+@item @code{greetd} (default: @code{greetd})
+The greetd package to use.
+
+@item @code{config-file-name}
+Configuration file name to use for greetd daemon. Generally, autogenerated
+derivation based on @code{terminal-vt} value.
+
+@item @code{terminal-vt} (default: @samp{"7"})
+The VT to run on. Use of a specific VT with appropriate conflict avoidance
+is recommended.
+
+@item @code{default-session-user} (default: @samp{"greeter"})
+The user to use for running the greeter.
+
+@item @code{default-session-command} (default: @code{greetd-agreety-tty-xdg-session})
+The command-line to run to start the default session.
+
+Possible values are:
+
+@itemize @bullet
+@item
+@code{greetd-agreety-tty-session} - bash terminal session
+
+@item
+@code{greetd-agreety-tty-xdg-session} - bash terminal session with XDG environment
+
+@item
+@code{greetd-agreety-session} - custom instance of terminal session
+@end itemize
+
+@end table
+@end deftp
+
+@deftp {Data Type} greetd-agreety-session
+Configuration record for the agreety greetd greeter.
+
+@table @asis
+@item @code{package} (default: @code{bash})
+The package of command.
+
+@item @code{command-bin} (default: @samp{"/bin/bash"})
+Path to binary relative to @code{package}.
+
+@item @code{command-args} (default: @code{'("-l")})
+Command arguments to pass to command.
+
+@item @code{extra-env} (default: @code{'()})
+Extra environment variables to set on login.
+
+@item @code{command-generator}
+Function that receives instance of this configuration as an argument and
+returns @code{program-file} that can be used with @code{agreety} greeter.
+
+Both @code{greetd-agreety-tty-session} and @code{greetd-agreety-tty-xdg-session}
+uses @code{greetd-agreety-session} under the hood.
+
+@end table
+@end deftp
+
+@defvr {Scheme Variable} greetd-agreety-tty-session
+Provides instance of @code{greetd-agreety-session} which starts @samp{"bash -l"}
+on login.
+@end defvr
+
+@defvr {Scheme Variable} greetd-agreety-tty-xdg-session
+Provides instance of @code{greetd-agreety-session} which starts @samp{"bash -l"}
+on login. Additionally, will set @code{XDG_SESSION_TYPE} and
+@code{XDG_RUNTIME_DIR} environment variables for session.
+@end defvr
+
 
 @node Sound Services
 @subsection Sound Services
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 06/10] gnu: desktop: Add greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 12 Aug 2021 22:05:06 +0000
Resent-Message-ID: <handler.49969.B49969.162880590411287 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162880590411287
          (code B ref 49969); Thu, 12 Aug 2021 22:05:06 +0000
Received: (at 49969) by debbugs.gnu.org; 12 Aug 2021 22:05:04 +0000
Received: from localhost ([127.0.0.1]:40058 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEIox-0002vn-0d
	for submit <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:05:03 -0400
Received: from mail-ej1-f52.google.com ([209.85.218.52]:41616)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEIog-0002tC-Rb
 for 49969 <at> debbugs.gnu.org; Thu, 12 Aug 2021 18:05:01 -0400
Received: by mail-ej1-f52.google.com with SMTP id d11so14464030eja.8
 for <49969 <at> debbugs.gnu.org>; Thu, 12 Aug 2021 15:04:46 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=2Zn/3A00/43wl0uo5PNfKqQ3QKrkErw0e6iG1A0CZ7w=;
 b=ZxdxgQYOho5+INrSBZIF31ZjQO+OFsJUCdkcdCS+3tf1anx53LSsNM44pyQEZfVk9x
 Pzvog2ErPFskFEL2qdowVersnx/rfAmZghGiml8WYT2ZFWkJgNjOJukyPMFML9uWZ2Kb
 F/Jv7A7SPm3aXAHwETB579YAUnLBn4kKmaxx5k+thPquOuC/th4ZxLwZcXNSZSwakxb2
 ZA9PDyW9f5wusMKFV2XA73GEinAAkffDUZYI1VkNnbmocdq0XyA209gl4xtxvV7ldws6
 FAMdCnkKKEFYE2p9V6H7oJ5tqgR086cAdTjTpcbxrswWvDl0MrMplMPd2WfB5cAxpKnD
 aL9w==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=2Zn/3A00/43wl0uo5PNfKqQ3QKrkErw0e6iG1A0CZ7w=;
 b=AuwbkkJm3OD0S3mW4l6tUmkcFnVAGbcIU9ZBgl55wsEY6OQl8/hSb9cUiFmMEOtPcT
 A7PrHoMJ3F+HkuacHwozKeEhsImE0XVVmbl3xThU6Y33n+xB/2wI5yOlCNz/tSPrp/BZ
 TeM125s8Sm2KPYaggrAF1ViSKaUf1rzed0V7ZgHiUkm+dgrJ8yFrBn+yV8ycv5qP+uXx
 pLom1sWqT7ePkWBQdBVspEe/3pjngA2IBjYH22nWaI8PXw11na5EHusmYqczjQPDgEW+
 mmz02S4QYOhlQhDqaYSkrtPaCTMcj2JxGx6qRyJlLiJoG9zjBLkwh4wZH0Tw9lHhy3lB
 xmsQ==
X-Gm-Message-State: AOAM530qqaY+NpXgveAc4QAPrPOB9YLc0ghycX25Nbkh0vdIRBbt/OQ2
 Zz/spmlhfZg222kAmDoI5y/irqYrBn+LIw==
X-Google-Smtp-Source: ABdhPJxltSnyafH72NHutIm7KxWkHGS7RAH60U/kAPCRar+VfZ4O17FUcTSj1rj7Qdjbsf8aHq+n/g==
X-Received: by 2002:a17:906:3812:: with SMTP id
 v18mr5696133ejc.399.1628805880976; 
 Thu, 12 Aug 2021 15:04:40 -0700 (PDT)
Received: from localhost.localdomain ([5.24.104.153])
 by smtp.gmail.com with ESMTPSA id o23sm1750302eds.75.2021.08.12.15.04.39
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 12 Aug 2021 15:04:40 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 01:04:16 +0300
Message-Id: <20210812220420.24118-7-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

Currently, only agreety configuration is provided.

* gnu/services/desktop.scm: Add greetd-service-type
---
 gnu/services/desktop.scm | 225 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 225 insertions(+)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index a63a2936a7..b7ac08cf20 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -49,6 +49,7 @@
   #:use-module (gnu system pam)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages admin)
+  #:use-module (gnu packages bash)
   #:use-module (gnu packages cups)
   #:use-module (gnu packages freedesktop)
   #:use-module (gnu packages gnome)
@@ -160,6 +161,12 @@
             seatd-configuration
             seatd-service-type
 
+            greetd-configuration
+            greetd-terminal-configuration
+            greetd-service-type
+            greetd-agreety-tty-session
+            greetd-agreety-tty-xdg-session
+
             %desktop-services))
 
 ;;; Commentary:
@@ -1240,6 +1247,224 @@ applications needing access to be root.")
      (service-extension shepherd-root-service-type seatd-shepherd-service)))
    (default-value (seatd-configuration))))
 
+
+;;;
+;;; greetd-service-type -- minimal and flexible login manager daemon
+;;;
+
+(define-record-type* <greetd-agreety-session>
+  greetd-agreety-session make-greetd-agreety-session
+  greetd-agreety-session?
+  (package greetd-agreety-command-package (default bash))
+  (command-bin greetd-agreety-command-bin (default "/bin/bash"))
+  (command-args greetd-agreety-command-args (default '("-l")))
+  (extra-env greetd-agreety-extra-env (default '()))
+  (command-generator greetd-agreety-command-generator))
+
+(define greetd-agreety-tty-session-command
+  (match-lambda
+    (($ <greetd-agreety-session> pkg command-bin command-args extra-env)
+     (program-file
+      "agreety-tty-session-command"
+      #~(begin
+          (use-modules (ice-9 match))
+          (let* ((abs-cmd-bin #$(file-append pkg command-bin)))
+            (for-each
+             (match-lambda ((var . val) (setenv var val)))
+             (quote (#$@extra-env)))
+            (apply execl abs-cmd-bin abs-cmd-bin
+                   (list #$@command-args))))))))
+
+(define greetd-agreety-tty-xdg-session-command
+  (match-lambda
+    (($ <greetd-agreety-session> package command-bin command-args extra-env)
+     (program-file
+      "agreety-tty-xdg-session-command"
+      #~(begin
+          (use-modules (ice-9 match))
+          (let*
+              ((username (getenv "USER"))
+               (useruid (passwd:uid (getpwuid username)))
+               (useruid (number->string useruid))
+               (abs-cmd-bin #$(file-append package command-bin)))
+            (setenv "XDG_SESSION_TYPE" "tty")
+            (setenv "XDG_RUNTIME_DIR" (string-append "/run/user/" useruid))
+            (for-each
+             (match-lambda ((var . val) (setenv var val)))
+             (quote (#$@extra-env)))
+            (apply execl abs-cmd-bin abs-cmd-bin
+                   (list #$@command-args))))))))
+
+(define greetd-agreety-tty-session
+  (greetd-agreety-session
+   (command-generator greetd-agreety-tty-session-command)))
+
+(define greetd-agreety-tty-xdg-session
+  (greetd-agreety-session
+   (command-generator greetd-agreety-tty-xdg-session-command)))
+
+(define-record-type* <greetd-terminal-configuration>
+  greetd-terminal-configuration make-greetd-terminal-configuration
+  greetd-terminal-configuration?
+  (greetd greetd-package (default greetd))
+  (config-file-name greetd-config-file-name (thunked)
+                    (default (default-config-file-name this-record)))
+  (terminal-vt greetd-terminal-vt (default "7"))
+  (default-session-user greetd-default-session-user (default "greeter"))
+  (default-session-command greetd-default-session-command
+    (default greetd-agreety-tty-xdg-session)))
+
+(define (default-config-file-name config)
+  (string-join (list "config-" (greetd-terminal-vt config) ".toml") ""))
+
+(define make-greetd-terminal-default-session-command
+  (match-lambda
+    (($ <greetd-terminal-configuration> greetd _ _ _ default-session-command)
+     (cond ((greetd-agreety-session? default-session-command)
+            (let*
+                ((generator (greetd-agreety-command-generator
+                             default-session-command))
+                 (command (apply generator (list default-session-command)))
+                 (agreety-bin (file-append greetd "/bin/agreety")))
+              (program-file
+               "agreety-command"
+               #~(execl #$agreety-bin #$agreety-bin "-c" #$command))))
+           (else (program-file "agreety-command-exit" #~(exit #f)))))))
+
+(define (make-greetd-terminal-configuration-file config)
+  (let*
+      ((config-file-name (greetd-config-file-name config))
+       (terminal-vt (greetd-terminal-vt config))
+       (default-session-user (greetd-default-session-user config))
+       (default-session-command (make-greetd-terminal-default-session-command config)))
+    (mixed-text-file
+     config-file-name
+     "[terminal]\n"
+     "vt = " terminal-vt "\n"
+     "[default_session]\n"
+     "user = " default-session-user "\n"
+     "command = " default-session-command "\n")))
+
+(define %default-motd
+  (plain-file "motd" "This is the GNU operating system, welcome!\n\n"))
+
+(define %greetd-accounts
+  (list (user-account
+         (name "greeter")
+         (group "wheel")
+         (supplementary-groups '("users" "tty" "input" "video" "audio"))
+         (system? #t))))
+
+(define %greetd-file-systems
+  (list (file-system
+          (device "none")
+          (mount-point "/run/greetd/pam_mount")
+          (type "tmpfs")
+          (check? #f)
+          (flags '(no-suid no-dev no-exec))
+          (options "mode=0755")
+          (create-mount-point? #t))))
+
+(define %greetd-pam-mount-rules
+  `((debug (@ (enable "0")))
+    (volume (@ (sgrp "users")
+               (fstype "tmpfs")
+               (mountpoint "/run/user/%(USERUID)")
+               (options "noexec,nosuid,nodev,size=1g,mode=0700,uid=%(USERUID),gid=%(USERGID)")))
+    (logout (@ (wait "0")
+               (hup "0")
+               (term "yes")
+               (kill "no")))
+    (mkmountpoint (@ (enable "1") (remove "true")))))
+
+(define-record-type* <greetd-configuration>
+  greetd-configuration make-greetd-configuration
+  greetd-configuration?
+  (motd greetd-motd (default %default-motd))
+  (allow-empty-passwords? greetd-allow-empty-passwords? (default #t))
+  (terminals greetd-terminals (default '())))
+
+(define (make-greetd-pam-mount-conf-file config)
+  (computed-file
+   "greetd_pam_mount.conf.xml"
+   #~(begin
+       (use-modules (sxml simple))
+       (call-with-output-file #$output
+         (lambda (port)
+           (sxml->xml
+            '(*TOP*
+              (*PI* xml "version='1.0' encoding='utf-8'")
+              (pam_mount
+               #$@%greetd-pam-mount-rules
+               (pmvarrun
+                #$(file-append greetd-pam-mount
+                               "/sbin/pmvarrun -u '%(USER)' -o '%(OPERATION)'"))))
+            port))))))
+
+(define (greetd-etc-service config)
+  `(("security/greetd_pam_mount.conf.xml"
+     ,(make-greetd-pam-mount-conf-file config))))
+
+(define (greetd-pam-service config)
+  (define optional-pam-mount
+    (pam-entry
+     (control "optional")
+     (module #~(string-append #$greetd-pam-mount "/lib/security/pam_mount.so"))))
+
+  (list
+   (unix-pam-service "greetd"
+                     #:login-uid? #t
+                     #:allow-empty-passwords?
+                     (greetd-allow-empty-passwords? config)
+                     #:motd
+                     (greetd-motd config))
+   (lambda (pam)
+     (if (member (pam-service-name pam)
+                 '("login" "greetd" "su" "slim" "gdm-password"))
+         (pam-service
+          (inherit pam)
+          (auth (append (pam-service-auth pam)
+                        (list optional-pam-mount)))
+          (session (append (pam-service-session pam)
+                           (list optional-pam-mount))))
+         pam))))
+
+(define (greetd-shepherd-services config)
+  (map
+   (lambda (tc)
+     (let*
+         ((greetd-bin (file-append (greetd-package tc) "/sbin/greetd"))
+          (greetd-conf (make-greetd-terminal-configuration-file tc))
+          (greetd-vt (greetd-terminal-vt tc)))
+       (shepherd-service
+        (documentation "Minimal and flexible login manager daemon")
+        (requirement '(user-processes host-name udev virtual-terminal))
+        (provision (list (symbol-append
+                          'term-tty
+                          (string->symbol (greetd-terminal-vt tc)))))
+        (start #~(make-forkexec-constructor
+                  (list #$greetd-bin "-c" #$greetd-conf)
+                  #:log-file
+                  (string-append "/tmp/greetd." #$greetd-vt ".log")))
+        (stop #~(make-kill-destructor)))))
+   (greetd-terminals config)))
+
+(define greetd-service-type
+  (service-type
+   (name 'greetd)
+   (description "Provides necessary infrastructure for logging into the
+system including @code{greetd} PAM service, @code{pam-mount} module to
+mount/unmount /run/user/<uid> directory for user and @code{greetd}
+login manager daemon.")
+   (extensions
+    (list
+     (service-extension account-service-type (const %greetd-accounts))
+     (service-extension file-system-service-type (const %greetd-file-systems))
+     (service-extension etc-service-type greetd-etc-service)
+     (service-extension pam-root-service-type greetd-pam-service)
+     (service-extension shepherd-root-service-type greetd-shepherd-services)))
+   (default-value (greetd-configuration))))
+
 
 ;;;
 ;;; The default set of desktop services.
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v3 03/10] gnu: freedesktop: Add greetd 0.7.0
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Fri, 13 Aug 2021 20:44:02 +0000
Resent-Message-ID: <handler.49969.B49969.162888742319766 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162888742319766
          (code B ref 49969); Fri, 13 Aug 2021 20:44:02 +0000
Received: (at 49969) by debbugs.gnu.org; 13 Aug 2021 20:43:43 +0000
Received: from localhost ([127.0.0.1]:43128 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mEe1h-00058b-Sp
	for submit <at> debbugs.gnu.org; Fri, 13 Aug 2021 16:43:43 -0400
Received: from mail-wr1-f49.google.com ([209.85.221.49]:42551)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mEe1e-000587-MI
 for 49969 <at> debbugs.gnu.org; Fri, 13 Aug 2021 16:43:36 -0400
Received: by mail-wr1-f49.google.com with SMTP id q11so14863821wrr.9
 for <49969 <at> debbugs.gnu.org>; Fri, 13 Aug 2021 13:43:34 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=3V8DMCKbRSqdR3wtMv+7Ro3Vrt3PCoHfrpfXzhJ1GgI=;
 b=QpI0nyxz6PIH3LH+RIkmAGe9aTE10YTrUHFacM29afpzyBrh0arRIghOXV4cVoTDjF
 luCmo+k4Ab6J26Xi29dhuDml3lLTAXX/6juAInE/Z8hXn565l899OIggEA4ZkKF8gWgh
 xCeyQL98YpYrRHW1eoK/X0PKsZyGS2N0FZM6RMtTYww4EQ7n8XjzwEVLbDCCpxFeads/
 mphzKn9WksP5u8orwWH0ENtN1oIu1F8ji1C5Twnpsa0byI8h/kA3rO4gWUsM+z2WAkma
 +oFr4S8+/NbvTsoCG8wa8ET/rW6krm0zf1OohPntYEBX35zeRAvOL2bkWHtGrc/+vH3N
 WutA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=3V8DMCKbRSqdR3wtMv+7Ro3Vrt3PCoHfrpfXzhJ1GgI=;
 b=mN/1XpbCDXDBTuu2RcQFlHOvvD7C2LsdHdD2c74Wlrs/AX3xDUYMcDpjZaLgOuYdnT
 O7jZjQ5VSDoM4gXS+T+Hvc8oTpH6HImtfwalMUyK60/o6AMeWqb9skXLH+v8II4gn+bt
 H6YpTm5J1GWBc33mD8rMDwTBxEPmpzd7AssyWsw27SZ/BoYwSTJ0aVYUvAuEhqralfPL
 D5Qfn+SFg6Z62mkgJPpjhEK/p53ncZ7ufgYSvSXAgvPbXxbiGdzTLhEpl7XkedYEq/R/
 7sDwh1ZgaldyeOutL9w/BwGRUFv17tLkgbGLiNPkEggCQhClEyOgwjxD+zpeBOOKJjYq
 04zg==
X-Gm-Message-State: AOAM531QT5d1AWbUm8cemtt9X9e/KuFTFmg61t67Uxkx/eMqN33eVXQ+
 KNVn5QmED/FiFfLWWaiDAmwRbXzTIjl5JQ==
X-Google-Smtp-Source: ABdhPJyceTXnMdQCDuPV5AdcPkOxcR/9KsVyp6ELI0nYSfeQSfVI3dr8MmZ7L8S/axbhapVHD3wwuw==
X-Received: by 2002:a05:6000:2c3:: with SMTP id
 o3mr5136163wry.133.1628887408472; 
 Fri, 13 Aug 2021 13:43:28 -0700 (PDT)
Received: from localhost.localdomain ([5.24.113.45])
 by smtp.gmail.com with ESMTPSA id p14sm2380187wmi.42.2021.08.13.13.43.27
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Fri, 13 Aug 2021 13:43:27 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Fri, 13 Aug 2021 23:43:21 +0300
Message-Id: <20210813204321.2111-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220022.24025-1-mail@HIDDEN>
References: <20210812220022.24025-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
---
 gnu/packages/freedesktop.scm | 86 ++++++++++++++++++++++++++++++++++++
 1 file changed, 86 insertions(+)

diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
index 693a79c738..0be7d0fe4d 100644
--- a/gnu/packages/freedesktop.scm
+++ b/gnu/packages/freedesktop.scm
@@ -24,6 +24,7 @@
 ;;; Copyright © 2020 Raghav Gururajan <raghavgururajan@HIDDEN>
 ;;; Copyright © 2021 Brendan Tildesley <mail@HIDDEN>
 ;;; Copyright © 2021 pineapples <guixuser6392@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -46,6 +47,7 @@
   #:use-module (guix packages)
   #:use-module (guix download)
   #:use-module (guix git-download)
+  #:use-module (guix build-system cargo)
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system meson)
@@ -62,6 +64,7 @@
   #:use-module (gnu packages check)
   #:use-module (gnu packages cmake)
   #:use-module (gnu packages compression)
+  #:use-module (gnu packages crates-io)
   #:use-module (gnu packages cryptsetup)
   #:use-module (gnu packages databases)
   #:use-module (gnu packages disk)
@@ -862,6 +865,89 @@ that require it.  It also provides a universal seat management library that
 allows applications to use whatever seat management is available.")
     (license license:expat)))
 
+(define-public greetd
+  (package
+    (name "greetd")
+    (version "0.7.0")
+    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url home-page)
+                    (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32 "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zbgr3g"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-nix" ,rust-nix-0.17)
+        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
+        ("rust-rpassword" ,rust-rpassword-4)
+        ("rust-users" ,rust-users-0.9)
+        ("rust-serde" ,rust-serde-1)
+        ("rust-serde-json" ,rust-serde-json-1)
+        ("rust-libc" ,rust-libc-0.2)
+        ("rust-tokio" ,rust-tokio-0.2)
+        ("rust-getopts" ,rust-getopts-0.2)
+        ("rust-thiserror" ,rust-thiserror-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
+        ("rust-enquote" ,rust-enquote-1))
+       #:phases
+       (modify-phases %standard-phases
+         ;; once https://todo.sr.ht/~kennylevinsen/greetd/25
+         ;; is solved, below patch can be removed
+         (add-after 'unpack 'patch-terminal-switch
+           (lambda* (#:key inputs #:allow-other-keys)
+             (substitute* "greetd/src/server.rs"
+               (("switch: true,")
+                "switch: false,"))))
+         (delete 'package)
+         (add-after 'build 'build-man-pages
+           (lambda* (#:key inputs #:allow-other-keys)
+             (define (scdoc-cmd doc lvl)
+               (system (string-append "scdoc < "
+                                      doc "-" lvl ".scd > "
+                                      doc "." lvl)))
+             (with-directory-excursion "man"
+               (scdoc-cmd "greetd" "1")
+               (scdoc-cmd "greetd" "5")
+               (scdoc-cmd "greetd-ipc" "7")
+               (scdoc-cmd "agreety" "1"))))
+         (replace 'install
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (bin (string-append out "/bin"))
+                    (sbin (string-append out "/sbin"))
+                    (share (string-append out "/share"))
+                    (man (string-append share "/man"))
+                    (man1 (string-append man "/man1"))
+                    (man5 (string-append man "/man5"))
+                    (man7 (string-append man "/man7"))
+                    (release "target/release")
+                    (greetd-bin (string-append release "/greetd"))
+                    (agreety-bin (string-append release "/agreety")))
+               (install-file greetd-bin sbin)
+               (install-file agreety-bin bin)
+               (with-directory-excursion "man"
+                 (install-file "greetd.1" man1)
+                 (install-file "greetd.5" man5)
+                 (install-file "greetd-ipc.7" man7)
+                 (install-file "agreety.1" man1))))))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)
+       ("scdoc" ,scdoc)))
+    (synopsis "minimal and flexible login manager daemon")
+    (description
+     "greetd is a minimal and flexible login manager daemon
+that makes no assumptions about what you want to launch.
+
+If you can run it from your shell in a TTY, greetd can start it.
+
+If it can be taught to speak a simple JSON-based IPC protocol,
+then it can be a greeter.")
+    (license license:gpl3+)))
+
 (define-public packagekit
   (package
     (name "packagekit")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 00/10] gnu: desktop: Add seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:32:02 +0000
Resent-Message-ID: <handler.49969.B49969.162938351630644 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.162938351630644
          (code B ref 49969); Thu, 19 Aug 2021 14:32:02 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:31:56 +0000
Received: from localhost ([127.0.0.1]:60519 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGj5H-0007xs-TT
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:31:56 -0400
Received: from mail-ej1-f45.google.com ([209.85.218.45]:37858)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGj5A-0007mN-LX
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:31:49 -0400
Received: by mail-ej1-f45.google.com with SMTP id h9so13390396ejs.4
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:31:48 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=qK7l6DtJppdkfMIjcx1nu8JZfRFfqW4TL5Sw7SwXMx8=;
 b=fF+EEgzz5sb5biAcMOj34lbspkzOMzIwtDsF8Z6LwF6qCotKQN+KguKFY+GGPUA+pY
 3ahPPjJO/lkfVrWrb5cHbm+9Lp8Zl5ahFACRWWJDNOzof8leY5spvEFIxT1kTtSrnSMd
 8TOCPCycFKiSl0hEXHkQP/bAlfMB8jX17bic4hYNEKMn+7eAHCBTKDD+AvMLMzc+SDbn
 IKLhieJSf3/zIIO4KN5v6uztrFdMttSfkEqw6qJQk+Ian6wsHlMSdMieNsjNt/rH56JM
 V3VfIR2lN4lxH5Pjta4pLbmitXK5f37Z7m2aLePnt5hpMQGwuQOpEiajHJ8npftfPijJ
 aL5g==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=qK7l6DtJppdkfMIjcx1nu8JZfRFfqW4TL5Sw7SwXMx8=;
 b=gpRQslllAYAMw9phuRtFgpRobbdSSwP7JNCWZwuxZSwe9X4CCgyUguS/5/pHZH/qEx
 P+RV83o5AAadykhwgv6x8hnMd4V8RTHluK4HRv57WEr1wC4wbO97IOjUssvKYpWipW0G
 hp4qS9f6/St4CfEonC+kQD9TyUfOjCfSeJBuFjY2yomjl1Kyd2Pq9VMgGO7VqDYD1gyl
 N0CiKlz+WfXhJG9wBL4nBRiNTEuEOW8lpcuDMnr4EpJxJPh1cB/lPT3iLVnsop7z6g36
 wveb61iJhY/f7Z/uUCgVrSa7e5yzDKEZFO1YfMICekUIsh6Vvi56WmuP4gTGjbCk0sa1
 5/7g==
X-Gm-Message-State: AOAM530XekC9gHUTsvx8KTm0i1KdbPOMbf8cCr3Ttkj4tzr1XKrCZvkz
 PvRawDtAKThzoeNyNX+A6IlqTBqMmvKb6Q==
X-Google-Smtp-Source: ABdhPJx4dxIqsemaB4Kjyt7Afeacwsr4CtMDpADnPPCFBF0/GOGQlj4Q1sti90D7AUW/Owl4/lorqw==
X-Received: by 2002:a17:907:b09:: with SMTP id
 h9mr16280620ejl.278.1629383502406; 
 Thu, 19 Aug 2021 07:31:42 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id s3sm1379449ejm.49.2021.08.19.07.31.40
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:31:41 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:31:33 +0300
Message-Id: <20210819143133.6398-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210812220420.24118-1-mail@HIDDEN>
References: <20210812220420.24118-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

This patch series introduces two new services;

 - seatd-service-type: simple seat management daemon
 - greetd-service-type: simple login daemon

Both services are very minimalistic in nature. Simple seatd daemon
could be said as replacement for elogind-service-type. greetd daemon
is simple replacement for mingetty.

In addition to the base services, special build of pam-mount module is
included as greetd-pam-mount. It is used to provide
auto-(mounting/unmounting) of XDG_RUNTIME_DIR. Special build is
required to avoid interference with default pam-mount, if used in
the system.

greetd provides agreety terminal greeter out of the box. Current
greetd-service-type includes configuration for greetd-agreety-session
variations, i.e. only terminal are supported at the moment.

Next step would be adding gtkgreet and/or wlgreet alternatives for
graphical greeter.

muradm (10):
  gnu: crates-io: Add rust-enquote 1.0.3
  gnu: crates-io: Add rust-pam-sys 0.5.6
  gnu: freedesktop: Add greetd 0.7.0
  gnu: admin: Add greetd-pam-mount
  gnu: desktop: Add seatd-service-type
  gnu: desktop: Add greetd-service-type
  gnu: base: Add greetd to applied PAM services
  gnu: pam-mount: Add greetd to applied PAM services
  gnu: tests: Add seatd/greetd based minimal desktop system tests
  doc: Add desktop seatd-service-type and greetd-service-type

 doc/guix.texi                | 187 +++++++++++++++++++++++
 gnu/packages/admin.scm       |  33 ++++
 gnu/packages/crates-io.scm   |  49 ++++++
 gnu/packages/freedesktop.scm | 120 +++++++++++++++
 gnu/services/base.scm        |   3 +-
 gnu/services/desktop.scm     | 288 ++++++++++++++++++++++++++++++++++-
 gnu/services/pam-mount.scm   |   3 +-
 gnu/tests/desktop.scm        | 191 ++++++++++++++++++++++-
 8 files changed, 870 insertions(+), 4 deletions(-)

-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 02/10] gnu: crates-io: Add rust-pam-sys 0.5.6
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:01 +0000
Resent-Message-ID: <handler.49969.B49969.16293839631122 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839631122
          (code B ref 49969); Thu, 19 Aug 2021 14:40:01 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:23 +0000
Received: from localhost ([127.0.0.1]:60543 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCV-0000I0-0V
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:23 -0400
Received: from mail-ej1-f42.google.com ([209.85.218.42]:44981)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCT-0000Hf-Vm
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:22 -0400
Received: by mail-ej1-f42.google.com with SMTP id bq25so13357247ejb.11
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:21 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=5UKAphfDxOzm3bwyBiHJxbodPH6X2Jnn4XQw6tMBdHI=;
 b=0f5sMz4i/L8KznZCIj/O3euEtweM6g59UGWh83FRnLz9tZh/1B8X85fUQXAL4fHbAz
 UtAQ2EZ4QKQZG4qk3GzSuF3Vv8AzmC5/iuOT8koha3f/mvZ0N3yEuvJb58YvoxI0zN9i
 r4ONudzkGjLFmMlgP6cBcM4eFi6NybZg1FV2TVho/OvutpOUNwtFVeZN7NV7iO3N37pG
 De+4IlaIMZbM238PPaFZEb6Ezw7jyQKhIG1dtQu8KpYDW8QwAQSiNH547fDpuF27zT7K
 ICjF1xCZBCj4gRPWFwOROCn3YTpzoxS0EhJpS+JZ290hkELM3gywCERZtU2VfMUTEDEr
 PRKg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=5UKAphfDxOzm3bwyBiHJxbodPH6X2Jnn4XQw6tMBdHI=;
 b=ayWDj2PErlOh93IENQ9qAD04r18TwkL/5FW9piToXDQsnUIHeCDnc6DMzQaoi1pAJw
 wruz2QT6naTExIHQlsM7/74AWhbItzxEvDQP7QvPFvqtwnDvw0AUQwNDhzudQRehKfnQ
 wbcrjHogqb9x8Rxh3R2N5mXT2rU3zzIvJy1zgYDDv8N/WYowme9Ln8Jyx8icS3MxIdky
 fwYgczI1WPwyj6rdxAAalzVsFbmqjxNVMCJnO2Ms79oHSST2zdOIHcGxKadDET5pVMSc
 +MJujZrYvfNhLrDb5fj0WJyowYeI2/umODoCjADtdNF76IpItPBu3lzHS025+8uNEzGp
 IOvA==
X-Gm-Message-State: AOAM530JI103n9OJO8LFQP45FOsyzeeWOrmWI0r43eg9dn4fEFL802TF
 0RvNLbXl7lmpx/4Pm2n5x58+1goSXvAUSA==
X-Google-Smtp-Source: ABdhPJzsthxjmjgz9buYvI3eFWwK5zbbhXjM7W01aipcAy3CocU4EAYJDCw4KjOXouT4ALyuFWlpMQ==
X-Received: by 2002:a17:906:7d83:: with SMTP id
 v3mr16161766ejo.216.1629383956165; 
 Thu, 19 Aug 2021 07:39:16 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.15
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:15 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:38:58 +0300
Message-Id: <20210819143906.6705-2-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/crates-io.scm (rust-pam-sys): Add rust-pam-sys 0.5.6
---
 gnu/packages/crates-io.scm | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 6484d4c4fc..d91417d76f 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -55,6 +55,7 @@
   #:use-module (gnu packages glib)
   #:use-module (gnu packages image)
   #:use-module (gnu packages jemalloc)
+  #:use-module (gnu packages linux)
   #:use-module (gnu packages llvm)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages nettle)
@@ -56994,3 +56995,29 @@ variant of this library is available separately as @code{im}.")
     (description
      "A Rust library quotes, unquotes, and unescapes strings")
     (license license:unlicense)))
+
+(define-public rust-pam-sys-0.5.6
+  (package
+    (name "rust-pam-sys")
+    (version "0.5.6")
+    (home-page "https://github.com/1wilkens/pam-sys")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pam-sys" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32
+         "0d14501d5vybjnzxfjf96321xa5wa36x1xvf02h02zq938qmhj6d"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-libc" ,rust-libc-0.2))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)))
+    (synopsis
+     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (PAM)")
+    (description
+     "Rust FFI wrappers for the Linux Pluggable Authentication Modules (PAM)")
+    (license (list license:expat license:asl2.0))))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 01/10] gnu: crates-io: Add rust-enquote 1.0.3
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:02 +0000
Resent-Message-ID: <handler.49969.B49969.16293839671151 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839671151
          (code B ref 49969); Thu, 19 Aug 2021 14:40:02 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:27 +0000
Received: from localhost ([127.0.0.1]:60548 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCZ-0000IU-7b
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:27 -0400
Received: from mail-ej1-f42.google.com ([209.85.218.42]:38871)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCT-0000Hd-JU
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:22 -0400
Received: by mail-ej1-f42.google.com with SMTP id z20so13409667ejf.5
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:21 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=hVMJiMZrCDmRRBKI4Op5PPeRX5HGfsylxhPwiGBmOYw=;
 b=BZUivYRP7XnCzVUAlUo6pQlueqIpdSRhk0yczjQK8noAD3sXtrCdcO5tTQKgE/ZTTh
 z/eI8Y1C97ZKE2a9g4bRYiCBPuSTYcY03Ae0BbPduk7TQ8Orlbh5IROEa7DEoFo3W98Q
 0WneWkFcUNJ42mJKaaZQYzu8I2FK8OQOub0GhwhrQLYX20IfVQQpoyMrUVSPSVrfcZ/l
 +y3eGBkurY7nNoV6ZarPjusI9Lkj0UjWrNs4rxmiwrvq8atEh6c9kE2qTYTelzdGDh+v
 Md5t90THY4wfhUxl7qj0O7Gk/ELPGcKHbICarH8Wu2cLhnBhZ9iRgDE8UBAS9U1Z+vlM
 KA+Q==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=hVMJiMZrCDmRRBKI4Op5PPeRX5HGfsylxhPwiGBmOYw=;
 b=L99ytuIvwCZ9rHhUVNP98hHasDwYaeJDD/R5vJsfoIvCWaks4d6g3R6UWyvyYyrLfh
 s2kq22UDRNOUFTwI+OWmFXTbbcnEPXApAee4g+dGGZODg2ItgaS7xkft7ZCPq1kkdOu1
 doo98Mylo18M7mYVLFiXyQiAsKXFakxoGYzmCnipTp7/ab16KdfsW0UW8iLjrOYQQ81w
 WO9XyKVa9HYuZQzBcETBcoV2DEZlAeOuxV9/gtzRdZ1bX4aPldCOEf2Rb9d9jONmcdQ3
 aM0dz3ijfy6fVtAvKmhTJU6svR+dRUke8DCMWbYK2xC3KsWPKwq25XO7mbW+Mt3xSCGY
 5UgA==
X-Gm-Message-State: AOAM530m0p3PmRgRZTHaOsDlOf1ij9eMuJVMdlTPEVXxjpv+l/9DAOlB
 XubhVze+Tg5SrdTa6+Ruhfh0RupLAV8gIA==
X-Google-Smtp-Source: ABdhPJxfwqMdR+58xpnmqotConpPozyGHxEaYKwfYb0ldBi9A1JfJuvOohnIEIbQ+1GdwNyPxNQUEA==
X-Received: by 2002:a17:907:c11:: with SMTP id
 ga17mr15552290ejc.298.1629383954893; 
 Thu, 19 Aug 2021 07:39:14 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.13
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:14 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:38:57 +0300
Message-Id: <20210819143906.6705-1-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/crates-io.scm (rust-enquote-1): Add rust-enquote 1.0.3
---
 gnu/packages/crates-io.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 24cc772ba7..6484d4c4fc 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -18,6 +18,7 @@
 ;;; Copyright © 2021 Antero Mejr <antero@HIDDEN>
 ;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@HIDDEN>
 ;;; Copyright © 2021 Vinicius Monego <monego@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -56972,3 +56973,24 @@ variant of this library is available separately as @code{im}.")
     (description
       "Generate Rust register maps (`struct`s) from SVD files")
     (license (list license:expat license:asl2.0))))
+
+(define-public rust-enquote-1
+  (package
+    (name "rust-enquote")
+    (version "1.0.3")
+    (home-page "https://github.com/reujab/enquote")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "enquote" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32
+         "0vm687r2wwgc3d3l2iqhag9wgkql6k93sdvjxvmfkdpksajpij1f"))))
+    (build-system cargo-build-system)
+    (synopsis
+     "A Rust library quotes, unquotes, and unescapes strings")
+    (description
+     "A Rust library quotes, unquotes, and unescapes strings")
+    (license license:unlicense)))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 03/10] gnu: freedesktop: Add greetd 0.7.0
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:02 +0000
Resent-Message-ID: <handler.49969.B49969.16293839731184 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839731184
          (code B ref 49969); Thu, 19 Aug 2021 14:40:02 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:33 +0000
Received: from localhost ([127.0.0.1]:60551 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCZ-0000IW-Ft
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:32 -0400
Received: from mail-ej1-f44.google.com ([209.85.218.44]:37782)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCV-0000Hh-8j
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:25 -0400
Received: by mail-ej1-f44.google.com with SMTP id h9so13442173ejs.4
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:23 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=iKIEPRgsK/zmp47VzGKwZKvsHQHZQ4+FxLcUWNU5T9A=;
 b=1mz/agn36BSOP3irCIwVLa5y2/CpPJGYmWH5eGJ+iQduMhAqhl+GtnA9b4dH5+v8pS
 DN3gQTaXK1cGFb6bKrLgwwsDXzDgSLSV7+yj/xhTQsF+EnI5jmTWoEpMuMDMwIZYctqD
 BHbNL7LaGYX4uvNBF611h3zWQeesq4BlwHyIONjCPYPI4XlPn5fmyTRJxvmDYLTXFsbM
 medscKoenQxy4U8SJZYI1V+glWFyGJO4+T+HvCNXUabp3M1gdyDDv47pDwJlwR+8v+9+
 3eL5ku/lXL77kNAkTdCLRDc4Ov33MUeXYambAsTpwBbrHoRriinD3jHJbfCSJqiGxIAe
 +0ew==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=iKIEPRgsK/zmp47VzGKwZKvsHQHZQ4+FxLcUWNU5T9A=;
 b=fqNYjtAxsvDdbfRQX93PED3HJ+0yolFmaMmlAgYVqWzofb6cwM2XqnpcgBIPMqaIfl
 jolmx5Xaz4EWy3GhT+mYFQ+K7g+cG8+siaXKi/v4GnrEvnoJs6xX86VW0NoDBvY71DWm
 /4zTR0c6ogLqzurVwx0On3nLALakrwMVTtq8ARGF6KwoZxwVA98ywn2HrnppdxNB2HGT
 +kOUgoE3HfPP+yMQI6Lmt8blZw4u/LEjfngYVJT7bbqS0siSIoy35uo1Oa8JZeG3Oh1i
 Rvak1ponVaVwgKkxBGQ25FBgxUNfCQ9f32WBigGJPpZbiFt7w4hyPEfLv84+4qa3NpKP
 8OEw==
X-Gm-Message-State: AOAM530MaqMdvL0F2OF4F3MpbgCLo+qPlMvaJ2/LjRkvNGLB65PefNJw
 81ODzLncOYVWTa4405YHX6LoyxEw+VgxLQ==
X-Google-Smtp-Source: ABdhPJyf0rx8eNbFZe4YbRUnxic2xAkAq+xFGsm0gf3T7X6Qg7J7pcs1KjkwBHFiDaNlh7k8SOatuA==
X-Received: by 2002:a17:906:b09:: with SMTP id
 u9mr15681539ejg.496.1629383957344; 
 Thu, 19 Aug 2021 07:39:17 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.16
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:16 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:38:59 +0300
Message-Id: <20210819143906.6705-3-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/packages/freedesktop.scm (greetd): Add greetd 0.7.0
---
 gnu/packages/freedesktop.scm | 120 +++++++++++++++++++++++++++++++++++
 1 file changed, 120 insertions(+)

diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
index 693a79c738..ba5f6b0f99 100644
--- a/gnu/packages/freedesktop.scm
+++ b/gnu/packages/freedesktop.scm
@@ -24,6 +24,7 @@
 ;;; Copyright © 2020 Raghav Gururajan <raghavgururajan@HIDDEN>
 ;;; Copyright © 2021 Brendan Tildesley <mail@HIDDEN>
 ;;; Copyright © 2021 pineapples <guixuser6392@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -46,6 +47,7 @@
   #:use-module (guix packages)
   #:use-module (guix download)
   #:use-module (guix git-download)
+  #:use-module (guix build-system cargo)
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system meson)
@@ -62,6 +64,7 @@
   #:use-module (gnu packages check)
   #:use-module (gnu packages cmake)
   #:use-module (gnu packages compression)
+  #:use-module (gnu packages crates-io)
   #:use-module (gnu packages cryptsetup)
   #:use-module (gnu packages databases)
   #:use-module (gnu packages disk)
@@ -862,6 +865,123 @@ that require it.  It also provides a universal seat management library that
 allows applications to use whatever seat management is available.")
     (license license:expat)))
 
+(define-public greetd
+  (package
+    (name "greetd")
+    (version "0.7.0")
+    (home-page "https://git.sr.ht/~kennylevinsen/greetd")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url home-page)
+                    (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32 "0lmwr5ld9x2wlq00i7mjgm9by8zndiq9girj8g93k0kww9zbgr3g"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-nix" ,rust-nix-0.17)
+        ("rust-pam-sys" ,rust-pam-sys-0.5.6)
+        ("rust-rpassword" ,rust-rpassword-4)
+        ("rust-users" ,rust-users-0.9)
+        ("rust-serde" ,rust-serde-1)
+        ("rust-serde-json" ,rust-serde-json-1)
+        ("rust-libc" ,rust-libc-0.2)
+        ("rust-tokio" ,rust-tokio-0.2)
+        ("rust-getopts" ,rust-getopts-0.2)
+        ("rust-thiserror" ,rust-thiserror-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
+        ("rust-enquote" ,rust-enquote-1))
+       #:phases
+       (modify-phases %standard-phases
+         ;; issue with terminal activation solved by this feature:
+         ;; https://lists.sr.ht/~kennylevinsen/greetd-devel/patches/24441
+         ;; greetd-next builds from head of #24441
+         ;; below substitute is provided as workaround for tagged version
+         (add-after 'unpack 'patch-terminal-switch
+           (lambda* (#:key inputs #:allow-other-keys)
+             (substitute* "greetd/src/server.rs"
+               (("switch: true,")
+                "switch: false,"))))
+         (delete 'package)
+         (add-after 'build 'build-man-pages
+           (lambda* (#:key inputs #:allow-other-keys)
+             (define (scdoc-cmd doc lvl)
+               (system (string-append "scdoc < "
+                                      doc "-" lvl ".scd > "
+                                      doc "." lvl)))
+             (with-directory-excursion "man"
+               (scdoc-cmd "greetd" "1")
+               (scdoc-cmd "greetd" "5")
+               (scdoc-cmd "greetd-ipc" "7")
+               (scdoc-cmd "agreety" "1"))))
+         (replace 'install
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (bin (string-append out "/bin"))
+                    (sbin (string-append out "/sbin"))
+                    (share (string-append out "/share"))
+                    (man (string-append share "/man"))
+                    (man1 (string-append man "/man1"))
+                    (man5 (string-append man "/man5"))
+                    (man7 (string-append man "/man7"))
+                    (release "target/release")
+                    (greetd-bin (string-append release "/greetd"))
+                    (agreety-bin (string-append release "/agreety")))
+               (install-file greetd-bin sbin)
+               (install-file agreety-bin bin)
+               (with-directory-excursion "man"
+                 (install-file "greetd.1" man1)
+                 (install-file "greetd.5" man5)
+                 (install-file "greetd-ipc.7" man7)
+                 (install-file "agreety.1" man1))))))))
+    (native-inputs
+     `(("linux-pam" ,linux-pam)
+       ("scdoc" ,scdoc)))
+    (synopsis "minimal and flexible login manager daemon")
+    (description
+     "greetd is a minimal and flexible login manager daemon
+that makes no assumptions about what you want to launch.
+
+If you can run it from your shell in a TTY, greetd can start it.
+
+If it can be taught to speak a simple JSON-based IPC protocol,
+then it can be a greeter.")
+    (license license:gpl3+)))
+
+(define-public greetd-next
+  (package
+    (inherit greetd)
+    (name "greetd")
+    (version "0.7.0-next")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url (package-home-page greetd))
+                    (commit "87e92776543c224676d64316f4519b509c21a0d5")))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32 "13dblvhx5vbsx0yqyz2sq1ayffqwadbkn90p52wd5b66ij1z6v1a"))))
+    (arguments
+     (substitute-keyword-arguments (package-arguments greetd)
+       ((#:cargo-inputs inputs)
+        `(("rust-nix" ,rust-nix-0.19)
+           ("rust-pam-sys" ,rust-pam-sys-0.5.6)
+           ("rust-rpassword" ,rust-rpassword-5)
+           ("rust-users" ,rust-users-0.11)
+           ("rust-serde" ,rust-serde-1)
+           ("rust-serde-json" ,rust-serde-json-1)
+           ("rust-libc" ,rust-libc-0.2)
+           ("rust-tokio" ,rust-tokio-1)
+           ("rust-getopts" ,rust-getopts-0.2)
+           ("rust-thiserror" ,rust-thiserror-1)
+           ("rust-async-trait" ,rust-async-trait-0.1)
+           ("rust-enquote" ,rust-enquote-1)))
+       ((#:phases phases)
+        `(modify-phases ,phases
+           (delete 'patch-terminal-switch)))))))
+
 (define-public packagekit
   (package
     (name "packagekit")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 04/10] gnu: admin: Add greetd-pam-mount
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:02 +0000
Resent-Message-ID: <handler.49969.B49969.16293839731198 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839731198
          (code B ref 49969); Thu, 19 Aug 2021 14:40:02 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:33 +0000
Received: from localhost ([127.0.0.1]:60557 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCe-0000J3-Rl
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:33 -0400
Received: from mail-ed1-f52.google.com ([209.85.208.52]:44899)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCW-0000Hj-Kz
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:25 -0400
Received: by mail-ed1-f52.google.com with SMTP id i22so9165654edq.11
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:24 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=VB+zCSmnI6JPNNd+dmQ7nv1CAeu5yk6+FSBxIyafSxw=;
 b=Ji4gNa6Jgk5UhNagrenozsouZVTcn7ulbkhzFUddoHxuWV5ZkC2CWJL+TXofgza0+6
 c562D3C42WAqBwrG0T4SkOiu6q9ynUWddOe/YuM8zXW36VPoHMNYu/mBiVNzM3t9YCCb
 +4OYnBdlgShGkrL7FmjvGKU0OBM0hy//UcFjA0CDF5omPMIm7ppiMDyDFTq6012vKvP2
 CSPMR9HsPUZJrm/YhrLb9AQD2FrQzVrMt31/qmQMrJEkvhOvT5iu+/D5gBaYIFzhCYbG
 xT2QPA8ELrQUoCDdDngQj7KlF5KGJvceM8g55oiekXai6Ngh1o3b+kwK4zSbslg2LDRG
 SO7Q==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=VB+zCSmnI6JPNNd+dmQ7nv1CAeu5yk6+FSBxIyafSxw=;
 b=gQeJ5eTaeKYoARd/lOIY8P7Et7CShmOZAXY8trF+HbuiF3tnW1+gEqD7lvXcU3Xn2v
 grENmjGVDBLo4Lw9vF2EsxOyK56x2x7nSXZtjE052A+zTXt7przi7gZorDXeFbLwprB8
 7Ltuwt8LiOG4p1NjDCPMzpfTYjX4THBYEe5eKnZ0vEgGK6lZ3sz621Vsp5SPkQOe0vFo
 +gcW5P5E9x7/NVBP3lauhvJP+NOVwP2PnTXYS3BkkUvDX7TwTgCYS2OUTryTORUaDPVa
 Qb8lmBtYsR/J+CL43hTBOs0UyZqr3pwGjByWKcqFdy5G1stUKllciVVZMXhw3UJOEy3H
 dz5g==
X-Gm-Message-State: AOAM531fhGZiIVhtcxfhMoMY+uvqwVPHMv4KvC6bjk8W1HevHLn0jWdX
 Gbzqz19J9H75mtb9NDy6IsWlr1vUx/zyUA==
X-Google-Smtp-Source: ABdhPJxeByyY+TQIK8h8zYM7zouCNLJ1s6pH4FUD8+XU+E5CEO0JTMSfvGnGZlK9GA0Yner4YzShVg==
X-Received: by 2002:a05:6402:49a:: with SMTP id
 k26mr16636542edv.279.1629383958546; 
 Thu, 19 Aug 2021 07:39:18 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.17
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:18 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:39:00 +0300
Message-Id: <20210819143906.6705-4-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 2.0 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 
 Content preview:  * gnu/packages/admin.scm (greetd-pam-mount): Add greetd-pam-mount
    --- gnu/packages/admin.scm | 33 +++++++++++++++++++++++++++++++++ 1 file
   changed, 33 insertions(+) diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
    index 007f15f9f5..c9bfe0b667 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm
    @@ -42,6 +42,7 @@ ;;; Copyright =?UTF-8?Q?=C2=A9?= 2021 David [...] 
 
 Content analysis details:   (2.0 points, 10.0 required)
 
  pts rule name              description
 ---- ---------------------- --------------------------------------------------
  0.0 SPF_NONE               SPF: sender does not publish an SPF Record
  2.0 PDS_OTHER_BAD_TLD      Untrustworthy TLDs
                             [URI: selfhosted.xyz (xyz)]
  0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.0 RCVD_IN_DNSWL_NONE     RBL: Sender listed at https://www.dnswl.org/,
                              no trust
                             [209.85.208.52 listed in list.dnswl.org]
 -0.0 RCVD_IN_MSPIKE_H2      RBL: Average reputation (+2)
                             [209.85.208.52 listed in wl.mailspike.net]
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 1.0 (+)

* gnu/packages/admin.scm (greetd-pam-mount): Add greetd-pam-mount
---
 gnu/packages/admin.scm | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 007f15f9f5..c9bfe0b667 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -42,6 +42,7 @@
 ;;; Copyright © 2021 David Larsson <david.larsson@HIDDEN>
 ;;; Copyright © 2021 WinterHound <winterhound@HIDDEN>
 ;;; Copyright © 2021 Brice Waegeneire <brice@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -4247,6 +4248,38 @@ supports.  It can also mount encrypted LUKS volumes using the password
 supplied by the user when logging in.")
     (license (list license:gpl2+ license:lgpl2.1+))))
 
+(define-public greetd-pam-mount
+  (package
+    (inherit pam-mount)
+    (name "greetd-pam-mount")
+    (arguments
+     (substitute-keyword-arguments (package-arguments pam-mount)
+       ((#:configure-flags flags ''())
+        `(cons* "--with-rundir=/run/greetd" ,flags))
+       ((#:phases phases)
+        `(modify-phases ,phases
+           (add-after 'unpack 'patch-config-file-name
+             (lambda* (#:key inputs #:allow-other-keys)
+               (substitute* "src/pam_mount.c"
+                 ((".*define CONFIGFILE .*$")
+                  "#define CONFIGFILE \"/etc/security/greetd_pam_mount.conf.xml\"\n")
+                 (("pam_mount_config") "greetd_pam_mount_config")
+                 (("pam_mount_system_authtok") "greetd_pam_mount_system_authtok"))))))))
+    (synopsis "pam-mount specifically compiled for use with greetd")
+    (description
+     "Pam-mount is a PAM module that can mount volumes when a user logs in.
+It supports mounting local filesystems of any kind the normal mount utility
+supports.  It can also mount encrypted LUKS volumes using the password
+supplied by the user when logging in.
+
+This package inherits pam-mount in the way that it is compiled specifically
+for use with greetd daemon. It uses different configuration location and
+name space for storing data in PAM.
+
+greetd-pam-mount is used in configuration of greetd to provide
+auto-(mounting/unmounting) of XDG_RUNTIME_DIR in the way that it will not
+interfere with default pam-mount configuration.")))
+
 (define-public jc
   (package
     (name "jc")
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 05/10] gnu: desktop: Add seatd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:03 +0000
Resent-Message-ID: <handler.49969.B49969.16293839731204 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839731204
          (code B ref 49969); Thu, 19 Aug 2021 14:40:03 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:33 +0000
Received: from localhost ([127.0.0.1]:60559 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCf-0000JH-Dc
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:33 -0400
Received: from mail-ej1-f43.google.com ([209.85.218.43]:44996)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCY-0000Hl-02
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:26 -0400
Received: by mail-ej1-f43.google.com with SMTP id bq25so13357648ejb.11
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:25 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=Sp33gQQBygwHj8x5D/cTuv92CAb24beXS7SlNnF62pw=;
 b=ssjtWBXema9F85APczYWbMKB+vqQJ27sCR97x7jNzzyJORr2fdY85OiNL0eGMOzW82
 ucSCsaHWES20DXH+wmehtEM2XeOLr9jxzYkQaZHkgJRDPNUToeFPbAHwkjX9H+uIiebM
 JHFTvIE6pSu85BeUrXquS91SV70pKJedsWP3ZrQsw/dIMqjg0UIaieWqXwVAFMC4i1YR
 dZ5n0xL+E46o6I96h2+S0R7nXYggjSwyF/EDt6zjMnw6rbFm+aTD7FB2JcsKh+jQDdN8
 uA9PqtnrmpvzlpO50kh9gvkhzl3kAXqDFtCZP/OQMibcRG08VeMtdLuIWgxQmwK/Znh3
 6UVw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=Sp33gQQBygwHj8x5D/cTuv92CAb24beXS7SlNnF62pw=;
 b=uKcLm2qHLehNsCZbCqj9MZiZVe1CCqDoBtaIZg4mZS1F1DCA6zaEhqZ4OGtjoM8dsW
 4zLwKSnni93JgxNF7sIJeqhhnEzmykhZapBlb0Mo0f5D0PqniM+8Kn96ZMK4K5Dbpiiu
 SNwhc4OoVgsBFyLoxxnjLG2CY1WuzFSMbYB9usQQrba+t5XgROpFKwgLlAL3YO7UGakZ
 w+z+mJXbE9EXrwJ1ec/Ubw15gPE9omD0PidugZz9qTcSnoaW0Al1lfqVLCNp+zZjCqQz
 9uVk0y4/p0t9l/NP72Ry4ym608sH9uU8Bemhlwa0peSzwEkjIgixPTnClNcWcq7yCHQc
 IUhA==
X-Gm-Message-State: AOAM530CCOAI+40h4IL9XkSQQtYhROOGQ99EePjBjkJFa5wtIT+6fd2+
 u33yKnbX2k1KOQ+/vTOrXDUOvxpbEDzXyg==
X-Google-Smtp-Source: ABdhPJw25GjxKMYASOKOXEfD2I14km14dLTe70AnVP+WphniW5/deLkpIAxyEc5zNE9qUCifzpbrHQ==
X-Received: by 2002:a17:906:aac7:: with SMTP id
 kt7mr16111107ejb.4.1629383959885; 
 Thu, 19 Aug 2021 07:39:19 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.18
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:19 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:39:01 +0300
Message-Id: <20210819143906.6705-5-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/services/desktop.scm: Add seatd-service-type
---
 gnu/services/desktop.scm | 60 +++++++++++++++++++++++++++++++++++++++-
 1 file changed, 59 insertions(+), 1 deletion(-)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index 64d0e85301..c42db5987e 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -13,6 +13,7 @@
 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@HIDDEN>
 ;;; Copyright © 2020 Reza Alizadeh Majd <r.majd@HIDDEN>
 ;;; Copyright © 2021 Brice Waegeneire <brice@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -39,7 +40,9 @@
   #:use-module (gnu services networking)
   #:use-module (gnu services sound)
   #:use-module ((gnu system file-systems)
-                #:select (%elogind-file-systems file-system))
+                #:select (%control-groups
+                          %elogind-file-systems
+                          file-system))
   #:use-module (gnu system)
   #:use-module (gnu system setuid)
   #:use-module (gnu system shadow)
@@ -154,6 +157,9 @@
             gnome-keyring-configuration?
             gnome-keyring-service-type
 
+            seatd-configuration
+            seatd-service-type
+
             %desktop-services))
 
 ;;; Commentary:
@@ -1182,6 +1188,58 @@ or setting its password with passwd.")))
 (define polkit-wheel-service
   (simple-service 'polkit-wheel polkit-service-type (list polkit-wheel)))
 
+
+;;;
+;;; seatd-service-type -- minimal seat management daemon
+;;;
+
+(define-record-type* <seatd-configuration> seatd-configuration
+  make-seatd-configuration
+  seatd-configuration?
+  (seatd seatd-package (default seatd))
+  (user seatd-user (default "root"))
+  (group seatd-group (default "users"))
+  (socket seatd-socket (default "/run/seatd.sock"))
+  (loglevel seatd-loglevel (default "error")))
+
+(define (seatd-shepherd-service config)
+  (list (shepherd-service
+         (documentation "Minimal seat management daemon")
+         (requirement '())
+         ;; TODO: once cgroups is separate dependency
+         ;; here we should depend on it rather than elogind
+         (provision '(seatd elogind))
+         (start #~(make-forkexec-constructor
+                   (list #$(file-append (seatd-package config) "/bin/seatd")
+                         "-u" #$(seatd-user config)
+                         "-g" #$(seatd-group config)
+                         "-s" #$(seatd-socket config))
+                   #:environment-variables
+                   (list (string-append "SEATD_LOGLEVEL="
+                                        #$(seatd-loglevel config)))
+                   #:log-file "/tmp/seatd.log"))
+         (stop #~(make-kill-destructor)))))
+
+(define seatd-environment
+  (match-lambda
+    (($ <seatd-configuration> _ _ _ socket)
+     `(("SEATD_SOCK" . ,socket)))))
+
+(define seatd-service-type
+  (service-type
+   (name 'seatd)
+   (description "Seat management takes care of mediating access
+to shared devices (graphics, input), without requiring the
+applications needing access to be root.")
+   (extensions
+    (list
+     (service-extension session-environment-service-type seatd-environment)
+     ;; TODO: once cgroups is separate dependency we should not mount it here
+     ;; for now it is mounted here, because elogind mounts it
+     (service-extension file-system-service-type (const %control-groups))
+     (service-extension shepherd-root-service-type seatd-shepherd-service)))
+   (default-value (seatd-configuration))))
+
 
 ;;;
 ;;; The default set of desktop services.
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 06/10] gnu: desktop: Add greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:03 +0000
Resent-Message-ID: <handler.49969.B49969.16293839831221 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839831221
          (code B ref 49969); Thu, 19 Aug 2021 14:40:03 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:43 +0000
Received: from localhost ([127.0.0.1]:60561 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCo-0000Jb-SN
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:43 -0400
Received: from mail-ej1-f49.google.com ([209.85.218.49]:40662)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCZ-0000Ho-5y
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:27 -0400
Received: by mail-ej1-f49.google.com with SMTP id lo4so13389596ejb.7
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:27 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=pPvug1pEJs0Qy8My6Srzy5M97XV/OUX7ph60ZRxN+4A=;
 b=ZY7d0H43LOZNVfrpIrVlMyYpbaDshghJbgB6a9E5XA3R51o1luTGjtOJ9JIHzCRVcx
 fAZoEgoEL97Np5F1cW9v+sjyhouz7Ce8CCNVl03YtGvucUGVxOuTB8TnyHMGyMtLB3cU
 72KeoAjsTVCNaLH/TWFcYJycXSScgiUhJZpIAwILtV8kuPqv4XmJc85qx3oNiG3XuP49
 QOQfCstf0kbqk/zrtTmXrMUlRnb/g0SwelnpUNtDQFRoJSh+dnkURyLFv7ojxOmtQHbj
 DyOpow9I7q/q2lCxd4WJpd3GPU3hG3cgw1YmlmwlQaJdlIFjDAXq0W4MIegpElqfGQQ3
 CxNA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=pPvug1pEJs0Qy8My6Srzy5M97XV/OUX7ph60ZRxN+4A=;
 b=ApZuL/xdczShyp0gVyhYdTvIY9e4Kz0aEHpqS3TL1DR8HLXxuQNfXFlC+I20lRG+VB
 9Q8ttqv7apZjsdBGcFmcJ7kgZlYzACr+fWj/uWgQWbdbocq+aB5NR4jkgl7zuVG8OpaN
 KnOqgHOP3wCke9OOS1Uc3+qlF0zZBZG9I+sFQaxXpD5VsTNlcmQi14nslmgnDJE0mgcs
 bYIdGw/q3JiT+HaFVH53lywzOXOXeOqLlGQScIk2gr2RcpWVWf5fOgTnJhFnQxBEzWHj
 IW1nCtaPav9vWBNBKxJNx4ctsG96RRPjrUuQshnYvP2SQAV6PboSY9UEI5MZ14g3FsV2
 FIDw==
X-Gm-Message-State: AOAM533JfPFZEbvSlIgQ4pwwD3ghO5wQY4prNmFw0a9gbdF6TjNx7hBP
 hxr7+qf1Yzf8qILKAH7T438YqSzBKQ1U9w==
X-Google-Smtp-Source: ABdhPJxYxmDAWFxH50LmrhbOAR5/7jAycYq6EbXozPVMg/drxTLq963MDy7Tt3iTpHOeAAkpZyFXIA==
X-Received: by 2002:a17:906:270f:: with SMTP id
 z15mr16136068ejc.348.1629383961104; 
 Thu, 19 Aug 2021 07:39:21 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.20
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:20 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:39:02 +0300
Message-Id: <20210819143906.6705-6-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

Currently, only agreety configuration is provided.

* gnu/services/desktop.scm: Add greetd-service-type
---
 gnu/services/desktop.scm | 228 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 228 insertions(+)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index c42db5987e..e37811cf94 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -49,6 +49,7 @@
   #:use-module (gnu system pam)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages admin)
+  #:use-module (gnu packages bash)
   #:use-module (gnu packages cups)
   #:use-module (gnu packages freedesktop)
   #:use-module (gnu packages gnome)
@@ -160,6 +161,12 @@
             seatd-configuration
             seatd-service-type
 
+            greetd-configuration
+            greetd-terminal-configuration
+            greetd-service-type
+            greetd-agreety-tty-session
+            greetd-agreety-tty-xdg-session
+
             %desktop-services))
 
 ;;; Commentary:
@@ -1240,6 +1247,227 @@ applications needing access to be root.")
      (service-extension shepherd-root-service-type seatd-shepherd-service)))
    (default-value (seatd-configuration))))
 
+
+;;;
+;;; greetd-service-type -- minimal and flexible login manager daemon
+;;;
+
+(define-record-type* <greetd-agreety-session>
+  greetd-agreety-session make-greetd-agreety-session
+  greetd-agreety-session?
+  (package greetd-agreety-command-package (default bash))
+  (command-bin greetd-agreety-command-bin (default "/bin/bash"))
+  (command-args greetd-agreety-command-args (default '("-l")))
+  (extra-env greetd-agreety-extra-env (default '()))
+  (command-generator greetd-agreety-command-generator))
+
+(define greetd-agreety-tty-session-command
+  (match-lambda
+    (($ <greetd-agreety-session> pkg command-bin command-args extra-env)
+     (program-file
+      "agreety-tty-session-command"
+      #~(begin
+          (use-modules (ice-9 match))
+          (let* ((abs-cmd-bin #$(file-append pkg command-bin)))
+            (for-each
+             (match-lambda ((var . val) (setenv var val)))
+             (quote (#$@extra-env)))
+            (apply execl abs-cmd-bin abs-cmd-bin
+                   (list #$@command-args))))))))
+
+(define greetd-agreety-tty-xdg-session-command
+  (match-lambda
+    (($ <greetd-agreety-session> package command-bin command-args extra-env)
+     (program-file
+      "agreety-tty-xdg-session-command"
+      #~(begin
+          (use-modules (ice-9 match))
+          (let*
+              ((username (getenv "USER"))
+               (useruid (passwd:uid (getpwuid username)))
+               (useruid (number->string useruid))
+               (abs-cmd-bin #$(file-append package command-bin)))
+            (setenv "XDG_SESSION_TYPE" "tty")
+            (setenv "XDG_RUNTIME_DIR" (string-append "/run/user/" useruid))
+            (for-each
+             (match-lambda ((var . val) (setenv var val)))
+             (quote (#$@extra-env)))
+            (apply execl abs-cmd-bin abs-cmd-bin
+                   (list #$@command-args))))))))
+
+(define greetd-agreety-tty-session
+  (greetd-agreety-session
+   (command-generator greetd-agreety-tty-session-command)))
+
+(define greetd-agreety-tty-xdg-session
+  (greetd-agreety-session
+   (command-generator greetd-agreety-tty-xdg-session-command)))
+
+(define-record-type* <greetd-terminal-configuration>
+  greetd-terminal-configuration make-greetd-terminal-configuration
+  greetd-terminal-configuration?
+  (greetd greetd-package (default greetd))
+  (config-file-name greetd-config-file-name (thunked)
+                    (default (default-config-file-name this-record)))
+  (terminal-vt greetd-terminal-vt (default "7"))
+  (terminal-switch greetd-terminal-switch (default #f))
+  (default-session-user greetd-default-session-user (default "greeter"))
+  (default-session-command greetd-default-session-command
+    (default greetd-agreety-tty-xdg-session)))
+
+(define (default-config-file-name config)
+  (string-join (list "config-" (greetd-terminal-vt config) ".toml") ""))
+
+(define make-greetd-terminal-default-session-command
+  (match-lambda
+    (($ <greetd-terminal-configuration> greetd _ _ _ _ default-session-command)
+     (cond ((greetd-agreety-session? default-session-command)
+            (let*
+                ((generator (greetd-agreety-command-generator
+                             default-session-command))
+                 (command (apply generator (list default-session-command)))
+                 (agreety-bin (file-append greetd "/bin/agreety")))
+              (program-file
+               "agreety-command"
+               #~(execl #$agreety-bin #$agreety-bin "-c" #$command))))
+           (else (program-file "agreety-command-exit" #~(exit #f)))))))
+
+(define (make-greetd-terminal-configuration-file config)
+  (let*
+      ((config-file-name (greetd-config-file-name config))
+       (terminal-vt (greetd-terminal-vt config))
+       (terminal-switch (greetd-terminal-switch config))
+       (default-session-user (greetd-default-session-user config))
+       (default-session-command (make-greetd-terminal-default-session-command config)))
+    (mixed-text-file
+     config-file-name
+     "[terminal]\n"
+     "vt = " terminal-vt "\n"
+     "switch = " (if terminal-switch "true" "false") "\n"
+     "[default_session]\n"
+     "user = " default-session-user "\n"
+     "command = " default-session-command "\n")))
+
+(define %default-motd
+  (plain-file "motd" "This is the GNU operating system, welcome!\n\n"))
+
+(define %greetd-accounts
+  (list (user-account
+         (name "greeter")
+         (group "wheel")
+         (supplementary-groups '("users" "tty" "input" "video" "audio"))
+         (system? #t))))
+
+(define %greetd-file-systems
+  (list (file-system
+          (device "none")
+          (mount-point "/run/greetd/pam_mount")
+          (type "tmpfs")
+          (check? #f)
+          (flags '(no-suid no-dev no-exec))
+          (options "mode=0755")
+          (create-mount-point? #t))))
+
+(define %greetd-pam-mount-rules
+  `((debug (@ (enable "0")))
+    (volume (@ (sgrp "users")
+               (fstype "tmpfs")
+               (mountpoint "/run/user/%(USERUID)")
+               (options "noexec,nosuid,nodev,size=1g,mode=0700,uid=%(USERUID),gid=%(USERGID)")))
+    (logout (@ (wait "0")
+               (hup "0")
+               (term "yes")
+               (kill "no")))
+    (mkmountpoint (@ (enable "1") (remove "true")))))
+
+(define-record-type* <greetd-configuration>
+  greetd-configuration make-greetd-configuration
+  greetd-configuration?
+  (motd greetd-motd (default %default-motd))
+  (allow-empty-passwords? greetd-allow-empty-passwords? (default #t))
+  (terminals greetd-terminals (default '())))
+
+(define (make-greetd-pam-mount-conf-file config)
+  (computed-file
+   "greetd_pam_mount.conf.xml"
+   #~(begin
+       (use-modules (sxml simple))
+       (call-with-output-file #$output
+         (lambda (port)
+           (sxml->xml
+            '(*TOP*
+              (*PI* xml "version='1.0' encoding='utf-8'")
+              (pam_mount
+               #$@%greetd-pam-mount-rules
+               (pmvarrun
+                #$(file-append greetd-pam-mount
+                               "/sbin/pmvarrun -u '%(USER)' -o '%(OPERATION)'"))))
+            port))))))
+
+(define (greetd-etc-service config)
+  `(("security/greetd_pam_mount.conf.xml"
+     ,(make-greetd-pam-mount-conf-file config))))
+
+(define (greetd-pam-service config)
+  (define optional-pam-mount
+    (pam-entry
+     (control "optional")
+     (module #~(string-append #$greetd-pam-mount "/lib/security/pam_mount.so"))))
+
+  (list
+   (unix-pam-service "greetd"
+                     #:login-uid? #t
+                     #:allow-empty-passwords?
+                     (greetd-allow-empty-passwords? config)
+                     #:motd
+                     (greetd-motd config))
+   (lambda (pam)
+     (if (member (pam-service-name pam)
+                 '("login" "greetd" "su" "slim" "gdm-password"))
+         (pam-service
+          (inherit pam)
+          (auth (append (pam-service-auth pam)
+                        (list optional-pam-mount)))
+          (session (append (pam-service-session pam)
+                           (list optional-pam-mount))))
+         pam))))
+
+(define (greetd-shepherd-services config)
+  (map
+   (lambda (tc)
+     (let*
+         ((greetd-bin (file-append (greetd-package tc) "/sbin/greetd"))
+          (greetd-conf (make-greetd-terminal-configuration-file tc))
+          (greetd-vt (greetd-terminal-vt tc)))
+       (shepherd-service
+        (documentation "Minimal and flexible login manager daemon")
+        (requirement '(user-processes host-name udev virtual-terminal))
+        (provision (list (symbol-append
+                          'term-tty
+                          (string->symbol (greetd-terminal-vt tc)))))
+        (start #~(make-forkexec-constructor
+                  (list #$greetd-bin "-c" #$greetd-conf)
+                  #:log-file
+                  (string-append "/tmp/greetd." #$greetd-vt ".log")))
+        (stop #~(make-kill-destructor)))))
+   (greetd-terminals config)))
+
+(define greetd-service-type
+  (service-type
+   (name 'greetd)
+   (description "Provides necessary infrastructure for logging into the
+system including @code{greetd} PAM service, @code{pam-mount} module to
+mount/unmount /run/user/<uid> directory for user and @code{greetd}
+login manager daemon.")
+   (extensions
+    (list
+     (service-extension account-service-type (const %greetd-accounts))
+     (service-extension file-system-service-type (const %greetd-file-systems))
+     (service-extension etc-service-type greetd-etc-service)
+     (service-extension pam-root-service-type greetd-pam-service)
+     (service-extension shepherd-root-service-type greetd-shepherd-services)))
+   (default-value (greetd-configuration))))
+
 
 ;;;
 ;;; The default set of desktop services.
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 07/10] gnu: base: Add greetd to applied PAM services
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:04 +0000
Resent-Message-ID: <handler.49969.B49969.16293839831228 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839831228
          (code B ref 49969); Thu, 19 Aug 2021 14:40:04 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:43 +0000
Received: from localhost ([127.0.0.1]:60563 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCp-0000Je-CF
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:43 -0400
Received: from mail-ej1-f51.google.com ([209.85.218.51]:35713)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCa-0000I3-Fr
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:29 -0400
Received: by mail-ej1-f51.google.com with SMTP id w5so13454389ejq.2
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:28 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=dh/8N+CXmlWZw91Zsb/y/jh8BpZ7QLm1nQKa/aRV3eI=;
 b=sueM4XhRz/6QRZM/0ZA6O743wuDIl5A6hYmf5CxlD3Sd0945lOJLnOYsyYsoI5H6kQ
 DPSJVz5WDx3DVMMw/W+Oc+rcoU9EWANLRF8MpZtoYjm2mxO6NmE68/6ybNV/HLGppQ8e
 v3hNIdrRSbUWdWwRoi/ubus1mRWJdfG9SaS95CQMe93rMFKs6vsCHndoPvlqBMFryIZZ
 UX7JMb/I+iAP1qubHsDKEfDnis6qXORzWrCuNiRCl5kiZ8ZW75dI06Dg4Bw8ru6Aeb0k
 5iLMB+38nnuuBCULoydsD4aMsKxRZI6M0XaoWZDsUIxufL2tH4r634llM3Cs7wkA+ds5
 Kyhg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=dh/8N+CXmlWZw91Zsb/y/jh8BpZ7QLm1nQKa/aRV3eI=;
 b=JdxjZaqQB2ygvYqmF937DbP4mVVRS2XsHhxypl3aqUIyUzGkOgbQ+IS0hPtNnd6l/m
 sm+BRX8IiGEk7ZdcwV/wlzWSBL6ZdqJEpq5715YQbwjrM0H75M66qzFOr1jSxZA3128E
 BH0iyWAqLtffvsdoYLgW++3bkL4yfSWNmr776a7H21GohWqXiqboO7dsdUk7aOxb0o9h
 jChIcJTl3dmd46YFflLpLIYOzkW1EDIfZDKrzJXzorQ8X92X2gIfDyvxw0UdE7JZHV4G
 pmSa4SrV/R+DOKBI8ogUcRxefrjD7DMmvOz5Sz+iS1R6ojzWREwF/DsCUMsL725cY/rU
 YSpw==
X-Gm-Message-State: AOAM532wXMudNTjMxpti/q29nbLRt3eXvf9hGrnnempuwLffQq+nmFnH
 KCcBjZu02B68NiuQkBjd2axrzb52wBOPyQ==
X-Google-Smtp-Source: ABdhPJzPkUEmtX5bNYMSkxYKkX5X0A1IVv0Tw9M2kxSF+AImsI8iQqM96r03zSgfNaan0iWPI/vk5g==
X-Received: by 2002:a17:906:c316:: with SMTP id
 s22mr16318752ejz.39.1629383962587; 
 Thu, 19 Aug 2021 07:39:22 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.21
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:22 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:39:03 +0300
Message-Id: <20210819143906.6705-7-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/services/base.scm (pam-limits-service-type): add greetd PAM
service to applicable PAM services
---
 gnu/services/base.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index c784d312b1..446ecc30f8 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -15,6 +15,7 @@
 ;;; Copyright © 2020, 2021 Brice Waegeneire <brice@HIDDEN>
 ;;; Copyright © 2021 qblade <qblade@HIDDEN>
 ;;; Copyright © 2021 Hui Lu <luhuins@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1392,7 +1393,7 @@ information on the configuration file syntax."
                               (module "pam_limits.so")
                               (arguments '("conf=/etc/security/limits.conf")))))
              (if (member (pam-service-name pam)
-                         '("login" "su" "slim" "gdm-password" "sddm"))
+                         '("login" "greetd" "su" "slim" "gdm-password" "sddm"))
                  (pam-service
                   (inherit pam)
                   (session (cons pam-limits
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 08/10] gnu: pam-mount: Add greetd to applied PAM services
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:04 +0000
Resent-Message-ID: <handler.49969.B49969.16293839841235 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839841235
          (code B ref 49969); Thu, 19 Aug 2021 14:40:04 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:44 +0000
Received: from localhost ([127.0.0.1]:60565 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCp-0000Jl-MA
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:43 -0400
Received: from mail-ej1-f45.google.com ([209.85.218.45]:45011)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCb-0000IA-Kz
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:29 -0400
Received: by mail-ej1-f45.google.com with SMTP id bq25so13357976ejb.11
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:29 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=6iBM8ZI3T3fHzn8rEzUJ2i4QvCgwKO7iPLoH5R+yrGg=;
 b=t0FVaEjulDRFDVt+qOpEhPPKBixcIHG/caTSNOrhTuIMZct4wdqNZKZBrkG6fnXyoW
 QFusVm7/GDDCls1d3lZ4ko8Z1zqyuJEkejIXPIret8moX0cgE7T8/tyVsux13l1mG/9c
 i2dUS5lSWhWz0Ks93v3Hf22eBgw6LS5NnuIb7g3QRLLZ65O2HNbbQA7B5xGLVN5e4icn
 9vZZJg9CrkgH8A7jkV9T/Fyd/FkRc+xc0pPid7Ww5nmB3zFhwUnQ9kx0rc7GPstyoD7O
 O91LbZCwmnzt5vnwpXZU+8E3g5YPyiJ3piFALD8axqy11Q7q8SpsK0SnzKAJjAxO5E2t
 htHA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=6iBM8ZI3T3fHzn8rEzUJ2i4QvCgwKO7iPLoH5R+yrGg=;
 b=CPNz2z3MuCQ+EsBb7SJoLR9OcsSU2dGYWNjOMGOlZHYXCmUt2qT0wz5At830LcR7DI
 MiB+NGSyhwokbRhiUds3UXsDoB6W3VWOmDx0l39bUw7zIixD8RvceCWB13ZdQFJcoKYO
 cI8+LOJyBy5PTKjBW5N67bZ99DFrtMq2dB4jzZTBKAG7VRt2pPsWA9E8akUDHnIVrI8g
 Ub49pnsVlpuNSiHGsbBmJFVgc6onJ9LDlvhLqzUuYfUvu3HDOf527h10Hp9cgsPg0kYi
 c+2sRCmfVbjD1OxHDX4dOrHoPh3zxF9U7s6fHYECU+TrTobbo3q7ltsNlZGIzQwUJdvj
 GPlA==
X-Gm-Message-State: AOAM530rd2Gafm2hsR+pCa3DVxizpju6x/hSsush2eL1fr+w8emyHfJB
 Mn19A26Mup//gl3yZplPa9Ec+joru9KYxQ==
X-Google-Smtp-Source: ABdhPJwkcpT/OEDJZBiseDo5CgHVIlrbcn+2Jl1DjA44tRNa3BnppiQ24KcrXj4Xl0fOL1BYM4pUig==
X-Received: by 2002:a17:906:aada:: with SMTP id
 kt26mr16255540ejb.199.1629383963738; 
 Thu, 19 Aug 2021 07:39:23 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.22
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:23 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:39:04 +0300
Message-Id: <20210819143906.6705-8-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: -0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/services/pam-mount.scm (pam-mount-service-type): add greetd PAM
service to applicable PAM services
---
 gnu/services/pam-mount.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/services/pam-mount.scm b/gnu/services/pam-mount.scm
index 98611462c2..7b25efeb50 100644
--- a/gnu/services/pam-mount.scm
+++ b/gnu/services/pam-mount.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2019 Guillaume Le Vaillant <glv@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -90,7 +91,7 @@
      (module #~(string-append #$pam-mount "/lib/security/pam_mount.so"))))
   (list (lambda (pam)
           (if (member (pam-service-name pam)
-                      '("login" "su" "slim" "gdm-password"))
+                      '("login" "greetd" "su" "slim" "gdm-password"))
               (pam-service
                (inherit pam)
                (auth (append (pam-service-auth pam)
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 09/10] gnu: tests: Add seatd/greetd based minimal desktop system tests
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:04 +0000
Resent-Message-ID: <handler.49969.B49969.16293839841243 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839841243
          (code B ref 49969); Thu, 19 Aug 2021 14:40:04 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:44 +0000
Received: from localhost ([127.0.0.1]:60567 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCp-0000Js-WB
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:44 -0400
Received: from mail-ed1-f54.google.com ([209.85.208.54]:40491)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCd-0000IM-8I
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:32 -0400
Received: by mail-ed1-f54.google.com with SMTP id d6so9222044edt.7
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:31 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=Zwh3CsWrgNCycdU0+Zpth9Ex7PFXkjrmiNwAyclSYpk=;
 b=E43en6JOuBJrU+pXm59RubvWtwEp4jNo1fRBh0DPaPX4yl68O+G2qPmHyVwf5IenG+
 A8OYRxY+V/zKy3uTPZ/mXHCqzSz1FFCOpnnXk+bVSWxLfQ5PMDjk3rN9TVlgtW0Mu7AX
 jE+8+q1rYmkylaVVXkbmvDm6DEkn8ftwKn7jj3Bz4BtNs1YMy5piLa37KKhNd+QLcPsl
 IhbYUr0qxkoJZJVra1YRwGfhwhhOhYXFh9+pWzp3GxSUe0qD34QT5mEWL/Tist0gQbXD
 oQ2pCqYYrrR0xzy33o1+XjP/5NeAWCzyUB0/g766IaRWm3K8GDjbQdm/HO+S8CJS/08T
 LV2A==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=Zwh3CsWrgNCycdU0+Zpth9Ex7PFXkjrmiNwAyclSYpk=;
 b=PnKmDe8vlU/R/HP9YbgXVKYUS4+gcsN/mvsCTz6iXwsNbqhc3xoFx9l66MfG1lJa5d
 ZTnAVbG//N0+rH7PawalW5NjnSeipuH9rSd2qLzPDSEVVQBDOv9Ct41OlYC5qWvxhOMm
 0zPOhhjaw0gHFOPj2ZQAN79PLSmBJe0O9Lg0igOXq8FxSukCGl1rfKxaUnWyRnwVvmyH
 VkYzsAbDKmYSZY/eBYlYlKFybO8oyjtnyWZhsz1EFC2cJQgmFzshsLHIX59qgyIFYqTb
 5LnwjCj8WJfAt0WJqmpJgsNj6VHWo/rV1bEHPKZI3PxGHXDZL9Z3etwu9NxAwX05066Q
 W78g==
X-Gm-Message-State: AOAM531fEwuGK802l2g7q4rhI0CbO0pcBVHgbqX81q3Q0izi7xSEfIZz
 f50AXpDfpTB4csCx6apDTQAyTD7mRQsnCA==
X-Google-Smtp-Source: ABdhPJx8u252PXyeF1Pb7GBSRljSoOHU+Uuzcocb6CwSOoJolRM08Za6uE7WMMx/jhmAKmvMzQzpDQ==
X-Received: by 2002:aa7:c952:: with SMTP id h18mr16999640edt.18.1629383965145; 
 Thu, 19 Aug 2021 07:39:25 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.24
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:24 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:39:05 +0300
Message-Id: <20210819143906.6705-9-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* gnu/tests/desktop.scm (minimal-desktop): seatd/greetd based
minimal desktop
---
 gnu/tests/desktop.scm | 191 +++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 190 insertions(+), 1 deletion(-)

diff --git a/gnu/tests/desktop.scm b/gnu/tests/desktop.scm
index 6aa22fd49b..2517eb7b30 100644
--- a/gnu/tests/desktop.scm
+++ b/gnu/tests/desktop.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2017 Ludovic Courtès <ludo@HIDDEN>
+;;; Copyright © 2021 muradm <mail@HIDDEN>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -19,12 +20,15 @@
 (define-module (gnu tests desktop)
   #:use-module (gnu tests)
   #:use-module (gnu services)
+  #:use-module (gnu services base)
   #:use-module (gnu services dbus)
   #:use-module (gnu services desktop)
+  #:use-module (gnu system)
   #:use-module (gnu system vm)
   #:use-module (guix gexp)
   #:use-module (srfi srfi-1)
-  #:export (%test-elogind))
+  #:export (%test-elogind
+            %test-minimal-desktop))
 
 
 ;;;
@@ -103,3 +107,188 @@
                #:imported-modules '((gnu services herd)
                                     (guix combinators)))))
       (run-elogind-test (virtual-machine os))))))
+
+
+;;;
+;;; Seatd/greetd based minimal desktop
+;;;
+
+(define %minimal-services
+  (append
+   (list
+    (service seatd-service-type)
+    (service greetd-service-type
+             (greetd-configuration
+              (terminals
+               (list
+                (greetd-terminal-configuration (terminal-vt "1") (terminal-switch #t))
+                (greetd-terminal-configuration (terminal-vt "2"))
+                (greetd-terminal-configuration (terminal-vt "3"))
+                (greetd-terminal-configuration (terminal-vt "4"))
+                (greetd-terminal-configuration (terminal-vt "5"))
+                (greetd-terminal-configuration (terminal-vt "6")))))))
+   (modify-services %base-services
+     (delete login-service-type)
+     (delete mingetty-service-type))))
+
+(define-syntax-rule (minimal-operating-system user-services ...)
+  "Return an operating system that includes USER-SERVICES in addition to
+minimal %BASE-SERVICES."
+  (operating-system (inherit %simple-os)
+                    (services (cons* user-services ... %minimal-services))))
+
+(define (run-minimal-desktop-test os vm)
+  (define test
+    (with-imported-modules '((gnu build marionette)
+                             (guix build syscalls))
+      #~(begin
+          (use-modules (gnu build marionette)
+                       (guix build syscalls)
+                       (srfi srfi-1)
+                       (srfi srfi-64)
+                       (ice-9 pretty-print))
+
+          (define marionette
+            (make-marionette #$vm))
+
+          (define (file-get-all-strings fname)
+            (marionette-eval '(use-modules (rnrs io ports)) marionette)
+            (wait-for-file fname marionette #:read 'get-string-all))
+
+          (define (wait-for-unix-socket-m socket)
+            (wait-for-unix-socket socket marionette))
+
+          (mkdir #$output)
+          (chdir #$output)
+
+          (test-begin "minimal-desktop")
+
+          (test-assert "seatd is ready"
+            (wait-for-unix-socket-m "/run/seatd.sock"))
+
+          (test-equal "login user on tty1"
+            "alice\n"
+            (begin
+              ;; Wait for tty1.
+              (marionette-eval
+               '(begin
+                  (use-modules (gnu services herd))
+                  (start-service 'term-tty1))
+               marionette)
+              (marionette-control "sendkey ctrl-alt-f1" marionette)
+
+              ;; login as root change alice password and exit
+              ;; then login as alice
+              (for-each
+               (lambda (cmd) (marionette-type cmd marionette) (sleep 1))
+               (list
+                "root\n"
+                "\n"
+                "passwd alice\n"
+                "alice\n"
+                "alice\n"
+                "exit\n"
+                "alice\n"
+                "alice\n"
+                "id -un > logged-in\n"))
+
+              (file-get-all-strings "/home/alice/logged-in")))
+
+          (test-equal "validate user environment"
+            '("SEATD_SOCK=/run/seatd.sock"
+              "XDG_RUNTIME_DIR=/run/user/1000"
+              "XDG_SEAT=seat0"
+              "XDG_VTNR=1")
+
+            (begin
+              (marionette-type "env > env\n" marionette)
+              (sleep 1)
+
+              (define user-env (string-tokenize
+                                (file-get-all-strings "/home/alice/env")))
+
+              (define (expected-var var)
+                (any (lambda (s) (string-contains var s))
+                     '("SEATD_SOCK"
+                       "XDG_RUNTIME_DIR"
+                       "XDG_SEAT"
+                       "XDG_VTNR")))
+
+              (sort (filter expected-var user-env) string<?)))
+
+          (test-assert "validate SEATD_SOCK and GREETD_SOCK"
+            (begin
+              (marionette-type "env > env\n" marionette)
+              (sleep 1)
+
+              (define (sock-var? var)
+                (any (lambda (s) (string-contains var s))
+                     '("SEATD_SOCK" "GREETD_SOCK")))
+
+              (define (sock-var-sock var)
+                (car (cdr (string-split var #\=))))
+
+              (let*
+                  ((out (file-get-all-strings "/home/alice/env"))
+                   (out (string-tokenize out))
+                   (out (filter sock-var? out))
+                   (socks (map sock-var-sock out))
+                   (socks (map wait-for-unix-socket-m socks)))
+                (and (= 2 (length socks)) (every identity socks)))))
+
+          (test-assert "greetd is ready"
+            (begin
+              (marionette-type "ps -C greetd -o pid,args --no-headers > ps-greetd\n"
+                               marionette)
+              (sleep 1)
+
+              (define (greetd-daemon? cmd)
+                (string-contains cmd "config"))
+
+              (define (greetd-cmd-to-pid cmd)
+                (car (string-split cmd #\space)))
+
+              (define (greetd-pid-to-sock pid)
+                (string-append "/run/greetd-" pid ".sock"))
+
+              (let* ((out (file-get-all-strings "/home/alice/ps-greetd"))
+                     (out (string-split out #\newline))
+                     (out (map string-trim-both out))
+                     (out (filter greetd-daemon? out))
+                     (pids (map greetd-cmd-to-pid out))
+                     (socks (map greetd-pid-to-sock pids))
+                     (socks (map wait-for-unix-socket-m socks)))
+                (every identity socks))))
+
+          ;; a bit weak, but tests everything at once actually
+          (test-equal "check /run/user/<uid> mounted and writable"
+            "alice\n"
+            (begin
+              (marionette-type "echo alice > /run/user/1000/test\n" marionette)
+              (file-get-all-strings "/run/user/1000/test")))
+
+          (test-assert "screendump"
+            (begin
+              (marionette-control (string-append "screendump " #$output
+                                                 "/tty1.ppm")
+                                  marionette)
+              (file-exists? "tty1.ppm")))
+
+          (test-end)
+          (exit (= (test-runner-fail-count (test-runner-current)) 0)))))
+
+  (gexp->derivation "minimal-desktop" test))
+
+(define %test-minimal-desktop
+  (system-test
+   (name "minimal-desktop")
+   (description
+    "Test whether we can log in when seatd and greetd is enabled")
+   (value
+    (let* ((os (marionette-operating-system
+                (minimal-operating-system)
+                #:imported-modules '((gnu services herd)
+                                     (guix combinators))))
+           (vm (virtual-machine os)))
+      (run-minimal-desktop-test (virtualized-operating-system os '())
+                                #~(list #$vm))))))
-- 
2.32.0





Message sent to guix-patches@HIDDEN:


X-Loop: help-debbugs@HIDDEN
Subject: [bug#49969] [PATCH v4 10/10] doc: Add desktop seatd-service-type and greetd-service-type
Resent-From: muradm <mail@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: guix-patches@HIDDEN
Resent-Date: Thu, 19 Aug 2021 14:40:05 +0000
Resent-Message-ID: <handler.49969.B49969.16293839851249 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 49969
X-GNU-PR-Package: guix-patches
X-GNU-PR-Keywords: patch
To: 49969 <at> debbugs.gnu.org
Received: via spool by 49969-submit <at> debbugs.gnu.org id=B49969.16293839851249
          (code B ref 49969); Thu, 19 Aug 2021 14:40:05 +0000
Received: (at 49969) by debbugs.gnu.org; 19 Aug 2021 14:39:45 +0000
Received: from localhost ([127.0.0.1]:60569 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1mGjCq-0000K0-FS
	for submit <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:44 -0400
Received: from mail-ej1-f47.google.com ([209.85.218.47]:37821)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <mail@HIDDEN>) id 1mGjCe-0000IT-F0
 for 49969 <at> debbugs.gnu.org; Thu, 19 Aug 2021 10:39:33 -0400
Received: by mail-ej1-f47.google.com with SMTP id h9so13443096ejs.4
 for <49969 <at> debbugs.gnu.org>; Thu, 19 Aug 2021 07:39:32 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=muradm-net.20150623.gappssmtp.com; s=20150623;
 h=from:to:subject:date:message-id:in-reply-to:references:mime-version
 :content-transfer-encoding;
 bh=X5B9Qd55nSCKA6XjB1MsLqDY4wPCKD2qims4BRcZ9xg=;
 b=ftevKKrfcyNnDSYcxwl1dQm7NNIfXS1Su4jy2OQmvayN0yayhgVXQq8l6+o8M+XM6E
 3m/1PwhVV1C5gon70iap+Ln6bAYOtf/oci49Ejyzz31QGqYHmt+jLb54Zzrgn/C58iIu
 wCCA9Sfy/4X2LKatWSAnKNNJEJ5bMIl1U9V0O2VJrcX2sSIQsGwj/XF/s0QZPGwdvo32
 DfzYrBAptar8EhH5TPcWc69EMRUmdkbFeObf6eIfzjH8gUFlaunne3Xgwag/KsHyUQyB
 1hwJLsfl7+vr4M7fT56MsL8UiUCfzyFA7Gk3sjX/VRjYGnR3eOI3Aay8CZQJ7rW+PCMM
 ETBw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=X5B9Qd55nSCKA6XjB1MsLqDY4wPCKD2qims4BRcZ9xg=;
 b=W3kNcFf//JlUcKSich+Ye4+VH+wNwy1JIpJz5jyA197zadS0UepR5DoeFydoBDvhjB
 LA4E6ffYao7+ohq8GUAwBxjo9Grio7s3bkfc535q2m0kmANeHaKEX1IWfb0JdZEQ+4dZ
 vQIe2ApTfO/eI/z5YMhZIe8izwZZTOUYdRQx228cEmkMBvQrCnCArVQAe0gj0apuC/4t
 b48e9oUK0R8Ecn40G/XgYvNWvZ3WwJ4NSGTUWvOt1GEWnX0LIj67+zSFwrz9EDSx6pgN
 m3DwkhgR9U8ndcjskWlLob0huKg2tDg4yXVHIcvPiK9MkCI7E+/ZqmIgn9VHA4Cc4nOI
 aIHw==
X-Gm-Message-State: AOAM530Gysw1y6JkuUpGoxxOUD7wPl3Ygyq8bkcDJKRjKNFpazS/vA4C
 wmhKD6xOqae+oK8fzFpmww8VRHwqr1Asdw==
X-Google-Smtp-Source: ABdhPJxD737JbMFM1gmeAH3AThJt3a+T+MR+Kdje1Xm+xqq+ceQxZHhvpmzssWpK5oRx87fdfbly+A==
X-Received: by 2002:a17:907:1c8d:: with SMTP id
 nb13mr16329365ejc.155.1629383966460; 
 Thu, 19 Aug 2021 07:39:26 -0700 (PDT)
Received: from localhost.localdomain ([188.58.13.35])
 by smtp.gmail.com with ESMTPSA id b8sm1825954edv.96.2021.08.19.07.39.25
 for <49969 <at> debbugs.gnu.org>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Thu, 19 Aug 2021 07:39:26 -0700 (PDT)
From: muradm <mail@HIDDEN>
Date: Thu, 19 Aug 2021 17:39:06 +0300
Message-Id: <20210819143906.6705-10-mail@HIDDEN>
X-Mailer: git-send-email 2.32.0
In-Reply-To: <20210819143133.6398-1-mail@HIDDEN>
References: <20210819143133.6398-1-mail@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.0 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* doc/guix.texi (Desktop Services): Provide documentation for
seatd-service-type and greetd-service-type including configuration
and sample usage.
---
 doc/guix.texi | 187 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 187 insertions(+)

diff --git a/doc/guix.texi b/doc/guix.texi
index 17ecc3ad0f..01a895fe62 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -94,6 +94,7 @@ Copyright @copyright{} 2021 Xinglu Chen@*
 Copyright @copyright{} 2021 Raghav Gururajan@*
 Copyright @copyright{} 2021 Domagoj Stolfa@*
 Copyright @copyright{} 2021 Hui Lu@*
+Copyright @copyright{} 2021 muradm@*
 
 Permission is granted to copy, distribute and/or modify this document
 under the terms of the GNU Free Documentation License, Version 1.3 or
@@ -19702,6 +19703,192 @@ and ``passwd'' is with the value @code{passwd}.
 @end table
 @end deftp
 
+@defvr {Scheme Variable} seatd-service-type
+A minimal seat management daemon, and a universal seat management library.
+
+Seat management takes care of mediating access to shared devices (graphics,
+input), without requiring the applications needing access to be root.
+
+In general should be used as replacement to @code{elogind-service-type}.
+
+@lisp
+(append
+  (list
+   ;; make sure seatd is running
+   (service seatd-service-type)
+
+   (service greetd-service-type
+            (greetd-configuration
+             (terminals
+              (list
+               ;; lets have terminals 1, 2 and 3 run default XDG terminal session
+               ;; also ask terminal 1 to become active
+               (greetd-terminal-configuration (terminal-vt "1") (terminal-switch #t))
+               (greetd-terminal-configuration (terminal-vt "2"))
+               (greetd-terminal-configuration (terminal-vt "3"))
+               ;; and terminals 4, 5 and 6 plain bash terminal session
+               ;; although not so plain, just to illustrate flexibility
+               (greetd-terminal-configuration
+                (terminal-vt "4")
+                (default-session-command greetd-agreety-tty-session))
+               (greetd-terminal-configuration
+                (terminal-vt "5")
+                (default-session-command greetd-agreety-tty-session))
+               (greetd-terminal-configuration
+                (terminal-vt "6")
+                (default-session-command greetd-agreety-tty-session))))))
+
+  ;; normaly one would want %base-services
+  (modify-services %base-services
+    ;; seatd/greetd combination can replace these
+    ;; greetd provides its own PAM service
+    (delete login-service-type)
+    (delete mingetty-service-type)))
+
+@end lisp
+
+@end defvr
+
+@deftp {Data Type} seatd-configuration
+Configuration record for the seatd daemon service.
+
+@table @asis
+@item @code{seatd} (default: @code{seatd})
+The seatd package to use.
+
+@item @code{user} (default: @samp{"root"})
+User to own the seatd socket.
+
+@item @code{group} (default: @samp{"users"})
+Group to own the seatd socket.
+
+@item @code{socket} (default: @samp{"/run/seatd.sock"})
+Where to create the seatd socket.
+
+@item @code{loglevel} (default: @samp{"error"})
+Log level to output logs. Possible values: @samp{"silent"}, @samp{"error"},
+@samp{"info"} and @samp{"debug"}.
+
+@end table
+@end deftp
+
+@defvr {Scheme Variable} greetd-service-type
+greetd is a minimal and flexible login manager daemon that makes no
+assumptions about what you want to launch.
+
+If you can run it from your shell in a TTY, greetd can start it. If it
+can be taught to speak a simple JSON-based IPC protocol, then it can
+be a greeter.
+
+@code{<greetd-service-type>} provides necessary infrastructure for
+logging in users, including:
+
+@itemize @bullet
+@item
+@code{greetd} PAM service
+
+@item
+Special variation of @code{pam-mount} to mount @code{XDG_RUNTIME_DIR}
+
+@end itemize
+
+@end defvr
+
+@deftp {Data Type} greetd-configuration
+Configuration record for the greetd service.
+
+@table @asis
+@item @code{motd}
+A file-like object containing the ``message of the day''.
+
+@item @code{allow-empty-passwords?} (default: @code{#t})
+Allow empty passwords by default so that first-time users can log in when
+the 'root' account has just been created.
+
+@item @code{terminals} (default: @code{'()})
+List of @code{<greetd-terminal-configuration>} per terminal for which
+@code{greetd} should be started.
+
+@end table
+@end deftp
+
+@deftp {Data Type} greetd-terminal-configuration
+Configuration record for per terminal greetd daemon service.
+
+@table @asis
+@item @code{greetd} (default: @code{greetd})
+The greetd package to use.
+
+@item @code{config-file-name}
+Configuration file name to use for greetd daemon. Generally, autogenerated
+derivation based on @code{terminal-vt} value.
+
+@item @code{terminal-vt} (default: @samp{"7"})
+The VT to run on. Use of a specific VT with appropriate conflict avoidance
+is recommended.
+
+@item @code{terminal-switch} (default: @code{#f})
+Make this terminal active on start of @code{greetd}.
+
+@item @code{default-session-user} (default: @samp{"greeter"})
+The user to use for running the greeter.
+
+@item @code{default-session-command} (default: @code{greetd-agreety-tty-xdg-session})
+The command-line to run to start the default session.
+
+Possible values are:
+
+@itemize @bullet
+@item
+@code{greetd-agreety-tty-session} - bash terminal session
+
+@item
+@code{greetd-agreety-tty-xdg-session} - bash terminal session with XDG environment
+
+@item
+@code{greetd-agreety-session} - custom instance of terminal session
+@end itemize
+
+@end table
+@end deftp
+
+@deftp {Data Type} greetd-agreety-session
+Configuration record for the agreety greetd greeter.
+
+@table @asis
+@item @code{package} (default: @code{bash})
+The package of command.
+
+@item @code{command-bin} (default: @samp{"/bin/bash"})
+Path to binary relative to @code{package}.
+
+@item @code{command-args} (default: @code{'("-l")})
+Command arguments to pass to command.
+
+@item @code{extra-env} (default: @code{'()})
+Extra environment variables to set on login.
+
+@item @code{command-generator}
+Function that receives instance of this configuration as an argument and
+returns @code{program-file} that can be used with @code{agreety} greeter.
+
+Both @code{greetd-agreety-tty-session} and @code{greetd-agreety-tty-xdg-session}
+uses @code{greetd-agreety-session} under the hood.
+
+@end table
+@end deftp
+
+@defvr {Scheme Variable} greetd-agreety-tty-session
+Provides instance of @code{greetd-agreety-session} which starts @samp{"bash -l"}
+on login.
+@end defvr
+
+@defvr {Scheme Variable} greetd-agreety-tty-xdg-session
+Provides instance of @code{greetd-agreety-session} which starts @samp{"bash -l"}
+on login. Additionally, will set @code{XDG_SESSION_TYPE} and
+@code{XDG_RUNTIME_DIR} environment variables for session.
+@end defvr
+
 
 @node Sound Services
 @subsection Sound Services
-- 
2.32.0






Last modified: Thu, 19 Aug 2021 14:45:01 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.