Experimental Physics and
Industrial Control System

Benjamin Franksen <[email protected]> · Wed, 03 Mar 1999 19:03:01 +0100

Hi Rozelle,

> > Hi Ben,
> > Did you ever write that Perl script?
> 
> Unfortunately not! I could not decide to make the changes in our
> edif-sym directory because I feared that older applications (using older
> epics releases) might break. [...]

My fears were not justified. I didn't realize that dbst is an epics
_extension_ and therefore has only one instance at our site and not one
for every base release, like eg dbLoadRecords. So we have been using the
new dbst all along. 

Anyway, we are currently trying to adjust our site to the new
source/release control. Thus we treat the directory for capfast symbols
and edb.def like a <supporttop> so the cleansed direcory is used only
for 3.13.1 applications. This is my 'script':

perl -pi -e 's/:0(\.0+(e\+0+)?)?$/:/g' *.sym
perl -pi -e 's/\(default\("0?(\.0+(e\+0+)?)?"\)\)//g' edb.def
perl -pi -e 's/\(default\s+"0?(\.0+(e\+0+)?)?"\)//g' edb.def

It eliminates all zero values in the symbols, as well as all zero value
and empty string defaults in the edb.def (no backup). Do existing
schematics need be cleansed of zeros? In any case, I wouldn't do it
automatically because there may be zeros that are meant to be in there
to override other defaults. I don't think we need to edit any capfast
symbol or edb.def manually.

Ben
-- 
The Notorious Neb Nesknarf
---------------------------------------------------------------------
@BESSY II: fax: +49 30 6392-4859 phone: +49 30 6392-4865
---------------------------------------------------------------------
keep the listeners happy: BND MAD Waffen Lieferung ETA Lybien IRA CIA 
Iran killer Heroin kommunistische Befreiungsfront RAF PKK Irak Kurden

Experimental Physics and Industrial Control System

Experimental Physics and
Industrial Control System