Page History

...

peregrin@pslogin02:~$ more ims_search.sh 
for fn in $(ls /reg/d/iocData/*mec*ims**/iocInfo/ioc.log);
do
istr=$(echo $fn | cut -f 5 -d "/");
cat $fn |
awk -F, -v ioc=$istr '{
mstr=""
pstr=""
for (i=1; i<=NF; i++) {
   if (index($i, "MOTOR=")) mstr = substr($i,7,length($i));
   if (index($i, "PORT=")) pstr = substr($i,6,length($i)); 
   if (mstr != "" && pstr != "") {
        printf("%s,%s,%s\n", mstr, pstr, ioc);
   }
}
}' 
done |
sort -k 2 -t , | uniq

Newport Motor Channels

```peregrin@pslogin02peregrin@pslogin02:~$ more xps_search.sh 
for fn in $(ls /reg/d/iocData/*mec*-xps*/iocInfo/ioc.log);
do
    istr=$(echo $fn | cut -f 5 -d "/");
    grep "Found positioner" $fn |
    awk -v ioc=$istr '{
        cstr = substr($7,2,length($7)-2);
        tstr = substr($9,1,length($9)-1);
        printf "%s,%s,%s\n", cstr, tstr, ioc;
    }'
done```done