[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: hydra: Update list of build hosts for berlin.guixsd.org.
From: |
Ricardo Wurmus |
Subject: |
01/01: hydra: Update list of build hosts for berlin.guixsd.org. |
Date: |
Fri, 11 Aug 2017 14:57:38 -0400 (EDT) |
rekado pushed a commit to branch master
in repository maintenance.
commit 449e121e19c53e165cf6be1b03f2977e9fe864f4
Author: Ricardo Wurmus <address@hidden>
Date: Fri Aug 11 20:57:00 2017 +0200
hydra: Update list of build hosts for berlin.guixsd.org.
---
hydra/machines-for-berlin.scm | 32 ++++++++++++++++++++++++--------
1 file changed, 24 insertions(+), 8 deletions(-)
diff --git a/hydra/machines-for-berlin.scm b/hydra/machines-for-berlin.scm
index 85135fb..fa8d70b 100644
--- a/hydra/machines-for-berlin.scm
+++ b/hydra/machines-for-berlin.scm
@@ -1,18 +1,34 @@
;; Install this file as /etc/guix/machines.scm on berlin.guixsd.org
-;; Hosted at the MDC, rack A2
-(define mdc-01
+;; These are all hosted at the MDC in rack A2. They are only
+;; accessible through berlin.guixsd.org, which is used as a gateway.
+(define hosts
+ '("192.168.0.2"
+ ;;"192.168.0.3"
+ ;;"192.168.0.4"
+ ;;"192.168.0.5"
+ ;;"192.168.0.6"
+ "192.168.0.7"
+ ;;"192.168.0.8"
+ "192.168.0.9"
+ ;;"192.168.0.10"
+ ;;"192.168.0.11"
+ "192.168.0.12"))
+
+(define (template-x86_64 ip)
(build-machine
- (name "141.80.181.41")
+ (name ip)
(user "hydra")
(system "x86_64-linux")
(host-key "ssh-rsa
AAAAB3NzaC1yc2EAAAAEJly77QAAAQEA9YhQax5gMmeDnl/i+2BUWw8zPTc1B4Ltdx6Wzvh/ZfhCvM/TDRbxKa3sq1w0PIsGqONtMJi3gZHRA1+0M55ha7HUs8TLQg8IKt2s+eiQ6mCDux/2ZwKu/C3MSSOqo1K+2sizGBS4yS8ncwr52rLfa5y2GzSUOjlk1LsrKwYInL4oaVcckboZVc8JKuYMRoYk2sAuGGELmtWA5fAXadIrSlh9LBT1Y74taQRt/UTtY0FeRj2qCqMECwH0585+5T0quO1HIqszeE4Epuuf9xaHenkH6ycT93HlulU8sDhU/mau4nCFHVHr311a3fLl3kBopSZZTcYLKv70cRLZ21mcWw==
root@(none)")
(speed 2)
(parallel-builds 2)))
-(define mdc-01-i686
- (build-machine (inherit mdc-01)
- (system "i686-linux")
- (parallel-builds 2)))
+(define (template-i686 ip)
+ (let ((m (template-x86_64 ip)))
+ (build-machine
+ (inherit m)
+ (system "i686-linux"))))
-(list mdc-01 mdc-01-i686)
+(append (map template-x86_64 hosts)
+ (map template-i686 hosts))