simpletestauto_admin_settings_validate

Definition

simpletestauto_admin_settings_validate($form_id, &$form_values)
simpletestauto.module, line 123

Description

Settings form validation

Code

<?php
function simpletestauto_admin_settings_validate($form_id, &$form_values) {
  global $base_url;
  if ($form_values['simpletestauto_catch_patch'] == 1) {
    $server_url = $form_values['simpletestauto_server_url'];
    if (!stristr($server_url, $base_url)) {
      $old_pass = variable_get('simpletestauto_server_pwd', '');
      $server_pwd = sha1(isset($form_values['simpletestauto_server_pwd']) ? $form_values['simpletestauto_server_pwd'] :  variable_get('simpletestauto_server_pwd', ''));
      $msg = xmlrpc($server_url, 'simpletestautoServer.ping', $server_pwd);
      if ($msg == FALSE) {
        form_set_error('simpletestauto_server_url', t('Please check test server url and that test server is online and simpletestauto module is enabled'));
      }
      else {
        if (stristr($msg,'Error')) {
      	  if (stristr($msg,'password')) {
	        form_set_error('simpletestauto_server_pwd', t($msg));
          }
      	  else {
      	    form_set_error('simpletestauto_server_url', t($msg));
      	  }
        }
      }
    }
  }
}
?>