Author: jawi
Date: Thu Feb 27 09:15:21 2014
New Revision: 1572479

URL: http://svn.apache.org/r1572479
Log:
Modified the setup script to create 1000 bundles and 100 configuration files.


Modified:
    ace/trunk/run-server-allinone/scripts/setup.gogo

Modified: ace/trunk/run-server-allinone/scripts/setup.gogo
URL: 
http://svn.apache.org/viewvc/ace/trunk/run-server-allinone/scripts/setup.gogo?rev=1572479&r1=1572478&r2=1572479&view=diff
==============================================================================
--- ace/trunk/run-server-allinone/scripts/setup.gogo (original)
+++ ace/trunk/run-server-allinone/scripts/setup.gogo Thu Feb 27 09:15:21 2014
@@ -9,24 +9,42 @@ start 'file:'$pwd'/../org.apache.ace.tes
 # create a workspace
 w = (cw)
 
-# create entities in workspace
+# create 10 features, distributions and targets...
 each [0 1 2 3 4 5 6 7 8 9] {
        a = $it
-       each [0 1 2 3 4 5 6 7 8] {
+       
+       echo 'Creating feature '$a' ...'
+       $w cf 'feature-'$it
+       $w cf2d '(name=feature-'$a')' '(name=dist-'$a')'
+       echo 'Creating distribution '$a' ...'
+       $w cd 'dist-'$it
+       $w cd2t '(name=dist-'$a')' '(id=target-'$a')'
+       echo 'Creating target '$a' ...'
+       $w ct [id='target-'$a] [common=value 'prop'$a'1'=foo 'prop'$a'2'=bar 
'prop'$a'3'=qux]   
+}
+
+# create 1000 artifacts and link them to the 10 features...
+a = 0
+while {(lt $a 100)} {
+       each [0 1 2 3 4 5 6 7 8 9] {
                echo 'Creating bundle artifact-'$a$it' ...'
                # generate artifacts and associate them
-        $w ca (gba 'artifact-'$a$it) true
-               $w ca2f '(bundle-symbolicname=artifact-'$a$it')' 
'(name=feature-'$a')'
+        $w ca (gba 'artifact-'$it'-'$a) true
+               $w ca2f '(bundle-symbolicname=artifact-'$it'-'$a')' 
'(name=feature-'$it')'
        }
-       echo 'Creating config-'$a'.xml ...'
-       c = (gca 'config-'$a 'common' 'prop'$a'1' 'prop'$a'2' 'prop'$a'3')
-       $w ca $c true
-       $w ca2f '(artifactName=config-'$a'.xml)' '(name=feature-'$a')'
-       $w cf 'feature-'$it
-       $w cf2d '(name=feature-'$it')' '(name=dist-'$it')'
-       $w cd 'dist-'$it
-       $w cd2t '(name=dist-'$it')' '(id=target-'$it')'
-       $w ct 'target-'$it
+       a = (inc $a)
+}
+
+# create 100 metatype configurations and link them to the 10 features...
+a = 0
+while {(lt $a 10)} {
+       each [0 1 2 3 4 5 6 7 8 9] {
+               echo 'Creating config-'$it'-'$a'.xml ...'
+               c = (gca 'config-'$it'-'$a 'common' 'prop'$it'1' 'prop'$it'2' 
'prop'$it'3')
+               $w ca $c true
+               $w ca2f '(artifactName=config-'$it'-'$a'.xml)' 
'(name=feature-'$it')'
+       }
+    a = (inc $a)
 }
 
 # commit and delete the workspace


Reply via email to