. <(awk     '/^ *functions */       {F=1; next}
         F                      {CNT=CNT+gsub(/{/,"")-gsub(/}/,""); if (CNT==1 && !/^ *$/) print "dictname[" ++dc "]=" $0}
         /fields/               {for (i=3; i<NF; i++) print "fieldname[" ++fc "]="$i}
         /^ *surfaces */        {S=1; next}
         S                      {gsub(/[^0-9A-Za-z]*/, ""); if (!/^ *$/) {print "planename[" ++pc "]=" $0; S=0}}
        ' file)

echo "0"${dictname[0]} ${planename[0]} ${fieldname[0]} 
echo "1"${dictname[1]} ${planename[1]} ${fieldname[1]} 
echo "2"${dictname[2]} ${planename[2]} ${fieldname[2]} 
echo "3"${dictname[3]} ${planename[3]} ${fieldname[3]} 
echo "4"${dictname[4]} ${planename[4]} ${fieldname[4]} 
echo "5"${dictname[5]} ${planename[5]} ${fieldname[5]} 
echo "6"${dictname[6]} ${planename[6]} ${fieldname[6]} 
echo "7"${dictname[7]} ${planename[7]} ${fieldname[7]} 
echo "8"${dictname[8]} ${planename[8]} ${fieldname[8]} 
echo "9"${dictname[9]} ${planename[9]} ${fieldname[9]} 
echo "10"${dictname[10]} ${planename[10]} ${fieldname[10]} 
echo "11"${dictname[11]} ${planename[11]} ${fieldname[11]} 
echo "12"${dictname[12]} ${planename[12]} ${fieldname[12]} 
echo "13"${dictname[13]} ${planename[13]} ${fieldname[13]}

functions
{
    planeDictName1
    {
        type            surfaces;
        functionObjectLibs ( "libsampling.so" );
        outputControl   timeStep;
        surfaceFormat   vtk;
        fields          ( p U T );
        interpolationScheme cellPoint;
        surfaces
        (
            planeName1
            {
                type plane;
                    basePoint (0.0 0.0 0.025);
                    normalVector (0 0 1);
                triangulate false;
                interpolate true;
            }
        );
    }


    planeDictName2
    {
        type            surfaces;
        functionObjectLibs ( "libsampling.so" );
        outputControl   timeStep;
        surfaceFormat   vtk;
        fields          ( p U );
        interpolationScheme cellPoint;
        surfaces
        (
            planeName2
            {
                type plane;
                    basePoint (0.0 0.0 0.075);
                    normalVector (0 0 1);
                triangulate false;
                interpolate true;
            }
        );
    }
}

/dev/fd/63: line 1: planeDictName1: command not found
/dev/fd/63: line 6: planeDictName2: command not foundfound
0
1 planeName1 p
2 planeName2 U
3 T
4 p
5 U
6 
7 
8 
9 
10
11
12
13

above test is done to see whether the script able to read names highlighted with red colour from a file.

code is able to read planeName and fields but unable to read dictName. Was stuck here.

.

<