#!/usr/bin/perl

# directory initialization
$DIR="/local/Projects/Perl";

#Core
system("rm -rf $DIR/casp9/src/Core");
system("ln -s $DIR/Core $DIR/casp9/src/Core");

#Core
system("rm -rf $DIR/casp9/src/Classes/Core");
system("ln -s $DIR/Core $DIR/casp9/src/Classes/Core");

#Classes
system("rm -rf $DIR/casp9/src/cgi-bin/Classes");
system("ln -s $DIR/casp9/src/Classes $DIR/casp9/src/cgi-bin/Classes");



#Core -> ../Core
system("rm -rf $DIR/casp9/src/cgi-bin/Core");
system("ln -s $DIR/Core $DIR/casp9/src/cgi-bin/Core");

#Log
system("rm -rf $DIR/casp9/src/cgi-bin/logs");
system("ln -s $DIR/casp9/src/logs $DIR/casp9/src/cgi-bin/logs");


#TEMPLATES
system("rm -rf $DIR/casp9/src/cgi-bin/TEMPLATES");
system("ln -s /data/CASP9/TARGETS/templates $DIR/casp9/src/cgi-bin/TEMPLATES");

#TARGETS
system("rm -rf $DIR/casp9/src/cgi-bin/TARGETS");
system("ln -s /data/CASP9/TARGETS $DIR/casp9/src/cgi-bin/TARGETS");

#predictions
system("rm -rf $DIR/casp9/src/cgi-bin/predictions");
system("ln -s /data/CASP9/predictions $DIR/casp9/src/cgi-bin/predictions");


#PLOTS
system("rm -rf $DIR/casp9/src/cgi-bin/PLOTS");
system("ln -s /data/CASP9/PLOTS $DIR/casp9/src/cgi-bin/PLOTS");


#exper_struct
system("rm -rf $DIR/casp9/src/cgi-bin/exper_struct");
system("ln -s /data/CASP9/exper_struct $DIR/casp9/src/cgi-bin/exper_struct");

#exper_seq
system("rm -rf $DIR/casp9/src/cgi-bin/exper_seq");
system("ln -s /data/CASP9/exper_seq $DIR/casp9/src/cgi-bin/exper_seq");

#DESCRIPTORS
system("rm -rf $DIR/casp9/src/cgi-bin/DSC");
system("ln -s /data/CASP9/RESULTS/DESCRIPTORS $DIR/casp9/src/cgi-bin/DSC");

#chain_superpositions
system("rm -rf $DIR/casp9/src/cgi-bin/chain_superpositions");
system("ln -s /data/CASP9/ASSESSORS/CHAIN_SUPERPOSITIONS $DIR/casp9/src/cgi-bin/chain_superpositions");


#assessors
system("rm -rf $DIR/casp9/src/cgi-bin/assessors");
system("ln -s /data/CASP9/ASSESSORS $DIR/casp9/src/cgi-bin/assessors");

##################### ADMIN




#templates
system("rm -rf $DIR/casp9/src/admin/assessors/TEMPLATES");
system("ln -s /data/CASP9/TARGETS/templates $DIR/casp9/src/admin/assessors/TEMPLATES");

#TARGETS
system("rm -rf $DIR/casp9/src/admin/assessors/TARGETS");
system("ln -s /data/CASP9/TARGETS $DIR/casp9/src/admin/assessors/TARGETS");



exit(0);

# 
# #CASP8 LINKS PART
# #Core -> /local/Projects/Perl/Core
# system("rm -rf $DIR/Perl/casp9/src/Core");
# system("ln -s $DIR/Perl/Core $DIR/Perl/casp9/src/Core");
# 
# #predictions -> /data/CASP8/predictions
# #PLEASE PAY ATTENTION IF /data/CASP8/predictions is exist
# system("rm -rf $DIR/Perl/casp9/src/cgi-bin/predictions");
# system("ln -s $DIR/data/CASP8/predictions $DIR/Perl/casp9/src/cgi-bin/predictions");
# 
# #Core -> ../Core
# #/local/Projects/Perl/casp9/src/Classes
# system("rm -rf $DIR/Perl/casp9/src/Classes/Core");
# system("ln -s $DIR/Perl/casp9/src/Core $DIR/Perl/casp9/src/Classes/Core");
# 
# #Classes -> ../Classes
# #/local/Projects/Perl/casp9/src/cgi-bin
# system("rm -rf $DIR/Perl/casp9/src/cgi-bin/Classes");
# system("ln -s $DIR/Perl/casp9/src/Classes $DIR/Perl/casp9/src/cgi-bin/Classes");
# 
# #Core -> ../Core
# #/local/Projects/Perl/casp9/src/cgi-bin
# system("rm -rf $DIR/Perl/casp9/src/cgi-bin/Core");
# system("ln -s $DIR/Perl/casp9/src/Core $DIR/Perl/casp9/src/cgi-bin/Core");
# 
# #logs -> ../logs
# #/local/Projects/Perl/casp9/src/cgi-bin
# system("rm -rf $DIR/Perl/casp9/src/cgi-bin/logs");
# system("ln -s $DIR/Perl/casp9/src/logs $DIR/Perl/casp9/src/cgi-bin/logs");
# 
# #predictions -> ../predictions
# #/local/Projects/Perl/casp9/src/cgi-bin
# system("rm -rf $DIR/Perl/casp9/src/cgi-bin/predictions");
# system("ln -s $DIR/Perl/casp9/src/predictions $DIR/Perl/casp9/src/cgi-bin/predictions");
# 
# #PLEASE PAY ATTENTION IF /data/CASP8/predictions/accepted is exist
# #predictions_accepted -> /data/CASP8/predictions/accepted
# system("rm -rf $DIR/Perl/casp9/src/cgi-bin/predictions_accepted");
# system("ln -s $DIR/data/CASP8/predictions/accepted $DIR/Perl/casp9/src/cgi-bin/predictions_accepted");
# 
# #PLEASE PAY ATTENTION IF /data/CASP8/RESULTS is exist
# #RESULTS -> /data/CASP8/RESULTS
# system("rm -rf $DIR/Perl/casp9/src/cgi-bin/RESULTS");
# system("ln -s $DIR/data/CASP8/RESULTS $DIR/Perl/casp9/src/cgi-bin/RESULTS");
# 
# #TARGETS -> /local/Projects/Perl/casp9/src/targets/templates
# #/local/Projects/Perl/casp9/src/targets/templates
# system("rm -rf $DIR/Perl/casp9/src/cgi-bin/TARGETS");
# system("ln -s $DIR/Perl/casp9/src/targets/templates $DIR/Perl/casp9/src/cgi-bin/TARGETS");
# 


