footpresure.tcl

工程中使用的一段资源管理vhdl程序,有简单的分频代码

########## Tcl recorder end at 02/17/09 15:35:30 ###########


########## Tcl recorder starts at 02/17/09 15:35:47 ##########

# Commands to make the Process: 
# Constraint Editor
if [catch {open CPLD_MPU1.cmd w} rspFile] {
	puts stderr "Cannot create response file CPLD_MPU1.cmd: $rspFile"
} else {
	puts $rspFile "PROJECT: CPLD_MPU1
working_path: \"$proj_dir\"
module: cpld_mpu1
vhdl_file_list: footvhdl.vhd
output_file_name: cpld_mpu1
suffix_name: edi
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/synpwrap\" -e cpld_mpu1 -target mach"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete CPLD_MPU1.cmd
if [runCmd "\"$cpld_bin/edif2blf\" -edf cpld_mpu1.edi -out cpld_mpu1.bl0 -err automake.err -log cpld_mpu1.log -prj footpresure -lib \"$install_dir/ispcpld/dat/mach.edn\" -net_vcc vcc -net_gnd gnd -nbx -dse -tlw -cvt yes -xor"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/mblifopt\" cpld_mpu1.bl0 -collapse none -reduce none -keepwires  -err automake.err -family"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/mblflink\" \"cpld_mpu1.bl1\" -o \"footpresure.bl2\" -omod \"footpresure\"  -err \"automake.err\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/impsrc\"  -prj footpresure -lci footpresure.lct -log footpresure.imp -err automake.err -tti footpresure.bl2 -dir $proj_dir"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/abelvci\" -vci footpresure.lct -blifopt footpresure.b2_"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/mblifopt\" footpresure.bl2 -sweep -mergefb -err automake.err -o footpresure.bl3 @footpresure.b2_ "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/abelvci\" -vci footpresure.lct -dev lc4k -diofft footpresure.d0"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/mdiofft\" footpresure.bl3 -family amdmach -idev van -o footpresure.bl4 -oxrf footpresure.xrf -err automake.err @footpresure.d0 "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/abelvci\" -vci footpresure.lct -dev lc4k -prefit footpresure.l0"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/prefit\" -blif -inp footpresure.bl4 -out footpresure.bl5 -err automake.err -log footpresure.log -mod cpld_mpu1 @footpresure.l0  -sc"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/blifstat\" -i footpresure.bl5 -o footpresure.sif"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
# Application to view the Process: 
# Constraint Editor
if [catch {open lattice_cmd.rs2 w} rspFile] {
	puts stderr "Cannot create response file lattice_cmd.rs2: $rspFile"
} else {
	puts $rspFile "-nodal -src footpresure.bl5 -type BLIF -presrc footpresure.bl3 -crf footpresure.crf -sif footpresure.sif -devfile \"$install_dir/ispcpld/dat/lc4k/m4s_128_92.dev\" -lci footpresure.lct
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/lciedit\" @lattice_cmd.rs2"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 02/17/09 15:35:47 ###########


########## Tcl recorder starts at 02/17/09 15:36:11 ##########

# Commands to make the Process: 
# Generate Board-level Stamp Model
if [catch {open footpresure.rs1 w} rspFile] {
	puts stderr "Cannot create response file footpresure.rs1: $rspFile"
} else {
	puts $rspFile "-i footpresure.bl5 -lci footpresure.lct -d m4s_128_92 -lco footpresure.lco -html_rpt -fti footpresure.fti -fmt PLA -tto footpresure.tt4 -nojed -eqn footpresure.eq3 -tmv NoInput.tmv
-rpt_num 1
"
	close $rspFile
}
if [catch {open footpresure.rs2 w} rspFile] {
	puts stderr "Cannot create response file footpresure.rs2: $rspFile"
} else {
	puts $rspFile "-i footpresure.bl5 -lci footpresure.lct -d m4s_128_92 -lco footpresure.lco -html_rpt -fti footpresure.fti -fmt PLA -tto footpresure.tt4 -eqn footpresure.eq3 -tmv NoInput.tmv
-rpt_num 1
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/lpf4k\" \"@footpresure.rs2\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete footpresure.rs1
file delete footpresure.rs2
if [runCmd "\"$cpld_bin/tda\" -i footpresure.bl5 -o footpresure.tda -lci footpresure.lct -dev m4s_128_92 -family lc4k -mod cpld_mpu1 -ovec noinput.tmv -err tda.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/synsvf\" -exe \"$install_dir/ispvmsystem/ispufw\" -prj footpresure -if footpresure.jed -j2s -log footpresure.svl "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/timer\" -inp \"footpresure.tt4\" -lci \"footpresure.lct\" -stamp \"footpresure.stamp\" -exf \"cpld_mpu1.exf\" -lco \"footpresure.lco\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/stamppar\" -i footpresure.stamp "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 02/17/09 15:36:11 ###########


########## Tcl recorder starts at 02/17/09 15:36:15 ##########

# Commands to make the Process: 
# ISC-1532 File
if [runCmd "\"$cpld_bin/synsvf\" -exe \"$install_dir/ispvmsystem/ispufw\" -prj footpresure -if footpresure.jed -j2i "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 02/17/09 15:36:15 ###########


########## Tcl recorder starts at 02/17/09 17:52:15 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" footvhdl.vhd -o footvhdl.jhd -m \"$install_dir/ispcpld/generic/lib/vhd/location.map\" -p \"$install_dir/ispcpld/generic/lib\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 02/17/09 17:52:15 ###########


########## Tcl recorder starts at 02/17/09 17:52:23 ##########

# Commands to make the Process: 
# JEDEC File
if [catch {open CPLD_MPU1.cmd w} rspFile] {
	puts stderr "Cannot create response file CPLD_MPU1.cmd: $rspFile"
} else {
	puts $rspFile "PROJECT: CPLD_MPU1
working_path: \"$proj_dir\"
module: cpld_mpu1
vhdl_file_list: footvhdl.vhd
output_file_name: cpld_mpu1
suffix_name: edi
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/synpwrap\" -e cpld_mpu1 -target mach"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete CPLD_MPU1.cmd
if [runCmd "\"$cpld_bin/edif2blf\" -edf cpld_mpu1.edi -out cpld_mpu1.bl0 -err automake.err -log cpld_mpu1.log -prj footpresure -lib \"$install_dir/ispcpld/dat/mach.edn\" -net_vcc vcc -net_gnd gnd -nbx -dse -tlw -cvt yes -xor"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/mblifopt\" cpld_mpu1.bl0 -collapse none -reduce none -keepwires  -err automake.err -family"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/mblflink\" \"cpld_mpu1.bl1\" -o \"footpresure.bl2\" -omod \"footpresure\"  -err \"automake.err\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/impsrc\"  -prj footpresure -lci footpresure.lct -log footpresure.imp -err automake.err -tti footpresure.bl2 -dir $proj_dir"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/abelvci\" -vci footpresure.lct -blifopt footpresure.b2_"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/mblifopt\" footpresure.bl2 -sweep -mergefb -err automake.err -o footpresure.bl3 @footpresure.b2_ "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/abelvci\" -vci footpresure.lct -dev lc4k -diofft footpresure.d0"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/mdiofft\" footpresure.bl3 -family amdmach -idev van -o footpresure.bl4 -oxrf footpresure.xrf -err automake.err @footpresure.d0 "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/abelvci\" -vci footpresure.lct -dev lc4k -prefit footpresure.l0"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/prefit\" -blif -inp footpresure.bl4 -out footpresure.bl5 -err automake.err -log footpresure.log -mod cpld_mpu1 @footpresure.l0  -sc"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [catch {open footpresure.rs1 w} rspFile] {
	puts stderr "Cannot create response file footpresure.rs1: $rspFile"
} else {
	puts $rspFile "-i footpresure.bl5 -lci footpresure.lct -d m4s_128_92 -lco footpresure.lco -html_rpt -fti footpresure.fti -fmt PLA -tto footpresure.tt4 -nojed -eqn footpresure.eq3 -tmv NoInput.tmv
-rpt_num 1
"
	close $rspFile
}
if [catch {open footpresure.rs2 w} rspFile] {
	puts stderr "Cannot create response file footpresure.rs2: $rspFile"
} else {
	puts $rspFile "-i footpresure.bl5 -lci footpresure.lct -d m4s_128_92 -lco footpresure.lco -html_rpt -fti footpresure.fti -fmt PLA -tto footpresure.tt4 -eqn footpresure.eq3 -tmv NoInput.tmv
-rpt_num 1
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/lpf4k\" \"@footpresure.rs2\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete footpresure.rs1
file delete footpresure.rs2
if [runCmd "\"$cpld_bin/tda\" -i footpresure.bl5 -o footpresure.tda -lci footpresure.lct -dev m4s_128_92 -family lc4k -mod cpld_mpu1 -ovec noinput.tmv -err tda.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/synsvf\" -exe \"$install_dir/ispvmsystem/ispufw\" -prj footpresure -if footpresure.jed -j2s -log footpresure.svl "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 02/17/09 17:52:23 ###########


########## Tcl recorder starts at 02/17/09 17:52:47 ##########

# Commands to make the Process: 
# Generate Board-level Stamp Model
if [runCmd "\"$cpld_bin/timer\" -inp \"footpresure.tt4\" -lci \"footpresure.lct\" -stamp \"footpresure.stamp\" -exf \"cpld_mpu1.exf\" -lco \"footpresure.lco\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/stamppar\" -i footpresure.stamp "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 02/17/09 17:52:47 ###########


########## Tcl recorder starts at 02/17/09 17:52:49 ##########

# Commands to make the Process: 
# Generate Timing Simulation Files
if [catch {open footpresure.rsp w} rspFile] {
	puts stderr "Cannot create response file footpresure.rsp: $rspFile"
} else {
	puts $rspFile "-i footpresure.tt4 -lib \"$install_dir/ispcpld/dat/lc4k\" -strategy top -sdfmdl \"$install_dir/ispcpld/dat/sdf.mdl\" -pla footpresure.tt4 -lci footpresure.lct -prj footpresure -dir \"$proj_dir\" -err automake.err -log footpresure.nrp -exf cpld_mpu1.exf 
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/sdf\" @footpresure.rsp"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete footpresure.rsp

########## Tcl recorder end at 02/17/09 17:52:49 ###########


########## Tcl recorder starts at 02/17/09 18:53:38 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" footvhdl.vhd -o footvhdl.jhd -m \"$install_dir/ispcpld/generic/lib/vhd/location.map\" -p \"$install_dir/ispcpld/generic/lib\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 02/17/09 18:53:38 ###########


########## Tcl recorder starts at 02/17/09 18:53:40 ##########

# Commands to make the Process: 
# Compile EDIF File
if [catch {open CPLD_MPU1.cmd w} rspFile] {
	puts stderr "Cannot create response file CPLD_MPU1.cmd: $rspFile"
} else {
	puts $rspFile "PROJECT: CPLD_MPU1
working_path: \"$proj_dir\"
module: cpld_mpu1
vhdl_file_list: footvhdl.vhd
output_file_name: cpld_mpu1
suffix_name: edi
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/synpwrap\" -e cpld_mpu1 -target mach"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete CPLD_MPU1.cmd
if [runCmd "\"$cpld_bin/edif2blf\" -edf cpld_mpu1.edi -out cpld_mpu1.bl0 -err automake.err -log cpld_mpu1.log -prj footpresure -lib \"$install_dir/ispcpld/dat/mach.edn\" -net_vcc vcc -net_gnd gnd -nbx -dse -tlw -cvt yes -xor"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 02/17/09 18:53:40 ###########


########## Tcl recorder starts at 02/17/09 18:53:53 ##########

# Commands to make the Process: 
# JEDEC File