# #################################################################### # Exceed Connection Server 13.7 # Copyright (c) 1997-2009 Open Text Corporation. All Rights Reserved. # #################################################################### # Migration Tool # $Revision: 10408 $ ####################################################################### function migrateFile() { fileName = $2 newFileName = oldVer "_" $2 cmd = sprintf("%s %s %s \"%s\" \"%s\"", migFile, oldCommonDir, newCommonDir, fileName, newFileName) retcode = system(cmd) if(retcode) { fileName = newFileName } print $1 "=" fileName > cfgFile } function doMigration() { if(cursection ~ /\[EWEB\]/) { if(lower1 == "sharingacl") { migrateFile() } else if(lower1 != "vendorrelease") { print $0 > cfgFile } } else if(cursection ~ /\[STARTUP\]/) { if(lower1 == "xdmhostfile") { migrateFile() } else if((lower1 == "xdmindirectselectfirst")) { print $1 "=1" > cfgFile } else { print $0 > cfgFile } } else if((lower1 == "keyboardfile") || (lower1 == "rgbfile") || (lower1 == "accessfile") || ((lower1 == "xauthfile") && useXauth)) { migrateFile() } else if((lower1 == "discardxputimage") || (lower1 == "discardxputimagesize")) { } else { print $0 > cfgFile } } BEGIN { FS = "=" useXauth = 0 oldCommonDir = oldCfgDir "Common/" newCommonDir = newCfgDir "Common/" } { lower0 = tolower($0) lower1 = tolower($1) lower2 = tolower($2) } /^\[.*\]$/ { cursection=toupper($0) print $0 > cfgFile next } lower1 ~ /^usexauth/ { useXauth = (lower2 == 1) } { doMigration() } END { }