Shell Programming and Scripting

Hello guys,

I want to substitute sub() with substr() and match() for the following code. Its part of series of else if's:


Block 1)
# Example line:
# Drive sense data: f0000300 00848f0a 00000000 1100e480 008b
# This also will ignore invalid entries such as :
# Drive sense data: channel 2
# Also, if the LBA is evenly divisible by 8 (the first sector in
# a controller cache block) will print "*" if not, it will print "-"

else if (!sdata && sub(/Drive sense data: /,"") && $1 ~ /^[0-9a-f]+$/ )
{
sub (/...../,"",$1)
sub (/..$/,"",$2)
sdata=$1$2
if (substr(sdata,8,1) == 0 || substr(sdata,8,1) == 8 )
{
cach="*"
}
else cach="-"
}


Block 2)

else if (/^ detection point /)
{
# Example line:
# EEL information: recovered
# detection point 00000500 VDD_READ
# lba 0000848e
# blocks 00000056
detectpoint=1;
}
else if (detectpoint && !lba && sub(/ lba / ,""))
{
lba=$0" ";
}
else if (detectpoint && !vddRepairBlocks && sub (/ blocks / ,""))
{
vddRepairBlocks=$0" ";
}



Thanks for your help

Block 1

Code:

# Drive sense data: channel 2
# Also, if the LBA is evenly divisible by 8 (the first sector in
# a controller cache block) will print "*" if not, it will print "-"

else if (!sdata && match($0, /Drive sense data:/)
{
   sub(/^Drive sense data:/, "")
   # $0 = substr($0, 1, RSTART-1) substr($0, RSTART+RLENGTH);
   if ($1 ~ /^[0-9a-f]+$/ )
   {
      $1 = substr($1, 5);
      $2 = substr($2, 1, length($2)-2);
      sdata = $1$2
      if (substr(sdata,8,1) == 0 || substr(sdata,8,1) == 8 )
      {
         cach="*"
      }
         else cach="-"
      }
   }
}

I think that keeping the sub is more readable:

Code:

else if (!sdata && /Drive sense data:/)
{
   sub(/Drive sense data:/, "")

Block 2

Code:

else if (/^ detection point /)
{
   # Example line:
   # EEL information: recovered
   # detection point 00000500 VDD_READ
   # lba 0000848e
   # blocks 00000056
   detectpoint=1;
}
else if (detectpoint && !lba && match($0, / lba /))
{
   $0  = substr($0, 1, RSTART-1) substr($0, RSTART+RLENGTH);
   lba = $0 " ";
}
else if (detectpoint && !vddRepairBlocks && match($0, / blocks /))
{
   $0  = substr($0, 1, RSTART-1) substr($0, RSTART+RLENGTH);
   vddRepairBlocks = $0 " ";
}

Jean-Pierre.

Thanks much.

Worked like a charm

that $0 = substr($0, 1, RSTART-1) substr($0, RSTART+RLENGTH); wont work, I used used substr($0, x, y)


Thanks though !