#####################7
#                   #
# PROCESS SEQUENCES #
#                   #
#####################

@taskSequence =
  ( 
   'establishSession~~connecting to $clusterHost', 
   'local_checksum~~calculating local checksums',
   'transferFilesToStage~~transferring files to $clusterHost: $clusterStageDirectory',
   'verifyPerms~~verifying file permissions',
  );

@activateSequence = 
  (
   'activateTS~~$clusterHost: restarting traffic server with new configuration',
   'activateSADNS~~$clusterHost: restarting SADNS with new configuration'
  );

@rollBackSequence =
 (
   'revertToExistingFiles~~$clusterHost: restarting using existing config files',
   'terminateSession~~$clusterHost: disconnecting from host'
  );

@offLineSequence =
  (
   'logBogusFiles~~$clusterHost: encountered corrupted files moved to $errorLogDir',
   'transferFilesToWorking~~$clusterHost: transferring previous files to $clusterWorkingDirectory',
   'takeClusterOffLine~~ $clusterHost is offline.'# < nsctl stop >
  );

@transferFile =
  ( 
   'copyFile~~copying file from remote host'
  );
####################################
#
#   MAIN
#
"foreach cluster"
"foreach host, beginning with TA, then SA"

@cleanUpTaskSequence = ('terminateSession~~disconnecting from host');
    
    $executionStatus = &executeTaskSequence($clusterHost, @taskSequence) ;
    $activationStatus = &executeTaskSequence($clusterHost, @activateSequence); 
    $cleanUpStatus = &executeTaskSequence ($clusterHost, @cleanUpTaskSequence);