###
##############################
+# support reloading without wiping everything off
+# dunno how to do (defvar plc)
+
+import getopt
+import sys
+
+## we use indexes 1 and 2
+try:
+ dir(plc)
+except:
+ plc=[None,None,None]
+## the server objects
+try:
+ dir(s)
+except:
+ s=[None,None,None]
+## the authentication objects
+## our user
+try:
+ dir(a)
+except:
+ a=[None,None,None]
+## the builtin root user for bootstrapping
+try:
+ dir(aa)
+except:
+ aa=[None,None,None]
+
+####################
import xmlrpclib
import os
-plc1={ 'name':'plc1 in federation',
+####################
+plc1={ 'plcname':'plc1 in federation',
'hostname':'lurch.cs.princeton.edu',
'url-format':'https://%s:443/PLCAPI/',
- 'builtin_admin_id':'root@localhost.localdomain',
- 'builtin_admin_password':'root',
- 'peer_admin_name':'plc1@planet-lab.org',
- 'peer_admin_password':'peer',
- 'nodename':'n11.plc1.org'
+ 'builtin-admin-id':'root@plc1.org',
+ 'builtin-admin-password':'root',
+ 'peer-admin-name':'plc1@planet-lab.org',
+ 'peer-admin-password':'peer',
+ 'node-format':'n1%02d.plc1.org',
+ 'plainname' : 'one',
+ 'slice-format' : 's1%02d',
+ 'person-format' : 'user1-%d@plc1.org',
+ 'key-format':'ssh-rsa 1111111111111111 user%d-key%d',
+ 'person-password' : 'password1',
}
-plc2={ 'name':'plc2 in federation',
+plc2={ 'plcname':'plc2 in federation',
'hostname':'planetlab-devbox.inria.fr',
'url-format':'https://%s:443/PLCAPI/',
- 'builtin_admin_id':'root@localhost.localdomain',
- 'builtin_admin_password':'root',
- 'peer_admin_name':'plc2@planet-lab.org',
- 'peer_admin_password':'peer',
- 'nodename':'n21.plc2.org'
+ 'builtin-admin-id':'root@plc2.org',
+ 'builtin-admin-password':'root',
+ 'peer-admin-name':'plc2@planet-lab.org',
+ 'peer-admin-password':'peer',
+ 'node-format':'n2%02d.plc2.org',
+ 'plainname' : 'two',
+ 'slice-format' : 's2%02d',
+ 'person-format' : 'user2-%d@plc2.org',
+ 'key-format':'ssh-rsa 2222222222222222 user%d-key%d',
+ 'person-password' : 'password2',
}
-## we use indexes 1 and 2
-plc=[None,None,None]
-# the server objects
-s=[None,None,None]
-# the authentication objects
-a=[None,None,None]
-aa=[None,None,None]
+####################
+# set initial conditions
+def define_test (keys,persons,nodes,slices):
+ global number_keys, number_persons, number_nodes, number_slices
+ number_keys=keys
+ number_persons=persons
+ number_nodes=nodes
+ number_slices=slices
+
+def fast():
+ define_test(1,1,1,1)
+
+define_test (keys=4,persons=2,nodes=5,slices=3)
+# predefined stuff
+# number of 'system' persons
+# builtin maint, local root, 2 persons for the peering
+system_persons = 4
+# among that, 1 gets refreshed - other ones have conflicting names
+system_persons_cross = 1
+
+system_slices_ids = (1,2)
+def system_slices ():
+ return len(system_slices_ids)
+def total_slices ():
+ return number_slices+system_slices()
+
+# temporary - the myplc I use doesnt know about 'system' yet
+def system_slivers ():
+# return len(system_slices_ids)
+ return 0
+def total_slivers ():
+ return number_slices+system_slivers()
+
+####################
def peer_index(i):
return 3-i
-### cant use digits in slice login name
-def plain_name (i):
- if i==1:
- return 'one'
- elif i==2:
- return 'two'
- else:
- raise Exception,"Unexpected input in plain_name"
+def plc_name (i):
+ return plc[i]['plcname']
+
+def site_name (i):
+ return 'site'+str(i)
+
+def node_name (i,n):
+ return plc[i]['node-format']%n
+def slice_name (i,n):
+ return plc[i]['plainname']+'_'+plc[i]['slice-format']%n
+
+def person_name (i,n):
+ return plc[i]['person-format']%n
+
+def key_name (i,n,k):
+ return plc[i]['key-format']%(n,k)
+
+# to have indexes start at 1
+def myrange (n):
+ return range (1,n+1,1)
+
+def message (*args):
+ print "====================",
+ print args
+
+####################
def test00_init (args=[1,2]):
global plc,s,a,aa
## have you loaded this file already (support for reload)
for i in args:
url=plc[i]['url-format']%plc[i]['hostname']
plc[i]['url']=url
- s[i]=xmlrpclib.Server(url)
+ s[i]=xmlrpclib.ServerProxy(url,allow_none=True)
print 'initializing s[%d]'%i,url
- aa[i]={'Username':plc[i]['builtin_admin_id'],
+ aa[i]={'Username':plc[i]['builtin-admin-id'],
'AuthMethod':'password',
- 'AuthString':plc[i]['builtin_admin_password'],
+ 'AuthString':plc[i]['builtin-admin-password'],
'Role':'admin'}
print 'initialized aa[%d]'%i, aa[i]
- a[i]={'Username':plc[i]['peer_admin_name'],
+ a[i]={'Username':plc[i]['peer-admin-name'],
'AuthMethod':'password',
- 'AuthString':plc[i]['peer_admin_password'],
+ 'AuthString':plc[i]['peer-admin-password'],
'Role':'admin'}
print 'initialized a[%d]'%i, a[i]
def test00_print (args=[1,2]):
- global plc,s,a,aa
for i in args:
print 's[%d]'%i,s[i]
print 'aa[%d]'%i, aa[i]
print 'a[%d]'%i, a[i]
-def test00_admin (args=[1,2]):
- global plc,s,a
+def check_nodes (el,ef,args=[1,2]):
for i in args:
- peer=peer_index(i)
- person_id=s[i].AddPerson(aa[i],{'first_name':'Local', 'last_name':'PeerPoint', 'role_ids':[10],
- 'email':plc[i]['peer_admin_name'],'password':plc[i]['peer_admin_password']})
- print '%02d: created peer admin account %d, %s - %s'%(i,person_id,plc[i]['peer_admin_name'],plc[i]['peer_admin_password'])
- plc[i]['peer_admin_id']=person_id
+ # use a single request and sort afterwards for efficiency
+ # could have used GetNodes's scope as well
+ all_nodes = s[i].GetNodes(a[i])
+ n = len ([ x for x in all_nodes if x['peer_id'] is None])
+ f = len ([ x for x in all_nodes if x['peer_id'] is not None])
+ print '%02d: Checking nodes: got %d local (e=%d) & %d foreign (e=%d)'%(i,n,el,f,ef)
+ assert n==el
+ assert f==ef
+
+def check_keys (el,ef,args=[1,2]):
+ for i in args:
+ # use a single request and sort afterwards for efficiency
+ # could have used GetKeys's scope as well
+ all_keys = s[i].GetKeys(a[i])
+ n = len ([ x for x in all_keys if x['peer_id'] is None])
+ f = len ([ x for x in all_keys if x['peer_id'] is not None])
+ print '%02d: Checking keys: got %d local (e=%d) & %d foreign (e=%d)'%(i,n,el,f,ef)
+ assert n==el
+ assert f==ef
-def test00_enable (args=[1,2]):
- global plc,s,a
+def check_persons (el,ef,args=[1,2]):
+ for i in args:
+ # use a single request and sort afterwards for efficiency
+ # could have used GetPersons's scope as well
+ all_persons = s[i].GetPersons(a[i])
+ n = len ([ x for x in all_persons if x['peer_id'] is None])
+ f = len ([ x for x in all_persons if x['peer_id'] is not None])
+ print '%02d: Checking persons: got %d local (e=%d) & %d foreign (e=%d)'%(i,n,el,f,ef)
+ assert n==el
+ assert f==ef
+
+# expected : local slices, foreign slices
+def check_slices (els,efs,args=[1,2]):
+ for i in args:
+ ls=len(s[i].GetSlices(a[i],{'peer_id':None}))
+ fs=len(s[i].GetSlices(a[i],{'~peer_id':None}))
+ print '%02d: Checking slices: got %d local (e=%d) & %d foreign (e=%d)'%(i,ls,els,fs,efs)
+ assert els==ls
+ assert efs==fs
+
+def show_nodes (i,node_ids):
+ # same as above
+ all_nodes = s[i].GetNodes(a[i],node_ids)
+ loc_nodes = filter (lambda n: n['peer_id'] is None, all_nodes)
+ for_nodes = filter (lambda n: n['peer_id'] is not None, all_nodes)
+
+ for message,nodes in [ ['LOC',loc_nodes], ['FOR',for_nodes] ] :
+ if nodes:
+ print '[%s:%d] : '%(message,len(nodes)),
+ for node in nodes:
+ print node['hostname']+' ',
+ print ''
+
+def check_slice_nodes (expected_nodes, is_local_slice, args=[1,2]):
+ for ns in myrange(number_slices):
+ check_slice_nodes_n (ns,expected_nodes, is_local_slice, args)
+
+def check_slice_nodes_n (ns,expected_nodes, is_local_slice, args=[1,2]):
for i in args:
peer=peer_index(i)
- s[i].AdmSetPersonEnabled(aa[i],plc[i]['peer_admin_id'],True)
- s[i].AddRoleToPerson(aa[i],'admin',plc[i]['peer_admin_id'])
- print '%02d: enabled+admin on account %d:%s'%(i,plc[i]['peer_admin_id'],plc[i]['peer_admin_name'])
+ if is_local_slice:
+ sname=slice_name(i,ns)
+ slice=s[i].GetSlices(a[i],{'name':[sname],'peer_id':None})[0]
+ message='local'
+ else:
+ sname=slice_name(peer,ns)
+ slice=s[i].GetSlices(a[i],{'name':[sname],'~peer_id':None})[0]
+ message='foreign'
+ print '%02d: %s slice %s (e=%d) '%(i,message,sname,expected_nodes),
+ slice_node_ids=slice['node_ids']
+ print 'on nodes ',slice_node_ids
+ show_nodes (i,slice_node_ids)
+ assert len(slice_node_ids)>=expected_nodes
+ if len(slice_node_ids) != expected_nodes:
+ print 'TEMPORARY'
+
+# expected : nodes on local slice
+def check_local_slice_nodes (expected, args=[1,2]):
+ check_slice_nodes(expected,True,args)
+
+# expected : nodes on foreign slice
+def check_foreign_slice_nodes (expected, args=[1,2]):
+ check_slice_nodes(expected,False,args)
+
+def check_conf_files (args=[1,2]):
+ for nn in myrange(number_nodes):
+ check_conf_files_n (nn,args)
+
+def check_conf_files_n (nn,args=[1,2]):
+ for i in args:
+ nodename=node_name(i,nn)
+ ndict= s[i].GetSlivers(a[i],[nodename])[0]
+ assert ndict['hostname'] == nodename
+ conf_files = ndict['conf_files']
+ print '%02d: %d conf_files in GetSlivers for node %s'%(i,len(conf_files),nodename)
+ for conf_file in conf_files:
+ print 'source=',conf_file['source'],'|',
+ print 'dest=',conf_file['dest'],'|',
+ print 'enabled=',conf_file['enabled'],'|',
+ print ''
+
+import pprint
+pp = pprint.PrettyPrinter(indent=3)
+
+def check_slivers (esn,args=[1,2]):
+ for nn in myrange(number_nodes):
+ check_slivers_n (nn,esn,args)
+
+# too verbose to check all nodes, let's check only the first one
+def check_slivers_1 (esn,args=[1,2]):
+ check_slivers_n (1,esn,args)
-def test01_check (args=[1,2]):
- global plc,s,a
+def check_slivers_n (nn,esn,args=[1,2]):
for i in args:
- n=len(s[i].GetNodes(aa[i]))
- f=len(s[i].GetForeignNodes(a[i]))
- print '%02d: Checking connection: got %d local nodes & %d foreign nodes'%(i,n,f)
+ nodename=node_name(i,nn)
+ ndict= s[i].GetSlivers(a[i],[nodename])[0]
+ assert ndict['hostname'] == nodename
+ slivers = ndict['slivers']
+ print '%02d: %d slivers (exp. %d) in GetSlivers for node %s'\
+ %(i,len(slivers),esn,nodename)
+ for sliver in slivers:
+ print '>>slivername = ',sliver['name']
+ pp.pprint(sliver)
+ assert len(slivers) == esn
+
-def test01_node (args=[1,2]):
- global plc,s,a
+####################
+def test00_admin_person (args=[1,2]):
+ global plc
for i in args:
- n=s[i].AddNode(a[i],1,{'hostname': plc[i]['nodename']})
- print '%02d: Added node %d %s'%(i,n,plc[i]['nodename'])
+ email = plc[i]['peer-admin-name']
+ try:
+ p=s[i].GetPersons(a[i],[email])[0]
+ plc[i]['peer-admin-id']=p['person_id']
+ except:
+ person_id=s[i].AddPerson(aa[i],{'first_name':'Local',
+ 'last_name':'PeerPoint',
+ 'role_ids':[10],
+ 'email':email,
+ 'password':plc[i]['peer-admin-password']})
+ print '%02d:== created peer admin account %d, %s - %s'%(i,
+ person_id,plc[i]['peer-admin-name'],
+ plc[i]['peer-admin-password'])
+ plc[i]['peer-admin-id']=person_id
+
+def test00_admin_enable (args=[1,2]):
+ for i in args:
+ s[i].AdmSetPersonEnabled(aa[i],plc[i]['peer-admin-id'],True)
+ s[i].AddRoleToPerson(aa[i],'admin',plc[i]['peer-admin-id'])
+ print '%02d:== enabled+admin on account %d:%s'%(i,plc[i]['peer-admin-id'],plc[i]['peer-admin-name'])
def test01_peer_person (args=[1,2]):
- global plc,s,a
+ global plc
for i in args:
peer=peer_index(i)
- person_id = s[i].AddPerson (a[i], {'first_name':'Peering(plain passwd)', 'last_name':plc[peer]['name'], 'role_ids':[3000],
- 'email':plc[peer]['peer_admin_name'],'password':plc[peer]['peer_admin_password']})
- print '02%d:Created person %d as the peer person'%(i,person_id) hostname=plc[i]['nodename']
-
- plc[i]['peer_person_id']=person_id
+ email=plc[peer]['peer-admin-name']
+ try:
+ p=s[i].GetPersons(a[i],[email])[0]
+ plc[i]['peer_person_id']=p['person_id']
+ except:
+ person_id = s[i].AddPerson (a[i], {'first_name':'Peering(plain passwd)', 'last_name':plc_name(peer), 'role_ids':[3000],
+ 'email':email,'password':plc[peer]['peer-admin-password']})
+ print '%02d:Created person %d as the peer person'%(i,person_id)
+ plc[i]['peer_person_id']=person_id
+####################
def test01_peer (args=[1,2]):
- global plc,s,a
+ global plc
for i in args:
peer=peer_index(i)
- peer_id=s[i].AddPeer (a[i], {'peername':plc[peer]['name'],'peer_url':plc[peer]['url'],'person_id':plc[i]['peer_person_id']})
- # NOTE : need to manually reset the encrypted password through SQL at this point
- print '%02d:Created peer %d'%(i,peer_id)
- plc[i]['peer_id']=peer_id
- print "PLEASE manually set password for person_id=%d in DB%d"%(plc[i]['peer_person_id'],i)
+ peername = plc_name(peer)
+ try:
+ p=s[i].GetPeers (a[i], [peername])[0]
+ plc[i]['peer_id']=p['peer_id']
+ except:
+ peer_id=s[i].AddPeer (a[i], {'peername':peername,'peer_url':plc[peer]['url'],'person_id':plc[i]['peer_person_id']})
+ # NOTE : need to manually reset the encrypted password through SQL at this point
+ print '%02d:Created peer %d'%(i,peer_id)
+ plc[i]['peer_id']=peer_id
+ print "PLEASE manually set password for person_id=%d in DB%d"%(plc[i]['peer_person_id'],i)
def test01_peer_passwd (args=[1,2]):
- global plc,s,a
for i in args:
# using an ad-hoc local command for now - never could get quotes to reach sql....
- os.system("ssh root@%s new_plc_api/person-password.sh %d"%(plc[i]['hostname'],plc[i]['peer_person_id']))
- print "Attempted to set passwd for person_id=%d in DB%d"%(plc[i]['peer_person_id'],i)
+ print "Attempting to set passwd for person_id=%d in DB%d"%(plc[i]['peer_person_id'],i),
+ retcod=os.system("ssh root@%s new_plc_api/person-password.sh %d"%(plc[i]['hostname'],plc[i]['peer_person_id']))
+ print '-> system returns',retcod
-def test02_refresh (args=[1,2]):
- global plc,s,a
- for i in args:
- print '%02d: Refreshing peer'%(i)
- s[i].RefreshPeer(a[i],plc[i]['peer_id'])
-
-def test03_site (args=[1,2]):
- global plc,s,a
+def test01_site (args=[1,2]):
+ global plc
for i in args:
peer=peer_index(i)
### create a site (required for creating a slice)
- sitename="site"+str(i)
+ sitename=site_name(i)
abbrev_name="abbr"+str(i)
- plain=plain_name(i)
- site_id=s[i].AddSite (a[i], {'name':plc[i]['name'],
- 'abbreviated_name': abbrev_name,
- 'login_base': plain,
- 'is_public': True,
- 'url': 'http://%s.com/'%abbrev_name,
- 'max_slices':10})
+ login_base=plc[i]['plainname']
+ ### should be enough - needs to check we can add/del slices
+ max_slices = number_slices
+ try:
+ s[i].GetSites(a[i],{'login_base':login_base})[0]
+ except:
+ site_id=s[i].AddSite (a[i], {'name':plc_name(i),
+ 'abbreviated_name': abbrev_name,
+ 'login_base': login_base,
+ 'is_public': True,
+ 'url': 'http://%s.com/'%abbrev_name,
+ 'max_slices':max_slices})
### max_slices does not seem taken into account at that stage
- s[i].UpdateSite(a[i],site_id,{'max_slices':10})
- print '%02d: Created site %d with max_slices=10'%(i,site_id)
- plc[i]['site_id']=site_id
+ s[i].UpdateSite(a[i],site_id,{'max_slices':max_slices})
+ print '%02d:== Created site %d with max_slices=%d'%(i,site_id,max_slices)
+ plc[i]['site_id']=site_id
+
+##############################
+# this one gets cached
+def get_peer_id (i):
+ try:
+ return plc[i]['peer_id']
+ except:
+ peername = plc_name (peer_index(i))
+ peer_id = s[i].GetPeers(a[i],[peername])[0]['peer_id']
+ plc[i]['peer_id'] = peer_id
+ return peer_id
+
+def test01_refresh (message,args=[1,2]):
+ print '=== refresh',message
+ for i in args:
+ print '%02d:== Refreshing peer'%(i),
+ retcod=s[i].RefreshPeer(a[i],get_peer_id(i))
+ print 'got ',retcod
+
+####################
+# retrieves node_id from hostname - checks for local nodes only
+def get_local_node_id(i,nodename):
+ return s[i].GetNodes(a[i],[nodename],None,'local')[0]['node_id']
+
+# clean all local nodes - foreign nodes are not supposed to be cleaned up manually
+def clean_all_nodes (args=[1,2]):
+ for i in args:
+ print '%02d:== Cleaning all nodes'%i
+ loc_nodes = s[i].GetNodes(a[i],None,None,'local')
+ for node in loc_nodes:
+ print '%02d:==== Cleaning node %d'%(i,node['node_id'])
+ s[i].DeleteNode(a[i],node['node_id'])
+
+def test02_node (args=[1,2]):
+ for nn in myrange(number_nodes):
+ test02_node_n (nn,args)
+
+def test02_node_n (nn,args=[1,2]):
+ for i in args:
+ nodename = node_name(i,nn)
+ try:
+ get_local_node_id(i,nodename)
+ except:
+ n=s[i].AddNode(a[i],1,{'hostname': nodename})
+ print '%02d:== Added node %d %s'%(i,n,node_name(i,i))
+
+def test02_delnode (args=[1,2]):
+ for nn in myrange(number_nodes):
+ test02_delnode_n (nn,args)
+
+def test02_delnode_n (nn,args=[1,2]):
+ for i in args:
+ nodename = node_name(i,nn)
+ node_id = get_local_node_id (i,nodename)
+ retcod=s[i].DeleteNode(a[i],nodename)
+ print '%02d:== Deleted node %d, returns %s'%(i,node_id,retcod)
+
+####################
+def test05_person (args=[1,2]):
+ for np in myrange(number_persons):
+ test05_person_n (np,True,args)
+
+def test05_del_person (args=[1,2]):
+ for np in myrange(number_persons):
+ test05_person_n (np,False,args)
+
+def test05_person_n (np,add_if_true,args=[1,2]):
+ test05_person_n_ks (np, myrange(number_keys),add_if_true,args)
+
+def test05_person_n_ks (np,nks,add_if_true,args=[1,2]):
+ for i in args:
+ email = person_name(i,np)
+ try:
+ person_id=s[i].GetPersons(a[i],[email])[0]['person_id']
+ if not add_if_true:
+ s[i].DeletePerson(a[i],person_id)
+ print "%02d:== deleted person_id %d"%(i,person_id)
+ except:
+ if add_if_true:
+ password = plc[i]['person-password']
+ person_id=s[i].AddPerson(a[i],{'first_name':'Your average',
+ 'last_name':'User%d'%np,
+ 'role_ids':[30],
+ 'email':email,
+ 'password': password })
+ print '%02d:== created user account %d, %s - %s'%(i, person_id,email,password)
+ for nk in nks:
+ key=key_name(i,np,nk)
+ s[i].AddPersonKey(aa[i],email,{'key_type':'ssh', 'key':key})
+ print '%02d:== added key %s to person %s'%(i,key,email)
+
+####################
+def clean_all_slices (args=[1,2]):
+ for i in args:
+ print '%02d:== Cleaning all slices'%i
+ for slice in s[i].GetSlices(a[i],{'peer_id':None}):
+ slice_id = slice['slice_id']
+ if slice_id not in system_slices_ids:
+ print '%02d:==== Cleaning slice %d'%(i,slice_id)
+ s[i].DeleteSlice(a[i],slice_id)
+
+def get_local_slice_id (i,name):
+ return s[i].GetSlices(a[i],{'name':[name],'peer_id':None})[0]['slice_id']
def test03_slice (args=[1,2]):
- global plc,s,a
+ for n in myrange(number_slices):
+ test03_slice_n (n,args)
+
+def test03_slice_n (ns,args=[1,2]):
for i in args:
peer=peer_index(i)
- plain=plain_name(i)
- ### create a slice
- slice_name="slic"+str(i)
- slice_id=s[i].AddSlice (a[i],{'name':'%s_%s'%(plain,slice_name),
- 'description':'slice %s_%s on plc %s'%(plain,slice_name,plc[i]['name']),
- 'url':'http://planet-lab.org/%s'%slice_name,
- 'max_nodes':100,
- 'instanciation':'plc-instantiated',
- })
- print '%02d: created slice %d'%(i,slice_id)
- plc[i]['slice_id']=slice_id
+ plcname=plc_name(i)
+ slicename=slice_name(i,ns)
+ max_nodes=number_nodes
+ try:
+ s[i].GetSlices(a[i],[slicename])[0]
+ except:
+ slice_id=s[i].AddSlice (a[i],{'name':slicename,
+ 'description':'slice %s on %s'%(slicename,plcname),
+ 'url':'http://planet-lab.org/%s'%slicename,
+ 'max_nodes':max_nodes,
+ 'instanciation':'plc-instantiated',
+ })
+ print '%02d:== created slice %d - max nodes=%d'%(i,slice_id,max_nodes)
-def test04_nodeslice (args=[1,2]):
- global plc,s,a
+def test04_node_slice (is_local, add_if_true, args=[1,2]):
+ for ns in myrange(number_slices):
+ test04_node_slice_ns (ns,is_local, add_if_true, args)
+
+def test04_node_slice_ns (ns,is_local, add_if_true, args=[1,2]):
+ test04_node_slice_nl_n (myrange(number_nodes),ns,is_local, add_if_true, args)
+
+def test04_node_slice_nl_n (nnl,ns,is_local, add_if_true, args=[1,2]):
for i in args:
peer=peer_index(i)
- ### add node to it
- hostname=plc[peer]['nodename']
- s[i].AddSliceToNodes (a[i], plc[i]['slice_id'],[hostname])
- print '%02d: added local node %s'%(i,hostname)
+ slice_id = get_local_slice_id (i,slice_name (i,ns))
+
+ if is_local:
+ hostnames=[node_name(i,nn) for nn in nnl]
+ nodetype='local'
+ else:
+ hostnames=[node_name(peer,nn) for nn in nnl]
+ nodetype='foreign'
+ if add_if_true:
+ s[i].AddSliceToNodes (a[i], slice_id,hostnames)
+ message="added"
+ else:
+ s[i].DeleteSliceFromNodes (a[i], slice_id,hostnames)
+ message="deleted"
+ print '%02d:== %s in slice %d %s '%(i,message,slice_id,nodetype),
+ print hostnames
-def catch_up (args=[1,2]):
- for i in args:
- plc[i]['peer_admin_id']=3
- plc[i]['peer_person_id']=4
- plc[i]['peer_id']=1
- plc[i]['slice_id']=1
+def test04_slice_add_lnode (args=[1,2]):
+ test04_node_slice (True,True,args)
-###
-def test_all (args=[1,2]):
- test00_init (args)
- test00_print (args)
- test00_admin (args)
- test00_enable (args)
- test01_check (args)
- test01_node (args)
- test01_peer_person (args)
- test01_peer (args)
- test01_peer_passwd (args)
- test01_check (args)
- test02_refresh (args)
- test01_check (args)
- test03_site (args)
- test03_slice (args)
- test04_nodeslice (args)
+def test04_slice_add_fnode (args=[1,2]):
+ test04_node_slice (False,True,args)
+
+def test04_slice_del_lnode (args=[1,2]):
+ test04_node_slice (True,False,args)
+
+def test04_slice_del_fnode (args=[1,2]):
+ test04_node_slice (False,False,args)
+
+####################
+def test_all_init ():
+ message ("INIT")
+ test00_init ()
+ test00_print ()
+ test00_admin_person ()
+ test00_admin_enable ()
+ test01_peer_person ()
+ test01_peer ()
+ test01_peer_passwd ()
+
+ test01_site ()
+
+def test_all_nodes ():
+ message ("RESETTING NODES")
+ clean_all_nodes ()
+ test01_refresh ('cleaned nodes')
+ check_nodes(0,0)
+
+ # create one node on each site
+ message ("CREATING NODES")
+ test02_node ()
+ check_nodes(number_nodes,0)
+ test01_refresh ('after node creation')
+ check_nodes(number_nodes,number_nodes)
+ message ("2 extra del/add cycles on plc2 for different indexes")
+ test02_delnode([2])
+ test02_node ([2])
+ test02_delnode([2])
+ test02_node ([2])
+ test02_delnode([2])
+ check_nodes(0,number_nodes,[2])
+ test01_refresh('after deletion on plc2')
+ check_nodes(number_nodes,0,[1])
+ check_nodes(0,number_nodes,[2])
+ message ("ADD on plc2 for different indexes")
+ test02_node ([2])
+ check_nodes (number_nodes,0,[1])
+ check_nodes (number_nodes,number_nodes,[2])
+ test01_refresh('after re-creation on plc2')
+ check_nodes (number_nodes,number_nodes,)
+
+def test_all_addslices ():
+
+ # reset
+ message ("RESETTING SLICES TEST")
+ clean_all_nodes ()
+ test02_node ()
+ clean_all_slices ()
+ test01_refresh ("After slices init")
+
+ # create slices on plc1
+ message ("CREATING SLICES on plc1")
+ test03_slice ([1])
+ # each site has 3 local slices and 0 foreign slice
+ check_slices (total_slices(),0,[1])
+ check_slices (system_slices(),0,[2])
+ test01_refresh ("after slice created on plc1")
+ check_slices (total_slices(),0,[1])
+ check_slices (system_slices(),number_slices,[2])
+ # no slice has any node yet
+ check_local_slice_nodes(0,[1])
+ check_foreign_slice_nodes(0,[2])
+
+ # insert local nodes in local slice on plc1
+ message ("ADDING LOCAL NODES IN SLICES")
+ test04_slice_add_lnode ([1])
+ # of course the change is only local
+ check_local_slice_nodes (number_nodes,[1])
+ check_foreign_slice_nodes(0,[2])
+
+ # refreshing
+ test01_refresh ("After local nodes were added on plc1")
+ check_local_slice_nodes (number_nodes,[1])
+ check_foreign_slice_nodes (number_nodes,[2])
+
+ # now we add foreign nodes into local slice
+ message ("ADDING FOREIGN NODES IN SLICES")
+ test04_slice_add_fnode ([1])
+ check_local_slice_nodes (2*number_nodes,[1])
+ check_foreign_slice_nodes (number_nodes,[2])
+
+ # refreshing
+ test01_refresh ("After foreign nodes were added in plc1")
+ # remember that foreign slices only know about LOCAL nodes
+ # so this does not do anything
+ check_local_slice_nodes (2*number_nodes,[1])
+ check_foreign_slice_nodes (2*number_nodes,[2])
+
+ check_slivers_1(total_slivers())
+
+def test_all_delslices ():
+
+ message ("DELETING FOREIGN NODES FROM SLICES")
+ test04_slice_del_fnode([1])
+ check_local_slice_nodes (number_nodes,[1])
+ check_foreign_slice_nodes (2*number_nodes,[2])
+ # mmh?
+ check_slivers_1(total_slivers(),[1])
+
+ test01_refresh ("After foreign nodes were removed on plc1")
+ check_local_slice_nodes (number_nodes,[1])
+ check_foreign_slice_nodes (number_nodes,[2])
+
+ message ("DELETING LOCAL NODES FROM SLICES")
+ test04_slice_del_lnode([1])
+ check_local_slice_nodes (0,[1])
+ check_foreign_slice_nodes (number_nodes,[2])
+
+ test01_refresh ("After local nodes were removed on plc1")
+ check_local_slice_nodes (0,[1])
+ check_foreign_slice_nodes (0,[2])
+
+ message ("CHECKING SLICES CLEAN UP")
+ clean_all_slices([1])
+ check_slices (system_slices(),0,[1])
+ check_slices (system_slices(),number_slices,[2])
+ test01_refresh ("After slices clenaup")
+ check_slices(system_slices(),0)
+
+def test_all_slices ():
+ test_all_addslices ()
+ test_all_delslices ()
+
+def test_all_persons ():
+ test05_del_person()
+ check_keys(0,0)
+ check_persons(system_persons,0)
+ test01_refresh ('before persons&keys creation')
+ check_keys(0,0)
+ check_persons(system_persons,system_persons_cross)
+ message ("Creating persons&keys - 1 extra del/add cycle for unique indexes")
+ test05_person ()
+ test05_del_person([2])
+ test05_person([2])
+ check_keys(number_persons*number_keys,0)
+ check_persons(system_persons+number_persons,system_persons_cross)
+ test01_refresh ('after persons&keys creation')
+ check_keys(number_persons*number_keys,number_persons*number_keys)
+ check_persons(system_persons+number_persons,system_persons_cross+number_persons)
+
+def test_all ():
+ test_all_init ()
+ test_all_persons ()
+ test_all_nodes ()
+ test_all_slices ()
+
+### ad hoc test sequences
+def populate ():
+ test02_node()
+ test03_slice([1])
+ test01_refresh ("populate: refreshing peer 1",[1])
+ test04_slice_add_lnode([1])
+ test04_slice_add_fnode([1])
+ test01_refresh("populate: refresh all")
+
+def test_now ():
+ test_all_init()
+ test_all_persons ()
+# clean_all_nodes()
+# clean_all_slices()
+# populate()
+
+#####
+def usage ():
+ print "Usage: %s [-n] [-f]"%sys.argv[0]
+ print " -f runs faster (1 node - 1 slice)"
+ print " -n runs test_now instead of test_all"
+
+ sys.exit(1)
+
+def main ():
+ try:
+ (o,a) = getopt.getopt(sys.argv[1:], "fn")
+ except:
+ usage()
+ now_opt = False;
+ for (opt,val) in o:
+ if opt=='-f':
+ fast()
+ elif opt=='-n':
+ now_opt=True
+ else:
+ usage()
+ if a:
+ usage()
+ print '%d nodes & %d slices'%(number_nodes,number_slices)
+ if now_opt:
+ print 'Running test_now'
+ test_now()
+ else:
+ test_all()
+
if __name__ == '__main__':
- test_all()
+ main()
git://git.onelab.eu / plcapi.git / blobdiff