(command.CommandList children: [ (command.If arms: [ (if_arm cond: (condition.Shell commands: [ (command.Sentence child: (command.DBracket expr: (bool_expr.LogicalNot child: (bool_expr.Unary op_id: Id.BoolUnary_z child: {(DQ ($ Id.VSub_Number '$1'))} ) ) ) terminator: <Id.Op_Semi _> ) ] ) action: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:CLUSTERNAME) op: assign_op.Equal rhs: {(DQ ($ Id.VSub_Number '$1'))} spids: [69] ) ] ) ] spids: [51 66] ) ] ) (command.If arms: [ (if_arm cond: (condition.Shell commands: [ (command.Sentence child: (command.DBracket expr: (bool_expr.LogicalNot child: (bool_expr.Unary op_id:Id.BoolUnary_f child:{(DQ <cluster.txt>)}) ) ) terminator: <Id.Op_Semi _> ) ] ) action: [ (C {(DQ <'Error: cluster.txt not found'>)}) (command.ControlFlow token:<Id.ControlFlow_Exit exit>) ] spids: [76 91] ) ] ) (C {<echo>} {<-e>} {(DQ <'<html>'>)}) (C {<echo>} {<-e>} { (DQ <'<head>'> <Id.Lit_BadBackslash '\\'> <'n<title>Cluster '> ($ Id.VSub_DollarName '$CLUSTERNAME') <' members</title></head>'> ) } ) (C {<echo>} {<-e>} {(DQ <'<body>'>)}) (C {<echo>} {<-e>} { (DQ <'<font color=slategray>'> <Id.Lit_BadBackslash '\\'> <'n<h2>Cluster '> ($ Id.VSub_DollarName '$CLUSTERNAME') <' members</h2>'> <Id.Lit_BadBackslash '\\'> <'n</font>'> ) } ) (C {<echo>} {<-e>} { (DQ <'<table border='> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'>) <1> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'>) <'>'> ) } ) (command.WhileUntil keyword: <Id.KW_While while> cond: (condition.Shell commands: [ (command.Sentence child: (C {<read>} {<HOSTNAME>} {<MACADDR>} {<IPADDR>} {<ILOIPADDR>} {<DOMAIN>} {<ROLE>}) terminator: <Id.Op_Semi _> ) ] ) body: (command.DoGroup children: [ (command.If arms: [ (if_arm cond: (condition.Shell commands: [ (command.Sentence child: (command.DBracket expr: (bool_expr.Binary op_id: Id.BoolBinary_GlobEqual left: {(DQ ($ Id.VSub_DollarName '$ROLE'))} right: {(DQ <head>)} ) ) terminator: <Id.Op_Semi _> ) ] ) action: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:COLOR) op: assign_op.Equal rhs: {<red>} spids: [197] ) ] ) ] spids: [177 194] ) (if_arm cond: (condition.Shell commands: [ (command.Sentence child: (command.DBracket expr: (bool_expr.Binary op_id: Id.BoolBinary_GlobEqual left: {(DQ ($ Id.VSub_DollarName '$ROLE'))} right: {(DQ <bootstrap>)} ) ) terminator: <Id.Op_Semi _> ) ] ) action: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:COLOR) op: assign_op.Equal rhs: {<purple>} spids: [221] ) ] ) ] spids: [201 218] ) ] else_action: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:COLOR) op: assign_op.Equal rhs: {<black>} spids: [228] ) ] ) ] ) (C {<echo>} {<-e>} {(DQ <'<tr>'>)}) (C {<echo>} {<-e>} {(DQ <'<td>'> ($ Id.VSub_DollarName '$HOSTNAME') <'</td>'>)}) (C {<echo>} {<-e>} { (DQ <'<td><a href='> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'>) <'https://'> ($ Id.VSub_DollarName '$IPADDR') (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'>) <'>host</a></td>'> ) } ) (C {<echo>} {<-e>} { (DQ <'<td><a href='> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'>) <'https://'> ($ Id.VSub_DollarName '$ILOIPADDR') (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'>) <'>ilo</a></td>'> ) } ) (C {<echo>} {<-e>} {(DQ <'<td>'>)}) (C {<echo>} {<-e>} {(DQ <'<font color='> ($ Id.VSub_DollarName '$COLOR') <'>'>)}) (C {<echo>} {<-e>} {(DQ ($ Id.VSub_DollarName '$ROLE'))}) (C {<echo>} {<-e>} {(DQ <'</font>'>)}) (C {<echo>} {<-e>} {(DQ <'</td>'>)}) (C {<echo>} {<-e>} {(DQ <'</tr>'>)}) ] ) redirects: [(redir op:<Id.Redir_Less '<'> loc:(redir_loc.Fd fd:0) arg:{<cluster.txt>})] ) (C {<echo>} {<-e>} {(DQ <'</table>'>)}) (C {<echo>} {<-e>} {(DQ <'</body>'>)}) (C {<echo>} {<-e>} {(DQ <'</html>'>)}) ] )