1 |
utke |
1.1 |
#!/bin/bash |
2 |
|
|
echo "#generated file" > temp.sed |
3 |
|
|
for i in `grep '^ SUBROUTINE ' $1 | awk '{print $2}'` |
4 |
|
|
do |
5 |
|
|
# extract the name |
6 |
|
|
srName=${i%%\(*} |
7 |
|
|
echo "/^ SUBROUTINE $srName(/i\\" >> temp.sed |
8 |
|
|
if [ "$srName" = "OpenAD_the_second_level_loop" -o "$srName" = "OpenAD_the_third_level_loop" -o "$srName" = "OpenAD_the_fourth_level_loop" ] |
9 |
|
|
then |
10 |
utke |
1.2 |
echo "c\$openad XXX Template ../code_shallow_openad2/ad_template.checkpoint.f" >> temp.sed |
11 |
utke |
1.1 |
else |
12 |
|
|
if [ "$srName" = "OpenAD_the_first_level_loop" ] |
13 |
|
|
then |
14 |
utke |
1.2 |
echo "c\$openad XXX Template ../code_shallow_openad2/ad_template.checkpoint_to_split.f" >> temp.sed |
15 |
utke |
1.1 |
else |
16 |
|
|
if [ "$srName" = "OpenAD_the_first_level_plain" -o "$srName" = "OpenAD_the_second_level_plain" -o "$srName" = "OpenAD_the_third_level_plain" -o "$srName" = "OpenAD_the_fourth_level_plain" ] |
17 |
|
|
then |
18 |
utke |
1.2 |
echo "c\$openad XXX Template ../code_shallow_openad2/ad_template.plain.f" >> temp.sed |
19 |
utke |
1.1 |
else |
20 |
|
|
if [ "$srName" = "OpenAD_cg2d" ] |
21 |
|
|
then |
22 |
utke |
1.2 |
echo "c\$openad XXX Template ../code_shallow_openad2/ad_template.sa_cg2d.f" >> temp.sed |
23 |
utke |
1.1 |
else |
24 |
|
|
if [ "$srName" = "OpenAD_exch_uv_agrid_xy_rs" -o "$srName" = "OpenAD_exch_uv_xy_rs" -o "$srName" = "OpenAD_exch_uv_xyz_rl" -o "$srName" = "OpenAD_exch_uv_xyz_rs" -o "$srName" = "OpenAD_exch_xy_rl" -o "$srName" = "OpenAD_exch_xyz_rl" -o "$srName" = "OpenAD_exch_z_xy_rs" -o "$srName" = "OpenAD_global_max_r8" -o "$srName" = "OpenAD_global_sum_r8" ] |
25 |
|
|
then |
26 |
|
|
tmpName=${srName#OpenAD_} |
27 |
utke |
1.2 |
echo "c\$openad XXX Template ../code_shallow_openad2/ad_template.${tmpName}.f" >> temp.sed |
28 |
utke |
1.1 |
else |
29 |
utke |
1.2 |
echo "c\$openad XXX Template ../code_shallow_openad2/ad_template.split.f" >> temp.sed |
30 |
utke |
1.1 |
fi |
31 |
|
|
fi |
32 |
|
|
fi |
33 |
|
|
fi |
34 |
|
|
fi |
35 |
|
|
done |
36 |
|
|
cat $1 | sed -f temp.sed > $2 |
37 |
|
|
|