aboutsummaryrefslogtreecommitdiff
#                                               -*- Autoconf -*-
# Process this file with autoconf to produce a configure script.

AC_PREREQ([2.69])
AC_INIT([GNU Guix],
  [m4_esyscmd([build-aux/git-version-gen .tarball-version])],
  [bug-guix@gnu.org], [guix],
  [https://www.gnu.org/software/guix/])
AC_CONFIG_AUX_DIR([build-aux])

AM_INIT_AUTOMAKE([1.14 gnu tar-ustar silent-rules subdir-objects \
 color-tests parallel-tests -Woverride -Wno-portability])

# Enable silent rules by default.
AM_SILENT_RULES([yes])

AC_CONFIG_SRCDIR([guix.scm])
AC_CONFIG_MACRO_DIR([m4])

dnl For the C++ code.  This must be used early.
AC_USE_SYSTEM_EXTENSIONS

AM_GNU_GETTEXT([external])
AM_GNU_GETTEXT_VERSION([0.19.1])

GUIX_SYSTEM_TYPE
GUIX_ASSERT_SUPPORTED_SYSTEM
GUIX_CHANNEL_METADATA

AM_CONDITIONAL([CROSS_COMPILING], [test "x$cross_compiling" = "xyes"])

AC_ARG_WITH(store-dir,
  AS_HELP_STRING([--with-store-dir=PATH],
    [file name of the store (defaults to /gnu/store)]),
  [storedir="$withval"],
  [storedir="/gnu/store"])
AC_SUBST(storedir)

AC_ARG_WITH([bash-completion-dir],
  AS_HELP_STRING([--with-bash-completion-dir=DIR],
    [name of the Bash completion directory]),
  [bashcompletiondir="$withval"],
  [bashcompletiondir='${sysconfdir}/bash_completion.d'])
AC_SUBST([bashcompletiondir])

AC_ARG_WITH([zsh-completion-dir],
  AS_HELP_STRING([--with-zsh-completion-dir=DIR],
    [name of the Zsh completion directory]),
  [zshcompletiondir="$withval"],
  [zshcompletiondir='${datadir}/zsh/site-functions'])
AC_SUBST([zshcompletiondir])

AC_ARG_WITH([fish-completion-dir],
  AS_HELP_STRING([--with-fish-completion-dir=DIR],
    [name of the Fish completion directory]),
  [fishcompletiondir="$withval"],
  [fishcompletiondir='${datadir}/fish/vendor_completions.d'])
AC_SUBST([fishcompletiondir])

AC_ARG_WITH([selinux-policy-dir],
  AS_HELP_STRING([--with-selinux-policy-dir=DIR],
    [name of the SELinux policy directory]),
  [selinux_policydir="$withval"],
  [selinux_policydir='${datadir}/selinux/'])
AC_SUBST([selinux_policydir])

dnl Better be verbose.
AC_MSG_CHECKING([for the store directory])
AC_MSG_RESULT([$storedir])

AC_ARG_ENABLE([daemon],
  [AS_HELP_STRING([--disable-daemon], [do not build the Nix daemon (C++)])],
  [guix_build_daemon="$enableval"],
  [guix_build_daemon="yes"])

dnl Prepare a version of $localstatedir & co. that does not contain references
dnl to shell variables.  Also set some sane default directory variables for
dnl use with the Guix.  This also causes localstatedir to be /var and
dnl sysconfdir to be /etc.
test "$prefix" = NONE && prefix=
guix_localstatedir="`eval echo $localstatedir | sed -e "s|NONE|$guix_prefix|g"`"
guix_sysconfdir="`eval echo $sysconfdir | sed -e "s|NONE|$guix_prefix|g"`"
guix_sbindir="`eval echo $sbindir | sed -e "s|NONE|$guix_prefix|g"`"
AC_SUBST([guix_localstatedir])
AC_SUBST([guix_sysconfdir])
AC_SUBST([guix_sbindir])

GUIX_CHECK_FILE_NAME_LIMITS([can_run_tests])
AM_CONDITIONAL([CAN_RUN_TESTS], [test "x$can_run_tests" = "xyes"])

dnl We require pkg.m4 (from pkg-config) and guile.m4 (from Guile.)
dnl Make sure they are available.
m4_pattern_forbid([PKG_CHECK_MODULES])
m4_pattern_forbid([GUILE_MODULE_AVAILABLE])
m4_pattern_forbid([^GUILE_P])
m4_pattern_allow([^GUILE_PKG_ERRORS])
m4_pattern_forbid([^GUIX_])

dnl Search for 'guile' and 'guild'.  This macro defines
dnl 'GUILE_EFFECTIVE_VERSION'.
GUILE_PKG([3.0])
GUILE_PROGS
if test "x$GUILD" = "x"; then
   AC_MSG_ERROR(['guild' binary not found; please check your Guile installation.])
fi

dnl (guix ui), notably, requires 'default-optimization-level' added in 3.0.3.
PKG_CHECK_MODULES([GUILE], [guile-3.0 >= 3.0.3])

dnl Get CFLAGS and LDFLAGS for libguile.
GUILE_FLAGS

dnl Installation directories for .scm and .go files.
guilemoduledir="${datarootdir}/guile/site/$GUILE_EFFECTIVE_VERSION"
guileobjectdir="${libdir}/guile/$GUILE_EFFECTIVE_VERSION/site-ccache"
AC_SUBST([guilemoduledir])
AC_SUBST([guileobjectdir])

dnl The GnuTLS bindings are necessary for substitutes over HTTPS and for 'guix
dnl pull', among other things.
GUILE_MODULE_AVAILABLE([have_gnutls], [(gnutls)])
if test "x$have_gnutls" != "xyes"; then
  AC_MSG_ERROR([The Guile bindings of GnuTLS are missing; please install them.])
fi

dnl Check for Guile-Git.
GUILE_MODULE_AVAILABLE([have_guile_git], [(git)])
if test "x$have_guile_git" != "xyes"; then
  AC_MSG_ERROR([Guile-Git is missing; please install it.])
fi

dnl Check for Guile-JSON.
GUIX_CHECK_GUILE_JSON
if test "x$guix_cv_have_recent_guile_json" != "xyes"; then
  AC_MSG_ERROR([Guile-JSON is missing; please install it.])
fi

dnl Guile-Sqlite3 is used by the (guix store ...) modules.
GUIX_CHECK_GUILE_SQLITE3
if test "x$guix_cv_have_recent_guile_sqlite3" != "xyes"; then
  AC_MSG_ERROR([A recent Guile-SQLite3 could not be found; please install it.])
fi

GUIX_CHECK_GUILE_GCRYPT
if test "x$guix_cv_have_recent_guile_gcrypt" != "xyes"; then
  AC_MSG_ERROR([A recent Guile-Gcrypt could not be found; please install it.])
fi

GUIX_CHECK_GUILE_GIT
if test "x$guix_cv_have_recent_guile_git" != "xyes"; then
  AC_MSG_ERROR([A recent Guile-Git could not be found; please install it.])
fi

dnl Check for the optional Guile-Lib.
GUILE_MODULE_EXPORTS([have_guile_lib], [(htmlprag)], [%strict-tokenizer?])
AM_CONDITIONAL([HAVE_GUILE_LIB], [test "x$have_guile_lib" = "xyes"])
AM_COND_IF(HAVE_GUILE_LIB,,
  [AC_MSG_WARN([The Guile-Lib requirement was not satisfied (>= 0.2.7);
Some features such as the Go importer will not be usable.])])

dnl Check for Guile-zlib.
GUIX_CHECK_GUILE_ZLIB
if test "x$guix_cv_have_recent_guile_zlib" != "xyes"; then
  AC_MSG_ERROR([A recent Guile-zlib could not be found; please install it.])
fi

dnl Check for Guile-lzlib.
GUILE_MODULE_AVAILABLE([have_guile_lzlib], [(lzlib)])
if test "x$have_guile_lzlib" != "xyes"; then
  AC_MSG_ERROR([Guile-lzlib is missing; please install it.])
fi

dnl Check for Guile-Avahi.
GUILE_MODULE_AVAILABLE([have_guile_avahi], [(avahi)])
AM_CONDITIONAL([HAVE_GUILE_AVAHI],
  [test "x$have_guile_avahi" = "xyes"])

dnl Guile-newt is used by the graphical installer.
GUILE_MODULE_AVAILABLE([have_guile_newt], [(newt)])

AC_ARG_ENABLE([installer],
    AS_HELP_STRING([--enable-installer], [Build the graphical installer sources.]))

AS_IF([test "x$enable_installer" = "xyes"], [
if test "x$have_guile_newt" != "xyes"; then
  AC_MSG_ERROR([Guile-newt could not be found; please install it.])
fi
])

AM_CONDITIONAL([ENABLE_INSTALLER],
  [test "x$enable_installer" = "xyes"])

dnl Make sure we have a full-fledged Guile.
GUIX_ASSERT_GUILE_FEATURES([regex posix socket net-db threads])

AC_PROG_SED

dnl Decompressors, for use by the substituter and other modules.
AC_PATH_PROG([GZIP], [gzip])
AC_PATH_PROG([BZIP2], [bzip2])
AC_PATH_PROG([XZ], [xz])
AC_SUBST([GZIP])
AC_SUBST([BZIP2])
AC_SUBST([XZ])

dnl Git is now required for the "builtin:git-download" derivation builder.
AC_PATH_PROG([GIT], [git])
if test "x$GIT" = "x"; then
  AC_MSG_ERROR([Git is missing; please install it.])
fi
AC_SUBST([GIT])

LIBGCRYPT_LIBDIR="no"
LIBGCRYPT_PREFIX="no"

AC_ARG_WITH([libgcrypt-prefix],
  [AS_HELP_STRING([--with-libgcrypt-prefix=DIR], [search for GNU libgcrypt in DIR])],
  [case "$withval" in
    yes|no)
      ;;
    *)
      LIBGCRYPT_PREFIX="$withval"
      LIBGCRYPT_LIBDIR="$withval/lib"
      ;;
   esac])

AC_ARG_WITH([libgcrypt-libdir],
  [AS_HELP_STRING([--with-libgcrypt-libdir=DIR],
     [search for GNU libgcrypt's shared library in DIR])],
  [case "$withval" in
    yes|no)
      LIBGCRYPT_LIBDIR="no"
      ;;
    *)
      LIBGCRYPT_LIBDIR="$withval"
      ;;
   esac])

dnl If none of the --with-libgcrypt-* options was used, try to determine the
dnl the library directory.
case "x$LIBGCRYPT_PREFIX$LIBGCRYPT_LIBDIR" in
  xnono)
    GUIX_LIBGCRYPT_LIBDIR([LIBGCRYPT_LIBDIR])
    ;;
esac

AC_SUBST([LIBGCRYPT_PREFIX])
AC_SUBST([LIBGCRYPT_LIBDIR])

dnl Check for Guile-SSH, for the (guix ssh) module.
GUIX_CHECK_GUILE_SSH
AM_CONDITIONAL([HAVE_GUILE_SSH],
  [test "x$guix_cv_have_recent_guile_ssh" = "xyes"])

AC_CACHE_SAVE

m4_include([config-daemon.ac])

dnl `dot' (from the Graphviz package) is only needed for maintainers.
dnl See `Building from Git' in the manual for more info.
AM_MISSING_PROG([DOT], [dot])

dnl Manual pages.
AM_MISSING_PROG([HELP2MAN], [help2man])

dnl Documentation translation.
AM_MISSING_PROG([PO4A], [po4a])

AC_MSG_CHECKING([if building from git])
if test -e .git; then
   in_git_p=yes
else
   in_git_p=no
fi
AC_MSG_RESULT([$in_git_p])
AM_CONDITIONAL([in_git_p],
  [test "x$in_git_p" = "xyes"])

case "$storedir" in
  /gnu/store)
    ;;
  *)
    AC_MSG_WARN([Using a store directory other than '/gnu/store' will prevent you])
    AC_MSG_WARN([from downloading substitutes from gnu.org.])
    ;;
esac

AC_CONFIG_FILES([Makefile
                 po/guix/Makefile.in
                 po/packages/Makefile.in
                 etc/guix-daemon.cil
                 guix/config.scm])

AC_CONFIG_FILES([etc/committer.scm], [chmod +x etc/committer.scm])
AC_CONFIG_FILES([test-env:build-aux/test-env.in], [chmod +x test-env])
AC_CONFIG_FILES([pre-inst-env:build-aux/pre-inst-env.in],
  [chmod +x pre-inst-env])

