From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp1 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms0.migadu.com with LMTPS id UKIeMGSz9WDTtgAAgWs5BA (envelope-from ) for ; Mon, 19 Jul 2021 19:16:20 +0200 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp1 with LMTPS id oKbEK2Sz9WB1HgAAbx9fmQ (envelope-from ) for ; Mon, 19 Jul 2021 17:16:20 +0000 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 6015019C90 for ; Mon, 19 Jul 2021 19:16:20 +0200 (CEST) Received: from localhost ([::1]:51316 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1m5WsN-0000c2-F2 for larch@yhetil.org; Mon, 19 Jul 2021 13:16:19 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:42808) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1m5WsC-0000FL-0K for guix-patches@gnu.org; Mon, 19 Jul 2021 13:16:09 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:48673) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1m5Ws7-0004bG-4v for guix-patches@gnu.org; Mon, 19 Jul 2021 13:16:07 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1m5Ws7-0000w1-15 for guix-patches@gnu.org; Mon, 19 Jul 2021 13:16:03 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#49419] [PATCH v3 3/4] home-services: Add home-provenance-service-type References: <87y2akhiz1.fsf@trop.in> Resent-From: Andrew Tropin Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Mon, 19 Jul 2021 17:16:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 49419 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 49419@debbugs.gnu.org Received: via spool by 49419-submit@debbugs.gnu.org id=B49419.16267149412246 (code B ref 49419); Mon, 19 Jul 2021 17:16:02 +0000 Received: (at 49419) by debbugs.gnu.org; 19 Jul 2021 17:15:41 +0000 Received: from localhost ([127.0.0.1]:60213 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1m5Wrl-0000Zp-FJ for submit@debbugs.gnu.org; Mon, 19 Jul 2021 13:15:41 -0400 Received: from mail-lj1-f174.google.com ([209.85.208.174]:33589) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1m5Wrj-0000S1-IC for 49419@debbugs.gnu.org; Mon, 19 Jul 2021 13:15:39 -0400 Received: by mail-lj1-f174.google.com with SMTP id u14so27428649ljh.0 for <49419@debbugs.gnu.org>; Mon, 19 Jul 2021 10:15:39 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=trop-in.20150623.gappssmtp.com; s=20150623; h=from:to:subject:in-reply-to:date:message-id:mime-version; bh=a/lytMsQTL/htua872I/xvcPbS8lCGq8gJM10eGky7s=; b=T82znJX8JdtklC7TfbGZ2Zy2j87YQqaih6YsZydELQ4uLG3z01jT6zFTTFywNnTesL S8CxKNpL4+0uvR9BkWIUj/McLJR0UDC3bbeC4K/K5AYPYURzkPTwcZXBW7mD+PHPBiBs AdPMnEpZQHvc8WT4ELlC2JEeN/eRLEoN+puJnHbJduFgpvGrXq3px8LTTfbR5jtn2pfV IuDD7hJfb43gFiplwMKh0tsvd/m7AcSxWogeuE0yAug/R9e9LSmz7t062cOhm+B8gCFv eE3kiPCV4ohkqqLR2FXWBPwmwqSmlGosFNCCIa1RxsTBNP3GAPWhQjc7ZJemHPSC4e5O PKsw== 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:in-reply-to:date:message-id :mime-version; bh=a/lytMsQTL/htua872I/xvcPbS8lCGq8gJM10eGky7s=; b=aMvGxuOJVmEgAJHvEZLz1gX5JSLc5HVphmPX2NZOKSvC9VNRSomUOya5GloloAN8Zh JNkhPuhRgyE9upSrWBLWknyEoq80znS05Em00SJSQfrokIjzhXCz3w0YjVpK19WtBy+O pLAl4ESvY33jfDFVlPiOVlrkJ+ZV8Fr4Qc37teNj+4fyKOsePkpTD7QwEuHikJGR4wgI aHiXJ7AHi86zvSbZdBIkhs/vHA9oRcCpnV/AwOQCer2tJYIxMIBqm3OriKczhiAwPtlj takywOkRZxFnptTGGErezGf5n2H3fJIpOjU7cvWYTb+HkvpZzmJ4GgZZmLsyysqMquyL CyeA== X-Gm-Message-State: AOAM5322dowmOoPzBxtjs1GfQ4l93tOjGLffib8BJFowSwmpB1X0utWM 3Y1wUiospkf+3Usu3fK1qNRCFaSgHggdJQ== X-Google-Smtp-Source: ABdhPJzunp2iNMuxxslQkuLfknJatkrIexBf53E+zbv7usaQJGdwwzpekouBWATJS4OD+yhujGUvgw== X-Received: by 2002:a2e:9a8e:: with SMTP id p14mr12927665lji.69.1626714933401; Mon, 19 Jul 2021 10:15:33 -0700 (PDT) Received: from localhost ([85.249.24.60]) by smtp.gmail.com with ESMTPSA id p13sm1337910lfr.7.2021.07.19.10.15.32 for <49419@debbugs.gnu.org> (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Mon, 19 Jul 2021 10:15:32 -0700 (PDT) From: Andrew Tropin In-Reply-To: <87v956g1g5.fsf@trop.in> Date: Mon, 5 Jul 2021 18:41:07 +0300 Message-ID: <87r1fug18l.fsf@trop.in> MIME-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha512; protocol="application/pgp-signature" X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: "Guix-patches" X-Migadu-Flow: FLOW_IN ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1626714980; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:mime-version:mime-version: content-type:content-type:resent-cc:resent-from:resent-sender: resent-message-id:in-reply-to:in-reply-to:references:references: list-id:list-help:list-unsubscribe:list-subscribe:list-post: dkim-signature; bh=tDTIWm1zFfF5d9DQuDAhMnQJ0XJX4k0sWFHBstAEHVY=; b=QhdvsWrwVd+3MRvqtXIGnxv2l1rhVd3mhb5ug4QYczV5bwBNNG/+QxG4vpLaB5jzY3mMJk 3nPeIHs9QWzyJXFrF9wuqB+XZPMfD0MQCmLKpj/D15dwgpATQIfr7wl4pGZy1KQA9nCjHa KFs9gKR6iSzWKdBxm3CHr0dhx5fczrL5x5L+9STgpPoCwneuRqHBoFf6H/p/yqOEOWbBMW bkTYsaF7GXSkcOVeVlH8astyjOqMH/SqtoQ0Z9kuxsV2CEWFuPv7oobotq0VjvR/W6Q70W wFy9YqmpCQ1fmNTHMdBFWVTElqzoquqsDkXY8Uw7uccipd78wLazjCvKc8RHng== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1626714980; a=rsa-sha256; cv=none; b=lvA4wIorL12gEFEflTFEBX+CjJoftDP6IolHqU0Ts32IVvO/r8F1O1kOd8X7jcxgBFmzOM mX9Z9qCwZTluXjp7TmIJFHEKKs44YJpzEqZ5oQysgpJxbnZErTMsn8vr9t5DUQlts7zMi9 BBGQkcEMzMrOip/v6XUzAKFJIMQV/fKWaRCm7TdCEQ6t0kwJrbNKVPq43QBtM2Ddwi3GMz OWfZrB8MaQC7C51HixGeGDWYwn71zXitS/shcPYOvRgxcjEkJur84oAiThQvQBwDs+0ARh wfbxmlMwhvh7jB2s1D+r03XXuJbdwiV+Ps4W/rI4vViccnJb+81vQgpIPmOFOA== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=fail ("body hash did not verify") header.d=trop-in.20150623.gappssmtp.com header.s=20150623 header.b=T82znJX8; dmarc=none; spf=pass (aspmx1.migadu.com: domain of guix-patches-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=guix-patches-bounces@gnu.org X-Migadu-Spam-Score: -0.01 Authentication-Results: aspmx1.migadu.com; dkim=fail ("body hash did not verify") header.d=trop-in.20150623.gappssmtp.com header.s=20150623 header.b=T82znJX8; dmarc=none; spf=pass (aspmx1.migadu.com: domain of guix-patches-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=guix-patches-bounces@gnu.org X-Migadu-Queue-Id: 6015019C90 X-Spam-Score: -0.01 X-Migadu-Scanner: scn0.migadu.com X-TUID: qZfSBYQ2qGb2 --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable * gnu/home-services.scm (home-provenance-service-type, sexp->home-provenanc= e, home-provenance): New variables. =2D-- gnu/home-services.scm | 27 ++++++++++++++++++++++++++- 1 file changed, 26 insertions(+), 1 deletion(-) diff --git a/gnu/home-services.scm b/gnu/home-services.scm index bcb6dd80df..8aa9adeaaf 100644 =2D-- a/gnu/home-services.scm +++ b/gnu/home-services.scm @@ -38,7 +38,10 @@ home-files-service-type home-run-on-first-login-service-type home-activation-service-type =2D home-run-on-change-service-type) + home-run-on-change-service-type + home-provenance-service-type + + fold-home-service-types) =20 #:re-export (service service-type @@ -424,3 +427,25 @@ G-expressions to run if the specified files have chang= ed since the last generation. The extension should be a list of lists where the first element is the pattern for file or directory that expected to be changed, and the second element is the G-expression to be evaluated."))) + + +;;; +;;; Provenance tracking. +;;; + +(define home-provenance-service-type + (service-type + (name 'home-provenance) + (extensions + (list (service-extension + home-service-type + (service-extension-compute + (first (service-type-extensions provenance-service-type)))))) + (default-value #f) ;the HE config file + (description "\ +Store provenance information about the home environment in the home +environment itself: the channels used when building the home +environment, and its configuration file, when available."))) + +(define sexp->home-provenance sexp->system-provenance) +(define home-provenance system-provenance) =2D-=20 2.32.0 --=-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iQJDBAEBCgAtFiEEKEGaxlA4dEDH6S/6IgjSCVjB3rAFAmD1NroPHGFuZHJld0B0 cm9wLmluAAoJECII0glYwd6wlcUP/jiO4UrQ/hKe0FdL7bJZ7m27MvvA1Kqudb6c LxDWsYDywZla8t9BSNhNZvH0iwKCnKuOr0mP4+aO1nGZ1qXSB1oQ+pLBw/kvXVAi DSxYFmo3YCZIvIxJLuewz7OlyoRsA7AHFMsgZIyATTbQKo2TggjM8IZwtEFRWqLP LI30Y1zutLyLrHP6t/1BGozam/wq7db03/UuBtngINP44EUhKc/yezDVUBcotila hKHqxJGHD6qniDZf77FZXiytjLRqlgQaEZQ8vMmwX6N5geDIfcnZNUoE+aZ4YQCS XDlW3Nq+J0MxMzqtu5maGF+LoQFJ0LDDao8ryw/qasUi0U0hrA0DGkKwDPlNCcer LaxEL3KbzjuFUC6cISzNUUd/HOt0Fl+Ri2oBjHWTGs7QTUKecu5Yj9zW47beAtaG pH9AQgUHu/rd95OrqOT+i+8AXRcaLAbXELAu1Lcgupdwmu/N6vHLV+f7W6CS7arx XXBhqv9hwmUs4VoYr8JRQt7JdAKaHhnqCicaqKZHAX+bhwxzKcQqyydSIvYrBpP3 1qiiMBJt7S4mHIDBorIw34gS9CasQPgkiU3ItPuVHFDm8lljYdIQ8p9hV6tlRzZZ M127UjSd8yhx/bSUMMF+WZMiYiJSo/Q4JSXkNigRYwakOvXFF5SnMcMw9QkjBZYy L9cuLKsp =bg7c -----END PGP SIGNATURE----- --=-=-=--