11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
# Copyright (c) P.J.Gawthrop, 1997.
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.5 2000/10/17 09:20:00 peterg
## *** empty log message ***
##
## Revision 1.4 1998/07/26 10:28:30 peterg
## Added a header line to avoid empty file and to trigger
## switch_txt2m to write initial stuff.
##
|
>
>
>
>
>
|
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
# Copyright (c) P.J.Gawthrop, 1997.
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.6 2001/08/02 03:01:08 geraint
## Stopped initialisation of mttopen from over-writing logic.txt contents.
## - comment removed from "sort" input (which put it last) because
## initialisation is inserted in place of the comment by switch_txt2m.
##
## Revision 1.5 2000/10/17 09:20:00 peterg
## *** empty log message ***
##
## Revision 1.4 1998/07/26 10:28:30 peterg
## Added a header line to avoid empty file and to trigger
## switch_txt2m to write initial stuff.
##
|
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
|
echo Creating $1_switch.txt
rm -f $1_switch.txt
echo "# These are the switches deduced from ISW and CSW components"\
> $1_switch.txt
# This is the main transformation using awk
awk '{
if ($1=="state") {i++; if ($3=="MTT_SWITCH") print tolower($4) "\t" i};
}
END{
}
' < $1_struc.txt| sort >> $1_switch.txt
strip_comments < $1_switch.txt | wc -l | awk '{print $1 " switches found"}'
|
|
|
|
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
echo Creating $1_switch.txt
rm -f $1_switch.txt
echo "# These are the switches deduced from ISW and CSW components"\
> $1_switch.txt
# This is the main transformation using awk
gawk '{
if ($1=="state") {i++; if ($3=="MTT_SWITCH") print tolower($4) "\t" i};
}
END{
}
' < $1_struc.txt| sort >> $1_switch.txt
strip_comments < $1_switch.txt | wc -l | gawk '{print $1 " switches found"}'
|