(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:compress)
          op: assign_op.Equal
          rhs: {(DQ <bzip2>)}
          spids: [20]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:inclist)
          op: assign_op.Equal
          rhs: 
            {
              (DQ <'/tmp/backup.inclist.'> 
                (command_sub
                  left_token: <Id.Left_DollarParen '$('>
                  child: 
                    (C {<date>} 
                      {<Id.Lit_Other '+'> <Id.Lit_Other '%'> <d> <Id.Lit_Other '%'> <m> 
                        <Id.Lit_Other '%'> <y>
                      }
                    )
                )
              )
            }
          spids: [28]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:output)
          op: assign_op.Equal
          rhs: 
            {
              (DQ <'/tmp/backup.'> 
                (command_sub
                  left_token: <Id.Left_DollarParen '$('>
                  child: 
                    (C {<date>} 
                      {<Id.Lit_Other '+'> <Id.Lit_Other '%'> <d> <Id.Lit_Other '%'> <m> 
                        <Id.Lit_Other '%'> <y>
                      }
                    )
                ) <.bz2>
              )
            }
          spids: [45]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:tsfile)
          op: assign_op.Equal
          rhs: {(DQ ($ Id.VSub_DollarName '$HOME') <'/.backup.timestamp'>)}
          spids: [63]
        )
      ]
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:btype)
          op: assign_op.Equal
          rhs: {(DQ <incremental>)}
          spids: [70]
        )
      ]
    )
    (command.ShAssignment
      pairs: [(assign_pair lhs:(sh_lhs_expr.Name name:noinc) op:assign_op.Equal rhs:{<0>} spids:[79])]
    )
    (C {<trap>} {(DQ <'/bin/rm -f '> ($ Id.VSub_DollarName '$inclist'))} {<EXIT>})
    (command.ShFunction
      name: usageQuit
      body: 
        (BraceGroup
          children: [
            (command.Simple
              words: [{<cat>}]
              redirects: [
                (redir
                  op: <Id.Redir_DLess '<<'>
                  loc: (redir_loc.Fd fd:0)
                  arg: 
                    (redir_param.HereDoc
                      here_begin: {(DQ <EOF>)}
                      here_end_span_id: 118
                      stdin_parts: [
                        <'Usage: $0 [-o output] [-i|-f] [-n]\n'>
                        <'  -o lets you specify an alternative backup file/device,\n'>
                        <'  -i is an incremental, -f is a full backup, and -n prevents\n'>
                        <'  updating the timestamp when an incremental backup is done.\n'>
                      ]
                    )
                )
                (redir op:<Id.Redir_GreatAnd '>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})
              ]
              do_fork: T
            )
            (command.ControlFlow token:<Id.ControlFlow_Exit exit> arg_word:{<1>})
          ]
        )
    )
    (command.WhileUntil
      keyword: <Id.KW_While while>
      cond: 
        (condition.Shell
          commands: [
            (command.Sentence
              child: (C {<getopts>} {(DQ <'o:ifn'>)} {<arg>})
              terminator: <Id.Op_Semi _>
            )
          ]
        )
      body: 
        (command.DoGroup
          children: [
            (command.Case
              to_match: {(DQ ($ Id.VSub_DollarName '$opt'))}
              arms: [
                (case_arm
                  pat_list: [{<o>}]
                  action: [
                    (command.Sentence
                      child: 
                        (command.ShAssignment
                          pairs: [
                            (assign_pair
                              lhs: (sh_lhs_expr.Name name:output)
                              op: assign_op.Equal
                              rhs: {(DQ ($ Id.VSub_DollarName '$OPTARG'))}
                              spids: [158]
                            )
                          ]
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [154 156 164 -1]
                )
                (case_arm
                  pat_list: [{<i>}]
                  action: [
                    (command.Sentence
                      child: 
                        (command.ShAssignment
                          pairs: [
                            (assign_pair
                              lhs: (sh_lhs_expr.Name name:btype)
                              op: assign_op.Equal
                              rhs: {(DQ <incremental>)}
                              spids: [174]
                            )
                          ]
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [170 172 180 -1]
                )
                (case_arm
                  pat_list: [{<f>}]
                  action: [
                    (command.Sentence
                      child: 
                        (command.ShAssignment
                          pairs: [
                            (assign_pair
                              lhs: (sh_lhs_expr.Name name:btype)
                              op: assign_op.Equal
                              rhs: {(DQ <full>)}
                              spids: [187]
                            )
                          ]
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [183 185 193 -1]
                )
                (case_arm
                  pat_list: [{<n>}]
                  action: [
                    (command.Sentence
                      child: 
                        (command.ShAssignment
                          pairs: [
                            (assign_pair
                              lhs: (sh_lhs_expr.Name name:noinc)
                              op: assign_op.Equal
                              rhs: {<1>}
                              spids: [200]
                            )
                          ]
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [196 198 204 -1]
                )
                (case_arm
                  pat_list: [{<Id.Lit_QMark '?'>}]
                  action: [(C {<usageQuit>})]
                  spids: [207 209 213 -1]
                )
              ]
            )
          ]
        )
    )
    (C {<shift>} 
      {
        (word_part.ArithSub
          anode: 
            (arith_expr.Binary
              op_id: Id.Arith_Minus
              left: {($ Id.VSub_DollarName '$OPTIND')}
              right: {<Id.Lit_Digits 1>}
            )
        )
      }
    )
    (C {<echo>} 
      {
        (DQ <'Doing '> ($ Id.VSub_DollarName '$btype') <' backup, saving output to '> 
          ($ Id.VSub_DollarName '$output')
        )
      }
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:timestamp)
          op: assign_op.Equal
          rhs: 
            {
              (DQ 
                (command_sub
                  left_token: <Id.Left_DollarParen '$('>
                  child: (C {<date>} {<Id.Lit_Other '+'> (SQ <'%m%d%I%M'>)})
                )
              )
            }
          spids: [245]
        )
      ]
    )
    (command.If
      arms: [
        (if_arm
          cond: 
            (condition.Shell
              commands: [
                (command.Sentence
                  child: 
                    (C {<Id.Lit_LBracket '['>} {(DQ ($ Id.VSub_DollarName '$btype'))} 
                      {<Id.Lit_Equals '='>} {(DQ <incremental>)} {<Id.Lit_RBracket ']'>}
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
            )
          action: [
            (command.If
              arms: [
                (if_arm
                  cond: 
                    (condition.Shell
                      commands: [
                        (command.Sentence
                          child: 
                            (C {<Id.Lit_LBracket '['>} {<Id.KW_Bang '!'>} {<-f>} 
                              {($ Id.VSub_DollarName '$tsfile')} {<Id.Lit_RBracket ']'>}
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  action: [
                    (command.Simple
                      words: [
                        {<echo>}
                        {(DQ <'Error: can\'t do an incremental backup: no timestamp file'>)}
                      ]
                      redirects: [(redir op:<Id.Redir_GreatAnd '>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
                      do_fork: T
                    )
                    (command.ControlFlow
                      token: <Id.ControlFlow_Exit exit>
                      arg_word: {<1>}
                    )
                  ]
                  spids: [287 301]
                )
              ]
            )
            (command.Pipeline
              children: [
                (C {<find>} {($ Id.VSub_DollarName '$HOME')} {<-depth>} {<-type>} {<f>} {<-newer>} 
                  {($ Id.VSub_DollarName '$tsfile')} {<-user>} 
                  {
                    (braced_var_sub
                      token: <Id.VSub_Name USER>
                      suffix_op: (suffix_op.Unary tok:<Id.VTest_ColonHyphen ':-'> arg_word:{<LOGNAME>})
                    )
                  }
                )
                (C {<pax>} {<-w>} {<-x>} {<tar>})
                (command.Simple
                  words: [{($ Id.VSub_DollarName '$compress')}]
                  redirects: [
                    (redir
                      op: <Id.Redir_Great '>'>
                      loc: (redir_loc.Fd fd:1)
                      arg: {($ Id.VSub_DollarName '$output')}
                    )
                  ]
                  do_fork: T
                )
              ]
              negated: F
            )
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name name:failure)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_QMark '$?'))}
                  spids: [365]
                )
              ]
            )
          ]
          spids: [265 283]
        )
      ]
      else_action: [
        (command.Pipeline
          children: [
            (C {<find>} {($ Id.VSub_DollarName '$HOME')} {<-depth>} {<-type>} {<f>} {<-user>} 
              {
                (braced_var_sub
                  token: <Id.VSub_Name USER>
                  suffix_op: (suffix_op.Unary tok:<Id.VTest_ColonHyphen ':-'> arg_word:{<LOGNAME>})
                )
              }
            )
            (C {<pax>} {<-w>} {<-x>} {<tar>})
            (command.Simple
              words: [{($ Id.VSub_DollarName '$compress')}]
              redirects: [
                (redir
                  op: <Id.Redir_Great '>'>
                  loc: (redir_loc.Fd fd:1)
                  arg: {($ Id.VSub_DollarName '$output')}
                )
              ]
              do_fork: T
            )
          ]
          negated: F
        )
        (command.ShAssignment
          pairs: [
            (assign_pair
              lhs: (sh_lhs_expr.Name name:failure)
              op: assign_op.Equal
              rhs: {(DQ ($ Id.VSub_QMark '$?'))}
              spids: [412]
            )
          ]
        )
      ]
    )
    (command.If
      arms: [
        (if_arm
          cond: 
            (condition.Shell
              commands: [
                (command.Sentence
                  child: 
                    (C {<Id.Lit_LBracket '['>} {(DQ ($ Id.VSub_DollarName '$noinc'))} 
                      {<Id.Lit_Equals '='>} {(DQ <0>)} {<-a>} {(DQ ($ Id.VSub_DollarName '$failure'))} {<Id.Lit_Equals '='>} {(DQ <0>)} 
                      {<Id.Lit_RBracket ']'>}
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
            )
          action: [
            (C {<touch>} {<-t>} {($ Id.VSub_DollarName '$timestamp')} {($ Id.VSub_DollarName '$tsfile')})
          ]
          spids: [420 450]
        )
      ]
    )
    (command.ControlFlow token:<Id.ControlFlow_Exit exit> arg_word:{<0>})
  ]
)