Elep

<?php
die('comment out this die to use this file');
define('sugarEntry', true);
/*
 * Your installation or use of this SugarCRM file is subject to the applicable
 * terms available at
 * http://support.sugarcrm.com/Resources/Master_Subscription_Agreements/.
 * If you do not agree to all of the applicable terms or do not have the
 * authority to bind the entity as an authorized representative, then do not
 * install or use this SugarCRM file.
 *
 * Copyright (C) SugarCRM Inc. All rights reserved.
 */

$user_name ='';
$user_password = '';
$quick_test = false;
$url = $GLOBALS['sugar_config']['site_url'].'/soap.php';
foreach($_POST as $name=>$value){
		$$name = $value;
}

echo <<<EOQ
<form name='test' method='POST'>
<table width ='800'><tr>
<tr><th colspan='6'>Enter SugarCRM User Information - this is the same info entered when logging into sugarcrm</th></tr>
<td >USER NAME:</td><td><input type='text' name='user_name' value='$user_name'></td><td>USER PASSWORD:</td><td><input type='password' name='user_password' value='$user_password'></td>
</tr>
<td >SOAP URL:</td><td colspan=3><input type='text' name='url' value='$url' size = 60></td>
</tr>

<tr><td><input type='submit' value='Submit'></td></tr>
</table>
</form>
EOQ;

