wp_asmfile *WPAsmOpen( sio_data * curr_sio, int src_row, bool quiet ) /*******************************************************************/ { wp_asmfile * wpasm_file; cue_handle * ch; cue_handle * ch2; mod_info * curr_mod; file_info * curr_file; massgd_sample_addr * samp_data; wp_asmline * asm_line; mod_handle mh; file_handle fh; address addr; cue_fileid fid; search_result cue_find; int rows; int asm_group; int asm_row; int file_index; int addr_cmp; clicks_t addr_tick_index; quiet=quiet; ch = alloca( DIPHandleSize( HK_CUE ) ); ch2 = alloca( DIPHandleSize( HK_CUE ) ); curr_file = curr_sio->curr_file; curr_mod = curr_sio->curr_mod; if( curr_file->fid == 0 || LineCue( curr_mod->mh, curr_sio->curr_file->fid, src_row, 0, ch2 ) == SR_NONE ) { ch2 = NULL; } fh = ExeOpen( curr_sio->curr_image->name ); if( fh == -1 ) { ErrorMsg( LIT( Exe_Not_Found ), curr_sio->curr_image->name ); return( NULL ); } wpasm_file = ProfCAlloc( sizeof(wp_asmfile) ); curr_sio->asm_file = wpasm_file; wpasm_file->asm_buff = ProfAlloc( MAX_ASM_BUFF_LEN ); wpasm_file->asm_buff_len = MAX_ASM_BUFF_LEN; SetNumBytes( 0 ); SetExeFile( fh, false ); wpasm_file->fh = fh; addr = ModAddr( curr_mod->mh ); SetExeOffset( addr ); wpasm_file->max_time = 0; addr_tick_index = curr_mod->first_tick_index - 1; samp_data = WPGetMassgdSampData( curr_sio, addr_tick_index++ ); wpasm_file->asm_data = ProfAlloc( sizeof(wp_asm_groups) ); wpasm_file->asm_data[0].asm_lines = ProfAlloc( MAX_ASM_LINE_SIZE ); wpasm_file->asm_groups = 0; rows = 0; for( ;; ) { mh = curr_mod->mh; if( EndOfSegment() || AddrMod( addr, &mh ) == SR_NONE || mh != curr_mod->mh ) break; cue_find = (AddrCue( curr_mod->mh, addr, ch ) == SR_EXACT); if( ch2 != NULL && CueCmp( ch, ch2 ) == 0 ) { wpasm_file->entry_line = rows; ch2 = NULL; } asm_line = WPGetAsmLoc( wpasm_file, rows, &asm_group, &asm_row ); if( cue_find ) { asm_line->source_line = true; asm_line->u.src.line = CueLine( ch ); asm_line->u.src.src_file = NULL; if( !curr_file->unknown_file ) { fid = CueFileId( ch ); file_index = 0; while( file_index < curr_mod->file_count ) { curr_file = curr_mod->mod_file[file_index]; if( curr_file->fid == fid ) { asm_line->u.src.src_file = FOpenSource( curr_file->name, mh, fid ); break; } file_index++; } } rows++; asm_line = WPGetAsmLoc( wpasm_file, rows, &asm_group, &asm_row ); } asm_line = &wpasm_file->asm_data[asm_group].asm_lines[asm_row]; asm_line->source_line = false; asm_line->u.asm_line.addr = addr; asm_line->u.asm_line.tick_count = 0; for( ;; ) { if( samp_data == NULL ) break; addr_cmp = AddrCmp( &addr, samp_data->raw ); if( addr_cmp < 0 ) break; if( addr_cmp == 0 ) { asm_line->u.asm_line.tick_count = samp_data->hits; if( asm_line->u.asm_line.tick_count > wpasm_file->max_time ) { wpasm_file->max_time = asm_line->u.asm_line.tick_count; } } samp_data = WPGetMassgdSampData( curr_sio, addr_tick_index++ ); } rows++; CodeAdvance( &addr ); } WPGetAsmLoc( wpasm_file, rows, &asm_group, &asm_row ); wpasm_file->asm_data[asm_group].asm_lines = ProfRealloc( wpasm_file->asm_data[asm_group].asm_lines, sizeof(wp_asmline)*(asm_row+1) ); wpasm_file->asm_rows = rows; return( wpasm_file ); }
STATIC void setSrcLineData( wp_srcfile * wpsrc_file, sio_data * curr_sio, mod_info * curr_mod, file_info * curr_file, rtn_info * curr_rtn ) /***************************************************************************/ { massgd_sample_addr * samp_data; wp_srcline * lines; rtn_info * rtn_rover; cue_handle * ch; clicks_t click_index; unsigned long last_srcline; unsigned long new_line; int line_count; int line_index; int count; int count2; ch = alloca( DIPHandleSize( HK_CUE ) ); lines = NULL; line_index = -1; last_srcline = 0; new_line = 0; line_count = 0; wpsrc_file->max_time = 0; count = 0; while( count < curr_file->rtn_count ) { rtn_rover = curr_file->routine[count]; if( rtn_rover->tick_count == 0 ) { count2 = 0; } else { click_index = rtn_rover->first_tick_index - 1; count2 = rtn_rover->last_tick_index - click_index; line_count += count2; lines = ProfRealloc( lines, sizeof(wp_srcline)*line_count ); } while( count2-- > 0 ) { samp_data = WPGetMassgdSampData( curr_sio, click_index ); if( AddrCue( curr_mod->mh, *samp_data->raw, ch ) != SR_NONE ) { if( CueFileId( ch ) == curr_file->fid ) { new_line = CueLine( ch ); } } if( last_srcline != new_line || line_index == -1 ) { line_index++; lines[line_index].line = new_line; lines[line_index].tick_count = 0; last_srcline = new_line; if( line_index == 0 && curr_rtn == rtn_rover ) { wpsrc_file->samp_line = new_line; } } lines[line_index].tick_count += samp_data->hits; if( lines[line_index].tick_count > wpsrc_file->max_time ) { wpsrc_file->max_time = lines[line_index].tick_count; } click_index++; } line_count = line_index + 1; count++; } wpsrc_file->wp_line_count = line_count; if( line_count != 0 ) { wpsrc_file->src_lines = ProfRealloc( lines, sizeof(wp_srcline)*line_count ); } }