| [167523] | 1 | # | 
|---|
|  | 2 | #    MoleCuilder - creates and alters molecular systems | 
|---|
|  | 3 | #    Copyright (C) 2017 Frederik Heber | 
|---|
|  | 4 | # | 
|---|
|  | 5 | #    This program is free software: you can redistribute it and/or modify | 
|---|
|  | 6 | #    it under the terms of the GNU General Public License as published by | 
|---|
|  | 7 | #    the Free Software Foundation, either version 3 of the License, or | 
|---|
|  | 8 | #    (at your option) any later version. | 
|---|
|  | 9 | # | 
|---|
|  | 10 | #    This program is distributed in the hope that it will be useful, | 
|---|
|  | 11 | #    but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|---|
|  | 12 | #    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|---|
|  | 13 | #    GNU General Public License for more details. | 
|---|
|  | 14 | # | 
|---|
|  | 15 | #    You should have received a copy of the GNU General Public License | 
|---|
|  | 16 | #    along with this program.  If not, see <http://www.gnu.org/licenses/>. | 
|---|
|  | 17 | # | 
|---|
|  | 18 | ### testing structure optimization simulation of ethane | 
|---|
|  | 19 |  | 
|---|
|  | 20 | # perform test with PoolWorkers using molecuilder_poolworker | 
|---|
|  | 21 | AT_SETUP([Structure Optimization - ethane]) | 
|---|
|  | 22 | AT_KEYWORDS([optimize-structure ethane]) | 
|---|
|  | 23 |  | 
|---|
|  | 24 | # check that ports are unique over all tests such that they may run in parallel | 
|---|
|  | 25 | WORKERPORT=12200 | 
|---|
|  | 26 | CONTROLLERPORT=12201 | 
|---|
|  | 27 | WORKERLISTENPORT=12202 | 
|---|
|  | 28 |  | 
|---|
|  | 29 | # start service in background | 
|---|
|  | 30 | ${AUTOTEST_PATH}/molecuilder_server --workerport $WORKERPORT --controllerport $CONTROLLERPORT --timeout 3 & | 
|---|
|  | 31 | server_pid=$! | 
|---|
|  | 32 | AT_CHECK([sleep 2], 0, [ignore], [ignore], [kill $server_pid]) | 
|---|
|  | 33 | AT_CHECK([kill -s 0 $server_pid], 0, [ignore], [ignore], [kill $server_pid]) | 
|---|
|  | 34 |  | 
|---|
|  | 35 | # enlist a worker to work on jobs | 
|---|
|  | 36 | ../../molecuilder_poolworker -v 5 --server 127.0.0.1:${WORKERPORT} --hostname 127.0.0.1 --listen $WORKERLISTENPORT & | 
|---|
| [1e58bb] | 37 | worker_pid=$! | 
|---|
| [167523] | 38 | AT_CHECK([sleep 2], 0, [ignore], [ignore], [kill $server_pid $worker_pid]) | 
|---|
|  | 39 | AT_CHECK([kill -s 0 $worker_pid], 0, [ignore], [ignore], [kill $server_pid $worker_pid]) | 
|---|
|  | 40 |  | 
|---|
|  | 41 | # create jobs via molecuilder | 
|---|
|  | 42 | molfile="ethane.pdb" | 
|---|
|  | 43 | outputfile="ethane.data" | 
|---|
|  | 44 | AT_CHECK([cp -f ${abs_top_srcdir}/tests/integration/StructureOptimization/pre/$molfile $molfile], 0, [ignore], [ignore], [kill $server_pid $worker_pid]) | 
|---|
|  | 45 | AT_CHECK([chmod +rw $molfile], 0) | 
|---|
|  | 46 | AT_CHECK([../../molecuilder \ | 
|---|
|  | 47 | -i $molfile \ | 
|---|
|  | 48 | -o tremolo \ | 
|---|
|  | 49 | --set-tremolo-atomdata "Id type x=3 u=3 F=3 neighbors=2" \ | 
|---|
|  | 50 | --select-all-atoms \ | 
|---|
|  | 51 | --center-in-box "10,0,10,0,0,10" \ | 
|---|
|  | 52 | --set-random-number-distribution "uniform_real" \ | 
|---|
|  | 53 | --random-number-distribution-parameters "min=0;max=1;" \ | 
|---|
|  | 54 | --set-random-number-engine "lagged_fibonacci607" \ | 
|---|
|  | 55 | --random-number-engine-parameters "seed=5;" \ | 
|---|
|  | 56 | --random-perturbation 0.1 \ | 
|---|
|  | 57 | --set-boundary-conditions Wrap Wrap Wrap \ | 
|---|
|  | 58 | --update-molecules \ | 
|---|
|  | 59 | --set-parser-parameters mpqc \ | 
|---|
|  | 60 | --parser-parameters "theory=CLHF;basis=3-21G;" \ | 
|---|
|  | 61 | --optimize-structure \ | 
|---|
|  | 62 | --keep-bondgraph 1 \ | 
|---|
|  | 63 | --parse-state-files 0 \ | 
|---|
|  | 64 | --deltat 0.5 \ | 
|---|
|  | 65 | --steps 30 \ | 
|---|
|  | 66 | --order 1 \ | 
|---|
|  | 67 | --server-address 127.0.0.1 \ | 
|---|
|  | 68 | --server-port ${CONTROLLERPORT} \ | 
|---|
|  | 69 | --DoLongrange 0], 0, [stdout], [ignore], [kill $server_pid $worker_pid]) | 
|---|
|  | 70 |  | 
|---|
|  | 71 | # check remaining force | 
|---|
|  | 72 | components=`grep "at step #30 are (.*,.*,.*)" stdout | sed -e "s#.*(\(.*\),\(.*\),\(.*\)).*#\1\t\2\t\3#"` | 
|---|
|  | 73 | echo "remaining components are ($components)" | 
|---|
|  | 74 | threshold="1.8e-3" | 
|---|
|  | 75 | AT_CHECK([echo "$components" | awk -v threshold="$threshold" -F"\t" '{ for (i=0;i<3;++i) { if (($i > threshold) || ($i < -threshold)) exit 5} }'], 0, [ignore], [ignore], [kill $server_pid $worker_pid]) | 
|---|
|  | 76 |  | 
|---|
|  | 77 | # send removeall to server such that all workers shutdown | 
|---|
|  | 78 | AT_CHECK([${AUTOTEST_PATH}/molecuilder_controller --server 127.0.0.1:$CONTROLLERPORT --command removeall], 0, [ignore], [ignore], [kill $server_pid $worker_pid]) | 
|---|
|  | 79 |  | 
|---|
|  | 80 | # check that worker is truely down | 
|---|
|  | 81 | AT_CHECK([sleep 1], 0, [ignore], [ignore], [kill $worker_pid $server_pid]) | 
|---|
|  | 82 | AT_CHECK([kill $worker_pid], 1, [ignore], [ignore], [kill $server_pid]) | 
|---|
|  | 83 |  | 
|---|
|  | 84 | # shutdown controller socket | 
|---|
|  | 85 | AT_CHECK([${AUTOTEST_PATH}/molecuilder_controller --server 127.0.0.1:$CONTROLLERPORT --command shutdown], 0, [stdout], [ignore], [kill $server_pid]) | 
|---|
|  | 86 |  | 
|---|
|  | 87 | # check that server is truely down | 
|---|
|  | 88 | AT_CHECK([sleep 1], 0, [ignore], [ignore], [kill $server_pid]) | 
|---|
|  | 89 | AT_CHECK([kill $server_pid], 1, [ignore], [ignore]) | 
|---|
|  | 90 |  | 
|---|
|  | 91 | AT_CLEANUP | 
|---|