void json_write_long(OutputStream * out, long n) { if (n < 0) { write_stream(out, '-'); n = -n; } json_write_ulong(out, (unsigned long)n); }
static void add_report_prop_int(ReportBuffer * report, const char * name, unsigned long n) { ByteArrayOutputStream buf; OutputStream * out = create_byte_array_output_stream(&buf); json_write_ulong(out, n); write_stream(out, 0); add_report_prop(report, name, &buf); }
void json_write_ulong(OutputStream * out, unsigned long n) { if (n >= 10) { json_write_ulong(out, n / 10); n = n % 10; } write_stream(out, n + '0'); }
void send_event_memory_changed(Context * ctx, ContextAddress addr, unsigned long size) { OutputStream * out = &broadcast_group->out; if (!context_has_state(ctx) || is_intercepted(ctx)) { write_stringz(out, "E"); write_stringz(out, MEMORY); write_stringz(out, "memoryChanged"); json_write_string(out, ctx->id); write_stream(out, 0); /* <array of addres ranges> */ write_stream(out, '['); write_stream(out, '{'); json_write_string(out, "addr"); write_stream(out, ':'); json_write_uint64(out, addr); write_stream(out, ','); json_write_string(out, "size"); write_stream(out, ':'); json_write_ulong(out, size); write_stream(out, '}'); write_stream(out, ']'); write_stream(out, 0); write_stream(out, MARKER_EOM); } }
static void write_port_server_info(OutputStream * out, PortServer * server) { PortAttribute * attr = server->attrs; write_stream(out, '{'); json_write_string(out, "ID"); write_stream(out, ':'); json_write_string(out, server->id); write_stream(out, ','); json_write_string(out, "AutoConnect"); write_stream(out, ':'); json_write_boolean(out, server->auto_connect); write_stream(out, ','); if (server->is_udp) json_write_string(out, "UdpPort"); else json_write_string(out, "TcpPort"); write_stream(out, ':'); json_write_ulong(out, server->local_port); while (attr != NULL) { if (strcmp(attr->name, "AutoConnect") != 0) { write_stream(out, ','); json_write_string(out, attr->name); write_stream(out, ':'); write_string(out, attr->value); } attr = attr->next; } write_stream(out, '}'); }
static void command_get_signal_list(char * token, Channel * c) { int err = 0; char id[256]; pid_t pid; json_read_string(&c->inp, id, sizeof(id)); if (read_stream(&c->inp) != 0) exception(ERR_JSON_SYNTAX); if (read_stream(&c->inp) != MARKER_EOM) exception(ERR_JSON_SYNTAX); pid = id2pid(id, NULL); write_stringz(&c->out, "R"); write_stringz(&c->out, token); /* pid is ignored, same signal list for all */ write_errno(&c->out, err); if (err) { write_stringz(&c->out, "null"); } else { int i = 0; int n = 0; write_stream(&c->out, '['); for (i = 0; i < 32; i++) { char * name = signal_name(i); char * desc = signal_description(i); if (name != NULL || desc != NULL) { if (n > 0) write_stream(&c->out, ','); write_stream(&c->out, '{'); json_write_string(&c->out, "Index"); write_stream(&c->out, ':'); json_write_long(&c->out, i); if (name != NULL) { write_stream(&c->out, ','); json_write_string(&c->out, "Name"); write_stream(&c->out, ':'); json_write_string(&c->out, name); } if (desc != NULL) { write_stream(&c->out, ','); json_write_string(&c->out, "Description"); write_stream(&c->out, ':'); json_write_string(&c->out, desc); } write_stream(&c->out, ','); json_write_string(&c->out, "Code"); write_stream(&c->out, ':'); json_write_ulong(&c->out, signal_code(i)); write_stream(&c->out, '}'); n++; } } write_stream(&c->out, ']'); write_stream(&c->out, 0); } write_stream(&c->out, MARKER_EOM); }
static void send_event_terminal_exited(OutputStream * out, Terminal * term) { write_stringz(out, "E"); write_stringz(out, TERMINALS); write_stringz(out, "exited"); json_write_string(out, tid2id(get_process_pid(term->prs))); write_stream(out, 0); json_write_ulong(out, get_process_exit_code(term->prs)); write_stream(out, 0); write_stream(out, MARKER_EOM); }
static void write_context_state(OutputStream * out, Context * ctx) { int fst = 1; assert(!ctx->exited); if (!ctx->intercepted) { write_stringz(out, "0"); write_stringz(out, "null"); write_stringz(out, "null"); return; } /* Number: PC */ json_write_ulong(out, get_regs_PC(ctx->regs)); write_stream(out, 0); /* String: Reason */ json_write_string(out, context_suspend_reason(ctx)); write_stream(out, 0); /* Object: Additional context state info */ write_stream(out, '{'); if (ctx->signal) { json_write_string(out, "Signal"); write_stream(out, ':'); json_write_long(out, ctx->signal); if (signal_name(ctx->signal)) { write_stream(out, ','); json_write_string(out, "SignalName"); write_stream(out, ':'); json_write_string(out, signal_name(ctx->signal)); } fst = 0; } if (ctx->stopped_by_bp && ctx->bp_ids != NULL && ctx->bp_ids[0] != NULL) { int i = 0; if (!fst) write_stream(out, ','); json_write_string(out, "BPs"); write_stream(out, ':'); write_stream(out, '['); while (ctx->bp_ids[i] != NULL) { if (i > 0) write_stream(out, ','); json_write_string(out, ctx->bp_ids[i++]); } write_stream(out, ']'); fst = 0; } write_stream(out, '}'); write_stream(out, 0); }
static void write_context(OutputStream * out, int tid) { Terminal * term = find_terminal(tid); const char * id = NULL; write_stream(out, '{'); if (term != NULL) { unsigned ws_col = 0; unsigned ws_row = 0; get_process_tty_win_size(term->prs, &ws_col, &ws_row); json_write_string(out, "ProcessID"); write_stream(out, ':'); json_write_string(out, pid2id(get_process_pid(term->prs), 0)); write_stream(out, ','); if (*term->pty_type) { json_write_string(out, "PtyType"); write_stream(out, ':'); json_write_string(out, term->pty_type); write_stream(out, ','); } if (*term->encoding) { json_write_string(out, "Encoding"); write_stream(out, ':'); json_write_string(out, term->encoding); write_stream(out, ','); } json_write_string(out, "Width"); write_stream(out, ':'); json_write_ulong(out, ws_col); write_stream(out, ','); json_write_string(out, "Height"); write_stream(out, ':'); json_write_ulong(out, ws_row); write_stream(out, ','); id = get_process_stream_id(term->prs, 0); if (id) { json_write_string(out, "StdInID"); write_stream(out, ':'); json_write_string(out, id); write_stream(out, ','); } id = get_process_stream_id(term->prs, 1); if (id) { json_write_string(out, "StdOutID"); write_stream(out, ':'); json_write_string(out, id); write_stream(out, ','); } id = get_process_stream_id(term->prs, 2); if (id) { json_write_string(out, "StdErrID"); write_stream(out, ':'); json_write_string(out, id); write_stream(out, ','); } } json_write_string(out, "ID"); write_stream(out, ':'); json_write_string(out, tid2id(tid)); write_stream(out, '}'); }
static void write_context(OutputStream * out, Context * ctx) { assert(!ctx->exited); write_stream(out, '{'); json_write_string(out, "ID"); write_stream(out, ':'); json_write_string(out, ctx->id); if (ctx->parent != NULL) { write_stream(out, ','); json_write_string(out, "ParentID"); write_stream(out, ':'); json_write_string(out, ctx->parent->id); } write_stream(out, ','); json_write_string(out, "ProcessID"); write_stream(out, ':'); json_write_string(out, context_get_group(ctx, CONTEXT_GROUP_PROCESS)->id); if (ctx->name != NULL) { write_stream(out, ','); json_write_string(out, "Name"); write_stream(out, ':'); json_write_string(out, ctx->name); } write_stream(out, ','); json_write_string(out, "BigEndian"); write_stream(out, ':'); json_write_boolean(out, ctx->big_endian); if (ctx->mem_access) { int cnt = 0; write_stream(out, ','); json_write_string(out, "AddressSize"); write_stream(out, ':'); json_write_ulong(out, context_word_size(ctx)); write_stream(out, ','); json_write_string(out, "AccessTypes"); write_stream(out, ':'); write_stream(out, '['); if (ctx->mem_access & MEM_ACCESS_INSTRUCTION) { if (cnt++) write_stream(out, ','); json_write_string(out, "instruction"); } if (ctx->mem_access & MEM_ACCESS_DATA) { if (cnt++) write_stream(out, ','); json_write_string(out, "data"); } if (ctx->mem_access & MEM_ACCESS_IO) { if (cnt++) write_stream(out, ','); json_write_string(out, "io"); } if (ctx->mem_access & MEM_ACCESS_USER) { if (cnt++) write_stream(out, ','); json_write_string(out, "user"); } if (ctx->mem_access & MEM_ACCESS_SUPERVISOR) { if (cnt++) write_stream(out, ','); json_write_string(out, "supervisor"); } if (ctx->mem_access & MEM_ACCESS_HYPERVISOR) { if (cnt++) write_stream(out, ','); json_write_string(out, "hypervisor"); } if (ctx->mem_access & MEM_ACCESS_VIRTUAL) { if (cnt++) write_stream(out, ','); json_write_string(out, "virtual"); } if (ctx->mem_access & MEM_ACCESS_PHYSICAL) { if (cnt++) write_stream(out, ','); json_write_string(out, "physical"); } if (ctx->mem_access & MEM_ACCESS_CACHE) { if (cnt++) write_stream(out, ','); json_write_string(out, "cache"); } if (ctx->mem_access & MEM_ACCESS_TLB) { if (cnt++) write_stream(out, ','); json_write_string(out, "tlb"); } write_stream(out, ']'); } write_stream(out, '}'); }
static void write_ranges(OutputStream * out, ContextAddress addr, int offs, int status, MemoryErrorInfo * err_info) { int cnt = 0; size_t size_valid = 0; size_t size_error = 0; if (err_info->error) { size_valid = err_info->size_valid + offs; size_error = err_info->size_error; } else { size_valid = offs; } write_stream(out, '['); if (size_valid > 0) { write_stream(out, '{'); json_write_string(out, "addr"); write_stream(out, ':'); json_write_uint64(out, addr); write_stream(out, ','); json_write_string(out, "size"); write_stream(out, ':'); json_write_ulong(out, size_valid); write_stream(out, ','); json_write_string(out, "stat"); write_stream(out, ':'); json_write_ulong(out, 0); write_stream(out, '}'); cnt++; } if (size_error > 0) { if (cnt > 0) write_stream(out, ','); write_stream(out, '{'); json_write_string(out, "addr"); write_stream(out, ':'); json_write_uint64(out, addr + size_valid); write_stream(out, ','); json_write_string(out, "size"); write_stream(out, ':'); json_write_ulong(out, size_error); write_stream(out, ','); json_write_string(out, "stat"); write_stream(out, ':'); json_write_ulong(out, BYTE_INVALID | status); write_stream(out, ','); json_write_string(out, "msg"); write_stream(out, ':'); write_error_object(out, err_info->error); write_stream(out, '}'); } write_stream(out, ']'); write_stream(out, 0); }
static void command_get_location_info_cache_client(void * x) { CommandGetLocationInfo * args = (CommandGetLocationInfo *)x; Channel * c = cache_channel(); LocationInfo * info = NULL; Context * ctx = NULL; int frame = STACK_NO_FRAME; Symbol * sym = NULL; int err = 0; if (id2symbol(args->id, &sym) < 0) err = errno; else if (get_location_info(sym, &info) < 0) err = errno; else if (get_symbol_frame(sym, &ctx, &frame) < 0) err = errno; cache_exit(); write_stringz(&c->out, "R"); write_stringz(&c->out, args->token); write_errno(&c->out, err); if (info == NULL) { write_stringz(&c->out, "null"); } else { write_stream(&c->out, '{'); json_write_string(&c->out, "BigEndian"); write_stream(&c->out, ':'); json_write_boolean(&c->out, info->big_endian); write_stream(&c->out, ','); json_write_string(&c->out, "ValueCmds"); write_stream(&c->out, ':'); write_commands(&c->out, ctx, info->value_cmds.cmds, info->value_cmds.cnt); if (info->args_cnt) { write_stream(&c->out, ','); json_write_string(&c->out, "ArgCnt"); write_stream(&c->out, ':'); json_write_ulong(&c->out, info->args_cnt); } if (info->code_size) { write_stream(&c->out, ','); json_write_string(&c->out, "CodeAddr"); write_stream(&c->out, ':'); json_write_uint64(&c->out, info->code_addr); write_stream(&c->out, ','); json_write_string(&c->out, "CodeSize"); write_stream(&c->out, ':'); json_write_uint64(&c->out, info->code_size); } if (info->discr_cnt > 0) { unsigned i; write_stream(&c->out, ','); json_write_string(&c->out, "Discriminant"); write_stream(&c->out, ':'); write_stream(&c->out, '['); for (i = 0; i < info->discr_cnt; i++) { DiscriminantRange * r = info->discr_lst + i; if (i > 0) write_stream(&c->out, ','); if (r->x == r->y) { json_write_int64(&c->out, r->x); } else { write_stream(&c->out, '{'); json_write_string(&c->out, "X"); write_stream(&c->out, ':'); json_write_int64(&c->out, r->x); write_stream(&c->out, ','); json_write_string(&c->out, "Y"); write_stream(&c->out, ':'); json_write_int64(&c->out, r->y); write_stream(&c->out, '}'); } } write_stream(&c->out, ']'); } write_stream(&c->out, '}'); write_stream(&c->out, 0); } write_stream(&c->out, MARKER_EOM); }
static void write_commands(OutputStream * out, Context * ctx, LocationExpressionCommand * cmds, unsigned cnt) { if (cmds != NULL) { unsigned i; write_stream(out, '['); for (i = 0; i < cnt; i++) { LocationExpressionCommand * cmd = cmds + i; if (i > 0) write_stream(out, ','); json_write_long(out, cmd->cmd); switch (cmd->cmd) { case SFT_CMD_NUMBER: write_stream(out, ','); json_write_int64(out, cmd->args.num); break; case SFT_CMD_ARG: case SFT_CMD_SET_ARG: write_stream(out, ','); json_write_ulong(out, cmd->args.arg_no); break; case SFT_CMD_RD_REG: case SFT_CMD_WR_REG: write_stream(out, ','); json_write_string(out, register2id(ctx, STACK_NO_FRAME, cmd->args.reg)); break; case SFT_CMD_RD_MEM: case SFT_CMD_WR_MEM: case SFT_CMD_LOAD: write_stream(out, ','); json_write_ulong(out, cmd->args.mem.size); write_stream(out, ','); json_write_boolean(out, cmd->args.mem.big_endian); break; case SFT_CMD_LOCATION: write_stream(out, ','); json_write_binary(out, cmd->args.loc.code_addr, cmd->args.loc.code_size); write_stream(out, ','); write_stream(out, '{'); json_write_string(out, "Machine"); write_stream(out, ':'); json_write_long(out, cmd->args.loc.reg_id_scope.machine); write_stream(out, ','); if (cmd->args.loc.reg_id_scope.os_abi) { json_write_string(out, "ABI"); write_stream(out, ':'); json_write_long(out, cmd->args.loc.reg_id_scope.os_abi); write_stream(out, ','); } if (cmd->args.loc.reg_id_scope.fp_abi) { json_write_string(out, "FPABI"); write_stream(out, ':'); json_write_long(out, cmd->args.loc.reg_id_scope.fp_abi); write_stream(out, ','); } json_write_string(out, "ELF64"); write_stream(out, ':'); json_write_boolean(out, cmd->args.loc.reg_id_scope.elf64); write_stream(out, ','); json_write_string(out, "RegIdType"); write_stream(out, ':'); json_write_long(out, cmd->args.loc.reg_id_scope.id_type); write_stream(out, ','); json_write_string(out, "AddrSize"); write_stream(out, ':'); json_write_long(out, cmd->args.loc.addr_size); write_stream(out, ','); json_write_string(out, "BigEndian"); write_stream(out, ':'); json_write_boolean(out, cmd->args.loc.reg_id_scope.big_endian); write_stream(out, '}'); break; case SFT_CMD_PIECE: write_stream(out, ','); json_write_ulong(out, cmd->args.piece.bit_offs); write_stream(out, ','); json_write_ulong(out, cmd->args.piece.bit_size); write_stream(out, ','); if (cmd->args.piece.reg == NULL) write_string(out, "null"); else json_write_string(out, register2id(ctx, STACK_NO_FRAME, cmd->args.piece.reg)); write_stream(out, ','); if (cmd->args.piece.value == NULL) write_string(out, "null"); else json_write_binary(out, cmd->args.piece.value, (cmd->args.piece.bit_size + 7) / 8); break; } } write_stream(out, ']'); } else { write_string(out, "null"); } }
static void command_get_context_cache_client(void * x) { CommandGetContextArgs * args = (CommandGetContextArgs *)x; Channel * c = cache_channel(); int err = 0; Symbol * sym = NULL; char * owner = NULL; char * name = NULL; int update_policy = 0; int sym_class = SYM_CLASS_UNKNOWN; int type_class = TYPE_CLASS_UNKNOWN; Symbol * type = NULL; Symbol * base = NULL; Symbol * index = NULL; Symbol * container = NULL; int has_size = 0; int has_length = 0; int has_lower_bound = 0; int has_offset = 0; int has_address = 0; int has_frame = 0; int big_endian = 0; ContextAddress size = 0; ContextAddress length = 0; int64_t lower_bound = 0; ContextAddress offset = 0; ContextAddress address = 0; RegisterDefinition * reg = NULL; SYM_FLAGS flags = 0; void * value = NULL; size_t value_size = 0; Context * ctx = NULL; int frame = STACK_NO_FRAME; SymbolProperties props; memset(&props, 0, sizeof(props)); if (id2symbol(args->id, &sym) < 0) err = errno; if (err == 0) { get_symbol_class(sym, &sym_class); get_symbol_update_policy(sym, &owner, &update_policy); get_symbol_name(sym, &name); get_symbol_type_class(sym, &type_class); get_symbol_type(sym, &type); get_symbol_base_type(sym, &base); get_symbol_index_type(sym, &index); get_symbol_container(sym, &container); has_frame = get_symbol_frame(sym, &ctx, &frame) == 0; has_size = get_symbol_size(sym, &size) == 0; if (type_class == TYPE_CLASS_ARRAY) { has_length = get_symbol_length(sym, &length) == 0; if (has_length) has_lower_bound = get_symbol_lower_bound(sym, &lower_bound) == 0; } if (sym_class == SYM_CLASS_REFERENCE || sym_class == SYM_CLASS_FUNCTION || sym_class == SYM_CLASS_VALUE || sym_class == SYM_CLASS_TYPE || sym_class == SYM_CLASS_VARIANT_PART) { LocationInfo * loc_info = NULL; if (has_frame && get_location_info(sym, &loc_info) == 0) { LocationExpressionState * state = NULL; if (loc_info->args_cnt == 0) { /* Absolute location */ state = evaluate_location(ctx, frame, loc_info); if (state != NULL) { if (state->stk_pos == 1) { address = (ContextAddress)state->stk[0]; has_address = 1; } if (state->pieces_cnt == 1 && state->pieces->reg != NULL && state->pieces->reg->size == state->pieces->size) { reg = state->pieces->reg; } if (state->pieces_cnt > 0) { Trap trap; if (set_trap(&trap)) { read_location_pieces(state->ctx, state->stack_frame, state->pieces, state->pieces_cnt, loc_info->big_endian, &value, &value_size); big_endian = loc_info->big_endian; clear_trap(&trap); } } } } else if (loc_info->args_cnt == 1) { /* Relative location */ state = evaluate_location(ctx, frame, loc_info); if (state != NULL && state->stk_pos == 1) { offset = (ContextAddress)state->stk[0]; has_offset = 1; } } } } get_symbol_flags(sym, &flags); get_symbol_props(sym, &props); } cache_exit(); write_stringz(&c->out, "R"); write_stringz(&c->out, args->token); write_errno(&c->out, err); if (err == 0) { write_stream(&c->out, '{'); json_write_string(&c->out, "ID"); write_stream(&c->out, ':'); json_write_string(&c->out, args->id); write_stream(&c->out, ','); if (owner != NULL) { json_write_string(&c->out, "OwnerID"); write_stream(&c->out, ':'); json_write_string(&c->out, owner); write_stream(&c->out, ','); json_write_string(&c->out, "UpdatePolicy"); write_stream(&c->out, ':'); json_write_long(&c->out, update_policy); write_stream(&c->out, ','); } if (name != NULL) { json_write_string(&c->out, "Name"); write_stream(&c->out, ':'); json_write_string(&c->out, name); write_stream(&c->out, ','); } if (type_class != TYPE_CLASS_UNKNOWN) { json_write_string(&c->out, "TypeClass"); write_stream(&c->out, ':'); json_write_long(&c->out, type_class); write_stream(&c->out, ','); } if (type != NULL) { json_write_string(&c->out, "TypeID"); write_stream(&c->out, ':'); json_write_string(&c->out, symbol2id(type)); write_stream(&c->out, ','); } if (base != NULL) { json_write_string(&c->out, "BaseTypeID"); write_stream(&c->out, ':'); json_write_string(&c->out, symbol2id(base)); write_stream(&c->out, ','); } if (index != NULL) { json_write_string(&c->out, "IndexTypeID"); write_stream(&c->out, ':'); json_write_string(&c->out, symbol2id(index)); write_stream(&c->out, ','); } if (container != NULL) { json_write_string(&c->out, "ContainerID"); write_stream(&c->out, ':'); json_write_string(&c->out, symbol2id(container)); write_stream(&c->out, ','); } if (has_size) { json_write_string(&c->out, "Size"); write_stream(&c->out, ':'); json_write_uint64(&c->out, size); write_stream(&c->out, ','); } if (has_length) { json_write_string(&c->out, "Length"); write_stream(&c->out, ':'); json_write_uint64(&c->out, length); write_stream(&c->out, ','); if (has_lower_bound) { json_write_string(&c->out, "LowerBound"); write_stream(&c->out, ':'); json_write_int64(&c->out, lower_bound); write_stream(&c->out, ','); json_write_string(&c->out, "UpperBound"); write_stream(&c->out, ':'); json_write_int64(&c->out, lower_bound + (int64_t)length - 1); write_stream(&c->out, ','); } } if (has_offset) { json_write_string(&c->out, "Offset"); write_stream(&c->out, ':'); json_write_uint64(&c->out, offset); write_stream(&c->out, ','); } if (has_address) { json_write_string(&c->out, "Address"); write_stream(&c->out, ':'); json_write_uint64(&c->out, address); write_stream(&c->out, ','); } if (reg != NULL && has_frame) { json_write_string(&c->out, "Register"); write_stream(&c->out, ':'); json_write_string(&c->out, register2id(ctx, frame, reg)); write_stream(&c->out, ','); } if (flags) { json_write_string(&c->out, "Flags"); write_stream(&c->out, ':'); json_write_long(&c->out, flags); write_stream(&c->out, ','); } if (props.binary_scale != 0) { json_write_string(&c->out, "BinaryScale"); write_stream(&c->out, ':'); json_write_long(&c->out, props.binary_scale); write_stream(&c->out, ','); } if (props.decimal_scale != 0) { json_write_string(&c->out, "DecimalScale"); write_stream(&c->out, ':'); json_write_long(&c->out, props.decimal_scale); write_stream(&c->out, ','); } if (props.bit_stride != 0) { json_write_string(&c->out, "BitStride"); write_stream(&c->out, ':'); json_write_ulong(&c->out, props.bit_stride); write_stream(&c->out, ','); } if (props.local_entry_offset != 0) { json_write_string(&c->out, "LocalEntryOffset"); write_stream(&c->out, ':'); json_write_ulong(&c->out, props.local_entry_offset); write_stream(&c->out, ','); } if (value != NULL) { json_write_string(&c->out, "Value"); write_stream(&c->out, ':'); json_write_binary(&c->out, value, value_size); write_stream(&c->out, ','); if (big_endian) { json_write_string(&c->out, "BigEndian"); write_stream(&c->out, ':'); json_write_boolean(&c->out, 1); write_stream(&c->out, ','); } } if (has_frame && frame != STACK_NO_FRAME) { json_write_string(&c->out, "Frame"); write_stream(&c->out, ':'); json_write_long(&c->out, frame); write_stream(&c->out, ','); } json_write_string(&c->out, "Class"); write_stream(&c->out, ':'); json_write_long(&c->out, sym_class); write_stream(&c->out, '}'); write_stream(&c->out, 0); } else { write_stringz(&c->out, "null"); } write_stream(&c->out, MARKER_EOM); }