Megatest

Hex Artifact Content
Login

Artifact b5c15174a8a0cba607a3996952421671ed4b41db:


0000: 23 20 72 75 6e 20 73 6f 6d 65 20 74 65 73 74 73  # run some tests
0010: 0a 0a 42 49 4e 50 41 54 48 3d 24 28 73 68 65 6c  ..BINPATH=$(shel
0020: 6c 20 72 65 61 6c 70 61 74 68 20 2e 2e 2f 62 69  l realpath ../bi
0030: 6e 29 0a 4d 45 47 41 54 45 53 54 3d 24 28 42 49  n).MEGATEST=$(BI
0040: 4e 50 41 54 48 29 2f 6d 65 67 61 74 65 73 74 0a  NPATH)/megatest.
0050: 50 41 54 48 20 3a 3d 20 24 28 42 49 4e 50 41 54  PATH := $(BINPAT
0060: 48 29 3a 24 28 50 41 54 48 29 0a 52 55 4e 4e 41  H):$(PATH).RUNNA
0070: 4d 45 20 3a 3d 20 24 28 73 68 65 6c 6c 20 64 61  ME := $(shell da
0080: 74 65 20 2b 77 25 56 2e 25 75 2e 25 48 29 0a 49  te +w%V.%u.%H).I
0090: 50 41 44 44 52 20 3a 3d 20 22 2d 22 0a 23 20 53  PADDR := "-".# S
00a0: 65 74 20 53 45 52 56 45 52 20 74 6f 20 22 2d 73  et SERVER to "-s
00b0: 65 72 76 65 72 20 2d 22 0a 53 45 52 56 45 52 20  erver -".SERVER 
00c0: 3a 3d 20 22 22 0a 0a 72 75 6e 61 6c 6c 20 3a 20  := ""..runall : 
00d0: 74 65 73 74 31 20 74 65 73 74 32 0a 0a 74 65 73  test1 test2..tes
00e0: 74 31 20 3a 20 63 6c 65 61 6e 70 72 65 70 0a 09  t1 : cleanprep..
00f0: 24 28 4d 45 47 41 54 45 53 54 29 20 2d 72 75 6e  $(MEGATEST) -run
0100: 74 65 73 74 73 20 65 7a 5f 70 61 73 73 20 2d 72  tests ez_pass -r
0110: 65 71 74 61 72 67 20 75 62 75 6e 74 75 2f 6e 66  eqtarg ubuntu/nf
0120: 73 2f 6e 6f 6e 65 20 3a 72 75 6e 6e 61 6d 65 20  s/none :runname 
0130: 24 28 52 55 4e 4e 41 4d 45 29 5f 61 20 24 28 53  $(RUNNAME)_a $(S
0140: 45 52 56 45 52 29 0a 0a 74 65 73 74 32 20 3a 20  ERVER)..test2 : 
0150: 63 6c 65 61 6e 70 72 65 70 0a 09 24 28 4d 45 47  cleanprep..$(MEG
0160: 41 54 45 53 54 29 20 2d 72 75 6e 74 65 73 74 73  ATEST) -runtests
0170: 20 72 75 6e 66 69 72 73 74 20 2d 72 65 71 74 61   runfirst -reqta
0180: 72 67 20 75 62 75 6e 74 75 2f 6e 66 73 2f 6e 6f  rg ubuntu/nfs/no
0190: 6e 65 20 3a 72 75 6e 6e 61 6d 65 20 24 28 52 55  ne :runname $(RU
01a0: 4e 4e 41 4d 45 29 5f 62 20 20 24 28 53 45 52 56  NNAME)_b  $(SERV
01b0: 45 52 29 20 2d 64 65 62 75 67 20 31 30 0a 0a 74  ER) -debug 10..t
01c0: 65 73 74 33 20 3a 20 63 6c 65 61 6e 70 72 65 70  est3 : cleanprep
01d0: 0a 09 24 28 4d 45 47 41 54 45 53 54 29 20 2d 72  ..$(MEGATEST) -r
01e0: 75 6e 61 6c 6c 20 2d 72 65 71 74 61 72 67 20 75  unall -reqtarg u
01f0: 62 75 6e 74 75 2f 6e 66 73 2f 6e 6f 6e 65 20 3a  buntu/nfs/none :
0200: 72 75 6e 6e 61 6d 65 20 24 28 52 55 4e 4e 41 4d  runname $(RUNNAM
0210: 45 29 5f 62 20 2d 6d 20 22 54 68 69 73 20 69 73  E)_b -m "This is
0220: 20 61 20 63 6f 6d 6d 65 6e 74 20 73 70 65 63 69   a comment speci
0230: 66 69 63 20 74 6f 20 61 20 72 75 6e 22 20 2d 76  fic to a run" -v
0240: 20 24 28 53 45 52 56 45 52 29 0a 0a 63 6c 65 61   $(SERVER)..clea
0250: 6e 70 72 65 70 20 3a 20 2e 2e 2f 2a 2e 73 63 6d  nprep : ../*.scm
0260: 0a 09 73 71 6c 69 74 65 33 20 6d 65 67 61 74 65  ..sqlite3 megate
0270: 73 74 2e 64 62 20 22 64 65 6c 65 74 65 20 66 72  st.db "delete fr
0280: 6f 6d 20 6d 65 74 61 64 61 74 20 77 68 65 72 65  om metadat where
0290: 20 76 61 72 3d 27 53 45 52 56 45 52 27 3b 22 0a   var='SERVER';".
02a0: 09 6d 6b 64 69 72 20 2d 70 20 2f 74 6d 70 2f 6d  .mkdir -p /tmp/m
02b0: 74 5f 72 75 6e 73 20 2f 74 6d 70 2f 6d 74 5f 6c  t_runs /tmp/mt_l
02c0: 69 6e 6b 73 0a 09 63 64 20 2e 2e 3b 6d 61 6b 65  inks..cd ..;make
02d0: 0a 09 40 73 6c 65 65 70 20 31 0a 09 40 69 66 20  ..@sleep 1..@if 
02e0: 70 73 20 2d 64 65 66 20 7c 61 77 6b 20 27 7b 70  ps -def |awk '{p
02f0: 72 69 6e 74 20 24 38 7d 27 7c 67 72 65 70 20 6d  rint $8}'|grep m
0300: 65 67 61 74 65 73 74 3b 20 74 68 65 6e 20 5c 0a  egatest; then \.
0310: 09 20 20 20 65 63 68 6f 20 57 41 52 4e 49 4e 47  .   echo WARNING
0320: 3a 20 54 68 65 73 65 20 74 65 73 74 73 20 77 69  : These tests wi
0330: 6c 6c 20 6b 69 6c 6c 20 6d 65 67 61 74 65 73 74  ll kill megatest
0340: 20 61 6e 64 20 64 61 73 68 62 6f 61 72 64 21 3b   and dashboard!;
0350: 20 5c 0a 09 20 20 20 73 6c 65 65 70 20 33 3b 20   \..   sleep 3; 
0360: 5c 0a 09 20 20 20 6b 69 6c 6c 61 6c 6c 20 2d 39  \..   killall -9
0370: 20 64 62 6f 61 72 64 20 7c 7c 20 74 72 75 65 3b   dboard || true;
0380: 20 5c 0a 20 20 09 20 20 20 6b 69 6c 6c 61 6c 6c   \.  .   killall
0390: 20 2d 39 20 6d 65 67 61 74 65 73 74 20 7c 7c 20   -9 megatest || 
03a0: 74 72 75 65 3b 20 5c 0a 09 66 69 0a 09 63 64 20  true; \..fi..cd 
03b0: 2e 2e 2f 3b 6d 61 6b 65 20 69 6e 73 74 61 6c 6c  ../;make install
03c0: 0a 09 24 28 4d 45 47 41 54 45 53 54 29 20 2d 72  ..$(MEGATEST) -r
03d0: 65 6d 6f 76 65 2d 72 75 6e 73 20 3a 72 75 6e 6e  emove-runs :runn
03e0: 61 6d 65 20 24 28 52 55 4e 4e 41 4d 45 29 25 20  ame $(RUNNAME)% 
03f0: 2d 74 61 72 67 65 74 20 25 2f 25 2f 25 20 2d 74  -target %/%/% -t
0400: 65 73 74 70 61 74 74 20 25 20 2d 69 74 65 6d 70  estpatt % -itemp
0410: 61 74 74 20 25 0a 09 24 28 42 49 4e 50 41 54 48  att %..$(BINPATH
0420: 29 2f 64 62 6f 61 72 64 20 2d 72 6f 77 73 20 31  )/dboard -rows 1
0430: 35 20 26 0a 09 74 6f 75 63 68 20 63 6c 65 61 6e  5 &..touch clean
0440: 70 72 65 70 0a 0a 74 65 73 74 20 3a 0a 09 63 73  prep..test :..cs
0450: 69 20 2d 62 20 2d 49 20 2e 2e 20 2e 2e 2f 6d 65  i -b -I .. ../me
0460: 67 61 74 65 73 74 2e 73 63 6d 20 2d 2d 20 2d 72  gatest.scm -- -r
0470: 75 6e 61 6c 6c 20 2d 74 61 72 67 65 74 20 75 62  unall -target ub
0480: 75 6e 74 75 2f 61 66 73 2f 74 6d 70 20 3a 72 75  untu/afs/tmp :ru
0490: 6e 6e 61 6d 65 20 62 6c 61 68 0a 09 63 64 20 2e  nname blah..cd .
04a0: 2e 2f 3b 6d 61 6b 65 20 74 65 73 74 0a 09 6d 61  ./;make test..ma
04b0: 6b 65 20 72 75 6e 61 6c 6c 0a 0a 64 61 73 68 62  ke runall..dashb
04c0: 6f 61 72 64 20 3a 0a 09 63 64 20 2e 2e 2f 3b 6d  oard :..cd ../;m
04d0: 61 6b 65 20 69 6e 73 74 61 6c 6c 0a 09 24 28 42  ake install..$(B
04e0: 49 4e 50 41 54 48 29 2f 64 62 6f 61 72 64 20 26  INPATH)/dboard &
04f0: 0a 0a 72 65 6d 6f 76 65 20 3a 0a 09 28 63 64 20  ..remove :..(cd 
0500: 2e 2e 2f 3b 6d 61 6b 65 29 3b 24 28 4d 45 47 41  ../;make);$(MEGA
0510: 54 45 53 54 29 20 2d 72 65 6d 6f 76 65 2d 72 75  TEST) -remove-ru
0520: 6e 73 20 3a 72 75 6e 6e 61 6d 65 20 24 28 52 55  ns :runname $(RU
0530: 4e 29 20 20 2d 74 65 73 74 70 61 74 74 20 25 20  N)  -testpatt % 
0540: 2d 69 74 65 6d 70 61 74 74 20 25 20 3a 73 79 73  -itempatt % :sys
0550: 6e 61 6d 65 20 25 20 3a 66 73 6e 61 6d 65 20 25  name % :fsname %
0560: 20 3a 64 61 74 61 70 61 74 68 20 25 0a 0a 63 6c   :datapath %..cl
0570: 65 61 6e 20 20 3a 20 0a 09 72 6d 20 63 6c 65 61  ean  : ..rm clea
0580: 6e 70 72 65 70 0a 0a 72 75 6e 66 6f 72 65 76 65  nprep..runforeve
0590: 72 20 3a 0a 09 77 68 69 6c 65 28 6c 73 29 3b 20  r :..while(ls); 
05a0: 64 6f 20 72 75 6e 6e 61 6d 65 3d 60 64 61 74 65  do runname=`date
05b0: 20 2b 25 46 2d 25 52 3a 25 53 60 3b 24 28 4d 45   +%F-%R:%S`;$(ME
05c0: 47 41 54 45 53 54 29 20 2d 72 75 6e 61 6c 6c 20  GATEST) -runall 
05d0: 2d 74 61 72 67 65 74 20 75 62 75 6e 74 75 2f 6e  -target ubuntu/n
05e0: 66 73 2f 6e 6f 6e 65 20 3a 72 75 6e 6e 61 6d 65  fs/none :runname
05f0: 20 24 24 72 75 6e 6e 61 6d 65 3b 2f 68 6f 6d 65   $$runname;/home
0600: 2f 6d 61 74 74 2f 64 61 74 61 2f 6d 65 67 61 74  /matt/data/megat
0610: 65 73 74 2f 6d 65 67 61 74 65 73 74 20 2d 72 75  est/megatest -ru
0620: 6e 61 6c 6c 20 2d 74 61 72 67 65 74 20 75 62 75  nall -target ubu
0630: 6e 74 75 2f 6e 66 73 2f 6e 6f 6e 65 20 3a 72 75  ntu/nfs/none :ru
0640: 6e 6e 61 6d 65 20 24 24 72 75 6e 6e 61 6d 65 3b  nname $$runname;
0650: 2f 68 6f 6d 65 2f 6d 61 74 74 2f 64 61 74 61 2f  /home/matt/data/
0660: 6d 65 67 61 74 65 73 74 2f 6d 65 67 61 74 65 73  megatest/megates
0670: 74 20 2d 72 75 6e 61 6c 6c 20 2d 74 61 72 67 65  t -runall -targe
0680: 74 20 75 62 75 6e 74 75 2f 6e 66 73 2f 6e 6f 6e  t ubuntu/nfs/non
0690: 65 20 3a 72 75 6e 6e 61 6d 65 20 24 24 72 75 6e  e :runname $$run
06a0: 6e 61 6d 65 3b 64 6f 6e 65 0a                    name;done.