From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp2 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id 4IVxCpAjmF9meAAA0tVLHw (envelope-from ) for ; Tue, 27 Oct 2020 13:41:36 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp2 with LMTPS id wLg1BpAjmF/iJAAAB5/wlQ (envelope-from ) for ; Tue, 27 Oct 2020 13:41:36 +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 303509407C8 for ; Tue, 27 Oct 2020 13:41:35 +0000 (UTC) Received: from localhost ([::1]:35422 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kXPEE-0002DR-0x for larch@yhetil.org; Tue, 27 Oct 2020 09:41:34 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:58650) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kXPAo-0006KD-SS for guix-patches@gnu.org; Tue, 27 Oct 2020 09:38:02 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:60017) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1kXPAo-0001Wr-Ho for guix-patches@gnu.org; Tue, 27 Oct 2020 09:38:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1kXPAo-0002JR-Fg for guix-patches@gnu.org; Tue, 27 Oct 2020 09:38:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#44255] Add pinebook-pro support. Resent-From: Mathieu Othacehe Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Tue, 27 Oct 2020 13:38:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 44255 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: To: 44255@debbugs.gnu.org Cc: ennoausberlin@mac.com X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.16038058368824 (code B ref -1); Tue, 27 Oct 2020 13:38:02 +0000 Received: (at submit) by debbugs.gnu.org; 27 Oct 2020 13:37:16 +0000 Received: from localhost ([127.0.0.1]:43330 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kXPA0-0002IC-B5 for submit@debbugs.gnu.org; Tue, 27 Oct 2020 09:37:16 -0400 Received: from lists.gnu.org ([209.51.188.17]:39336) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kXP9u-0002Hy-GW for submit@debbugs.gnu.org; Tue, 27 Oct 2020 09:37:10 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:58318) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kXP9u-0004zi-9K for guix-patches@gnu.org; Tue, 27 Oct 2020 09:37:06 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:50548) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kXP9t-0001M3-Lh; Tue, 27 Oct 2020 09:37:05 -0400 Received: from [2a01:e0a:19b:d9a0:50c1:4a69:300e:4531] (port=37184 helo=cervin) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1kXP9s-000346-Ki; Tue, 27 Oct 2020 09:37:05 -0400 From: Mathieu Othacehe Date: Tue, 27 Oct 2020 14:37:02 +0100 Message-ID: <878sbru6wx.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-Spam-Score: -3.3 (---) 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-Scanner: scn0 Authentication-Results: aspmx1.migadu.com; dkim=none; dmarc=pass (policy=none) header.from=gnu.org; 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-Spam-Score: -1.51 X-TUID: j7r29odDBZUn --=-=-= Content-Type: text/plain Hello, Here's a patch adding support for the pinebook-pro. As I do not own one of those, it would be nice if someone could test it with the following commands: --8<---------------cut here---------------start------------->8--- echo "(use-modules (gnu system images pinebook-pro)) pinebook-pro-barebones-os" > /tmp/os.scm ./pre-inst-env guix system disk-image -t pinebook-pro-raw /tmp/os.scm --8<---------------cut here---------------end--------------->8--- on top of f0c609323e or later. Thanks, Mathieu --=-=-= Content-Type: text/x-diff; charset=utf-8 Content-Disposition: inline; filename=0001-image-Add-pinebook-pro-support.patch Content-Transfer-Encoding: quoted-printable >From 9487a2fa3b148ce9b680f7490f436f7f917827bc Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Tue, 27 Oct 2020 14:05:52 +0100 Subject: [PATCH] image: Add pinebook-pro support. * gnu/system/images/pinebook-pro.scm: New file. * gnu/local.mk (GNU_SYSTEM_MODULES): Add it. * gnu/ci.scm (%guix-system-images): Add pinebook-pro-barebones-raw-image. --- gnu/ci.scm | 3 +- gnu/local.mk | 1 + gnu/system/images/pinebook-pro.scm | 66 ++++++++++++++++++++++++++++++ 3 files changed, 69 insertions(+), 1 deletion(-) create mode 100644 gnu/system/images/pinebook-pro.scm diff --git a/gnu/ci.scm b/gnu/ci.scm index bf9952a450..8e78cae82c 100644 --- a/gnu/ci.scm +++ b/gnu/ci.scm @@ -205,7 +205,8 @@ SYSTEM." =20 (define %guix-system-images (list hurd-barebones-qcow2-image - pine64-barebones-raw-image)) + pine64-barebones-raw-image + pinebook-pro-barebones-raw-image)) =20 (define (image-jobs store system) "Return a list of jobs that build images for SYSTEM." diff --git a/gnu/local.mk b/gnu/local.mk index c6aa58b24f..be3043460e 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -650,6 +650,7 @@ GNU_SYSTEM_MODULES =3D \ \ %D%/system/images/hurd.scm \ %D%/system/images/pine64.scm \ + %D%/system/images/pinebook-pro.scm \ \ %D%/machine.scm \ \ diff --git a/gnu/system/images/pinebook-pro.scm b/gnu/system/images/pineboo= k-pro.scm new file mode 100644 index 0000000000..b038e262cb --- /dev/null +++ b/gnu/system/images/pinebook-pro.scm @@ -0,0 +1,66 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright =C2=A9 2020 Mathieu Othacehe +;;; +;;; This file is part of GNU Guix. +;;; +;;; GNU Guix is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; GNU Guix is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with GNU Guix. If not, see . + +(define-module (gnu system images pinebook-pro) + #:use-module (gnu bootloader) + #:use-module (gnu bootloader u-boot) + #:use-module (gnu image) + #:use-module (gnu packages linux) + #:use-module (gnu services) + #:use-module (gnu services base) + #:use-module (gnu system) + #:use-module (gnu system file-systems) + #:use-module (gnu system image) + #:use-module (srfi srfi-26) + #:export (pinebook-pro-barebones-os + pinebook-pro-image-type + pinebook-pro-barebones-raw-image)) + +(define pinebook-pro-barebones-os + (operating-system + (host-name "viso") + (timezone "Europe/Paris") + (locale "en_US.utf8") + (bootloader (bootloader-configuration + (bootloader u-boot-pinebook-pro-rk3399-bootloader) + (target "/dev/vda"))) + (initrd-modules '()) + (kernel linux-libre-arm64-generic) + (file-systems (cons (file-system + (device (file-system-label "my-root")) + (mount-point "/") + (type "ext4")) + %base-file-systems)) + (services (cons (service agetty-service-type + (agetty-configuration + (extra-options '("-L")) ; no carrier detect + (baud-rate "115200") + (term "vt100") + (tty "ttyS0"))) + %base-services)))) + +(define pinebook-pro-image-type + (image-type + (name 'pinebook-pro-raw) + (constructor (cut image-with-os arm64-disk-image <>)))) + +(define pinebook-pro-barebones-raw-image + (image + (inherit + (os->image pinebook-pro-barebones-os #:type pinebook-pro-image-type)) + (name 'pinebook-pro-barebones-raw-image))) --=20 2.28.0 --=-=-=--