(command.CommandList children: [ (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:duration) op:Equal rhs:{(0)})] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:buckets) op: Equal rhs: {(word_part.ArrayLiteralPart words:[{(1)} {(8)} {(64)} {(128)}])} ) ] ) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:secsz) op:Equal rhs:{(512)})] ) (C {(trap)} {(SQ <':'>)} {(INT)} {(QUIT)} {(TERM)} {(PIPE)} {(HUP)}) (command.FuncDef name: usage body: (command.BraceGroup children: [ (command.SimpleCommand words: [{(cat)}] redirects: [ (redir.HereDoc op: <Redir_DLessDash '<<-'> fd: 16777215 here_begin: {(END)} here_end_span_id: 194 stdin_parts: [ ('USAGE: bitesize [-h] [-b buckets] [seconds]\n') (' -b buckets # specify histogram buckets (Kbytes)\n') (' -h # this usage message\n') (' eg,\n') (' bitesize # trace I/O size until Ctrl-C\n') (' bitesize 10 # trace I/O size for 10 seconds\n') (' bitesize -b ') (Right_DoubleQuote '"') ('8 16 32') (Right_DoubleQuote '"') (' # specify custom bucket points\n') ] ) (redir.Redir op:<Redir_GreatAnd '>&'> fd:16777215 arg_word:{(2)}) ] ) (command.ControlFlow token:<ControlFlow_Exit exit>) ] ) ) (command.FuncDef name: die body: (command.BraceGroup children: [ (command.SimpleCommand words: [{(echo)} {(DQ ($ VSub_At '$@'))}] redirects: [(redir.Redir op:<Redir_GreatAnd '>&'> fd:16777215 arg_word:{(2)})] ) (command.ControlFlow token:<ControlFlow_Exit exit> arg_word:{(1)}) ] ) ) (command.WhileUntil keyword: <KW_While while> cond: [(C {(getopts)} {(b) (Lit_Other ':') (h)} {(opt)})] body: (command.DoGroup children: [ (command.Case to_match: {($ VSub_DollarName '$opt')} arms: [ (case_arm pat_list: [{(b)}] action: [ (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:buckets) op: Equal rhs: {(word_part.ArrayLiteralPart words:[{($ VSub_DollarName '$OPTARG')}])} ) ] ) ] ) (case_arm pat_list:[{(h)} {(Lit_Other '?')}] action:[(C {(usage)})]) ] ) ] ) ) (C {(shift)} { (word_part.ArithSubPart anode: (arith_expr.ArithBinary op_id: Arith_Minus left: (arith_expr.ArithWord w:{($ VSub_DollarName '$OPTIND')}) right: (arith_expr.ArithWord w:{(Lit_Digits 1)}) ) ) } ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:tpoint) op: Equal rhs: {(block) (Lit_Other ':') (block_rq_issue)} ) ] ) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:var) op:Equal rhs:{(nr_sector)})] ) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:duration) op:Equal rhs:{($ VSub_Number '$1')})] ) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:i) op:Equal rhs:{(0)})] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:sectors) op: Equal rhs: { (word_part.ArrayLiteralPart words: [ { (word_part.BracedVarSub token: <VSub_Name buckets> bracket_op: (bracket_op.WholeArray op_id:Arith_Star) ) } ] ) } ) ] ) (command.DParen child: (arith_expr.BinaryAssign op_id: Arith_Equal left: (lhs_expr.LhsName name:max_i) right: (arith_expr.ArithBinary op_id: Arith_Minus left: (arith_expr.ArithWord w: { (word_part.BracedVarSub token: <VSub_Name buckets> prefix_op: VSub_Pound bracket_op: (bracket_op.WholeArray op_id:Arith_Star) ) } ) right: (arith_expr.ArithWord w:{(Lit_Digits 1)}) ) ) ) (command.WhileUntil keyword: <KW_While while> cond: [ (command.Sentence child: (command.DParen child: (arith_expr.ArithBinary op_id: Arith_LessEqual left: (arith_expr.ArithVarRef token:<Lit_ArithVarLike i>) right: (arith_expr.ArithVarRef token:<Lit_ArithVarLike max_i>) ) ) terminator: <Op_Semi ';'> ) ] body: (command.DoGroup children: [ (command.DParen child: (arith_expr.BinaryAssign op_id: Arith_Equal left: (lhs_expr.LhsIndexedName name: sectors index: (arith_expr.ArithWord w:{($ VSub_DollarName '$i')}) ) right: (arith_expr.ArithBinary op_id: Arith_Slash left: (arith_expr.ArithBinary op_id: Arith_Star left: (arith_expr.ArithWord w: { (word_part.BracedVarSub token: <VSub_Name sectors> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithWord w:{($ VSub_DollarName '$i')}) ) ) } ) right: (arith_expr.ArithWord w:{(Lit_Digits 1024)}) ) right: (arith_expr.ArithWord w:{($ VSub_DollarName '$secsz')}) ) ) ) (command.If arms: [ (if_arm cond: [ (command.Sentence child: (command.DParen child: (arith_expr.ArithBinary op_id: Arith_Great left: (arith_expr.ArithVarRef token:<Lit_ArithVarLike i>) right: (arith_expr.ArithWord w:{(Lit_Digits 0)}) ) ) terminator: <Op_Semi ';'> ) ] action: [ (command.If arms: [ (if_arm cond: [ (command.Sentence child: (command.DParen child: (arith_expr.ArithBinary op_id: Arith_LessEqual left: (arith_expr.ArithWord w: { (word_part.BracedVarSub token: <VSub_Name sectors> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithWord w: {($ VSub_DollarName '$i')} ) ) ) } ) right: (arith_expr.ArithWord w: { (word_part.BracedVarSub token: <VSub_Name sectors> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithBinary op_id: Arith_Minus left: (arith_expr.ArithWord w: {($ VSub_DollarName '$i')} ) right: (arith_expr.ArithWord w: {(Lit_Digits 1)} ) ) ) ) } ) ) ) terminator: <Op_Semi ';'> ) ] action: [(C {(die)} {(DQ ('ERROR: bucket list must increase in size.'))})] ) ] ) ] ) ] ) (command.DParen child: (arith_expr.UnaryAssign op_id:Node_PostDPlus child:(lhs_expr.LhsName name:i)) ) ] ) ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:max_b) op: Equal rhs: { (word_part.BracedVarSub token: <VSub_Name buckets> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithWord w:{($ VSub_DollarName '$max_i')}) ) ) } ) ] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:max_s) op: Equal rhs: { (word_part.BracedVarSub token: <VSub_Name sectors> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithWord w:{($ VSub_DollarName '$max_i')}) ) ) } ) ] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:tpoints) op: Equal rhs: { (DQ ('-e ') ($ VSub_DollarName '$tpoint') (' --filter ') (word_part.EscapedLiteralPart token:<Lit_EscapedChar '\\"'>) ($ VSub_DollarName '$var') (' < ') (word_part.BracedVarSub token: <VSub_Name sectors> bracket_op: (bracket_op.ArrayIndex expr:(arith_expr.ArithWord w:{(Lit_Digits 0)})) ) (word_part.EscapedLiteralPart token:<Lit_EscapedChar '\\"'>) ) } ) ] ) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:awkarray) op:Equal rhs:(word.EmptyWord))] ) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:i) op:Equal rhs:{(0)})] ) (command.WhileUntil keyword: <KW_While while> cond: [ (command.Sentence child: (command.DParen child: (arith_expr.ArithBinary op_id: Arith_Less left: (arith_expr.ArithVarRef token:<Lit_ArithVarLike i>) right: (arith_expr.ArithVarRef token:<Lit_ArithVarLike max_i>) ) ) terminator: <Op_Semi ';'> ) ] body: (command.DoGroup children: [ (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:tpoints) op: Equal rhs: { (DQ ($ VSub_DollarName '$tpoints') (' -e ') ($ VSub_DollarName '$tpoint') (' --filter ') (word_part.EscapedLiteralPart token:<Lit_EscapedChar '\\"'>) ($ VSub_DollarName '$var') (' >= ') (word_part.BracedVarSub token: <VSub_Name sectors> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithWord w:{($ VSub_DollarName '$i')}) ) ) (' && ') ) } ) ] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:tpoints) op: Equal rhs: { (DQ ($ VSub_DollarName '$tpoints') (' ') ($ VSub_DollarName '$var') (' < ') (word_part.BracedVarSub token: <VSub_Name sectors> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithBinary op_id: Arith_Plus left: (arith_expr.ArithWord w:{($ VSub_DollarName '$i')}) right: (arith_expr.ArithWord w:{(Lit_Digits 1)}) ) ) ) (word_part.EscapedLiteralPart token:<Lit_EscapedChar '\\"'>) ) } ) ] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:awkarray) op: Equal rhs: { (DQ ($ VSub_DollarName '$awkarray') (' buckets[') ($ VSub_DollarName '$i') (']=') (word_part.BracedVarSub token: <VSub_Name buckets> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithWord w:{($ VSub_DollarName '$i')}) ) ) (';') ) } ) ] ) (command.DParen child: (arith_expr.UnaryAssign op_id:Node_PostDPlus child:(lhs_expr.LhsName name:i)) ) ] ) ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:awkarray) op: Equal rhs: { (DQ ($ VSub_DollarName '$awkarray') (' buckets[') ($ VSub_DollarName '$max_i') (']=') (word_part.BracedVarSub token: <VSub_Name buckets> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithWord w:{($ VSub_DollarName '$max_i')}) ) ) (';') ) } ) ] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:tpoints) op: Equal rhs: { (DQ ($ VSub_DollarName '$tpoints') (' -e ') ($ VSub_DollarName '$tpoint') (' --filter ') (word_part.EscapedLiteralPart token:<Lit_EscapedChar '\\"'>) ($ VSub_DollarName '$var') (' >= ') (word_part.BracedVarSub token: <VSub_Name sectors> bracket_op: (bracket_op.ArrayIndex expr: (arith_expr.ArithWord w:{($ VSub_DollarName '$max_i')}) ) ) (word_part.EscapedLiteralPart token:<Lit_EscapedChar '\\"'>) ) } ) ] ) (command.If arms: [ (if_arm cond: [ (command.Sentence child: (command.DParen child:(arith_expr.ArithVarRef token:<Lit_ArithVarLike duration>)) terminator: <Op_Semi ';'> ) ] action: [ (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:etext) op: Equal rhs: {(DQ ('for ') ($ VSub_DollarName '$duration') (' seconds'))} ) ] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:cmd) op: Equal rhs: {(DQ ('sleep ') ($ VSub_DollarName '$duration'))} ) ] ) ] ) ] else_action: [ (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:etext) op:Equal rhs:{(DQ ('until Ctrl-C'))})] ) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:cmd) op:Equal rhs:{(DQ ('sleep 999999'))})] ) ] ) (C {(echo)} {(DQ ('Tracing block I/O size (bytes), ') ($ VSub_DollarName '$etext') (...))}) (command.Assignment keyword: Assign_None pairs: [(assign_pair lhs:(lhs_expr.LhsName name:out) op:Equal rhs:{(DQ ('-o /dev/stdout'))})] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:stat) op: Equal rhs: { (word_part.CommandSubPart command_list: (command.CommandList children: [ (command.SimpleCommand words: [ {(eval)} {(perf)} {(stat)} {($ VSub_DollarName '$tpoints')} {(-a)} {($ VSub_DollarName '$out')} {($ VSub_DollarName '$cmd')} ] redirects: [(redir.Redir op:<Redir_GreatAnd '2>&'> fd:2 arg_word:{(1)})] ) ] ) left_token: <Left_CommandSub '$('> ) } ) ] ) (command.If arms: [ (if_arm cond: [ (command.Sentence child: (command.DParen child: (arith_expr.ArithBinary op_id: Arith_NEqual left: (arith_expr.ArithWord w:{($ VSub_QMark '$?')}) right: (arith_expr.ArithWord w:{(Lit_Digits 0)}) ) ) terminator: <Op_Semi ';'> ) ] action: [ (command.SimpleCommand words: [{(echo)} {(DQ ('ERROR running perf:'))}] redirects: [(redir.Redir op:<Redir_GreatAnd '>&'> fd:16777215 arg_word:{(2)})] ) (command.SimpleCommand words: [{(echo)} {(DQ ($ VSub_DollarName '$stat'))}] redirects: [(redir.Redir op:<Redir_GreatAnd '>&'> fd:16777215 arg_word:{(2)})] ) (command.ControlFlow token:<ControlFlow_Exit exit>) ] ) ] ) (command.Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (lhs_expr.LhsName name:most) op: Equal rhs: { (word_part.CommandSubPart command_list: (command.CommandList children: [ (command.Pipeline children: [ (C {(echo)} {(DQ ($ VSub_DollarName '$stat'))}) (C {(awk)} {(-v)} {(Lit_VarLike 'tpoint=') ($ VSub_DollarName '$tpoint')} { (SQ <'\n'> <'\t$2 == tpoint { gsub(/,/, ""); if ($1 > m) { m = $1 } }\n'> <'\tEND { print m }'> ) } ) ] negated: F ) ] ) left_token: <Left_CommandSub '$('> ) } ) ] ) (C {(echo)}) (command.Pipeline children: [ (C {(echo)} {(DQ ($ VSub_DollarName '$stat'))}) (C {(awk)} {(-v)} {(Lit_VarLike 'tpoint=') ($ VSub_DollarName '$tpoint')} {(-v)} {(Lit_VarLike 'max_i=') ($ VSub_DollarName '$max_i')} {(-v)} {(Lit_VarLike 'most=') ($ VSub_DollarName '$most')} { (SQ <'\n'> <'\tfunction star(sval, smax, swidth) {\n'> <'\t\tstars = ""\n'> <'\t\t# using int could avoid error on gawk\n'> <'\t\tif (int(smax) == 0) return ""\n'> <'\t\tfor (si = 0; si < (swidth * sval / smax); si++) {\n'> <'\t\t\tstars = stars "#"\n'> <'\t\t}\n'> <'\t\treturn stars\n'> <'\t}\n'> <'\tBEGIN {\n'> <'\t\t'> ) (DQ ($ VSub_DollarName '$awkarray')) (SQ <'\n'> <'\t\tprintf(" %-15s: %-8s %s\\n", "Kbytes", "I/O",\n'> <'\t\t "Distribution")\n'> <'\t}\n'> <'\t/Performance counter stats/ { i = -1 }\n'> <'\t# reverse order of rule set is important\n'> <'\t{ ok = 0 }\n'> <'\t$2 == tpoint { num = $1; gsub(/,/, "", num); ok = 1 }\n'> <'\tok && i >= max_i {\n'> <'\t\tprintf(" %10.1f -> %-10s: %-8s |%-38s|\\n",\n'> <'\t\t buckets[i], "", num, star(num, most, 38))\n'> <'\t\tnext\n'> <'\t}\n'> <'\tok && i >= 0 && i < max_i {\n'> <'\t\tprintf(" %10.1f -> %-10.1f: %-8s |%-38s|\\n",\n'> <'\t\t buckets[i], buckets[i+1] - 0.1, num,\n'> <'\t\t star(num, most, 38))\n'> <'\t\ti++\n'> <'\t\tnext\n'> <'\t}\n'> <'\tok && i == -1 {\n'> <'\t\tprintf(" %10s -> %-10.1f: %-8s |%-38s|\\n", "",\n'> <'\t\t buckets[0] - 0.1, num, star(num, most, 38))\n'> <'\t\ti++\n'> <'\t}\n'> ) } ) ] negated: F ) ] )