2007-10-26 22:44:33 +00:00
|
|
|
#!/usr/bin/awk -f
|
|
|
|
# IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
|
|
|
|
BEGIN {
|
2008-04-09 20:22:46 +00:00
|
|
|
localport = ARGV[1]
|
|
|
|
ns = "/inet/tcp/0/127.0.0.1/" localport
|
2008-07-22 13:56:56 +00:00
|
|
|
canexit = 0
|
2007-10-26 22:44:33 +00:00
|
|
|
|
|
|
|
print "<xcatrequest>" |& ns
|
|
|
|
print "<command>nextdestiny</command>" |& ns
|
|
|
|
print "</xcatrequest>" |& ns
|
|
|
|
|
|
|
|
while (1) {
|
|
|
|
if ((ns |& getline) > 0) {
|
|
|
|
print $0 > "/tmp/destiny"
|
2008-07-22 13:56:56 +00:00
|
|
|
if ($0 ~ /<\/serverdone>/)
|
|
|
|
canexit = 1
|
|
|
|
if (canexit == 1 && $0 == "</xcatresponse>")
|
2007-10-26 22:44:33 +00:00
|
|
|
break
|
|
|
|
} else {
|
|
|
|
close(ns)
|
|
|
|
exit 1
|
|
|
|
}
|
|
|
|
}
|
|
|
|
close(ns)
|
|
|
|
exit 0
|
|
|
|
}
|