xcat-core/xCAT/postscripts/getcredentials.awk
2011-04-27 11:35:34 +00:00

29 lines
873 B
Awk
Executable File

#!/usr/bin/awk -f
BEGIN {
if (ENVIRON["USEOPENSSLFORXCAT"]) {
server = "openssl s_client -quiet -connect " ENVIRON["XCATSERVER"] " 2> /dev/null"
} else {
server = "/inet/tcp/0/127.0.0.1/400"
}
quit = "no"
print "<xcatrequest>" |& server
print " <command>getcredentials</command>" |& server
print " <callback_port>300</callback_port>" |& server
for (i=1; i<ARGC; i++)
print " <arg>"ARGV[i]"</arg>" |& server
print "</xcatrequest>" |& server
while (server |& getline) {
print $0
if (match($0,"<serverdone>")) {
quit = "yes"
}
if (match($0,"</xcatresponse>") && match(quit,"yes")) {
close(server)
exit
}
}
}