Shell regex

czezz · 02-27-2009, 05:15 AM

I have a text file which is divided into a parts called "case".
Each case contain fields beginning with sign $ and @.
Here is asample:

Code:

                case "6": ### - rcmProcStaCP2DownEvent
                        $bs2sisTrapSender = $1
                        $bs2sisTrapTime = $2
                        @Summary = "description_1"
                        @Severity = 5
                        @Type = 1
                        @ExpireTime = 3600*12

                case "7": ### - rcmIncompatibilityAlarm
                        $bs2sisTrapSender = $1
                        $bs2sisTrapTime = $2
                        $bs2sisTrapAlarmFaultId = $3
                        $bs2sisTrapCause = $4
                        $bs2sisTrapAlarmX733Cause = $5
                        $bs2sisTrapInformation = $6
                        @Summary = "Description_2"
                        @Severity = 5
                        @Type = 1
                        @ExpireTime = 3600*12

I'd like to add at the end of each case new field @Identifier.
@Identifier should contain 4 repeatable fields + all fields beginning with $ in each case.
Here is an example:

Code:

                case "6": ### - rcmProcStaCP2DownEvent
                        $bs2sisTrapSender = $1
                        $bs2sisTrapTime = $2
                        @Summary = "description_1"
                        @Severity = 5
                        @Type = 1
                        @ExpireTime = 3600*12

                        @Identifier = @Node + " " + @AlertGroup + " " + @AlertKey + " " + @Type + " " +$bs2sisTrapSender+ " " +$bs2sisTrapTim

                case "7": ### - rcmIncompatibilityAlarm
                        $bs2sisTrapSender = $1
                        $bs2sisTrapTime = $2
                        $bs2sisTrapAlarmFaultId = $3
                        $bs2sisTrapCause = $4
                        $bs2sisTrapAlarmX733Cause = $5
                        $bs2sisTrapInformation = $6
                        @Summary = "Description_2"
                        @Severity = 5
                        @Type = 1
                        @ExpireTime = 3600*12
                        
                        @Identifier = @Node + " " + @AlertGroup + " " + @AlertKey + " " + @Type + " " +$bs2sisTrapSender+ " " +$bs2sisTrapTim+ " " +$bs2sisTrapAlarmFaultId+ " " +$bs2sisTrapCause+ " " +$bs2sisTrapAlarmX733Cause+ " " +$bs2sisTrapInformation

Can you guys help me out how to do that ?

jschiwal · 02-27-2009, 05:44 AM

Do you really want a blank line preceding it? If so, precede the second line with `\n'.

Code:

sed  '/case "/,/^$/{ /^$/i\
                        @Identifier = @Node + " " + @AlertGroup + " " + @AlertKey + " " + @Type + " " +$bs2sisTrapSender+ " " +$bs2sisTrapTim+ " " +$bs2sisTrapAlarmFaultId+ " " +$bs2sisTrapCause+ " " 
+$bs2sisTrapAlarmX733Cause+ " " +$bs2sisTrapInformation
}' infile

If the last record doesn't end with a blank line, you will need to add a rule to cover it as well.

czezz · 02-27-2009, 05:56 AM

I dont think this will work as I expect...
Please, note that amount of $ fields is diffrent in each case.

theNbomr · 02-28-2009, 03:13 PM

My perl offering...

Code:

#! /usr/bin/perl -w
use strict;

{ local $/ = "";
    my @cases = <>;
    foreach my $case ( @cases ){
        print $case;
        print "\n",'                        @Identifier = @Node + " " + @AlertGroup + " " + @AlertKey + " " + @Type ';
        my @dollarBss = $case =~ m/\s*(\$bs2sis.+)\s+=\s+/g;
        foreach my $dollarBs ( @dollarBss ){
            print " + \" \" + $dollarBs";
        }
        print "\n\n";
    }    
}

Run with input file as commandline argument.
--- rod.