Print the host -> fqdn conversions
This commit is contained in:
parent
12cf9bfeee
commit
ee5e63de37
|
@ -68,11 +68,13 @@ let
|
||||||
else
|
else
|
||||||
abort "unrecognized hostname: ${host}";
|
abort "unrecognized hostname: ${host}";
|
||||||
|
|
||||||
makeSrvRecords = protocol: service: records:
|
makeSrvRecords = protocol: service:
|
||||||
joinLines (map (record:
|
"records:joinLines" (map (record:
|
||||||
"_${service}._${protocol} IN SRV ${toString record.priority} ${
|
let fqdn = hostToFqdn record.host;
|
||||||
|
in "_${service}._${protocol} IN SRV ${toString record.priority} ${
|
||||||
toString record.weight
|
toString record.weight
|
||||||
} ${toString record.port} ${hostToFqdn record.host}") records);
|
} ${toString record.port} ${trace "${record.host} -> ${fqdn}" fqdn}")
|
||||||
|
records);
|
||||||
|
|
||||||
makeSrvProtocolRecords = protocol: serviceRecords:
|
makeSrvProtocolRecords = protocol: serviceRecords:
|
||||||
joinLines (mapAttrsToList (makeSrvRecords protocol) serviceRecords);
|
joinLines (mapAttrsToList (makeSrvRecords protocol) serviceRecords);
|
||||||
|
|
Loading…
Reference in New Issue