URL
https://opencores.org/ocsvn/bustap-jtag/bustap-jtag/trunk
Subversion Repositories bustap-jtag
Compare Revisions
- This comparison shows the changes necessary to convert path
/bustap-jtag/trunk/sim/altera
- from Rev 10 to Rev 11
- ↔ Reverse comparison
Rev 10 → Rev 11
/virtual_jtag_stimulus.tcl
114,7 → 114,7
} |
} |
|
proc config_trig {{jtag_index_2 2} {trig 00000000000000}} { |
proc config_trig {{jtag_index_2 2} {trig 00000000000000} {pnum 0}} { |
global log |
set trig_leng [string length $trig] |
if {$trig_leng!=14} { |
123,6 → 123,8
#device_lock -timeout 5 |
#device_virtual_ir_shift -instance_index $jtag_index_2 -ir_value 1 -no_captured_ir_value |
#set addr_trig [device_virtual_dr_shift -instance_index $jtag_index_2 -dr_value $trig -length 56 -value_in_hex] |
#device_virtual_ir_shift -instance_index $jtag_index_2 -ir_value 2 -no_captured_ir_value |
#set addr_trig [device_virtual_dr_shift -instance_index $jtag_index_2 -dr_value $pnum -length 10] |
#device_unlock |
global trig_sim_act |
global trig_sim_num |
133,6 → 135,12
append trig_sim_act (0,2,$trig,[format "%X" 56]), |
set trig_sim_num [expr $trig_sim_num+1] |
set trig_sim_len [expr $trig_sim_len+56] |
append trig_sim_act (0,1,2,[format "%X" 2]), |
set trig_sim_num [expr $trig_sim_num+1] |
set trig_sim_len [expr $trig_sim_len+2] |
append trig_sim_act (0,2,[format "%X" $pnum],[format "%X" 10]), |
set trig_sim_num [expr $trig_sim_num+1] |
set trig_sim_len [expr $trig_sim_len+10] |
return 0 |
} |
} |
269,6 → 277,7
proc initTrigConfig {} { |
global triggerAddr |
global triggerData |
global triggerPnum |
if {[set triggerAddr]==""} { |
set triggerAddr ffff |
} |
275,11 → 284,15
if {[set triggerData]==""} { |
set triggerData a5a5a5a5 |
} |
if {[set triggerPnum]==""} { |
set triggerPnum 0 |
} |
} |
|
proc updateTrigger {{trigCmd 0}} { |
global triggerAddr |
global triggerData |
global triggerPnum |
global trig_wren |
global trig_rden |
global trig_aden |
288,7 → 301,7
append triggerValue [format "%1X" [expr $trig_wren*8+$trig_rden*4+$trigCmd]] |
append triggerValue $triggerAddr |
append triggerValue $triggerData |
config_trig 2 $triggerValue |
config_trig 2 $triggerValue $triggerPnum |
} |
|
proc startTrigger {} { |
299,8 → 312,8
set trigEnable [expr $trig_wren+$trig_rden+$trig_aden+$trig_daen] |
if {$trigEnable>0} { |
updateTrigger 2 |
#reset_fifo 0 |
#query_usedw 0 |
reset_fifo 0 |
query_usedw 0 |
updateTrigger 3 |
} else { |
updateTrigger 0 |
319,7 → 332,7
proc read_fifo_content {} { |
global log |
global fifoUsedw |
#$log insert end "\n****************************************\n" |
$log insert end "\n****************************************\n" |
for {set i 0} {$i<$fifoUsedw} {incr i} { |
set fifoContent [read_fifo 0] |
set ok_trig [expr [format "%d" 0x[string index $fifoContent 0]]/2] |
515,7 → 528,10
checkbutton .console.trig.trigdata -text {@Data:} -variable trig_daen |
checkbutton .console.trig.wren -text {@WR} -variable trig_wren |
checkbutton .console.trig.rden -text {@RD} -variable trig_rden |
pack .console.trig.wren .console.trig.rden \ |
label .console.trig.pnum -text {Pre-Capture:} |
entry .console.trig.trigvalue_pnum -textvar triggerPnum -width 4 |
pack .console.trig.pnum .console.trig.trigvalue_pnum \ |
.console.trig.wren .console.trig.rden \ |
.console.trig.trigaddr .console.trig.trigvalue_addr \ |
.console.trig.trigdata .console.trig.trigvalue_data \ |
.console.trig.starttrig \ |
/wave.do
41,6 → 41,12
add wave -noupdate -format Logic /up_monitor_tb/MON_LO/inst/u_virtual_jtag_adda_fifo/rd_en |
add wave -noupdate -format Literal /up_monitor_tb/MON_LO/inst/u_virtual_jtag_adda_fifo/data_out |
add wave -noupdate -divider {New Divider} |
add wave -noupdate -format Literal /up_monitor_tb/MON_LO/inst/pretrig_num |
add wave -noupdate -format Literal /up_monitor_tb/MON_LO/inst/pretrig_cnt |
add wave -noupdate -format Logic /up_monitor_tb/MON_LO/inst/pretrig_full |
add wave -noupdate -format Logic /up_monitor_tb/MON_LO/inst/pretrig_wr |
add wave -noupdate -format Logic /up_monitor_tb/MON_LO/inst/pretrig_rd |
add wave -noupdate -divider {New Divider} |
add wave -noupdate -format Logic /up_monitor_tb/MON_LO/inst/u_virtual_jtag_adda_fifo/sld_virtual_jtag_component/user_input/vj_sim_done |
add wave -noupdate -format Logic /up_monitor_tb/MON_LO/inst/u_virtual_jtag_adda_trig/sld_virtual_jtag_component/user_input/vj_sim_done |
add wave -noupdate -format Logic /up_monitor_tb/MON_LO/inst/u_virtual_jtag_addr_mask/sld_virtual_jtag_component/user_input/vj_sim_done |
47,7 → 53,7
add wave -noupdate -divider {New Divider} |
add wave -noupdate -divider {New Divider} |
TreeUpdate [SetDefaultTree] |
WaveRestoreCursors {{Cursor 1} {388925000 ps} 0} |
WaveRestoreCursors {{Cursor 1} {11169937 ps} 0} |
configure wave -namecolwidth 147 |
configure wave -valuecolwidth 100 |
configure wave -justifyvalue left |
62,4 → 68,4
configure wave -timeline 0 |
configure wave -timelineunits ps |
update |
WaveRestoreZoom {0 ps} {14421760 ps} |
WaveRestoreZoom {0 ps} {10500 ns} |