Very Computer

I am on a HPUX 11.0 box using ksh.

I need to use the  /etc/host file to create another file used elsewhere.
The format of the new file should be

router <hostname> ATAP <Company Name>
ip        <ip address>

router   widhost1   ATAP WIDGET COMPANY
ip         10.10.10.2

# WIDGET COMPANY
widhost1 10.10.10.2
widhost2 10.10.11.3
widhost3 10.10.12.4
widhost4 10.10.13.5
#
# DIDGET COMPANY
didhost1 10.11.10.2
didhost2 10.11.11.2
didhost3 10.11.12.2
#

I am having difficulty setting the company name delimiter -- basically, read
first line, print the host, ip and company name until the company name
changes.

begin 666 cvidal.vcf
M0D5'24XZ5D-!4D0-"E9%4E-)3TXZ,BXQ#0I..CMC=FED86P-"D9..F-V:61A
M; T*14U!24P[4%)%1CM)3E1%4DY%5#IC=FED86Q 871T+F-O;0T*4D56.C(P
;,#,P-3 Q5#$R,C$R,%H-"D5.1#I60T%21 T*
`
end

Dear Chris:

You mean your '/etc/hosts' not '/etc/host' file.

Quote:

> router <hostname> ATAP <Company Name>
> ip        <ip address>

> router   widhost1   ATAP WIDGET COMPANY
> ip         10.10.10.2

This is the format of your desired output.

Quote:> # WIDGET COMPANY
> widhost1 10.10.10.2
> widhost2 10.10.11.3
> widhost3 10.10.12.4
> widhost4 10.10.13.5
> #
> # DIDGET COMPANY
> didhost1 10.11.10.2
> didhost2 10.11.11.2
> didhost3 10.11.12.2
> #

And this is a sample of what your '/etc/hosts' looks like.

Quote:> I am having difficulty setting the company name delimiter -- basically, read
> first line, print the host, ip and company name until the company name
> changes.

The assumptions for the logic is as follows.
1. Each line contains at most two fields.
    a. '#' followed by company name or just '#'.
    b. Hostname followed by IP.
2. Context of line is set by whether the first field is '#' or not.

The logic for detecting change in company name is in the determination
of context.
If '#' is detected as $hostname, then check $ip.  If it is non-empty,
then change the update the variable company.

Code is as follows.

company=''
while read hostname ip; do
     if [ "$hostname" = '#' ]; then
        #
        # It might be a line containing company name.
        #
        if [ -n "$ip" ]; then
            company=$ip
        fi
     else
        #
        # It is a line with hostname and ip.
        # Print only iff company name has been defined.
        #
        [ -n "$company" ] && cat <<EOF
router $hostname ATAP $company
ip $ip
EOF
     fi
done

Hope this helps you,

hjy

Here's the perl solution:

#!/bin/ksh -u

perl -wlane 'BEGIN{$,="\t";}
if(/^#\s+/../^#$/){
        next if /^#$/;
        ($company=$_)=~s/^#\s+/ATAP\t/ and next if /^#\s+/;
        print "router",$F[0],$company;
        print "ip",$F[1];

Quote:}' InputFile

Here's the sed solution:

#!/bin/ksh -u

sed -ne '
        ## transfrom all TABs to spaces
        y/      / /
        s/^ *//
        s/ *$//
        /^# /,/^#$/{
                /^# /{
                        s/^# //
                        h
                        d
                }
                /^#$/{
                        d
                }
                s/ / ATAP /
                G
                s/ATAP \([^ ]*\)\n\(.*\)$/ATAP \2\
ip \1/
                s/^/router /
                ## transform all spaces to TABs
                y/ /    /
                p
        }' InputFile