;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2020 Simon South ;;; ;;; This file is part of GNU Guix. ;;; ;;; GNU Guix is free software; you can redistribute it and/or modify it ;;; under the terms of the GNU General Public License as published by ;;; the Free Software Foundation; either version 3 of the License, or (at ;;; your option) any later version. ;;; ;;; GNU Guix is distributed in the hope that it will be useful, but ;;; WITHOUT ANY WARRANTY; without even the implied warranty of ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;;; GNU General Public License for more details. ;;; ;;; You should have received a copy of the GNU General Public License ;;; along with GNU Guix. If not, see . (define-module (tests services file-sharing) #:use-module (gnu services file-sharing) #:use-module (srfi srfi-64)) ;;; Tests for the (gnu services file-sharing) module. (test-begin "file-sharing") ;;; ;;; Transmission Daemon. ;;; (define %transmission-salt-length 8) (define (valid-transmission-salt? salt) (and (string? salt) (eqv? (string-length salt) %transmission-salt-length))) (test-assert "transmission-random-salt" (valid-transmission-salt? (transmission-random-salt))) (test-equal "transmission-password-hash, typical values" "{ef6fba106cdef3aac64d1410090cae353cbecde53ceVVQO2" (transmission-password-hash "transmission" "3ceVVQO2")) (test-equal "transmission-password-hash, empty password" "{820f816515d8969d058d07a1de018650619ee7ffCp.I5SWg" (transmission-password-hash "" "Cp.I5SWg")) (test-error "transmission-password-hash, salt value too short" (transmission-password-hash "transmission" (make-string (- %transmission-salt-length 1) #\a))) (test-error "transmission-password-hash, salt value too long" (transmission-password-hash "transmission" (make-string (+ %transmission-salt-length 1) #\a))) (test-end "file-sharing") ass='path'>path: root/gnu/installer/aux-files
AgeCommit message (Expand)Author
2019-05-13installer: Use 'glibc-supported-locales'....The list of locales supported by glibc is now built from source. * gnu/installer/locale.scm (locale-string->locale): Add optional 'codeset' parameter and honor it. (supported-locales->locales): Rewrite to 'read' from SUPPORTED-LOCALES. * gnu/installer.scm (compute-locale-step): Pass the result of 'glibc-supported-locales' instead of the "aux-files/SUPPORTED" file. * gnu/installer/aux-files/SUPPORTED: Remove. * gnu/local.mk (dist_installer_DATA): Remove it. Ludovic Courtès
2019-01-17gnu: Add graphical installer support....* configure.ac: Require that guile-newt is available. * gnu/installer.scm: New file. * gnu/installer/aux-files/logo.txt: New file. * gnu/installer/build-installer.scm: New file. * gnu/installer/connman.scm: New file. * gnu/installer/keymap.scm: New file. * gnu/installer/locale.scm: New file. * gnu/installer/newt.scm: New file. * gnu/installer/newt/ethernet.scm: New file. * gnu/installer/newt/hostname.scm: New file. * gnu/installer/newt/keymap.scm: New file. * gnu/installer/newt/locale.scm: New file. * gnu/installer/newt/menu.scm: New file. * gnu/installer/newt/network.scm: New file. * gnu/installer/newt/page.scm: New file. * gnu/installer/newt/timezone.scm: New file. * gnu/installer/newt/user.scm: New file. * gnu/installer/newt/utils.scm: New file. * gnu/installer/newt/welcome.scm: New file. * gnu/installer/newt/wifi.scm: New file. * gnu/installer/steps.scm: New file. * gnu/installer/timezone.scm: New file. * gnu/installer/utils.scm: New file. * gnu/local.mk (GNU_SYSTEM_MODULES): Add previous files. * gnu/system.scm: Export %root-account. * gnu/system/install.scm (%installation-services): Use kmscon instead of linux VT for all tty. (installation-os)[users]: Add the graphical installer as shell of the root account. [packages]: Add font related packages. * po/guix/POTFILES.in: Add installer files. Mathieu Othacehe