90 lines
2.4 KiB
Tcl
90 lines
2.4 KiB
Tcl
#
|
|
# Report generation script generated by Vivado
|
|
#
|
|
|
|
proc create_report { reportName command } {
|
|
set status "."
|
|
append status $reportName ".fail"
|
|
if { [file exists $status] } {
|
|
eval file delete [glob $status]
|
|
}
|
|
send_msg_id runtcl-4 info "Executing : $command"
|
|
set retval [eval catch { $command } msg]
|
|
if { $retval != 0 } {
|
|
set fp [open $status w]
|
|
close $fp
|
|
send_msg_id runtcl-5 warning "$msg"
|
|
}
|
|
}
|
|
proc start_step { step } {
|
|
set stopFile ".stop.rst"
|
|
if {[file isfile .stop.rst]} {
|
|
puts ""
|
|
puts "*** Halting run - EA reset detected ***"
|
|
puts ""
|
|
puts ""
|
|
return -code error
|
|
}
|
|
set beginFile ".$step.begin.rst"
|
|
set platform "$::tcl_platform(platform)"
|
|
set user "$::tcl_platform(user)"
|
|
set pid [pid]
|
|
set host ""
|
|
if { [string equal $platform unix] } {
|
|
if { [info exist ::env(HOSTNAME)] } {
|
|
set host $::env(HOSTNAME)
|
|
}
|
|
} else {
|
|
if { [info exist ::env(COMPUTERNAME)] } {
|
|
set host $::env(COMPUTERNAME)
|
|
}
|
|
}
|
|
set ch [open $beginFile w]
|
|
puts $ch "<?xml version=\"1.0\"?>"
|
|
puts $ch "<ProcessHandle Version=\"1\" Minor=\"0\">"
|
|
puts $ch " <Process Command=\".planAhead.\" Owner=\"$user\" Host=\"$host\" Pid=\"$pid\">"
|
|
puts $ch " </Process>"
|
|
puts $ch "</ProcessHandle>"
|
|
close $ch
|
|
}
|
|
|
|
proc end_step { step } {
|
|
set endFile ".$step.end.rst"
|
|
set ch [open $endFile w]
|
|
close $ch
|
|
}
|
|
|
|
proc step_failed { step } {
|
|
set endFile ".$step.error.rst"
|
|
set ch [open $endFile w]
|
|
close $ch
|
|
}
|
|
|
|
set_msg_config -id {Common 17-41} -limit 10000000
|
|
set_msg_config -id {Synth 8-256} -limit 10000
|
|
set_msg_config -id {Synth 8-638} -limit 10000
|
|
|
|
start_step write_bitstream
|
|
set ACTIVE_STEP write_bitstream
|
|
set rc [catch {
|
|
create_msg_db write_bitstream.pb
|
|
set_param synth.incrementalSynthesisCache C:/Users/E209098F/AppData/Roaming/Xilinx/Vivado/.Xil/Vivado-12508-irb121-02-w/incrSyn
|
|
set_param xicom.use_bs_reader 1
|
|
open_checkpoint VGA_top_routed.dcp
|
|
set_property webtalk.parent_dir C:/Users/e209098F/Documents/uec-electronique/td4/projet/projet-vga/projet-vga.cache/wt [current_project]
|
|
set_property XPM_LIBRARIES XPM_CDC [current_project]
|
|
catch { write_mem_info -force VGA_top.mmi }
|
|
write_bitstream -force VGA_top.bit
|
|
catch {write_debug_probes -quiet -force VGA_top}
|
|
catch {file copy -force VGA_top.ltx debug_nets.ltx}
|
|
close_msg_db -file write_bitstream.pb
|
|
} RESULT]
|
|
if {$rc} {
|
|
step_failed write_bitstream
|
|
return -code error $RESULT
|
|
} else {
|
|
end_step write_bitstream
|
|
unset ACTIVE_STEP
|
|
}
|
|
|