(command.CommandList
  children: [
    (command.ShFunction
      name: getpassword
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.WhileUntil
              keyword: <Id.KW_Until until>
              cond: 
                (condition.Shell
                  commands: [
                    (command.Sentence
                      child: 
                        (C {<Id.Lit_LBracket '['>} {(DQ ($ Id.VSub_DollarName password))} 
                          {<Id.Lit_Equals '='>} {(DQ ($ Id.VSub_DollarName rpassword))} {<-a>} {<-n>} {(DQ ($ Id.VSub_DollarName password))} 
                          {<Id.Lit_RBracket ']'>}
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                )
              body: 
                (command.DoGroup
                  children: [
                    (command.Sentence
                      child: 
                        (C {<read>} {<-s>} {<-p>} 
                          {(DQ <'Enter a password for user \''> ($ Id.VSub_Number 1) <'\' : '>)} {<password>}
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.Simple
                      words: [{<echo>}]
                      redirects: [(redir op:<Id.Redir_GreatAnd '>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
                      more_env: []
                      do_fork: T
                    )
                    (command.Sentence
                      child: 
                        (C {<read>} {<-s>} {<-p>} 
                          {(DQ <'Reenter password for user \''> ($ Id.VSub_Number 1) <'\' : '>)} {<rpassword>}
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.Simple
                      words: [{<echo>}]
                      redirects: [(redir op:<Id.Redir_GreatAnd '>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
                      more_env: []
                      do_fork: T
                    )
                  ]
                )
              redirects: []
            )
            (C {<echo>} {(DQ ($ Id.VSub_DollarName password))})
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'pw='> name:pw)
          op: assign_op.Equal
          rhs: 
            {
              (command_sub
                left_token: <Id.Left_Backtick '`'>
                child: 
                  (C {<getpassword>} 
                    {
                      (DQ 
                        (braced_var_sub
                          left: <Id.Left_DollarBrace '${'>
                          token: <Id.VSub_Number 1>
                          var_name: 1
                          suffix_op: (suffix_op.Unary op:<Id.VTest_ColonHyphen _> arg_word:{<blah>})
                          right: <Id.Right_DollarBrace '}'>
                        )
                      )
                    }
                  )
                right: <Id.Backtick_Right '`'>
              )
            }
          spids: [114]
        )
      ]
      redirects: []
    )
    (C {<echo>} {(DQ <'password is \''> ($ Id.VSub_DollarName pw) <'\''>)})
  ]
)