#!@abs_top_builddir@/guile \
--no-auto-compile -e main -s
!#
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2018 Mathieu Lirzin <mthl@gnu.org>
;;;
;;; 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 <http://www.gnu.org/licenses/>.

;; IMPORTANT: We must avoid loading any modules from Guix here,
;; because we need to adjust the guile load paths first.
;; It's okay to import modules from core Guile though.

(define-syntax-rule (push! elt v) (set! v (cons elt v)))

(define (augment-load-paths!)
  ;; Add installed modules to load-path.
  (push! "@guilemoduledir@" %load-path)
  (push! "@guileobjectdir@" %load-compiled-path))

(define* (main #:optional (args (command-line)))
  (unless (getenv "GUIX_UNINSTALLED")
    (augment-load-paths!))

  (let ((guix-main (module-ref (resolve-interface '(guix ui))
                               'guix-main)))
    (bindtextdomain "guix" "@localedir@")
    (bindtextdomain "guix-packages" "@localedir@")
    ;; XXX: It would be more convenient to change it to:
    ;;   (exit (apply guix-main (command-line)))
    ;; but since the 'guix' command is not updated by 'guix pull', we cannot
    ;; really do it now.
    (apply guix-main args)))

;;; Local Variables:
;;; mode: scheme
;;; End:
tion>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=ce860cdd87106857f19147529f091592a8937838'>root</a>/<a href='/guix/log/gnu?id=ce860cdd87106857f19147529f091592a8937838'>gnu</a>/<a href='/guix/log/gnu/system?id=ce860cdd87106857f19147529f091592a8937838'>system</a>/<a href='/guix/log/gnu/system/image.scm?id=ce860cdd87106857f19147529f091592a8937838'>image.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/system/image.scm?id=ce860cdd87106857f19147529f091592a8937838&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-10-01 22:18:52 +0200'>2023-10-01</span></td><td><a href='/guix/commit/gnu/system/image.scm?id=dfaeaae9c7e7283b99ad10aef3e61402e9820bc7'>image: Product hybrid qcow2 images.</a><span class='msg-avail'>...<span class='msg-tooltip'>This is a follow-up of e5ed1712da049b1c3dcf01e0a7e02e48a8aff012. Restore the
behaviour before d57cab764122af69d52d8cc9c843456044e5d7bc and produce
hybrid, BIOS and UEFI capable qcow2 images.

* gnu/system/image.scm (qcow2-image-type): Inherit from mbr-hybrid-disk-image.
</span></span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2023-09-20 09:38:40 +0200'>2023-09-20</span></td><td><a href='/guix/commit/gnu/system/image.scm?id=6bd17a0806ad32d1493ac51a7443276f719c4224'>image: Do not allow BIOS bootloader and GPT.</a><span class='msg-avail'>...<span class='msg-tooltip'>When using grub-bootloader with a GPT image, GRUB will fail during
installation with a cryptic error message.

* gnu/system/image.scm (system-disk-image): Raise an error when trying to use
a non-EFI compatible bootloader with a GPT image partitioning.

Signed-off-by: Mathieu Othacehe &lt;othacehe@gnu.org&gt;
</span></span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2023-09-20 09:38:36 +0200'>2023-09-20</span></td><td><a href='/guix/commit/gnu/system/image.scm?id=e5ed1712da049b1c3dcf01e0a7e02e48a8aff012'>image: Introduce the mbr-hybrid-raw image type.</a><span class='msg-avail'>...<span class='msg-tooltip'>Until 209204e23b39af09e0ea92540b6fa00a60e6a0ae and
d57cab764122af69d52d8cc9c843456044e5d7bc, the default image type used by "guix
system image" was an MBR image with an ESP partition.

Having both an MBR image and an ESP partition is handy because the image will
boot on most x86 based systems using legacy BIOS and/or UEFI.

We now have a distinction between MBR images and EFI images. Introduce a new
MBR hybrid image type and default to it to restore the default behaviour.

This also fixes the images section of (gnu ci) that was trying to install a
BIOS bootloader on an EFI, GPT image and failing to do so.

Signed-off-by: Mathieu Othacehe &lt;othacehe@gnu.org&gt;
</span></span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2023-08-25 14:24:21 +0200'>2023-08-25</span></td><td><a href='/guix/commit/gnu/system/image.scm?id=d57cab764122af69d52d8cc9c843456044e5d7bc'>image: Add mbr-raw-image-type and use by default.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/system/image.scm (mbr-disk-image, mbr-raw-image-type): New variables.
(qcow2-image-type): Inherit mbr-disk-image.
* guix/scripts/system.scm (%default-options): Use mbr-raw-image-type by
default.
* gnu/tests/install.scm (run-install): Use mbr-raw in the tests.
* doc/guix-cookbook.texi (Guix System Image API): Update the list of image
types.
* doc/guix.texi (Invoking guix system, System Images, image-type Reference):
Add mbr-raw and switch documented default to it.
</span></span></td><td>Josselin Poiret</td></tr>
<tr><td><span title='2023-07-07 21:14:10 +0200'>2023-07-07</span></td><td><a href='/guix/commit/gnu/system/image.scm?id=209204e23b39af09e0ea92540b6fa00a60e6a0ae'>image: Prefer gpt partition table for efi images</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/system/image.scm (efi-disk-image): Use gpt partition-table-type.
(efi32-disk-image): Use gpt partition-table-type.
(qcow2-image-type): Use mbr partition-table-type explicitly.
* gnu/tests/image.scm: Assert partition table type of efi-disk-image.

Signed-off-by: Josselin Poiret &lt;dev@jpoiret.xyz&gt;
</span></span></td><td>Sergey Trofimov</td></tr>
<tr><td><span title='2023-06-19 16:31:32 +0300'>2023-06-19</span></td><td><a href='/guix/commit/gnu/system/image.scm?id=da81784d60d495fc70fe4b113e525b7a4006789a'>gnu: image: Build partitions with only necessary inputs.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/system/image.scm (system-disk-image)[partition-image]: Adjust the
inputs used by the image-builder to only use the packages necessary to
build that partition.
</span></span></td><td>Efraim Flashner</td></tr>
<tr><td><span title='2023-06-14 14:52:21 +0300'>2023-06-14</span></td><td><a href='/guix/commit/gnu/system/image.scm?id=cd55aa98011c42b8e97561f4eea024be751bcceb'>gnu: image: Add support for unformatted partitions.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/build/image.scm (make-unformatted-image): New procedure.
(make-partition-image): Add support for unformatted partition.
* gnu/system/image.scm (system-disk-image)[partition-&gt;gpt-type]: Add
case for using unformatted partition uuid.
</span></span></td><td>Efraim Flashner</td></tr>