cleanup $XSCHEM_TMP_DIR/xschem_web cache on startup

This commit is contained in:
Stefan Frederik 2022-11-15 17:56:56 +01:00
parent e27eea8233
commit 4d3ede661a
1 changed files with 10 additions and 1 deletions

View File

@ -6194,7 +6194,6 @@ proc setup_tcp_bespice {} {
###
set OS [lindex $tcl_platform(os) 0]
set env(LC_ALL) C
# tcl variable XSCHEM_LIBRARY_PATH should already be set in xschemrc
set_ne add_all_windows_drives 1
set_paths
@ -6209,6 +6208,16 @@ if {$OS == "Windows"} {
set_ne XSCHEM_TMP_DIR {/tmp}
}
# Remove temporary location for web objects
if {[file exists ${XSCHEM_TMP_DIR}/xschem_web] } {
foreach file [glob -nocomplain ${XSCHEM_TMP_DIR}/xschem_web/* ${XSCHEM_TMP_DIR}/xschem_web/.*] {
# skip /${XSCHEM_TMP_DIR}/xschem_web/.. and /${XSCHEM_TMP_DIR}/xschem_web/.
if {[regexp {/\.\.$} $file] || [regexp {/\.$} $file] } {continue}
file delete $file
}
file delete ${XSCHEM_TMP_DIR}/xschem_web
}
# used in C code
set_ne xschem_libs {}
set_ne noprint_libs {}