File

modules/audit/audit.module, line 156

This is the Audit module, which provides functionality relating to degree audits.

Code

function audit_settings_form_validate($form, $form_state) {

  // The main thing I want to do here is make sure that the key_codes are acceptable machine names.
  $val = $form_state ["values"]["audit_approval_types"];
  $lines = explode("\n", $val);
  foreach ($lines as $line) {
    if (trim($line) == "") {
      continue;
    }
    $temp = explode("~", $line);
    $key = trim($temp [0]);
    $desc = trim($temp [1]);

    // Make sure key and desc both have values.
    if (strlen($key) < 2 || strlen($desc) < 2) {
      form_error("audit_approval_types", t("KEY_CODEs and Descriptions must be at least 2 characters long.  Please revise."));
      return;
    }

    if (strlen($key) > 40) {
      form_error("audit_approval_types", t("KEY_CODEs may not be longer than 40 characters.  Please revise."));
      return;
    }

    // Make sure that key_code is machine name.
    if (fp_get_machine_readable($key) != $key) {
      form_error("audit_approval_types", t("KEY_CODEs must only contain letters, numbers, and underscores (_).  Please revise."));
      return;
    }


  }


}