(command.CommandList
  children: [
    (command.ShFunction
      name: getpassword
      body: 
        (command.BraceGroup
          children: [
            (command.WhileUntil
              keyword: <Id.KW_Until until>
              cond: [
                (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>})]
                    )
                    (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>})]
                    )
                  ]
                )
            )
            (C {<echo>} {(DQ ($ Id.VSub_DollarName '$password'))})
          ]
        )
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:pw)
          op: assign_op.Equal
          rhs: 
            {
              (command_sub
                left_token: <Id.Left_Backtick '`'>
                command_list: 
                  (command.CommandList
                    children: [
                      (C {<getpassword>} 
                        {
                          (DQ 
                            (braced_var_sub
                              token: <Id.VSub_Number 1>
                              suffix_op: (suffix_op.Unary op_id:Id.VTest_ColonHyphen arg_word:{<blah>})
                            )
                          )
                        }
                      )
                    ]
                  )
              )
            }
          spids: [114]
        )
      ]
    )
    (C {<echo>} {(DQ <"password is '"> ($ Id.VSub_DollarName '$pw') <"'">)})
  ]
)