xcat-core/xCAT/postscripts/getcredentials.awk
2009-08-21 13:22:45 +00:00

25 lines
748 B
Awk
Executable File

#!/usr/bin/awk -f
BEGIN {
server = "openssl s_client -quiet -connect " ENVIRON["XCATSERVER"] " 2> /dev/null"
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
}
}
}