(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:tid) op: assign_op.Equal rhs: {(DQ <'putty KEX'>)} spids: [7] ) ] ) (command.If arms: [ (if_arm cond: (condition.Shell commands: [ (command.Sentence child: (C {<test>} {(DQ <x> ($ Id.VSub_DollarName '$REGRESS_INTEROP_PUTTY'))} {<Id.KW_Bang '!'> <Id.Lit_Equals '='>} {(DQ <xyes>)} ) terminator: <Id.Op_Semi _> ) ] ) action: [ (C {<echo>} {(DQ <'putty interop tests not enabled'>)}) (command.ControlFlow token:<Id.ControlFlow_Exit exit> arg_word:{<0>}) ] spids: [13 31] ) ] ) (command.ForEach iter_name: k iter_words: [{<dh-gex-sha1>} {<dh-group1-sha1>} {<dh-group14-sha1>}] do_arg_iter: F body: (command.DoGroup children: [ (C {<verbose>} {(DQ ($ Id.VSub_DollarName '$tid') <': kex '> ($ Id.VSub_DollarName '$k'))}) (C {<cp>} {(${ Id.VSub_Name OBJ) <'/.putty/sessions/localhost_proxy'>} {(${ Id.VSub_Name OBJ) <'/.putty/sessions/kex_'> ($ Id.VSub_DollarName '$k')} ) (command.Simple words: [{<echo>} {(DQ <'KEX='> ($ Id.VSub_DollarName '$k'))}] redirects: [ (redir op: <Id.Redir_DGreat '>>'> loc: (redir_loc.Fd fd:1) arg: {(${ Id.VSub_Name OBJ) <'/.putty/sessions/kex_'> ($ Id.VSub_DollarName '$k')} ) ] do_fork: T ) (C {<env>} {<Id.Lit_VarLike 'HOME='> ($ Id.VSub_DollarName '$PWD')} {(${ Id.VSub_Name PLINK)} {<-load>} {<kex_> ($ Id.VSub_DollarName '$k')} {<-batch>} {<-i>} {<putty.rsa2>} {<true>} ) (command.If arms: [ (if_arm cond: (condition.Shell commands: [ (command.Sentence child: (C {<Id.Lit_LBracket '['>} {($ Id.VSub_QMark '$?')} {<-ne>} {<0>} {<Id.Lit_RBracket ']'>} ) terminator: <Id.Op_Semi _> ) ] ) action: [(C {<fail>} {(DQ <'KEX '> ($ Id.VSub_DollarName '$k') <' failed'>)})] spids: [130 143] ) ] ) ] ) ) ] )