src/dwarf/Gparser.c

34 read_regnum (unw_addr_space_t as, unw_accessors_t *a, unw_word_t *addr,
39   if ((ret = dwarf_read_uleb128 (as, a, addr, valp, arg)) < 0)
61                  unw_word_t ip, unw_word_t *addr, unw_word_t end_addr,
88   while (curr_ip <= ip && *addr < end_addr)
90       if ((ret = dwarf_readu8 (as, a, addr, &op, arg)) < 0)
106           if ((ret = dwarf_readu8 (as, a, addr, &u8, arg)) < 0)
113           if ((ret = dwarf_readu16 (as, a, addr, &u16, arg)) < 0)
120           if ((ret = dwarf_readu32 (as, a, addr, &u32, arg)) < 0)
131             if ((ret = dwarf_readu64 (as, a, addr, &u64, arg)) < 0)
152           if ((ret = dwarf_read_uleb128 (as, a, addr, &val, arg)) < 0)
160           if (((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
161               || ((ret = dwarf_read_uleb128 (as, a, addr, &val, arg)) < 0))
169           if (((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
170               || ((ret = dwarf_read_sleb128 (as, a, addr, &val, arg)) < 0))
191           if ((ret = dwarf_read_uleb128 (as, a, addr, &regnum, arg)) < 0)
209           if ((ret = dwarf_read_encoded_pointer (as, a, addr, fde_encoding,
217           if ((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
224           if ((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
231           if (((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
232               || ((ret = dwarf_read_uleb128 (as, a, addr, &val, arg)) < 0))
268           if (((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
269               || ((ret = dwarf_read_uleb128 (as, a, addr, &val, arg)) < 0))
277           if (((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
278               || ((ret = dwarf_read_sleb128 (as, a, addr, &val, arg)) < 0))
288           if ((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
295           if ((ret = dwarf_read_uleb128 (as, a, addr, &val, arg)) < 0)
302           if ((ret = dwarf_read_sleb128 (as, a, addr, &val, arg)) < 0)
312           set_reg (sr, DWARF_CFA_REG_COLUMN, DWARF_WHERE_EXPR, *addr);
314           if ((ret = dwarf_read_uleb128 (as, a, addr, &len, arg)) < 0)
318                  (long) *addr, (long) len);
319           *addr += len;
323           if ((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
327           set_reg (sr, regnum, DWARF_WHERE_EXPR, *addr);
329           if ((ret = dwarf_read_uleb128 (as, a, addr, &len, arg)) < 0)
333                  (long) regnum, (long) addr, (long) len);
334           *addr += len;
338           if ((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
342           set_reg (sr, regnum, DWARF_WHERE_VAL_EXPR, *addr);
344           if ((ret = dwarf_read_uleb128 (as, a, addr, &len, arg)) < 0)
348                  (long) regnum, (long) addr, (long) len);
349           *addr += len;
353           if ((ret = dwarf_read_uleb128 (as, a, addr, &val, arg)) < 0)
363           if (((ret = read_regnum (as, a, addr, &regnum, arg)) < 0)
364               || ((ret = dwarf_read_uleb128 (as, a, addr, &val, arg)) < 0))
491   unw_word_t addr;
497   addr = dci->cie_instr_start;
498   if ((ret = run_cfi_program (c, sr, ~(unw_word_t) 0, &addr,
504   addr = dci->fde_instr_start;
505   if ((ret = run_cfi_program (c, sr, ip, &addr, dci->fde_instr_end, dci)) < 0)
702                     unw_accessors_t *a, unw_word_t addr,
709   if ((ret = dwarf_read_uleb128 (as, a, &addr, &len, arg)) < 0)
713   if ((ret = dwarf_eval_expr (c, &addr, len, &val, &is_register)) < 0)
727   unw_word_t regnum, addr, cfa, ip;
770       addr = rs->reg[DWARF_CFA_REG_COLUMN].val;
771       if ((ret = eval_location_expr (c, as, a, addr, &cfa_loc, arg)) < 0)
799           addr = rs->reg[i].val;
800           if ((ret = eval_location_expr (c, as, a, addr, c->loc + i, arg)) < 0)
805           addr = rs->reg[i].val;
806           if ((ret = eval_location_expr (c, as, a, addr, c->loc + i, arg)) < 0)