if(!empty($user_name)){
$offset = 0;
if(isset($_REQUEST['offset'])){
	$offset = $_REQUEST['offset'] + 20;
	echo $offset;
}
function print_result($result){
 global $soapclient;
 if (is_soap_fault($soapclient)) {
 echo 'HERE IS ERRORS: ';
 echo "SOAP Fault: (faultcode: {$soapclient->faultcode}, faultstring: {$soapclient->faultstring})";

echo ' HERE IS RESPONSE: ';
 echo $soapclient->__getLastResponse();

}

echo ' HERE IS RESULT: ';
print_r($result);
echo ' ';
}

require_once('include/entryPoint.php');

require_once('soap/SoapHelperFunctions.php');

$GLOBALS['log'] =& LoggerManager::getLogger();
//ignore notices
error_reporting(E_ALL ^ E_NOTICE);

// check for old config format.
if(empty($sugar_config) && isset($dbconfig['db_host_name']))
{
   make_sugar_config($sugar_config);
}

// Administration include

$administrator = new Administration();
$administrator->retrieveSettings();
    $params = array(
        'soap_version' => SOAP_1_1,
        'trace' => 1,
        'exceptions' => 0,
    );
    $soapclient = new \SoapClient($url . '?wsdl', $params);  //define the SOAP Client an

echo 'Test (ECHO): - test test ';
 $result = $soapclient->test('hello sugar');
print_result($result);

echo 'Get Server Time: - get_server_time test ';
 $result = $soapclient->get_server_time();
print_result($result);

echo 'Get GMT Time: - get_gmt_time test ';
 $result = $soapclient->get_gmt_time();
print_result($result);

echo 'Get Server Version: - get_server_version test ';
 $result = $soapclient->get_server_version();
print_result($result);

echo 'LOGIN: -login test ';
 $result = $soapclient->login(array('user_name'=>$user_name, 'password'=>md5($user_password), 'version'=>'.01'), 'SoapTest');
print_result($result);
$session = $result['id'];

echo 'Get User Id: - get_user_id test ';
 $result = $soapclient->get_user_id($session);
print_result($result);

echo 'Get Available Modules: - get_available_modules test ';
 $result = $soapclient->get_available_modules($session);
print_result($result);

if(!$quick_test){
echo 'Get Contact Module Fields: - get_module_fields test ';
 $result = $soapclient->get_module_fields($session, 'Contacts');
print_result($result);
}
echo ' Set A Contact - set_entry test: ';
$time = $timedate->nowDb();
$date = date($GLOBALS['timedate']->dbDayFormat, time() + rand(0,360000));
$hour = date($GLOBALS['timedate']->dbTimeFormat, time() + rand(0,360000));
 $result = $soapclient->set_entry($session, 'Contacts', array(array('name'=>'last_name' , 'value'=>"$time Contact SINGLE"), array('name'=>'first_name' , 'value'=>'tester')));
print_result($result);
if(!$quick_test){
$name_value_lists = array();
echo ' Set list of Contacts: ';
$dm = date($GLOBALS['timedate']->get_db_date_time_format(), time() - 36000) ;
$timestart = microtime(true);
for($i = 0; $i < 10; $i++){
$time = $timedate->nowDb();
$date = date($GLOBALS['timedate']->dbDayFormat, time() + rand(0,360000));
$hour = date($GLOBALS['timedate']->dbTimeFormat, time() + rand(0,360000));
$name_value_lists[] = array(array('name'=>'last_name' , 'value'=>"$time Contact $i"), array('name'=>'first_name' , 'value'=>'tester'));
}

$result = $soapclient->set_entries($session, 'Contacts', $name_value_lists);
$diff = microtime(true) - $timestart;
echo "Time for creating $i Contacts is $diff ";
print_result($result);
}
echo " Get list of Contacts : -test get_entry_list ";
$timestart = microtime(true);
 $result = $soapclient->get_entry_list($session, 'Contacts', '', '', 0, [], 10, -1);
$diff = microtime(true) - $timestart;
echo "Time for retrieving 10 Contacts is $diff ";
print_result($result);

$contact_ids = array();
foreach($result['entry_list'] as $entry){
	$contact_ids[] = $entry['id'];

}
if(!$quick_test){
	echo " Get a contact : -test get_entry ";
	$timestart = microtime(true);
 $result = $soapclient->get_entry($session, 'Contacts', $contact_ids[0], array('last_name', 'email1', 'date_modified', 'description'));
	$diff = microtime(true) - $timestart;
	echo "Time for retrieving a Contact is $diff ";
	print_result($result);

echo " Get a list of contacts : -test get_entries ";
	$timestart = microtime(true);
 $result = $soapclient->get_entries($session, 'Contacts', $contact_ids, []);
	$diff = microtime(true) - $timestart;
	echo "Time for retrieving a list of Contacts is $diff ";
	print_result($result);

$timestart = microtime(true);
	echo " Get list of Contacts modified after $dm: -test sync_get_entries ";
 $result = $soapclient->sync_get_entries($session, 'Contacts', $dm, $offset, '20', []);
	$diff = microtime(true) - $timestart;
	echo "Time for retrieving the contacts added list is $diff ";
	print_result($result);
	$result['entry_list'] = base64_decode($result['entry_list']);
	$result['entry_list'] = unserialize($result['entry_list']);
	$synccontact_ids = array();

foreach( $result['entry_list'] as $entry){

$synccontact_ids[] = $entry['id'];
	}
	$dm = gmdate($GLOBALS['timedate']->get_db_date_time_format(), time() - 36000) ;
	$id = $synccontact_ids[0];

echo ' Modifying Local and Through Soap - Should Have Conflict - test sync_set_entries' . $id;
	
	
	$current_user = new User();
	$current_user->retrieve('1');
	$contact = new Contact();
	echo 'saving ' . $id;
	$contact->retrieve($id);

$contact->first_name = 'modifed local';
	$contact->save();

$contact->retrieve($id);

$contact->first_name = 'modifed server';
	$timestart = microtime(true);
	$commit = array();
	$commit[] = get_return_value($contact, 'Contacts');

$commit[0]['resolve'] = 0;
	echo 'RESOLVING ' . $commit[0]['resolve'] ;
	$commit = get_encoded($commit);
 $result = $soapclient->sync_set_entries($session, 'Contacts', $dm, $commit);
	$diff = microtime(true) - $timestart;
	echo "Time for retrieving the contacts added list is $diff ";
	print_result($result);
}
echo ' TESTING NOTES ';
echo ' Set A Note - set_entry test: ';
$time = $timedate->nowDb();
$date = $timedate->asDbDate($timedate->getNow()->get("+"+rand(0, 360000)+"seconds"));
$hour = $timedate->asDbTime($timedate->getNow()->get("+"+rand(0, 360000)+"seconds"));
 $result = $soapclient->set_entry($session, 'Notes', array(array('name'=>'name', 'value'=>"$time Note $i")));
$note_id = $result['id'];
print_result($result);
echo ' Set A Note attachment - set_note_attachment test: ';
$file = base64_encode('This is an attached file');
 $result = $soapclient->set_note_attachment($session, array('id'=>$note_id, 'filename'=>'Attach.txt', 'file'=>$file));
print_result($result);

echo ' Get A Note attachment - get_note_attachment test: ';
 $result = $soapclient->get_note_attachment($session, $note_id);
echo 'File Contents: ' . base64_decode($result['note_attachment']['file']).' ';
print_result($result);

echo ' Associate A Note With A Contact - set_relationship test: ';

$result = $soapclient->relate_note_to_module($session, $note_id, 'Contacts', $contact_ids[0]);
print_result($result);

echo ' TESTING RELATIONSHIPS ';
echo ' Create an Account - set_entry test: ';
 $result = $soapclient->set_entry($session, 'Accounts', array(array('name'=>'name', 'value'=>"$time Account ")));
$account_id = $result['id'];
echo 'Account Id ' . $account_id;
echo ' Create an Email - set_entry test: ';
 $result = $soapclient->set_entry($session, 'Emails', array(array('name'=>'name', 'value'=>"$time Email ")));
$email_id = $result['id'];
print_result($result);
echo ' Link Account to a Contact - set_relationship test: ';
 $result = $soapclient->set_relationship($session, array('module1'=>'Accounts', 'module1_id'=>$account_id, 'module2'=>'Contacts', 'module2_id'=>$contact_ids[0]));
print_result($result);
echo ' Link Email to a Contact - set_relationship test: ';
 $result = $soapclient->set_relationship($session, array('module1'=>'Emails', 'module1_id'=>$email_id, 'module2'=>'Contacts', 'module2_id'=>$contact_ids[0]));
print_result($result);
echo ' Link Email to two Contacts - set_relationships test: ';
 $result = $soapclient->set_relationships($session, array(array('module1'=>'Emails', 'module1_id'=>$email_id, 'module2'=>'Contacts', 'module2_id'=>$contact_ids[1]), array('module1'=>'Emails', 'module1_id'=>$email_id, 'module2'=>'Contacts', 'module2_id'=>$contact_ids[2])));

print_result($result);
echo ' Link Account to two Contacts - set_relationships test: ';
 $result = $soapclient->set_relationships($session, array(array('module1'=>'Accounts', 'module1_id'=>$account_id, 'module2'=>'Contacts', 'module2_id'=>$contact_ids[1]), array('module1'=>'Accounts', 'module1_id'=>$account_id, 'module2'=>'Contacts', 'module2_id'=>$contact_ids[2])));
print_result($result);

echo ' Retrieve Relationships for that account - get_relationships test: ';
 $result = $soapclient->get_relationships($session, 'Accounts', $account_id, 'Contacts', '', 1);
print_result($result);

echo ' LOGOUT: ';
 $result = $soapclient->logout($session);
print_result($result);

}
?>