# on prediction server only for email submition - for other server just correct location 
# ln -s /data/CASP8/predictions /local/Projects/Perl/casp9/src/predictions
# ln -s /local/Projects/Perl/casp9/src/Classes /local/Projects/Perl/casp9/src/scripts/Classes
# ln -s /local/Projects/Perl/casp9/src/Core /local/Projects/Perl/casp9/src/scripts/Core
# ln -s /local/Projects/Perl/casp9/src/logs /local/Projects/Perl/casp9/src/scripts/logs
# ln -s /local/Projects/Perl/casp9/src/predictions /local/Projects/Perl/casp9/src/scripts/predictions
# ln -s /local/Projects/Perl/casp9/src/targets/templates /local/Projects/Perl/casp9/src/scripts/TARGETS
# root@predictioncenter.org:/local/Projects/Perl/casp9/src# chown -R casp9:users /local/Projects/Perl/casp9


#for /data/CASP8/exper_seq 
# this files should be generated automatically with every seqance posting
####ln -s /data/CASP8/exper_seq  /local/Projects/Perl/casp9/src/cgi-bin/exper_seq




# #CASPM LINKS PART
# #Core -> /local/Projects/Perl/Core
# system("rm -rf $DIR/Perl/caspm1/src/Core");
# system("ln -s $DIR/Perl/Core $DIR/Perl/caspm1/src/Core");
# 
# #predictions -> /data/CASPM/predictions
# #PLEASE PAY ATTENTION IF /data/CASPM/predictions is exist
# system("rm -rf $DIR/Perl/caspm1/src/cgi-bin/predictions");
# system("ln -s $DIR/data/CASPM/predictions $DIR/Perl/caspm1/src/cgi-bin/predictions");
# 
# #Core -> ../Core
# #/local/Projects/Perl/caspm1/src/Classes
# system("rm -rf $DIR/Perl/caspm1/src/Classes/Core");
# system("ln -s $DIR/Perl/caspm1/src/Core $DIR/Perl/caspm1/src/Classes/Core");
# 
# #Classes -> ../Classes
# #/local/Projects/Perl/caspm1/src/cgi-bin
# system("rm -rf $DIR/Perl/caspm1/src/cgi-bin/Classes");
# system("ln -s $DIR/Perl/caspm1/src/Classes $DIR/Perl/caspm1/src/cgi-bin/Classes");
# 
# #Core -> ../Core
# #/local/Projects/Perl/caspm1/src/cgi-bin
# system("rm -rf $DIR/Perl/caspm1/src/cgi-bin/Core");
# system("ln -s $DIR/Perl/caspm1/src/Core $DIR/Perl/caspm1/src/cgi-bin/Core");
# 
# 
# #logs -> ../logs
# #/local/Projects/Perl/caspm1/src/cgi-bin
# system("rm -rf $DIR/Perl/caspm1/src/cgi-bin/logs");
# system("ln -s $DIR/Perl/caspm1/src/logs $DIR/Perl/caspm1/src/cgi-bin/logs");
# 





#following packages should be installed
#apt-get install libhtml-template-expr-perl
#apt-get install libclass-dbi-sqlite-perl
#apt-get install libmath-round-perl
#apt-get install libdbd-pg-perl

#Access to DB
#predictioncenter.org
#1418
#predictioncenter
#predictioncenter

#web
#http://www.predictioncenter.org/ 
#http://www.predictioncenter.org/admin/caspm1/groups.cgi

# DB backup
# root@predictioncenter:/local/Projects/Perl/caspm1/src# su postgres
# postgres@predictioncenter:/local/Projects/Perl/caspm1/src$ /usr/bin/pg_dump -i -p 1418 -F p -s -s -v -f "/home/oleh/backup/1.sql" -n caspm1 predictioncenter