AC_OUTPUT
dex" msgstr "개념 색인" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:93 msgid "Concepts." msgstr "개념." #. type: menuentry #: guix-git/doc/guix-cookbook.texi:96 msgid "--- The Detailed Node Listing ---" msgstr "--- 상세한 노드 목록 ---" #. type: section #: guix-git/doc/guix-cookbook.texi:100 guix-git/doc/guix-cookbook.texi:222 #: guix-git/doc/guix-cookbook.texi:224 guix-git/doc/guix-cookbook.texi:225 #, no-wrap msgid "A Scheme Crash Course" msgstr "계획 단기 집중 과정" #. type: section #: guix-git/doc/guix-cookbook.texi:104 guix-git/doc/guix-cookbook.texi:106 #: guix-git/doc/guix-cookbook.texi:511 guix-git/doc/guix-cookbook.texi:513 #: guix-git/doc/guix-cookbook.texi:514 #, no-wrap msgid "Packaging Tutorial" msgstr "꾸러미 지도" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:104 guix-git/doc/guix-cookbook.texi:511 msgid "A tutorial on how to add packages to Guix." msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:115 guix-git/doc/guix-cookbook.texi:561 #: guix-git/doc/guix-cookbook.texi:563 guix-git/doc/guix-cookbook.texi:564 #, no-wrap msgid "A ``Hello World'' package" msgstr "``Hello World'' 꾸러미" #. type: subsection #: guix-git/doc/guix-cookbook.texi:115 guix-git/doc/guix-cookbook.texi:117 #: guix-git/doc/guix-cookbook.texi:561 guix-git/doc/guix-cookbook.texi:754 #: guix-git/doc/guix-cookbook.texi:755 #, no-wrap msgid "Setup" msgstr "설정" #. type: subsection #: guix-git/doc/guix-cookbook.texi:115 guix-git/doc/guix-cookbook.texi:561 #: guix-git/doc/guix-cookbook.texi:994 guix-git/doc/guix-cookbook.texi:995 #, no-wrap msgid "Extended example" msgstr "확장된 예제" #. type: subsection #: guix-git/doc/guix-cookbook.texi:115 guix-git/doc/guix-cookbook.texi:561 #: guix-git/doc/guix-cookbook.texi:1398 guix-git/doc/guix-cookbook.texi:1399 #, no-wrap msgid "Other build systems" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:115 guix-git/doc/guix-cookbook.texi:123 #: guix-git/doc/guix-cookbook.texi:561 guix-git/doc/guix-cookbook.texi:1416 #: guix-git/doc/guix-cookbook.texi:1417 #, no-wrap msgid "Programmable and automated package definition" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:115 guix-git/doc/guix-cookbook.texi:561 #: guix-git/doc/guix-cookbook.texi:1533 guix-git/doc/guix-cookbook.texi:1534 #, no-wrap msgid "Getting help" msgstr "도움 받기" #. type: subsection #: guix-git/doc/guix-cookbook.texi:115 guix-git/doc/guix-cookbook.texi:561 #: guix-git/doc/guix-cookbook.texi:1546 guix-git/doc/guix-cookbook.texi:1547 #, no-wrap msgid "Conclusion" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:115 guix-git/doc/guix-cookbook.texi:561 #: guix-git/doc/guix-cookbook.texi:1567 guix-git/doc/guix-cookbook.texi:1568 #, no-wrap msgid "References" msgstr "참조" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:121 guix-git/doc/guix-cookbook.texi:772 #: guix-git/doc/guix-cookbook.texi:774 guix-git/doc/guix-cookbook.texi:775 #, no-wrap msgid "Local file" msgstr "로컬 파일" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:121 guix-git/doc/guix-cookbook.texi:772 #: guix-git/doc/guix-cookbook.texi:794 guix-git/doc/guix-cookbook.texi:795 #, no-wrap msgid "Channels" msgstr "채널" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:121 guix-git/doc/guix-cookbook.texi:772 #: guix-git/doc/guix-cookbook.texi:908 guix-git/doc/guix-cookbook.texi:909 #, no-wrap msgid "Direct checkout hacking" msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:127 guix-git/doc/guix-cookbook.texi:1428 #: guix-git/doc/guix-cookbook.texi:1430 guix-git/doc/guix-cookbook.texi:1431 #, no-wrap msgid "Recursive importers" msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:127 guix-git/doc/guix-cookbook.texi:1428 #: guix-git/doc/guix-cookbook.texi:1489 guix-git/doc/guix-cookbook.texi:1490 #, no-wrap msgid "Automatic update" msgstr "자동으로 최신화" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:127 guix-git/doc/guix-cookbook.texi:1428 #: guix-git/doc/guix-cookbook.texi:1507 guix-git/doc/guix-cookbook.texi:1508 #, no-wrap msgid "Inheritance" msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:1608 guix-git/doc/guix-cookbook.texi:1609 #, no-wrap msgid "Auto-Login to a Specific TTY" msgstr "특정한 TTY로 자동-로그인" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Automatically Login a User to a Specific TTY" msgstr "사용자를 특정한 TTY로 자동으로 로그인" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:1653 guix-git/doc/guix-cookbook.texi:1654 #, no-wrap msgid "Customizing the Kernel" msgstr "커널을 최적화하기" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Creating and using a custom Linux kernel on Guix System." msgstr "Guix 시스템에서 사용자 정의 리눅스 커널을 생성하고 사용하기." #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:1893 guix-git/doc/guix-cookbook.texi:1894 #, no-wrap msgid "Guix System Image API" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Customizing images to target specific platforms." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:2110 guix-git/doc/guix-cookbook.texi:2111 #, no-wrap msgid "Using security keys" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "How to use security keys with Guix System." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:2232 guix-git/doc/guix-cookbook.texi:2233 #, no-wrap msgid "Dynamic DNS mcron job" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Job to update the IP address behind a DuckDNS host name." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:2285 guix-git/doc/guix-cookbook.texi:2286 #, no-wrap msgid "Connecting to Wireguard VPN" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Connecting to a Wireguard VPN." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:145 #: guix-git/doc/guix-cookbook.texi:1606 guix-git/doc/guix-cookbook.texi:2362 #: guix-git/doc/guix-cookbook.texi:2363 #, no-wrap msgid "Customizing a Window Manager" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Handle customization of a Window manager on Guix System." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:2467 guix-git/doc/guix-cookbook.texi:2468 #, no-wrap msgid "Running Guix on a Linode Server" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Running Guix on a Linode Server." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:2708 guix-git/doc/guix-cookbook.texi:2709 #, no-wrap msgid "Running Guix on a Kimsufi Server" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Running Guix on a Kimsufi Server." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:2955 guix-git/doc/guix-cookbook.texi:2956 #, no-wrap msgid "Setting up a bind mount" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Setting up a bind mount in the file-systems definition." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:3009 guix-git/doc/guix-cookbook.texi:3010 #, no-wrap msgid "Getting substitutes from Tor" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Configuring Guix daemon to get substitutes through Tor." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:3073 guix-git/doc/guix-cookbook.texi:3074 #, no-wrap msgid "Setting up NGINX with Lua" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Configuring NGINX web-server to load Lua modules." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 #: guix-git/doc/guix-cookbook.texi:3130 guix-git/doc/guix-cookbook.texi:3131 #, no-wrap msgid "Music Server with Bluetooth Audio" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:143 guix-git/doc/guix-cookbook.texi:1606 msgid "Headless music player with Bluetooth output." msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:148 guix-git/doc/guix-cookbook.texi:2369 #: guix-git/doc/guix-cookbook.texi:2371 guix-git/doc/guix-cookbook.texi:2372 #, no-wrap msgid "StumpWM" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:148 guix-git/doc/guix-cookbook.texi:150 #: guix-git/doc/guix-cookbook.texi:2369 guix-git/doc/guix-cookbook.texi:2419 #: guix-git/doc/guix-cookbook.texi:2420 #, no-wrap msgid "Session lock" msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:152 guix-git/doc/guix-cookbook.texi:2430 #: guix-git/doc/guix-cookbook.texi:2432 guix-git/doc/guix-cookbook.texi:2433 #, no-wrap msgid "Xorg" msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:157 guix-git/doc/guix-cookbook.texi:3349 #: guix-git/doc/guix-cookbook.texi:3351 guix-git/doc/guix-cookbook.texi:3352 #, no-wrap msgid "Guix Containers" msgstr "Guix 컨테이너" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:157 guix-git/doc/guix-cookbook.texi:3349 msgid "Perfectly isolated environments" msgstr "완벽하게 격리된 환경" #. type: section #: guix-git/doc/guix-cookbook.texi:157 guix-git/doc/guix-cookbook.texi:159 #: guix-git/doc/guix-cookbook.texi:3349 guix-git/doc/guix-cookbook.texi:3500 #: guix-git/doc/guix-cookbook.texi:3501 #, no-wrap msgid "Guix System Containers" msgstr "Guix 시스템 컨테이너" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:157 guix-git/doc/guix-cookbook.texi:3349 msgid "A system inside your system" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:162 guix-git/doc/guix-cookbook.texi:3535 #: guix-git/doc/guix-cookbook.texi:3537 guix-git/doc/guix-cookbook.texi:3538 #, no-wrap msgid "A Database Container" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:162 guix-git/doc/guix-cookbook.texi:3535 #: guix-git/doc/guix-cookbook.texi:3649 guix-git/doc/guix-cookbook.texi:3650 #, no-wrap msgid "Container Networking" msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:167 guix-git/doc/guix-cookbook.texi:3738 #: guix-git/doc/guix-cookbook.texi:3740 guix-git/doc/guix-cookbook.texi:3741 #, no-wrap msgid "Network bridge for QEMU" msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:167 guix-git/doc/guix-cookbook.texi:3738 #: guix-git/doc/guix-cookbook.texi:3863 guix-git/doc/guix-cookbook.texi:3864 #, no-wrap msgid "Routed network for libvirt" msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:171 guix-git/doc/guix-cookbook.texi:173 #: guix-git/doc/guix-cookbook.texi:3972 guix-git/doc/guix-cookbook.texi:3974 #: guix-git/doc/guix-cookbook.texi:3975 #, no-wrap msgid "Guix Profiles in Practice" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:171 guix-git/doc/guix-cookbook.texi:3972 msgid "Strategies for multiple profiles and manifests." msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:179 guix-git/doc/guix-cookbook.texi:4066 #: guix-git/doc/guix-cookbook.texi:4068 guix-git/doc/guix-cookbook.texi:4069 #, no-wrap msgid "Basic setup with manifests" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:179 guix-git/doc/guix-cookbook.texi:4066 #: guix-git/doc/guix-cookbook.texi:4204 guix-git/doc/guix-cookbook.texi:4205 #, no-wrap msgid "Required packages" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:179 guix-git/doc/guix-cookbook.texi:4066 #: guix-git/doc/guix-cookbook.texi:4232 guix-git/doc/guix-cookbook.texi:4233 #, no-wrap msgid "Default profile" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:179 guix-git/doc/guix-cookbook.texi:4066 #: guix-git/doc/guix-cookbook.texi:4251 guix-git/doc/guix-cookbook.texi:4252 #, no-wrap msgid "The benefits of manifests" msgstr "" #. type: subsection #: guix-git/doc/guix-cookbook.texi:179 guix-git/doc/guix-cookbook.texi:4066 #: guix-git/doc/guix-cookbook.texi:4326 guix-git/doc/guix-cookbook.texi:4327 #, no-wrap msgid "Reproducible profiles" msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 #: guix-git/doc/guix-cookbook.texi:4401 guix-git/doc/guix-cookbook.texi:4402 #, no-wrap msgid "Getting Started" msgstr "시작하기" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 msgid "Step 0: using `guix shell'." msgstr "" #. type: node #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 #: guix-git/doc/guix-cookbook.texi:4521 #, no-wrap msgid "Building with Guix" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 msgid "Step 1: building your code." msgstr "" #. type: node #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 #: guix-git/doc/guix-cookbook.texi:4611 #, no-wrap msgid "The Repository as a Channel" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 msgid "Step 2: turning the repo in a channel." msgstr "" #. type: node #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 #: guix-git/doc/guix-cookbook.texi:4747 #, fuzzy, no-wrap #| msgid "Packaging" msgid "Package Variants" msgstr "포장" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 msgid "Bonus: Defining variants." msgstr "" #. type: node #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 #: guix-git/doc/guix-cookbook.texi:4799 #, no-wrap msgid "Setting Up Continuous Integration" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 msgid "Step 3: continuous integration." msgstr "" #. type: node #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 #: guix-git/doc/guix-cookbook.texi:4874 #, no-wrap msgid "Build Manifest" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 msgid "Bonus: Manifest." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 #: guix-git/doc/guix-cookbook.texi:4967 guix-git/doc/guix-cookbook.texi:4968 #, no-wrap msgid "Wrapping Up" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:189 guix-git/doc/guix-cookbook.texi:4399 msgid "Recap." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:193 guix-git/doc/guix-cookbook.texi:5023 #: guix-git/doc/guix-cookbook.texi:5025 guix-git/doc/guix-cookbook.texi:5026 #, no-wrap msgid "Guix environment via direnv" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:193 guix-git/doc/guix-cookbook.texi:5023 msgid "Setup Guix environment with direnv" msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 #: guix-git/doc/guix-cookbook.texi:5172 guix-git/doc/guix-cookbook.texi:5173 #, no-wrap msgid "Setting Up a Head Node" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 msgid "The node that runs the daemon." msgstr "" #. type: section #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 #: guix-git/doc/guix-cookbook.texi:5280 guix-git/doc/guix-cookbook.texi:5281 #, no-wrap msgid "Setting Up Compute Nodes" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 msgid "Client nodes." msgstr "" #. type: node #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 #: guix-git/doc/guix-cookbook.texi:5369 #, no-wrap msgid "Cluster Network Access" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 msgid "Dealing with network access restrictions." msgstr "" #. type: node #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 #: guix-git/doc/guix-cookbook.texi:5455 #, no-wrap msgid "Cluster Disk Usage" msgstr "" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 msgid "Disk usage considerations." msgstr "" #. type: node #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 #: guix-git/doc/guix-cookbook.texi:5500 #, fuzzy, no-wrap #| msgid "security key, configuration" msgid "Cluster Security Considerations" msgstr "보안 키, 구성" #. type: menuentry #: guix-git/doc/guix-cookbook.texi:201 guix-git/doc/guix-cookbook.texi:5170 msgid "Keeping the cluster secure." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:213 msgid "GNU@tie{}Guix is written in the general purpose programming language Scheme, and many of its features can be accessed and manipulated programmatically. You can use Scheme to generate package definitions, to modify them, to build them, to deploy whole operating systems, etc." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:217 msgid "Knowing the basics of how to program in Scheme will unlock many of the advanced features Guix provides --- and you don't even need to be an experienced programmer to use them!" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:219 msgid "Let's get started!" msgstr "시작합니다!" #. type: cindex #: guix-git/doc/guix-cookbook.texi:227 #, no-wrap msgid "Scheme, crash course" msgstr "계획, 단기 집중 과정" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:233 msgid "Guix uses the Guile implementation of Scheme. To start playing with the language, install it with @code{guix install guile} and start a @dfn{REPL}---short for @uref{https://en.wikipedia.org/wiki/Read%E2%80%93eval%E2%80%93print_loop, @dfn{read-eval-print loop}}---by running @code{guile} from the command line." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:236 msgid "Alternatively you can also run @code{guix shell guile -- guile} if you'd rather not have Guile installed in your user profile." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:242 msgid "In the following examples, lines show what you would type at the REPL; lines starting with ``@result{}'' show evaluation results, while lines starting with ``@print{}'' show things that get printed. @xref{Using Guile Interactively,,, guile, GNU Guile Reference Manual}, for more details on the REPL." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:250 msgid "Scheme syntax boils down to a tree of expressions (or @emph{s-expression} in Lisp lingo). An expression can be a literal such as numbers and strings, or a compound which is a parenthesized list of compounds and literals. @code{#true} and @code{#false} (abbreviated @code{#t} and @code{#f}) stand for the Booleans ``true'' and ``false'', respectively." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:252 msgid "Examples of valid expressions:" msgstr "유효한 식의 예제:" #. type: lisp #: guix-git/doc/guix-cookbook.texi:256 #, no-wrap msgid "" "\"Hello World!\"\n" "@result{} \"Hello World!\"\n" "\n" msgstr "" "\"안녕 세상아!\"\n" "@result{} \"안녕 세상아!\"\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:259 #, no-wrap msgid "" "17\n" "@result{} 17\n" "\n" msgstr "" "17\n" "@result{} 17\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:263 #, no-wrap msgid "" "(display (string-append \"Hello \" \"Guix\" \"\\n\"))\n" "@print{} Hello Guix!\n" "@result{} #<unspecified>\n" msgstr "" "(display (string-append \"안녕 \" \"Guix\" \"\\n\"))\n" "@print{} 안녕 Guix!\n" "@result{} #<unspecified>\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:270 msgid "This last example is a function call nested in another function call. When a parenthesized expression is evaluated, the first term is the function and the rest are the arguments passed to the function. Every function returns the last evaluated expression as its return value." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:274 msgid "Anonymous functions---@dfn{procedures} in Scheme parlance---are declared with the @code{lambda} term:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:278 #, no-wrap msgid "" "(lambda (x) (* x x))\n" "@result{} #<procedure 120e348 at <unknown port>:24:0 (x)>\n" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:283 msgid "The above procedure returns the square of its argument. Since everything is an expression, the @code{lambda} expression returns an anonymous procedure, which can in turn be applied to an argument:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:287 #, no-wrap msgid "" "((lambda (x) (* x x)) 3)\n" "@result{} 9\n" msgstr "" "((lambda (x) (* x x)) 3)\n" "@result{} 9\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:291 msgid "Procedures are regular values just like numbers, strings, Booleans, and so on." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:294 msgid "Anything can be assigned a global name with @code{define}:" msgstr "무엇이든 @code{define}와 함께 전역 이름을 할당 할 수 있습니다:" #. type: lisp #: guix-git/doc/guix-cookbook.texi:300 #, no-wrap msgid "" "(define a 3)\n" "(define square (lambda (x) (* x x)))\n" "(square a)\n" "@result{} 9\n" msgstr "" "(define a 3)\n" "(define square (lambda (x) (* x x)))\n" "(square a)\n" "@result{} 9\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:304 msgid "Procedures can be defined more concisely with the following syntax:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:307 #, no-wrap msgid "(define (square x) (* x x))\n" msgstr "(define (square x) (* x x))\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:311 msgid "A list structure can be created with the @code{list} procedure:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:315 #, no-wrap msgid "" "(list 2 a 5 7)\n" "@result{} (2 3 5 7)\n" msgstr "" "(list 2 a 5 7)\n" "@result{} (2 3 5 7)\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:322 msgid "Standard procedures are provided by the @code{(srfi srfi-1)} module to create and process lists (@pxref{SRFI-1, list processing,, guile, GNU Guile Reference Manual}). Here are some of the most useful ones in action:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:325 #, no-wrap msgid "" "(use-modules (srfi srfi-1)) ;import list processing procedures\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:328 #, no-wrap msgid "" "(append (list 1 2) (list 3 4))\n" "@result{} (1 2 3 4)\n" "\n" msgstr "" "(append (list 1 2) (list 3 4))\n" "@result{} (1 2 3 4)\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:331 #, no-wrap msgid "" "(map (lambda (x) (* x x)) (list 1 2 3 4))\n" "@result{} (1 4 9 16)\n" "\n" msgstr "" "(map (lambda (x) (* x x)) (list 1 2 3 4))\n" "@result{} (1 4 9 16)\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:336 #, no-wrap msgid "" "(delete 3 (list 1 2 3 4)) @result{} (1 2 4)\n" "(filter odd? (list 1 2 3 4)) @result{} (1 3)\n" "(remove even? (list 1 2 3 4)) @result{} (1 3)\n" "(find number? (list \"a\" 42 \"b\")) @result{} 42\n" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:340 msgid "Notice how the first argument to @code{map}, @code{filter}, @code{remove}, and @code{find} is a procedure!" msgstr "" #. type: cindex #: guix-git/doc/guix-cookbook.texi:342 #, no-wrap msgid "S-expression" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:347 msgid "The @dfn{quote} disables evaluation of a parenthesized expression, also called an S-expression or ``s-exp'': the first term is not called over the other terms (@pxref{Expression Syntax, quote,, guile, GNU Guile Reference Manual}). Thus it effectively returns a list of terms." msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:351 #, no-wrap msgid "" "'(display (string-append \"Hello \" \"Guix\" \"\\n\"))\n" "@result{} (display (string-append \"Hello \" \"Guix\" \"\\n\"))\n" "\n" msgstr "" "'(display (string-append \"안녕 \" \"Guix\" \"\\n\"))\n" "@result{} (display (string-append \"안녕 \" \"Guix\" \"\\n\"))\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:354 #, no-wrap msgid "" "'(2 a 5 7)\n" "@result{} (2 a 5 7)\n" msgstr "" "'(2 a 5 7)\n" "@result{} (2 a 5 7)\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:361 msgid "The @code{quasiquote} (@code{`}, a backquote) disables evaluation of a parenthesized expression until @code{unquote} (@code{,}, a comma) re-enables it. Thus it provides us with fine-grained control over what is evaluated and what is not." msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:365 #, no-wrap msgid "" "`(2 a 5 7 (2 ,a 5 ,(+ a 4)))\n" "@result{} (2 a 5 7 (2 3 5 7))\n" msgstr "" "`(2 a 5 7 (2 ,a 5 ,(+ a 4)))\n" "@result{} (2 a 5 7 (2 3 5 7))\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:369 msgid "Note that the above result is a list of mixed elements: numbers, symbols (here @code{a}) and the last element is a list itself." msgstr "" #. type: cindex #: guix-git/doc/guix-cookbook.texi:371 #, no-wrap msgid "G-expressions, syntax" msgstr "" #. type: cindex #: guix-git/doc/guix-cookbook.texi:372 #, no-wrap msgid "gexps, syntax" msgstr "" #. type: findex #: guix-git/doc/guix-cookbook.texi:373 #, no-wrap msgid "#~" msgstr "" #. type: findex #: guix-git/doc/guix-cookbook.texi:374 #, no-wrap msgid "#$" msgstr "" #. type: findex #: guix-git/doc/guix-cookbook.texi:375 #, no-wrap msgid "gexp" msgstr "" #. type: findex #: guix-git/doc/guix-cookbook.texi:376 #, no-wrap msgid "ungexp" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:382 msgid "Guix defines a variant of S-expressions on steroids called @dfn{G-expressions} or ``gexps'', which come with a variant of @code{quasiquote} and @code{unquote}: @code{#~} (or @code{gexp}) and @code{#$} (or @code{ungexp}). They let you @emph{stage code for later execution}." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:386 msgid "For example, you'll encounter gexps in some package definitions where they provide code to be executed during the package build process. They look like this:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:390 #, no-wrap msgid "" "(use-modules (guix gexp) ;so we can write gexps\n" " (gnu packages base)) ;for 'coreutils'\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:396 #, no-wrap msgid "" ";; Below is a G-expression representing staged code.\n" "#~(begin\n" " ;; Invoke 'ls' from the package defined by the 'coreutils'\n" " ;; variable.\n" " (system* #$(file-append coreutils \"/bin/ls\") \"-l\")\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:399 #, no-wrap msgid "" " ;; Create this package's output directory.\n" " (mkdir #$output))\n" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:403 msgid "@xref{G-Expressions,,, guix, GNU Guix Reference Manual}, for more on gexps." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:407 msgid "Multiple variables can be named locally with @code{let} (@pxref{Local Bindings,,, guile, GNU Guile Reference Manual}):" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:414 #, no-wrap msgid "" "(define x 10)\n" "(let ((x 2)\n" " (y 3))\n" " (list x y))\n" "@result{} (2 3)\n" "\n" msgstr "" "(define x 10)\n" "(let ((x 2)\n" " (y 3))\n" " (list x y))\n" "@result{} (2 3)\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:417 #, no-wrap msgid "" "x\n" "@result{} 10\n" "\n" msgstr "" "x\n" "@result{} 10\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:420 #, no-wrap msgid "" "y\n" "@error{} In procedure module-lookup: Unbound variable: y\n" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:424 msgid "Use @code{let*} to allow later variable declarations to refer to earlier definitions." msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:430 #, no-wrap msgid "" "(let* ((x 2)\n" " (y (* x 3)))\n" " (list x y))\n" "@result{} (2 6)\n" msgstr "" "(let* ((x 2)\n" " (y (* x 3)))\n" " (list x y))\n" "@result{} (2 6)\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:437 msgid "@dfn{Keywords} are typically used to identify the named parameters of a procedure. They are prefixed by @code{#:} (hash, colon) followed by alphanumeric characters: @code{#:like-this}. @xref{Keywords,,, guile, GNU Guile Reference Manual}." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:442 msgid "The percentage @code{%} is typically used for read-only global variables in the build stage. Note that it is merely a convention, like @code{_} in C. Scheme treats @code{%} exactly the same as any other letter." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:446 msgid "Modules are created with @code{define-module} (@pxref{Creating Guile Modules,,, guile, GNU Guile Reference Manual}). For instance" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:452 #, no-wrap msgid "" "(define-module (guix build-system ruby)\n" " #:use-module (guix store)\n" " #:export (ruby-build\n" " ruby-build-system))\n" msgstr "" "(define-module (guix build-system ruby)\n" " #:use-module (guix store)\n" " #:export (ruby-build\n" " ruby-build-system))\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:458 msgid "defines the module @code{guix build-system ruby} which must be located in @file{guix/build-system/ruby.scm} somewhere in the Guile load path. It depends on the @code{(guix store)} module and it exports two variables, @code{ruby-build} and @code{ruby-build-system}." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:461 msgid "@xref{Package Modules,,, guix, GNU Guix Reference Manual}, for info on modules that define packages." msgstr "" #. type: quotation #: guix-git/doc/guix-cookbook.texi:463 #, no-wrap msgid "Going further" msgstr "" #. type: quotation #: guix-git/doc/guix-cookbook.texi:467 msgid "Scheme is a language that has been widely used to teach programming and you'll find plenty of material using it as a vehicle. Here's a selection of documents to learn more about Scheme:" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:472 msgid "@uref{https://spritely.institute/static/papers/scheme-primer.html, @i{A Scheme Primer}}, by Christine Lemmer-Webber and the Spritely Institute." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:476 msgid "@uref{http://www.troubleshooters.com/codecorn/scheme_guile/hello.htm, @i{Scheme at a Glance}}, by Steve Litt." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:483 msgid "@uref{https://sarabander.github.io/sicp/, @i{Structure and Interpretation of Computer Programs}}, by Harold Abelson and Gerald Jay Sussman, with Julie Sussman. Colloquially known as ``SICP'', this book is a reference." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:485 msgid "You can also install it and read it from your computer:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:489 #, no-wrap msgid "" "guix install sicp info-reader\n" "info sicp\n" msgstr "" #. type: quotation #: guix-git/doc/guix-cookbook.texi:495 msgid "You'll find more books, tutorials and other resources at @url{https://schemers.org/}." msgstr "" #. type: cindex #: guix-git/doc/guix-cookbook.texi:502 #, no-wrap msgid "packaging" msgstr "패키징" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:508 msgid "This chapter is dedicated to teaching you how to add packages to the collection of packages that come with GNU Guix. This involves writing package definitions in Guile Scheme, organizing them in package modules, and building them." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:522 msgid "GNU Guix stands out as the @emph{hackable} package manager, mostly because it uses @uref{https://www.gnu.org/software/guile/, GNU Guile}, a powerful high-level programming language, one of the @uref{https://en.wikipedia.org/wiki/Scheme_%28programming_language%29, Scheme} dialects from the @uref{https://en.wikipedia.org/wiki/Lisp_%28programming_language%29, Lisp family}." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:526 msgid "Package definitions are also written in Scheme, which empowers Guix in some very unique ways, unlike most other package managers that use shell scripts or simple languages." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:531 msgid "Use functions, structures, macros and all of Scheme expressiveness for your package definitions." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:535 msgid "Inheritance makes it easy to customize a package by inheriting from it and modifying only what is needed." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:545 msgid "Batch processing: the whole package collection can be parsed, filtered and processed. Building a headless server with all graphical interfaces stripped out? It's possible. Want to rebuild everything from source using specific compiler optimization flags? Pass the @code{#:make-flags \"...\"} argument to the list of packages. It wouldn't be a stretch to think @uref{https://wiki.gentoo.org/wiki/USE_flag, Gentoo USE flags} here, but this goes even further: the changes don't have to be thought out beforehand by the packager, they can be @emph{programmed} by the user!" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:551 msgid "The following tutorial covers all the basics around package creation with Guix. It does not assume much knowledge of the Guix system nor of the Lisp language. The reader is only expected to be familiar with the command line and to have some basic programming knowledge." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:569 msgid "The ``Defining Packages'' section of the manual introduces the basics of Guix packaging (@pxref{Defining Packages,,, guix, GNU Guix Reference Manual}). In the following section, we will partly go over those basics again." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:575 msgid "GNU@tie{}Hello is a dummy project that serves as an idiomatic example for packaging. It uses the GNU build system (@code{./configure && make && make install}). Guix already provides a package definition which is a perfect example to start with. You can look up its declaration with @code{guix edit hello} from the command line. Let's see how it looks:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:596 #, no-wrap msgid "" "(define-public hello\n" " (package\n" " (name \"hello\")\n" " (version \"2.10\")\n" " (source (origin\n" " (method url-fetch)\n" " (uri (string-append \"mirror://gnu/hello/hello-\" version\n" " \".tar.gz\"))\n" " (sha256\n" " (base32\n" " \"0ssi1wpaf7plaswqqjwigppsg5fyh99vdlb9kzl7c9lng89ndq1i\"))))\n" " (build-system gnu-build-system)\n" " (synopsis \"Hello, GNU world: An example GNU package\")\n" " (description\n" " \"GNU Hello prints the message \\\"Hello, world!\\\" and then exits. It\n" "serves as an example of standard GNU coding practices. As such, it supports\n" "command-line arguments, multiple languages, and so on.\")\n" " (home-page \"https://www.gnu.org/software/hello/\")\n" " (license gpl3+)))\n" msgstr "" "(define-public hello\n" " (package\n" " (name \"hello\")\n" " (version \"2.10\")\n" " (source (origin\n" " (method url-fetch)\n" " (uri (string-append \"mirror://gnu/hello/hello-\" version\n" " \".tar.gz\"))\n" " (sha256\n" " (base32\n" " \"0ssi1wpaf7plaswqqjwigppsg5fyh99vdlb9kzl7c9lng89ndq1i\"))))\n" " (build-system gnu-build-system)\n" " (synopsis \"Hello, GNU world: An example GNU package\")\n" " (description\n" " \"GNU Hello prints the message \\\"Hello, world!\\\" and then exits. It\n" "serves as an example of standard GNU coding practices. As such, it supports\n" "command-line arguments, multiple languages, and so on.\")\n" " (home-page \"https://www.gnu.org/software/hello/\")\n" " (license gpl3+)))\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:600 msgid "As you can see, most of it is rather straightforward. But let's review the fields together:" msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:602 #, no-wrap msgid "name" msgstr "name" #. type: table #: guix-git/doc/guix-cookbook.texi:605 msgid "The project name. Using Scheme conventions, we prefer to keep it lower case, without underscore and using dash-separated words." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:606 #, no-wrap msgid "source" msgstr "source" #. type: table #: guix-git/doc/guix-cookbook.texi:609 msgid "This field contains a description of the source code origin. The @code{origin} record contains these fields:" msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:611 #, no-wrap msgid "The method, here @code{url-fetch} to download via HTTP/FTP, but other methods" msgstr "" #. type: enumerate #: guix-git/doc/guix-cookbook.texi:613 msgid "exist, such as @code{git-fetch} for Git repositories." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:613 #, no-wrap msgid "The URI, which is typically some @code{https://} location for @code{url-fetch}. Here" msgstr "" #. type: enumerate #: guix-git/doc/guix-cookbook.texi:616 msgid "the special `mirror://gnu` refers to a set of well known locations, all of which can be used by Guix to fetch the source, should some of them fail." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:616 #, no-wrap msgid "The @code{sha256} checksum of the requested file. This is essential to ensure" msgstr "" #. type: enumerate #: guix-git/doc/guix-cookbook.texi:619 msgid "the source is not corrupted. Note that Guix works with base32 strings, hence the call to the @code{base32} function." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:621 #, no-wrap msgid "build-system" msgstr "build-system" #. type: table #: guix-git/doc/guix-cookbook.texi:630 msgid "This is where the power of abstraction provided by the Scheme language really shines: in this case, the @code{gnu-build-system} abstracts away the famous @code{./configure && make && make install} shell invocations. Other build systems include the @code{trivial-build-system} which does not do anything and requires from the packager to program all the build steps, the @code{python-build-system}, the @code{emacs-build-system}, and many more (@pxref{Build Systems,,, guix, GNU Guix Reference Manual})." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:631 #, no-wrap msgid "synopsis" msgstr "synopsis" #. type: table #: guix-git/doc/guix-cookbook.texi:634 msgid "It should be a concise summary of what the package does. For many packages a tagline from the project's home page can be used as the synopsis." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:635 #, no-wrap msgid "description" msgstr "description" #. type: table #: guix-git/doc/guix-cookbook.texi:638 msgid "Same as for the synopsis, it's fine to re-use the project description from the homepage. Note that Guix uses Texinfo syntax." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:639 #, no-wrap msgid "home-page" msgstr "홈페이지" #. type: table #: guix-git/doc/guix-cookbook.texi:641 msgid "Use HTTPS if available." msgstr "가능하다면 HTTPS를 사용합니다." #. type: item #: guix-git/doc/guix-cookbook.texi:642 #, no-wrap msgid "license" msgstr "license" #. type: table #: guix-git/doc/guix-cookbook.texi:645 msgid "See @code{guix/licenses.scm} in the project source for a full list of available licenses." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:649 msgid "Time to build our first package! Nothing fancy here for now: we will stick to a dummy @code{my-hello}, a copy of the above declaration." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:653 msgid "As with the ritualistic ``Hello World'' taught with most programming languages, this will possibly be the most ``manual'' approach. We will work out an ideal setup later; for now we will go the simplest route." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:655 msgid "Save the following to a file @file{my-hello.scm}." msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:661 #, no-wrap msgid "" "(use-modules (guix packages)\n" " (guix download)\n" " (guix build-system gnu)\n" " (guix licenses))\n" "\n" msgstr "" "(use-modules (guix packages)\n" " (guix download)\n" " (guix build-system gnu)\n" " (guix licenses))\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:680 #, no-wrap msgid "" "(package\n" " (name \"my-hello\")\n" " (version \"2.10\")\n" " (source (origin\n" " (method url-fetch)\n" " (uri (string-append \"mirror://gnu/hello/hello-\" version\n" " \".tar.gz\"))\n" " (sha256\n" " (base32\n" " \"0ssi1wpaf7plaswqqjwigppsg5fyh99vdlb9kzl7c9lng89ndq1i\"))))\n" " (build-system gnu-build-system)\n" " (synopsis \"Hello, Guix world: An example custom Guix package\")\n" " (description\n" " \"GNU Hello prints the message \\\"Hello, world!\\\" and then exits. It\n" "serves as an example of standard GNU coding practices. As such, it supports\n" "command-line arguments, multiple languages, and so on.\")\n" " (home-page \"https://www.gnu.org/software/hello/\")\n" " (license gpl3+))\n" msgstr "" "(package\n" " (name \"my-hello\")\n" " (version \"2.10\")\n" " (source (origin\n" " (method url-fetch)\n" " (uri (string-append \"mirror://gnu/hello/hello-\" version\n" " \".tar.gz\"))\n" " (sha256\n" " (base32\n" " \"0ssi1wpaf7plaswqqjwigppsg5fyh99vdlb9kzl7c9lng89ndq1i\"))))\n" " (build-system gnu-build-system)\n" " (synopsis \"Hello, Guix world: An example custom Guix package\")\n" " (description\n" " \"GNU Hello prints the message \\\"Hello, world!\\\" and then exits. It\n" "serves as an example of standard GNU coding practices. As such, it supports\n" "command-line arguments, multiple languages, and so on.\")\n" " (home-page \"https://www.gnu.org/software/hello/\")\n" " (license gpl3+))\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:683 msgid "We will explain the extra code in a moment." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:690 msgid "Feel free to play with the different values of the various fields. If you change the source, you'll need to update the checksum. Indeed, Guix refuses to build anything if the given checksum does not match the computed checksum of the source code. To obtain the correct checksum of the package declaration, we need to download the source, compute the sha256 checksum and convert it to base32." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:693 msgid "Thankfully, Guix can automate this task for us; all we need is to provide the URI:" msgstr "" #. This is example shell output. #. type: example #: guix-git/doc/guix-cookbook.texi:697 #, no-wrap msgid "" "$ guix download mirror://gnu/hello/hello-2.10.tar.gz\n" "\n" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:704 #, no-wrap msgid "" "Starting download of /tmp/guix-file.JLYgL7\n" "From https://ftpmirror.gnu.org/gnu/hello/hello-2.10.tar.gz...\n" "following redirection to `https://mirror.ibcp.fr/pub/gnu/hello/hello-2.10.tar.gz'...\n" " …10.tar.gz 709KiB 2.5MiB/s 00:00 [##################] 100.0%\n" "/gnu/store/hbdalsf5lpf01x4dcknwx6xbn6n5km6k-hello-2.10.tar.gz\n" "0ssi1wpaf7plaswqqjwigppsg5fyh99vdlb9kzl7c9lng89ndq1i\n" msgstr "" "Starting download of /tmp/guix-file.JLYgL7\n" "From https://ftpmirror.gnu.org/gnu/hello/hello-2.10.tar.gz...\n" "following redirection to `https://mirror.ibcp.fr/pub/gnu/hello/hello-2.10.tar.gz'...\n" "…10.tar.gz 709KiB 2.5MiB/s 00:00 [##################] 100.0%\n" "/gnu/store/hbdalsf5lpf01x4dcknwx6xbn6n5km6k-hello-2.10.tar.gz\n" "0ssi1wpaf7plaswqqjwigppsg5fyh99vdlb9kzl7c9lng89ndq1i\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:709 msgid "In this specific case the output tells us which mirror was chosen. If the result of the above command is not the same as in the above snippet, update your @code{my-hello} declaration accordingly." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:713 msgid "Note that GNU package tarballs come with an OpenPGP signature, so you should definitely check the signature of this tarball with `gpg` to authenticate it before going further:" msgstr "" #. This is example shell output. #. type: example #: guix-git/doc/guix-cookbook.texi:717 #, no-wrap msgid "" "$ guix download mirror://gnu/hello/hello-2.10.tar.gz.sig\n" "\n" msgstr "" "$ guix download mirror://gnu/hello/hello-2.10.tar.gz.sig\n" "\n" #. type: example #: guix-git/doc/guix-cookbook.texi:732 #, no-wrap msgid "" "Starting download of /tmp/guix-file.03tFfb\n" "From https://ftpmirror.gnu.org/gnu/hello/hello-2.10.tar.gz.sig...\n" "following redirection to `https://ftp.igh.cnrs.fr/pub/gnu/hello/hello-2.10.tar.gz.sig'...\n" " ….tar.gz.sig 819B 1.2MiB/s 00:00 [##################] 100.0%\n" "/gnu/store/rzs8wba9ka7grrmgcpfyxvs58mly0sx6-hello-2.10.tar.gz.sig\n" "0q0v86n3y38z17rl146gdakw9xc4mcscpk8dscs412j22glrv9jf\n" "$ gpg --verify /gnu/store/rzs8wba9ka7grrmgcpfyxvs58mly0sx6-hello-2.10.tar.gz.sig /gnu/store/hbdalsf5lpf01x4dcknwx6xbn6n5km6k-hello-2.10.tar.gz\n" "gpg: Signature made Sun 16 Nov 2014 01:08:37 PM CET\n" "gpg: using RSA key A9553245FDE9B739\n" "gpg: Good signature from \"Sami Kerola <kerolasa@@iki.fi>\" [unknown]\n" "gpg: aka \"Sami Kerola (http://www.iki.fi/kerolasa/) <kerolasa@@iki.fi>\" [unknown]\n" "gpg: WARNING: This key is not certified with a trusted signature!\n" "gpg: There is no indication that the signature belongs to the owner.\n" "Primary key fingerprint: 8ED3 96E3 7E38 D471 A005 30D3 A955 3245 FDE9 B739\n" msgstr "" "Starting download of /tmp/guix-file.03tFfb\n" "From https://ftpmirror.gnu.org/gnu/hello/hello-2.10.tar.gz.sig...\n" "following redirection to `https://ftp.igh.cnrs.fr/pub/gnu/hello/hello-2.10.tar.gz.sig'...\n" "….tar.gz.sig 819B 1.2MiB/s 00:00 [##################] 100.0%\n" "/gnu/store/rzs8wba9ka7grrmgcpfyxvs58mly0sx6-hello-2.10.tar.gz.sig\n" "0q0v86n3y38z17rl146gdakw9xc4mcscpk8dscs412j22glrv9jf\n" "$ gpg --verify /gnu/store/rzs8wba9ka7grrmgcpfyxvs58mly0sx6-hello-2.10.tar.gz.sig /gnu/store/hbdalsf5lpf01x4dcknwx6xbn6n5km6k-hello-2.10.tar.gz\n" "gpg: Signature made Sun 16 Nov 2014 01:08:37 PM CET\n" "gpg: using RSA key A9553245FDE9B739\n" "gpg: Good signature from \"Sami Kerola <kerolasa@@iki.fi>\" [unknown]\n" "gpg: aka \"Sami Kerola (http://www.iki.fi/kerolasa/) <kerolasa@@iki.fi>\" [unknown]\n" "gpg: WARNING: This key is not certified with a trusted signature!\n" "gpg: There is no indication that the signature belongs to the owner.\n" "Primary key fingerprint: 8ED3 96E3 7E38 D471 A005 30D3 A955 3245 FDE9 B739\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:735 msgid "You can then happily run" msgstr "당신은 그런 다음에 행복하게 실행 할 수 있습니다" #. Do not translate this command #. type: example #: guix-git/doc/guix-cookbook.texi:739 #, no-wrap msgid "$ guix package --install-from-file=my-hello.scm\n" msgstr "$ guix package --install-from-file=my-hello.scm\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:742 msgid "You should now have @code{my-hello} in your profile!" msgstr "" #. Do not translate this command #. type: example #: guix-git/doc/guix-cookbook.texi:748 #, no-wrap msgid "" "$ guix package --list-installed=my-hello\n" "my-hello\t2.10\tout\n" "/gnu/store/f1db2mfm8syb8qvc357c53slbvf1g9m9-my-hello-2.10\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:753 msgid "We've gone as far as we could without any knowledge of Scheme. Before moving on to more complex packages, now is the right time to brush up on your Scheme knowledge. @pxref{A Scheme Crash Course} to get up to speed." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:760 msgid "In the rest of this chapter we will rely on some basic Scheme programming knowledge. Now let's detail the different possible setups for working on Guix packages." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:762 msgid "There are several ways to set up a Guix packaging environment." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:765 msgid "We recommend you work directly on the Guix source checkout since it makes it easier for everyone to contribute to the project." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:767 msgid "But first, let's look at other possibilities." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:780 msgid "This is what we previously did with @samp{my-hello}. With the Scheme basics we've covered, we are now able to explain the leading chunks. As stated in @code{guix package --help}:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:785 #, no-wrap msgid "" " -f, --install-from-file=FILE\n" " install the package that the code within FILE\n" " evaluates to\n" msgstr "" " -f, --install-from-file=FILE\n" " install the package that the code within FILE\n" " evaluates to\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:789 msgid "Thus the last expression @emph{must} return a package, which is the case in our earlier example." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:793 msgid "The @code{use-modules} expression tells which of the modules we need in the file. Modules are a collection of values and procedures. They are commonly called ``libraries'' or ``packages'' in other programming languages." msgstr "" #. type: cindex #: guix-git/doc/guix-cookbook.texi:797 #, fuzzy, no-wrap #| msgid "Guix channels" msgid "channel" msgstr "Guix 채널" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:803 msgid "Guix and its package collection can be extended through @dfn{channels}. A channel is a Git repository, public or not, containing @file{.scm} files that provide packages (@pxref{Defining Packages,,, guix, GNU Guix Reference Manual}) or services (@pxref{Defining Services,,, guix, GNU Guix Reference Manual})." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:806 msgid "How would you go about creating a channel? First, create a directory that will contain your @file{.scm} files, say @file{~/my-channel}:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:809 #, no-wrap msgid "mkdir ~/my-channel\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:813 msgid "Suppose you want to add the @samp{my-hello} package we saw previously; it first needs some adjustments:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:820 #, no-wrap msgid "" "(define-module (my-hello)\n" " #:use-module (guix licenses)\n" " #:use-module (guix packages)\n" " #:use-module (guix build-system gnu)\n" " #:use-module (guix download))\n" "\n" msgstr "" "(define-module (my-hello)\n" " #:use-module (guix licenses)\n" " #:use-module (guix packages)\n" " #:use-module (guix build-system gnu)\n" " #:use-module (guix download))\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:840 #, no-wrap msgid "" "(define-public my-hello\n" " (package\n" " (name \"my-hello\")\n" " (version \"2.10\")\n" " (source (origin\n" " (method url-fetch)\n" " (uri (string-append \"mirror://gnu/hello/hello-\" version\n" " \".tar.gz\"))\n" " (sha256\n" " (base32\n" " \"0ssi1wpaf7plaswqqjwigppsg5fyh99vdlb9kzl7c9lng89ndq1i\"))))\n" " (build-system gnu-build-system)\n" " (synopsis \"Hello, Guix world: An example custom Guix package\")\n" " (description\n" " \"GNU Hello prints the message \\\"Hello, world!\\\" and then exits. It\n" "serves as an example of standard GNU coding practices. As such, it supports\n" "command-line arguments, multiple languages, and so on.\")\n" " (home-page \"https://www.gnu.org/software/hello/\")\n" " (license gpl3+)))\n" msgstr "" "(define-public my-hello\n" " (package\n" " (name \"my-hello\")\n" " (version \"2.10\")\n" " (source (origin\n" " (method url-fetch)\n" " (uri (string-append \"mirror://gnu/hello/hello-\" version\n" " \".tar.gz\"))\n" " (sha256\n" " (base32\n" " \"0ssi1wpaf7plaswqqjwigppsg5fyh99vdlb9kzl7c9lng89ndq1i\"))))\n" " (build-system gnu-build-system)\n" " (synopsis \"Hello, Guix world: An example custom Guix package\")\n" " (description\n" " \"GNU Hello prints the message \\\"Hello, world!\\\" and then exits. It\n" "serves as an example of standard GNU coding practices. As such, it supports\n" "command-line arguments, multiple languages, and so on.\")\n" " (home-page \"https://www.gnu.org/software/hello/\")\n" " (license gpl3+)))\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:846 msgid "Note that we have assigned the package value to an exported variable name with @code{define-public}. This is effectively assigning the package to the @code{my-hello} variable so that it can be referenced, among other as dependency of other packages." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:851 msgid "If you use @code{guix package --install-from-file=my-hello.scm} on the above file, it will fail because the last expression, @code{define-public}, does not return a package. If you want to use @code{define-public} in this use-case nonetheless, make sure the file ends with an evaluation of @code{my-hello}:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:857 #, fuzzy, no-wrap #| msgid "" #| "; ...\n" #| "(define-public my-hello\n" #| " ; ...\n" #| " )\n" #| "\n" msgid "" ";; ...\n" "(define-public my-hello\n" " ;; ...\n" " )\n" "\n" msgstr "" "; ...\n" "(define-public my-hello\n" " ; ...\n" " )\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:859 #, no-wrap msgid "my-hello\n" msgstr "안녕하세요\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:862 msgid "This last example is not very typical." msgstr "이 마지막 예제는 매우 전형적이지 않습니다." #. type: Plain text #: guix-git/doc/guix-cookbook.texi:866 msgid "Now how do you make that package visible to @command{guix} commands so you can test your packages? You need to add the directory to the search path using the @option{-L} command-line option, as in these examples:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:870 #, no-wrap msgid "" "guix show -L ~/my-channel my-hello\n" "guix build -L ~/my-channel my-hello\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:876 msgid "The final step is to turn @file{~/my-channel} into an actual channel, making your package collection seamlessly available @i{via} any @command{guix} command. To do that, you first need to make it a Git repository:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:882 #, no-wrap msgid "" "cd ~/my-channel\n" "git init\n" "git add my-hello.scm\n" "git commit -m \"First commit of my channel.\"\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:890 msgid "And that's it, you have a channel! From there on, you can add this channel to your channel configuration in @file{~/.config/guix/channels.scm} (@pxref{Specifying Additional Channels,,, guix, GNU Guix Reference Manual}); assuming you keep your channel local for now, the @file{channels.scm} would look something like this:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:897 #, no-wrap msgid "" "(append (list (channel\n" " (name 'my-channel)\n" " (url (string-append \"file://\" (getenv \"HOME\")\n" " \"/my-channel\"))))\n" " %default-channels)\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:904 msgid "Next time you run @command{guix pull}, your channel will be picked up and the packages it defines will be readily available to all the @command{guix} commands, even if you do not pass @option{-L}. The @command{guix describe} command will show that Guix is, indeed, using both the @code{my-channel} and the @code{guix} channels." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:907 msgid "@xref{Creating a Channel,,, guix, GNU Guix Reference Manual}, for details." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:914 msgid "Working directly on the Guix project is recommended: it reduces the friction when the time comes to submit your changes upstream to let the community benefit from your hard work!" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:920 msgid "Unlike most software distributions, the Guix repository holds in one place both the tooling (including the package manager) and the package definitions. This choice was made so that it would give developers the flexibility to modify the API without breakage by updating all packages at the same time. This reduces development inertia." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:922 msgid "Check out the official @uref{https://git-scm.com/, Git} repository:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:925 #, no-wrap msgid "$ git clone https://git.savannah.gnu.org/git/guix.git\n" msgstr "$ git clone https://git.savannah.gnu.org/git/guix.git\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:929 msgid "In the rest of this article, we use @samp{$GUIX_CHECKOUT} to refer to the location of the checkout." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:933 msgid "Follow the instructions in the manual (@pxref{Contributing,,, guix, GNU Guix Reference Manual}) to set up the repository environment." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:936 msgid "Once ready, you should be able to use the package definitions from the repository environment." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:938 msgid "Feel free to edit package definitions found in @samp{$GUIX_CHECKOUT/gnu/packages}." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:942 msgid "The @samp{$GUIX_CHECKOUT/pre-inst-env} script lets you use @samp{guix} over the package collection of the repository (@pxref{Running Guix Before It Is Installed,,, guix, GNU Guix Reference Manual})." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:946 msgid "Search packages, such as Ruby:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:953 #, no-wrap msgid "" " $ cd $GUIX_CHECKOUT\n" " $ ./pre-inst-env guix package --list-available=ruby\n" " ruby 1.8.7-p374 out gnu/packages/ruby.scm:119:2\n" " ruby 2.1.6 out gnu/packages/ruby.scm:91:2\n" " ruby 2.2.2 out gnu/packages/ruby.scm:39:2\n" msgstr "" " $ cd $GUIX_CHECKOUT\n" " $ ./pre-inst-env guix package --list-available=ruby\n" " ruby 1.8.7-p374 out gnu/packages/ruby.scm:119:2\n" " ruby 2.1.6 out gnu/packages/ruby.scm:91:2\n" " ruby 2.2.2 out gnu/packages/ruby.scm:39:2\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:957 msgid "Build a package, here Ruby version 2.1:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:961 #, no-wrap msgid "" " $ ./pre-inst-env guix build --keep-failed ruby@@2.1\n" " /gnu/store/c13v73jxmj2nir2xjqaz5259zywsa9zi-ruby-2.1.6\n" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:965 msgid "Install it to your user profile:" msgstr "당신의 사용자 프로파일에 설치합니다:" #. type: example #: guix-git/doc/guix-cookbook.texi:968 #, no-wrap msgid " $ ./pre-inst-env guix package --install ruby@@2.1\n" msgstr " $ ./pre-inst-env guix package --install ruby@@2.1\n" #. type: itemize #: guix-git/doc/guix-cookbook.texi:972 msgid "Check for common mistakes:" msgstr "일반적인 실수를 점검합니다:" #. type: example #: guix-git/doc/guix-cookbook.texi:975 #, no-wrap msgid " $ ./pre-inst-env guix lint ruby@@2.1\n" msgstr " $ ./pre-inst-env guix lint ruby@@2.1\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:980 msgid "Guix strives at maintaining a high packaging standard; when contributing to the Guix project, remember to" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:984 msgid "follow the coding style (@pxref{Coding Style,,, guix, GNU Guix Reference Manual})," msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:986 msgid "and review the check list from the manual (@pxref{Submitting Patches,,, guix, GNU Guix Reference Manual})." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:990 msgid "Once you are happy with the result, you are welcome to send your contribution to make it part of Guix. This process is also detailed in the manual. (@pxref{Contributing,,, guix, GNU Guix Reference Manual})" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:993 msgid "It's a community effort so the more join in, the better Guix becomes!" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1000 msgid "The above ``Hello World'' example is as simple as it goes. Packages can be more complex than that and Guix can handle more advanced scenarios. Let's look at another, more sophisticated package (slightly modified from the source):" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1014 #, fuzzy, no-wrap #| msgid "" #| "(define-module (gnu packages version-control)\n" #| " #:use-module ((guix licenses) #:prefix license:)\n" #| " #:use-module (guix utils)\n" #| " #:use-module (guix packages)\n" #| " #:use-module (guix git-download)\n" #| " #:use-module (guix build-system cmake)\n" #| " #:use-module (gnu packages ssh)\n" #| " #:use-module (gnu packages web)\n" #| " #:use-module (gnu packages pkg-config)\n" #| " #:use-module (gnu packages python)\n" #| " #:use-module (gnu packages compression)\n" #| " #:use-module (gnu packages tls))\n" #| "\n" msgid "" "(define-module (gnu packages version-control)\n" " #:use-module ((guix licenses) #:prefix license:)\n" " #:use-module (guix utils)\n" " #:use-module (guix packages)\n" " #:use-module (guix git-download)\n" " #:use-module (guix build-system cmake)\n" " #:use-module (gnu packages compression)\n" " #:use-module (gnu packages pkg-config)\n" " #:use-module (gnu packages python)\n" " #:use-module (gnu packages ssh)\n" " #:use-module (gnu packages tls)\n" " #:use-module (gnu packages web))\n" "\n" msgstr "" "(define-module (gnu packages version-control)\n" " #:use-module ((guix licenses) #:prefix license:)\n" " #:use-module (guix utils)\n" " #:use-module (guix packages)\n" " #:use-module (guix git-download)\n" " #:use-module (guix build-system cmake)\n" " #:use-module (gnu packages ssh)\n" " #:use-module (gnu packages web)\n" " #:use-module (gnu packages pkg-config)\n" " #:use-module (gnu packages python)\n" " #:use-module (gnu packages compression)\n" " #:use-module (gnu packages tls))\n" "\n" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1070 #, no-wrap msgid "" "(define-public my-libgit2\n" " (let ((commit \"e98d0a37c93574d2c6107bf7f31140b548c6a7bf\")\n" " (revision \"1\"))\n" " (package\n" " (name \"my-libgit2\")\n" " (version (git-version \"0.26.6\" revision commit))\n" " (source (origin\n" " (method git-fetch)\n" " (uri (git-reference\n" " (url \"https://github.com/libgit2/libgit2/\")\n" " (commit commit)))\n" " (file-name (git-file-name name version))\n" " (sha256\n" " (base32\n" " \"17pjvprmdrx4h6bb1hhc98w9qi6ki7yl57f090n9kbhswxqfs7s3\"))\n" " (patches (search-patches \"libgit2-mtime-0.patch\"))\n" " (modules '((guix build utils)))\n" " ;; Remove bundled software.\n" " (snippet '(delete-file-recursively \"deps\"))))\n" " (build-system cmake-build-system)\n" " (outputs '(\"out\" \"debug\"))\n" " (arguments\n" " `(#:tests? #true ; Run the test suite (this is the default)\n" " #:configure-flags '(\"-DUSE_SHA1DC=ON\") ; SHA-1 collision detection\n" " #:phases\n" " (modify-phases %standard-phases\n" " (add-after 'unpack 'fix-hardcoded-paths\n" " (lambda _\n" " (substitute* \"tests/repo/init.c\"\n" " ((\"#!/bin/sh\") (string-append \"#!\" (which \"sh\"))))\n" " (substitute* \"tests/clar/fs.h\"\n" " ((\"/bin/cp\") (which \"cp\"))\n" " ((\"/bin/rm\") (which \"rm\")))))\n" " ;; Run checks more verbosely.\n" " (replace 'check\n" " (lambda* (#:key tests? #:allow-other-keys)\n" " (when tests?\n" " (invoke \"./libgit2_clar\" \"-v\" \"-Q\"))))\n" " (add-after 'unpack 'make-files-writable-for-tests\n" " (lambda _ (for-each make-file-writable (find-files \".\")))))))\n" " (inputs\n" " (list libssh2 http-parser python-wrapper))\n" " (native-inputs\n" " (list pkg-config))\n" " (propagated-inputs\n" " ;; These two libraries are in 'Requires.private' in libgit2.pc.\n" " (list openssl zlib))\n" " (home-page \"https://libgit2.github.com/\")\n" " (synopsis \"Library providing Git core methods\")\n" " (description\n" " \"Libgit2 is a portable, pure C implementation of the Git core methods\n" "provided as a re-entrant linkable library with a solid API, allowing you to\n" "write native speed custom Git applications in any language with bindings.\")\n" " ;; GPLv2 with linking exception\n" " (license license:gpl2))))\n" msgstr "" "(define-public my-libgit2\n" " (let ((commit \"e98d0a37c93574d2c6107bf7f31140b548c6a7bf\")\n" " (revision \"1\"))\n" " (package\n" " (name \"my-libgit2\")\n" " (version (git-version \"0.26.6\" revision commit))\n" " (source (origin\n" " (method git-fetch)\n" " (uri (git-reference\n" " (url \"https://github.com/libgit2/libgit2/\")\n" " (commit commit)))\n" " (file-name (git-file-name name version))\n" " (sha256\n" " (base32\n" " \"17pjvprmdrx4h6bb1hhc98w9qi6ki7yl57f090n9kbhswxqfs7s3\"))\n" " (patches (search-patches \"libgit2-mtime-0.patch\"))\n" " (modules '((guix build utils)))\n" " ;; Remove bundled software.\n" " (snippet '(delete-file-recursively \"deps\"))))\n" " (build-system cmake-build-system)\n" " (outputs '(\"out\" \"debug\"))\n" " (arguments\n" " `(#:tests? #true ; Run the test suite (this is the default)\n" " #:configure-flags '(\"-DUSE_SHA1DC=ON\") ; SHA-1 collision detection\n" " #:phases\n" " (modify-phases %standard-phases\n" " (add-after 'unpack 'fix-hardcoded-paths\n" " (lambda _\n" " (substitute* \"tests/repo/init.c\"\n" " ((\"#!/bin/sh\") (string-append \"#!\" (which \"sh\"))))\n" " (substitute* \"tests/clar/fs.h\"\n" " ((\"/bin/cp\") (which \"cp\"))\n" " ((\"/bin/rm\") (which \"rm\")))))\n" " ;; Run checks more verbosely.\n" " (replace 'check\n" " (lambda* (#:key tests? #:allow-other-keys)\n" " (when tests?\n" " (invoke \"./libgit2_clar\" \"-v\" \"-Q\"))))\n" " (add-after 'unpack 'make-files-writable-for-tests\n" " (lambda _ (for-each make-file-writable (find-files \".\")))))))\n" " (inputs\n" " (list libssh2 http-parser python-wrapper))\n" " (native-inputs\n" " (list pkg-config))\n" " (propagated-inputs\n" " ;; These two libraries are in 'Requires.private' in libgit2.pc.\n" " (list openssl zlib))\n" " (home-page \"https://libgit2.github.com/\")\n" " (synopsis \"Library providing Git core methods\")\n" " (description\n" " \"Libgit2 is a portable, pure C implementation of the Git core methods\n" "provided as a re-entrant linkable library with a solid API, allowing you to\n" "write native speed custom Git applications in any language with bindings.\")\n" " ;; GPLv2 with linking exception\n" " (license license:gpl2))))\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1075 msgid "(In those cases were you only want to tweak a few fields from a package definition, you should rely on inheritance instead of copy-pasting everything. See below.)" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1077 msgid "Let's discuss those fields in depth." msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:1078 #, no-wrap msgid "@code{git-fetch} method" msgstr "@code{git-fetch} 방법" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1085 msgid "Unlike the @code{url-fetch} method, @code{git-fetch} expects a @code{git-reference} which takes a Git repository and a commit. The commit can be any Git reference such as tags, so if the @code{version} is tagged, then it can be used directly. Sometimes the tag is prefixed with a @code{v}, in which case you'd use @code{(commit (string-append \"v\" version))}." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1089 msgid "To ensure that the source code from the Git repository is stored in a directory with a descriptive name, we use @code{(file-name (git-file-name name version))}." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1094 msgid "The @code{git-version} procedure can be used to derive the version when packaging programs for a specific commit, following the Guix contributor guidelines (@pxref{Version Numbers,,, guix, GNU Guix Reference Manual})." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1098 msgid "How does one obtain the @code{sha256} hash that's in there, you ask? By invoking @command{guix hash} on a checkout of the desired commit, along these lines:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1104 #, no-wrap msgid "" "git clone https://github.com/libgit2/libgit2/\n" "cd libgit2\n" "git checkout v0.26.6\n" "guix hash -rx .\n" msgstr "" "git clone https://github.com/libgit2/libgit2/\n" "cd libgit2\n" "git checkout v0.26.6\n" "guix hash -rx .\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1109 msgid "@command{guix hash -rx} computes a SHA256 hash over the whole directory, excluding the @file{.git} sub-directory (@pxref{Invoking guix hash,,, guix, GNU Guix Reference Manual})." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1112 msgid "In the future, @command{guix download} will hopefully be able to do these steps for you, just like it does for regular downloads." msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:1113 #, no-wrap msgid "Snippets" msgstr "단편" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1119 msgid "Snippets are quoted (i.e. non-evaluated) Scheme code that are a means of patching the source. They are a Guix-y alternative to the traditional @file{.patch} files. Because of the quote, the code in only evaluated when passed to the Guix daemon for building. There can be as many snippets as needed." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1122 msgid "Snippets might need additional Guile modules which can be imported from the @code{modules} field." msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:1123 #, no-wrap msgid "Inputs" msgstr "입력" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1126 msgid "There are 3 different input types. In short:" msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1128 #, no-wrap msgid "native-inputs" msgstr "native-inputs" #. type: table #: guix-git/doc/guix-cookbook.texi:1131 msgid "Required for building but not runtime -- installing a package through a substitute won't install these inputs." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1131 #, no-wrap msgid "inputs" msgstr "inputs" #. type: table #: guix-git/doc/guix-cookbook.texi:1134 msgid "Installed in the store but not in the profile, as well as being present at build time." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1134 #, no-wrap msgid "propagated-inputs" msgstr "propagated-inputs" #. type: table #: guix-git/doc/guix-cookbook.texi:1137 msgid "Installed in the store and in the profile, as well as being present at build time." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1140 msgid "@xref{package Reference,,, guix, GNU Guix Reference Manual} for more details." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1144 msgid "The distinction between the various inputs is important: if a dependency can be handled as an @emph{input} instead of a @emph{propagated input}, it should be done so, or else it ``pollutes'' the user profile for no good reason." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1151 msgid "For instance, a user installing a graphical program that depends on a command line tool might only be interested in the graphical part, so there is no need to force the command line tool into the user profile. The dependency is a concern to the package, not to the user. @emph{Inputs} make it possible to handle dependencies without bugging the user by adding undesired executable files (or libraries) to their profile." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1157 msgid "Same goes for @emph{native-inputs}: once the program is installed, build-time dependencies can be safely garbage-collected. It also matters when a substitute is available, in which case only the @emph{inputs} and @emph{propagated inputs} will be fetched: the @emph{native inputs} are not required to install a package from a substitute." msgstr "" #. type: quotation #: guix-git/doc/guix-cookbook.texi:1158 guix-git/doc/guix-cookbook.texi:2321 #: guix-git/doc/guix-cookbook.texi:3986 guix-git/doc/guix-cookbook.texi:5159 #: guix-git/doc/guix-cookbook.texi:5225 #, no-wrap msgid "Note" msgstr "알림" #. type: quotation #: guix-git/doc/guix-cookbook.texi:1161 msgid "You may see here and there snippets where package inputs are written quite differently, like so:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1168 #, no-wrap msgid "" ";; The \"old style\" for inputs.\n" "(inputs\n" " `((\"libssh2\" ,libssh2)\n" " (\"http-parser\" ,http-parser)\n" " (\"python\" ,python-wrapper)))\n" msgstr "" #. type: quotation #: guix-git/doc/guix-cookbook.texi:1174 msgid "This is the ``old style'', where each input in the list is explicitly given a label (a string). It is still supported but we recommend using the style above instead. @xref{package Reference,,, guix, GNU Guix Reference Manual}, for more info." msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:1176 #, no-wrap msgid "Outputs" msgstr "출력" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1180 msgid "Just like how a package can have multiple inputs, it can also produce multiple outputs." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1182 msgid "Each output corresponds to a separate directory in the store." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1185 msgid "The user can choose which output to install; this is useful to save space or to avoid polluting the user profile with unwanted executables or libraries." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1188 msgid "Output separation is optional. When the @code{outputs} field is left out, the default and only output (the complete package) is referred to as @code{\"out\"}." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1190 msgid "Typical separate output names include @code{debug} and @code{doc}." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1194 msgid "It's advised to separate outputs only when you've shown it's worth it: if the output size is significant (compare with @code{guix size}) or in case the package is modular." msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:1195 #, no-wrap msgid "Build system arguments" msgstr "시스템 인수를 구성합니다" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1198 msgid "The @code{arguments} is a keyword-value list used to configure the build process." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1203 msgid "The simplest argument @code{#:tests?} can be used to disable the test suite when building the package. This is mostly useful when the package does not feature any test suite. It's strongly recommended to keep the test suite on if there is one." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1207 msgid "Another common argument is @code{:make-flags}, which specifies a list of flags to append when running make, as you would from the command line. For instance, the following flags" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1211 #, no-wrap msgid "" "#:make-flags (list (string-append \"prefix=\" (assoc-ref %outputs \"out\"))\n" " \"CC=gcc\")\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1214 msgid "translate into" msgstr "번역합니다" #. type: example #: guix-git/doc/guix-cookbook.texi:1217 #, no-wrap msgid "$ make CC=gcc prefix=/gnu/store/...-<out>\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1223 msgid "This sets the C compiler to @code{gcc} and the @code{prefix} variable (the installation directory in Make parlance) to @code{(assoc-ref %outputs \"out\")}, which is a build-stage global variable pointing to the destination directory in the store (something like @file{/gnu/store/...-my-libgit2-20180408})." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1225 msgid "Similarly, it's possible to set the configure flags:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1228 #, no-wrap msgid "#:configure-flags '(\"-DUSE_SHA1DC=ON\")\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1232 msgid "The @code{%build-inputs} variable is also generated in scope. It's an association table that maps the input names to their store directories." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1237 msgid "The @code{phases} keyword lists the sequential steps of the build system. Typically phases include @code{unpack}, @code{configure}, @code{build}, @code{install} and @code{check}. To know more about those phases, you need to work out the appropriate build system definition in @samp{$GUIX_CHECKOUT/guix/build/gnu-build-system.scm}:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1256 #, no-wrap msgid "" "(define %standard-phases\n" " ;; Standard build phases, as a list of symbol/procedure pairs.\n" " (let-syntax ((phases (syntax-rules ()\n" " ((_ p ...) `((p . ,p) ...)))))\n" " (phases set-SOURCE-DATE-EPOCH set-paths install-locale unpack\n" " bootstrap\n" " patch-usr-bin-file\n" " patch-source-shebangs configure patch-generated-file-shebangs\n" " build check install\n" " patch-shebangs strip\n" " validate-runpath\n" " validate-documentation-location\n" " delete-info-dir-file\n" " patch-dot-desktop-files\n" " install-license-files\n" " reset-gzip-timestamps\n" " compress-documentation)))\n" msgstr "" "(define %standard-phases\n" " ;; Standard build phases, as a list of symbol/procedure pairs.\n" " (let-syntax ((phases (syntax-rules ()\n" " ((_ p ...) `((p . ,p) ...)))))\n" " (phases set-SOURCE-DATE-EPOCH set-paths install-locale unpack\n" " bootstrap\n" " patch-usr-bin-file\n" " patch-source-shebangs configure patch-generated-file-shebangs\n" " build check install\n" " patch-shebangs strip\n" " validate-runpath\n" " validate-documentation-location\n" " delete-info-dir-file\n" " patch-dot-desktop-files\n" " install-license-files\n" " reset-gzip-timestamps\n" " compress-documentation)))\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1259 msgid "Or from the REPL:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1265 #, no-wrap msgid "" "(add-to-load-path \"/path/to/guix/checkout\")\n" ",use (guix build gnu-build-system)\n" "(map first %standard-phases)\n" "@result{} (set-SOURCE-DATE-EPOCH set-paths install-locale unpack bootstrap patch-usr-bin-file patch-source-shebangs configure patch-generated-file-shebangs build check install patch-shebangs strip validate-runpath validate-documentation-location delete-info-dir-file patch-dot-desktop-files install-license-files reset-gzip-timestamps compress-documentation)\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1269 msgid "If you want to know more about what happens during those phases, consult the associated procedures." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1272 msgid "For instance, as of this writing the definition of @code{unpack} for the GNU build system is:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1282 #, no-wrap msgid "" "(define* (unpack #:key source #:allow-other-keys)\n" " \"Unpack SOURCE in the working directory, and change directory within the\n" "source. When SOURCE is a directory, copy it in a sub-directory of the current\n" "working directory.\"\n" " (if (file-is-directory? source)\n" " (begin\n" " (mkdir \"source\")\n" " (chdir \"source\")\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1293 #, no-wrap msgid "" " ;; Preserve timestamps (set to the Epoch) on the copied tree so that\n" " ;; things work deterministically.\n" " (copy-recursively source \".\"\n" " #:keep-mtime? #true))\n" " (begin\n" " (if (string-suffix? \".zip\" source)\n" " (invoke \"unzip\" source)\n" " (invoke \"tar\" \"xvf\" source))\n" " (chdir (first-subdirectory \".\"))))\n" " #true)\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1301 msgid "Note the @code{chdir} call: it changes the working directory to where the source was unpacked. Thus every phase following the @code{unpack} will use the source as a working directory, which is why we can directly work on the source files. That is to say, unless a later phase changes the working directory to something else." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1305 msgid "We modify the list of @code{%standard-phases} of the build system with the @code{modify-phases} macro as per the list of specified modifications, which may have the following forms:" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:1309 msgid "@code{(add-before @var{phase} @var{new-phase} @var{procedure})}: Run @var{procedure} named @var{new-phase} before @var{phase}." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:1311 msgid "@code{(add-after @var{phase} @var{new-phase} @var{procedure})}: Same, but afterwards." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:1313 msgid "@code{(replace @var{phase} @var{procedure})}." msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:1315 msgid "@code{(delete @var{phase})}." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1322 msgid "The @var{procedure} supports the keyword arguments @code{inputs} and @code{outputs}. Each input (whether @emph{native}, @emph{propagated} or not) and output directory is referenced by their name in those variables. Thus @code{(assoc-ref outputs \"out\")} is the store directory of the main output of the package. A phase procedure may look like this:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1330 #, no-wrap msgid "" "(lambda* (#:key inputs outputs #:allow-other-keys)\n" " (let ((bash-directory (assoc-ref inputs \"bash\"))\n" " (output-directory (assoc-ref outputs \"out\"))\n" " (doc-directory (assoc-ref outputs \"doc\")))\n" " ;; ...\n" " #true))\n" msgstr "" "(lambda* (#:key inputs outputs #:allow-other-keys)\n" " (let ((bash-directory (assoc-ref inputs \"bash\"))\n" " (output-directory (assoc-ref outputs \"out\"))\n" " (doc-directory (assoc-ref outputs \"doc\")))\n" " ;; ...\n" " #true))\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1336 msgid "The procedure must return @code{#true} on success. It's brittle to rely on the return value of the last expression used to tweak the phase because there is no guarantee it would be a @code{#true}. Hence the trailing @code{#true} to ensure the right value is returned on success." msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:1337 #, no-wrap msgid "Code staging" msgstr "코드 스테이징" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1343 msgid "The astute reader may have noticed the quasi-quote and comma syntax in the argument field. Indeed, the build code in the package declaration should not be evaluated on the client side, but only when passed to the Guix daemon. This mechanism of passing code around two running processes is called @uref{https://arxiv.org/abs/1709.00833, code staging}." msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:1344 #, no-wrap msgid "Utility functions" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1349 msgid "When customizing @code{phases}, we often need to write code that mimics the equivalent system invocations (@code{make}, @code{mkdir}, @code{cp}, etc.)@: commonly used during regular ``Unix-style'' installations." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1352 msgid "Some like @code{chmod} are native to Guile. @xref{,,, guile, Guile reference manual} for a complete list." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1355 msgid "Guix provides additional helper functions which prove especially handy in the context of package management." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1359 msgid "Some of those functions can be found in @samp{$GUIX_CHECKOUT/guix/guix/build/utils.scm}. Most of them mirror the behaviour of the traditional Unix system commands:" msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1361 #, no-wrap msgid "which" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1363 msgid "Like the @samp{which} system command." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1363 #, no-wrap msgid "find-files" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1365 msgid "Akin to the @samp{find} system command." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1365 #, no-wrap msgid "mkdir-p" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1367 msgid "Like @samp{mkdir -p}, which creates all parents as needed." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1367 #, no-wrap msgid "install-file" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1371 msgid "Similar to @samp{install} when installing a file to a (possibly non-existing) directory. Guile has @code{copy-file} which works like @samp{cp}." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1371 #, no-wrap msgid "copy-recursively" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1373 msgid "Like @samp{cp -r}." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1373 #, no-wrap msgid "delete-file-recursively" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1375 msgid "Like @samp{rm -rf}." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1375 #, no-wrap msgid "invoke" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1377 msgid "Run an executable. This should be used instead of @code{system*}." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1377 #, no-wrap msgid "with-directory-excursion" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1380 msgid "Run the body in a different working directory, then restore the previous working directory." msgstr "" #. type: item #: guix-git/doc/guix-cookbook.texi:1380 #, no-wrap msgid "substitute*" msgstr "" #. type: table #: guix-git/doc/guix-cookbook.texi:1382 msgid "A ``@command{sed}-like'' function." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1386 msgid "@xref{Build Utilities,,, guix, GNU Guix Reference Manual}, for more information on these utilities." msgstr "" #. type: subsubsection #: guix-git/doc/guix-cookbook.texi:1387 #, no-wrap msgid "Module prefix" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1397 msgid "The license in our last example needs a prefix: this is because of how the @code{license} module was imported in the package, as @code{#:use-module ((guix licenses) #:prefix license:)}. The Guile module import mechanism (@pxref{Using Guile Modules,,, guile, Guile reference manual}) gives the user full control over namespacing: this is needed to avoid clashes between, say, the @samp{zlib} variable from @samp{licenses.scm} (a @emph{license} value) and the @samp{zlib} variable from @samp{compression.scm} (a @emph{package} value)." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1406 msgid "What we've seen so far covers the majority of packages using a build system other than the @code{trivial-build-system}. The latter does not automate anything and leaves you to build everything manually. This can be more demanding and we won't cover it here for now, but thankfully it is rarely necessary to fall back on this system." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1410 msgid "For the other build systems, such as ASDF, Emacs, Perl, Ruby and many more, the process is very similar to the GNU build system except for a few specialized arguments." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1415 msgid "@xref{Build Systems,,, guix, GNU Guix Reference Manual}, for more information on build systems, or check the source code in the @samp{$GUIX_CHECKOUT/guix/build} and @samp{$GUIX_CHECKOUT/guix/build-system} directories." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1421 msgid "We can't repeat it enough: having a full-fledged programming language at hand empowers us in ways that reach far beyond traditional package management." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1423 msgid "Let's illustrate this with some awesome features of Guix!" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1438 msgid "You might find some build systems good enough that there is little to do at all to write a package, to the point that it becomes repetitive and tedious after a while. A @emph{raison d'être} of computers is to replace human beings at those boring tasks. So let's tell Guix to do this for us and create the package definition of an R package from CRAN (the output is trimmed for conciseness):" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1441 #, no-wrap msgid "" "$ guix import cran --recursive walrus\n" "\n" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1445 #, no-wrap msgid "" "(define-public r-mc2d\n" " ; ...\n" " (license gpl2+)))\n" "\n" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1449 #, no-wrap msgid "" "(define-public r-jmvcore\n" " ; ...\n" " (license gpl2+)))\n" "\n" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1453 #, no-wrap msgid "" "(define-public r-wrs2\n" " ; ...\n" " (license gpl3)))\n" "\n" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1479 #, no-wrap msgid "" "(define-public r-walrus\n" " (package\n" " (name \"r-walrus\")\n" " (version \"1.0.3\")\n" " (source\n" " (origin\n" " (method url-fetch)\n" " (uri (cran-uri \"walrus\" version))\n" " (sha256\n" " (base32\n" " \"1nk2glcvy4hyksl5ipq2mz8jy4fss90hx6cq98m3w96kzjni6jjj\"))))\n" " (build-system r-build-system)\n" " (propagated-inputs\n" " (list r-ggplot2 r-jmvcore r-r6 r-wrs2))\n" " (home-page \"https://github.com/jamovi/walrus\")\n" " (synopsis \"Robust Statistical Methods\")\n" " (description\n" " \"This package provides a toolbox of common robust statistical\n" "tests, including robust descriptives, robust t-tests, and robust ANOVA.\n" "It is also available as a module for 'jamovi' (see\n" "<https://www.jamovi.org> for more information). Walrus is based on the\n" "WRS2 package by Patrick Mair, which is in turn based on the scripts and\n" "work of Rand Wilcox. These analyses are described in depth in the book\n" "'Introduction to Robust Estimation & Hypothesis Testing'.\")\n" " (license gpl3)))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1483 msgid "The recursive importer won't import packages for which Guix already has package definitions, except for the very first." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1488 msgid "Not all applications can be packaged this way, only those relying on a select number of supported systems. Read about the full list of importers in the guix import section of the manual (@pxref{Invoking guix import,,, guix, GNU Guix Reference Manual})." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1494 msgid "Guix can be smart enough to check for updates on systems it knows. It can report outdated package definitions with" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1497 #, no-wrap msgid "$ guix refresh hello\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1502 msgid "In most cases, updating a package to a newer version requires little more than changing the version number and the checksum. Guix can do that automatically as well:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1505 #, no-wrap msgid "$ guix refresh hello --update\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1512 msgid "If you've started browsing the existing package definitions, you might have noticed that a significant number of them have a @code{inherit} field:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1527 #, no-wrap msgid "" "(define-public adwaita-icon-theme\n" " (package (inherit gnome-icon-theme)\n" " (name \"adwaita-icon-theme\")\n" " (version \"3.26.1\")\n" " (source (origin\n" " (method url-fetch)\n" " (uri (string-append \"mirror://gnome/sources/\" name \"/\"\n" " (version-major+minor version) \"/\"\n" " name \"-\" version \".tar.xz\"))\n" " (sha256\n" " (base32\n" " \"17fpahgh5dyckgz7rwqvzgnhx53cx9kr2xw0szprc6bnqy977fi8\"))))\n" " (native-inputs (list `(,gtk+ \"bin\")))))\n" msgstr "" "(define-public adwaita-icon-theme\n" " (package (inherit gnome-icon-theme)\n" " (name \"adwaita-icon-theme\")\n" " (version \"3.26.1\")\n" " (source (origin\n" " (method url-fetch)\n" " (uri (string-append \"mirror://gnome/sources/\" name \"/\"\n" " (version-major+minor version) \"/\"\n" " name \"-\" version \".tar.xz\"))\n" " (sha256\n" " (base32\n" " \"17fpahgh5dyckgz7rwqvzgnhx53cx9kr2xw0szprc6bnqy977fi8\"))))\n" " (native-inputs (list `(,gtk+ \"bin\")))))\n" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1532 msgid "All unspecified fields are inherited from the parent package. This is very convenient to create alternative packages, for instance with different source, version or compilation options." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1540 msgid "Sadly, some applications can be tough to package. Sometimes they need a patch to work with the non-standard file system hierarchy enforced by the store. Sometimes the tests won't run properly. (They can be skipped but this is not recommended.) Other times the resulting package won't be reproducible." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1543 msgid "Should you be stuck, unable to figure out how to fix any sort of packaging issue, don't hesitate to ask the community for help." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1545 msgid "See the @uref{https://www.gnu.org/software/guix/contact/, Guix homepage} for information on the mailing lists, IRC, etc." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1553 msgid "This tutorial was a showcase of the sophisticated package management that Guix boasts. At this point we have mostly restricted this introduction to the @code{gnu-build-system} which is a core abstraction layer on which more advanced abstractions are based." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1558 msgid "Where do we go from here? Next we ought to dissect the innards of the build system by removing all abstractions, using the @code{trivial-build-system}: this should give us a thorough understanding of the process before investigating some more advanced packaging techniques and edge cases." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1561 msgid "Other features worth exploring are the interactive editing and debugging capabilities of Guix provided by the Guile REPL@." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1566 msgid "Those fancy features are completely optional and can wait; now is a good time to take a well-deserved break. With what we've introduced here you should be well armed to package lots of programs. You can get started right away and hopefully we will see your contributions soon!" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:1573 msgid "The @uref{https://www.gnu.org/software/guix/manual/en/html_node/Defining-Packages.html, package reference in the manual}" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:1576 msgid "@uref{https://gitlab.com/pjotrp/guix-notes/blob/master/HACKING.org, Pjotr’s hacking guide to GNU Guix}" msgstr "" #. type: itemize #: guix-git/doc/guix-cookbook.texi:1579 msgid "@uref{https://www.gnu.org/software/guix/guix-ghm-andreas-20130823.pdf, ``GNU Guix: Package without a scheme!''}, by Andreas Enge" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1588 msgid "Guix offers a flexible language for declaratively configuring your Guix System. This flexibility can at times be overwhelming. The purpose of this chapter is to demonstrate some advanced configuration concepts." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1591 msgid "@pxref{System Configuration,,, guix, GNU Guix Reference Manual} for a complete reference." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1618 msgid "While the Guix manual explains auto-login one user to @emph{all} TTYs ( @pxref{auto-login to TTY,,, guix, GNU Guix Reference Manual}), some might prefer a situation, in which one user is logged into one TTY with the other TTYs either configured to login different users or no one at all. Note that one can auto-login one user to any TTY, but it is usually advisable to avoid @code{tty1}, which, by default, is used to log warnings and errors." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1620 msgid "Here is how one might set up auto login for one user to one tty:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1628 #, no-wrap msgid "" "(define (auto-login-to-tty config tty user)\n" " (if (string=? tty (mingetty-configuration-tty config))\n" " (mingetty-configuration\n" " (inherit config)\n" " (auto-login user))\n" " config))\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1635 #, no-wrap msgid "" "(define %my-services\n" " (modify-services %base-services\n" " ;; @dots{}\n" " (mingetty-service-type config =>\n" " (auto-login-to-tty\n" " config \"tty3\" \"alice\"))))\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1639 #, no-wrap msgid "" "(operating-system\n" " ;; @dots{}\n" " (services %my-services))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1644 msgid "One could also @code{compose} (@pxref{Higher-Order Functions,,, guile, The Guile Reference Manual}) @code{auto-login-to-tty} to login multiple users to multiple ttys." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1651 msgid "Finally, here is a note of caution. Setting up auto login to a TTY, means that anyone can turn on your computer and run commands as your regular user. However, if you have an encrypted root partition, and thus already need to enter a passphrase when the system boots, auto-login might be a convenient option." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1663 msgid "Guix is, at its core, a source based distribution with substitutes (@pxref{Substitutes,,, guix, GNU Guix Reference Manual}), and as such building packages from their source code is an expected part of regular package installations and upgrades. Given this starting point, it makes sense that efforts are made to reduce the amount of time spent compiling packages, and recent changes and upgrades to the building and distribution of substitutes continues to be a topic of discussion within Guix." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1669 msgid "The kernel, while not requiring an overabundance of RAM to build, does take a rather long time on an average machine. The official kernel configuration, as is the case with many GNU/Linux distributions, errs on the side of inclusiveness, and this is really what causes the build to take such a long time when the kernel is built from source." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1674 msgid "The Linux kernel, however, can also just be described as a regular old package, and as such can be customized just like any other package. The procedure is a little bit different, although this is primarily due to the nature of how the package definition is written." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1677 msgid "The @code{linux-libre} kernel package definition is actually a procedure which creates a package." msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1688 #, no-wrap msgid "" "(define* (make-linux-libre* version gnu-revision source supported-systems\n" " #:key\n" " (extra-version #f)\n" " ;; A function that takes an arch and a variant.\n" " ;; See kernel-config for an example.\n" " (configuration-file #f)\n" " (defconfig \"defconfig\")\n" " (extra-options (default-extra-linux-options version)))\n" " ...)\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1692 msgid "The current @code{linux-libre} package is for the 5.15.x series, and is declared like this:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1701 #, no-wrap msgid "" "(define-public linux-libre-5.15\n" " (make-linux-libre* linux-libre-5.15-version\n" " linux-libre-5.15-gnu-revision\n" " linux-libre-5.15-source\n" " '(\"x86_64-linux\" \"i686-linux\" \"armhf-linux\"\n" " \"aarch64-linux\" \"riscv64-linux\")\n" " #:configuration-file kernel-config))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1708 msgid "Any keys which are not assigned values inherit their default value from the @code{make-linux-libre} definition. When comparing the two snippets above, notice the code comment that refers to @code{#:configuration-file}. Because of this, it is not actually easy to include a custom kernel configuration from the definition, but don't worry, there are other ways to work with what we do have." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1714 msgid "There are two ways to create a kernel with a custom kernel configuration. The first is to provide a standard @file{.config} file during the build process by including an actual @file{.config} file as a native input to our custom kernel. The following is a snippet from the custom @code{'configure} phase of the @code{make-linux-libre} package definition:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1718 #, no-wrap msgid "" "(let ((build (assoc-ref %standard-phases 'build))\n" " (config (assoc-ref (or native-inputs inputs) \"kconfig\")))\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1726 #, no-wrap msgid "" " ;; Use a custom kernel configuration file or a default\n" " ;; configuration file.\n" " (if config\n" " (begin\n" " (copy-file config \".config\")\n" " (chmod \".config\" #o666))\n" " (invoke \"make\" ,defconfig)))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1731 msgid "Below is a sample kernel package. The @code{linux-libre} package is nothing special and can be inherited from and have its fields overridden like any other package:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1740 #, no-wrap msgid "" "(define-public linux-libre/E2140\n" " (package\n" " (inherit linux-libre)\n" " (native-inputs\n" " `((\"kconfig\" ,(local-file \"E2140.config\"))\n" " ,@@(alist-delete \"kconfig\"\n" " (package-native-inputs linux-libre))))))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1747 msgid "In the same directory as the file defining @code{linux-libre-E2140} is a file named @file{E2140.config}, which is an actual kernel configuration file. The @code{defconfig} keyword of @code{make-linux-libre} is left blank here, so the only kernel configuration in the package is the one which was included in the @code{native-inputs} field." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1752 msgid "The second way to create a custom kernel is to pass a new value to the @code{extra-options} keyword of the @code{make-linux-libre} procedure. The @code{extra-options} keyword works with another function defined right below it:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1768 #, no-wrap msgid "" "(define (default-extra-linux-options version)\n" " `(;; https://lists.gnu.org/archive/html/guix-devel/2014-04/msg00039.html\n" " (\"CONFIG_DEVPTS_MULTIPLE_INSTANCES\" . #true)\n" " ;; Modules required for initrd:\n" " (\"CONFIG_NET_9P\" . m)\n" " (\"CONFIG_NET_9P_VIRTIO\" . m)\n" " (\"CONFIG_VIRTIO_BLK\" . m)\n" " (\"CONFIG_VIRTIO_NET\" . m)\n" " (\"CONFIG_VIRTIO_PCI\" . m)\n" " (\"CONFIG_VIRTIO_BALLOON\" . m)\n" " (\"CONFIG_VIRTIO_MMIO\" . m)\n" " (\"CONFIG_FUSE_FS\" . m)\n" " (\"CONFIG_CIFS\" . m)\n" " (\"CONFIG_9P_FS\" . m)))\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1779 #, no-wrap msgid "" "(define (config->string options)\n" " (string-join (map (match-lambda\n" " ((option . 'm)\n" " (string-append option \"=m\"))\n" " ((option . #true)\n" " (string-append option \"=y\"))\n" " ((option . #false)\n" " (string-append option \"=n\")))\n" " options)\n" " \"\\n\"))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1782 msgid "And in the custom configure script from the `make-linux-libre` package:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1790 #, no-wrap msgid "" ";; Appending works even when the option wasn't in the\n" ";; file. The last one prevails if duplicated.\n" "(let ((port (open-file \".config\" \"a\"))\n" " (extra-configuration ,(config->string extra-options)))\n" " (display extra-configuration port)\n" " (close-port port))\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1792 #, no-wrap msgid "(invoke \"make\" \"oldconfig\")\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1797 msgid "So by not providing a configuration-file the @file{.config} starts blank, and then we write into it the collection of flags that we want. Here's another custom kernel:" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1805 #, no-wrap msgid "" "(define %macbook41-full-config\n" " (append %macbook41-config-options\n" " %file-systems\n" " %efi-support\n" " %emulation\n" " ((@@@@ (gnu packages linux) default-extra-linux-options) version)))\n" "\n" msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1816 #, no-wrap msgid "" "(define-public linux-libre-macbook41\n" " ;; XXX: Access the internal 'make-linux-libre*' procedure, which is\n" " ;; private and unexported, and is liable to change in the future.\n" " ((@@@@ (gnu packages linux) make-linux-libre*)\n" " (@@@@ (gnu packages linux) linux-libre-version)\n" " (@@@@ (gnu packages linux) linux-libre-gnu-revision)\n" " (@@@@ (gnu packages linux) linux-libre-source)\n" " '(\"x86_64-linux\")\n" " #:extra-version \"macbook41\"\n" " #:extra-options %macbook41-config-options))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1824 msgid "In the above example @code{%file-systems} is a collection of flags enabling different file system support, @code{%efi-support} enables EFI support and @code{%emulation} enables a x86_64-linux machine to act in 32-bit mode also. The @code{default-extra-linux-options} procedure is the one defined above, which had to be used to avoid loosing the default configuration options of the @code{extra-options} keyword." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1833 msgid "This all sounds like it should be doable, but how does one even know which modules are required for a particular system? Two places that can be helpful in trying to answer this question is the @uref{https://wiki.gentoo.org/wiki/Handbook:AMD64/Installation/Kernel, Gentoo Handbook} and the @uref{https://www.kernel.org/doc/html/latest/admin-guide/README.html?highlight=localmodconfig, documentation from the kernel itself}. From the kernel documentation, it seems that @code{make localmodconfig} is the command we want." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1836 msgid "In order to actually run @code{make localmodconfig} we first need to get and unpack the kernel source code:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1839 #, no-wrap msgid "tar xf $(guix build linux-libre --source)\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1846 msgid "Once inside the directory containing the source code run @code{touch .config} to create an initial, empty @file{.config} to start with. @code{make localmodconfig} works by seeing what you already have in @file{.config} and letting you know what you're missing. If the file is blank then you're missing everything. The next step is to run:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1849 #, no-wrap msgid "guix shell -D linux-libre -- make localmodconfig\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1854 msgid "and note the output. Do note that the @file{.config} file is still empty. The output generally contains two types of warnings. The first start with \"WARNING\" and can actually be ignored in our case. The second read:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1857 #, no-wrap msgid "module pcspkr did not have configs CONFIG_INPUT_PCSPKR\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1862 msgid "For each of these lines, copy the @code{CONFIG_XXXX_XXXX} portion into the @file{.config} in the directory, and append @code{=m}, so in the end it looks like this:" msgstr "" #. type: example #: guix-git/doc/guix-cookbook.texi:1866 #, no-wrap msgid "" "CONFIG_INPUT_PCSPKR=m\n" "CONFIG_VIRTIO=m\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1875 msgid "After copying all the configuration options, run @code{make localmodconfig} again to make sure that you don't have any output starting with ``module''. After all of these machine specific modules there are a couple more left that are also needed. @code{CONFIG_MODULES} is necessary so that you can build and load modules separately and not have everything built into the kernel. @code{CONFIG_BLK_DEV_SD} is required for reading from hard drives. It is possible that there are other modules which you will need." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1879 msgid "This post does not aim to be a guide to configuring your own kernel however, so if you do decide to build a custom kernel you'll have to seek out other guides to create a kernel which is just right for your needs." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1887 msgid "The second way to setup the kernel configuration makes more use of Guix's features and allows you to share configuration segments between different kernels. For example, all machines using EFI to boot have a number of EFI configuration flags that they need. It is likely that all the kernels will share a list of file systems to support. By using variables it is easier to see at a glance what features are enabled and to make sure you don't have features in one kernel but missing in another." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1892 msgid "Left undiscussed however, is Guix's initrd and its customization. It is likely that you'll need to modify the initrd on a machine using a custom kernel, since certain modules which are expected to be built may not be available for inclusion into the initrd." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1899 msgid "Historically, Guix System is centered around an @code{operating-system} structure. This structure contains various fields ranging from the bootloader and kernel declaration to the services to install." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1905 msgid "Depending on the target machine, that can go from a standard @code{x86_64} machine to a small ARM single board computer such as the Pine64, the image constraints can vary a lot. The hardware manufacturers will impose different image formats with various partition sizes and offsets." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1910 msgid "To create images suitable for all those machines, a new abstraction is necessary: that's the goal of the @code{image} record. This record contains all the required information to be transformed into a standalone image, that can be directly booted on any target machine." msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1932 #, no-wrap msgid "" "(define-record-type* <image>\n" " image make-image\n" " image?\n" " (name image-name ;symbol\n" " (default #f))\n" " (format image-format) ;symbol\n" " (target image-target\n" " (default #f))\n" " (size image-size ;size in bytes as integer\n" " (default 'guess))\n" " (operating-system image-operating-system ;<operating-system>\n" " (default #f))\n" " (partitions image-partitions ;list of <partition>\n" " (default '()))\n" " (compression? image-compression? ;boolean\n" " (default #t))\n" " (volatile-root? image-volatile-root? ;boolean\n" " (default #t))\n" " (substitutable? image-substitutable? ;boolean\n" " (default #t)))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1938 msgid "This record contains the operating-system to instantiate. The @code{format} field defines the image type and can be @code{efi-raw}, @code{qcow2} or @code{iso9660} for instance. In the future, it could be extended to @code{docker} or other image types." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1941 msgid "A new directory in the Guix sources is dedicated to images definition. For now there are four files:" msgstr "" #. type: file{#1} #: guix-git/doc/guix-cookbook.texi:1943 #, no-wrap msgid "gnu/system/images/hurd.scm" msgstr "" #. type: file{#1} #: guix-git/doc/guix-cookbook.texi:1944 #, no-wrap msgid "gnu/system/images/pine64.scm" msgstr "" #. type: file{#1} #: guix-git/doc/guix-cookbook.texi:1945 #, no-wrap msgid "gnu/system/images/novena.scm" msgstr "" #. type: file{#1} #: guix-git/doc/guix-cookbook.texi:1946 #, no-wrap msgid "gnu/system/images/pinebook-pro.scm" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1952 msgid "Let's have a look to @file{pine64.scm}. It contains the @code{pine64-barebones-os} variable which is a minimal definition of an operating-system dedicated to the @b{Pine A64 LTS} board." msgstr "" #. type: lisp #: guix-git/doc/guix-cookbook.texi:1976 #, no-wrap msgid "" "(define pine64-barebones-os\n" " (operating-system\n" " (host-name \"vignemale\")\n" " (timezone \"Europe/Paris\")\n" " (locale \"en_US.utf8\")\n" " (bootloader (bootloader-configuration\n" " (bootloader u-boot-pine64-lts-bootloader)\n" " (targets '(\"/dev/vda\"))))\n" " (initrd-modules '())\n" " (kernel linux-libre-arm64-generic)\n" " (file-systems (cons (file-system\n" " (device (file-system-label \"my-root\"))\n" " (mount-point \"/\")\n" " (type \"ext4\"))\n" " %base-file-systems))\n" " (services (cons (service agetty-service-type\n" " (agetty-configuration\n" " (extra-options '(\"-L\")) ; no carrier detect\n" " (baud-rate \"115200\")\n" " (term \"vt100\")\n" " (tty \"ttyS0\")))\n" " %base-services))))\n" msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1980 msgid "The @code{kernel} and @code{bootloader} fields are pointing to packages dedicated to this board." msgstr "" #. type: Plain text #: guix-git/doc/guix-cookbook.texi:1982 msgid "Right below, the @code{pine64-image-type} variable is also defined." msgstr "" #. type: lisp #: guix-git/doc/gu