mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2025-01-18 21:46:35 +01:00
installer: Add static-networking template.
* gnu/installer/services.scm (%system-services): Add static-networking-service-type. Change-Id: Iec6336f8d1f49e8b801e978d5c9eeb4f83a6e748
This commit is contained in:
parent
687a2ccabc
commit
711855cb00
1 changed files with 22 additions and 0 deletions
|
@ -149,6 +149,28 @@ (define (%system-services)
|
|||
(name (G_ "DHCP client (dynamic IP address assignment)"))
|
||||
(type 'network-management)
|
||||
(snippet '((service dhcp-client-service-type))))
|
||||
(system-service
|
||||
(name (G_ "Static networking service."))
|
||||
(type 'network-management)
|
||||
(snippet `((service
|
||||
static-networking-service-type
|
||||
(list %loopback-static-networking
|
||||
(static-networking
|
||||
(addresses
|
||||
(list
|
||||
(network-address
|
||||
(device "eth0")
|
||||
,(comment (G_ ";; Fill-in your IP.\n"))
|
||||
(value "192.168.178.10/24"))))
|
||||
(routes
|
||||
(list (network-route
|
||||
(destination "default")
|
||||
,(comment (G_ ";; Fill-in your gateway IP.\n"))
|
||||
(gateway "192.168.178.1"))))
|
||||
(requirement '())
|
||||
(provision '(networking))
|
||||
,(comment (G_ ";; Fill-in your nameservers.\n"))
|
||||
(name-servers '("192.168.178.1"))))))))
|
||||
|
||||
;; Dealing with documents.
|
||||
(system-service
|
||||
|
|
Loading…
Reference in a new issue