\n");
-
-switch($operation)
-{
-
- case 'specify_generate':
- // Display a form to specify what to generate
- $oPage->p("
iTop Data Generator\n");
- $oPage->add("
\n");
- break;
-
- case 'generate':
- // perform the actual generation
- $iOrgCount = utils::ReadParam('org_count', 0);
- $sOrgSize = utils::ReadParam('org_size', 'small');
- // By rom
- $oMyChange = MetaModel::NewObject("CMDBChange");
- $oMyChange->Set("date", time());
- $oMyChange->Set("userinfo", "Made by data generator ($iOrgCount orgs of size '$sOrgSize')");
- $oMyChange->DBInsert();
- while($iOrgCount > 0)
- {
- set_time_limit(5*60); // let it run for 5 minutes for each organization
- $oGenerator = new cmdbDataGenerator();
- // Create the new organization
- $oOrg = MetaModel::NewObject('bizOrganization');
- $oOrg->Generate($oGenerator);
-
- // By rom
- // $oOrg->DBInsert();
- $oOrg->DBInsertTracked($oMyChange);
- $oGenerator->SetOrganizationId($oOrg->GetKey());
-
- $oPage->p("Organization '".$oOrg->GetKey()."' created\n");
- $oOrg->DisplayDetails($oPage);
- $oPage->add("
\n");
- PopulateOrganization($oMyChange, $oPage, $oGenerator, $sOrgSize);
- $oPage->add("
\n");
- unset($oGenerator);
- $iOrgCount--;
- }
- break;
-
- case 'specify_update':
- // Specify which organization to update
- $oPage->add("
\n");
- break;
-
- case 'update':
- // perform the actual update
- set_time_limit(5*60); // let it run for 5 minutes
- $sOrganizationCode = utils::ReadParam('org', '');
- $sOrgSize = utils::ReadParam('org_size', 'small');
- if ($sOrganizationCode == '')
- {
- $oPage->p("
Error: please specify an organization (org).");
- }
- else
- {
- // By rom
- $oMyChange = MetaModel::NewObject("CMDBChange");
- $oMyChange->Set("date", time());
- $oMyChange->Set("userinfo", "Made by data generator (update org '$sOrganizationCode', size '$sOrgSize')");
- $oMyChange->DBInsert();
-
- $oPage->p("
Organization '$sOrganizationCode' updated.");
- $oGenerator = new cmdbDataGenerator($sOrganizationCode);
- PopulateOrganization($oMyChange, $oPage, $oGenerator, $sOrgSize);
- }
- break;
-
- case 'specify_delete':
- // Select an organization to be deleted
- $oPage->add("
\n");
- break;
-
- case 'confirm_delete':
- // confirm the dangerous action
- $sOrganizationCode = ReadParam('org', '');
- $oPage->p("
iTop Data Generator\n");
- $oPage->p("
Warning: you are about to delete the organization '$sOrganizationCode' and all its related objects\n");
- $oPage->add("
\n");
- break;
-
- case 'delete':
- // perform the actual deletion
- $sOrganizationCode = ReadParam('org', '');
- if ($sOrganizationCode == '')
- {
- $oPage->p("
Error: please specify an organization (org).");
- }
- else
- {
- // By rom
- $oMyChange = MetaModel::NewObject("CMDBChange");
- $oMyChange->Set("date", time());
- $oMyChange->Set("userinfo", "Made by data generator (delete org '$sOrganizationCode'");
- $oMyChange->DBInsert();
-
- $oPage->p("
Deleting '$sOrganizationCode'\n");
- DeleteOrganization($oMyChange, $oPage, $sOrganizationCode);
- }
- break;
-
- // display the menu of actions
- case 'menu':
- default:
- $oPage->p("
Data Generator Menu");
- $oPage->p("
Generate one or more organizations");
- $oPage->p("
Add more objects into an organization");
- $oPage->p("
Delete an organization");
-}
-$oPage->add("