Search moodle.org's
Developer Documentation

See Release Notes

  • Bug fixes for general core bugs in 3.10.x will end 8 November 2021 (12 months).
  • Bug fixes for security issues in 3.10.x will end 9 May 2022 (18 months).
  • PHP version: minimum PHP 7.2.0 Note: minimum PHP version has increased since Moodle 3.8. PHP 7.3.x and 7.4.x are supported too.
<?php
/**
< * @version v5.20.16 12-Jan-2020
> * @version v5.21.0 2021-02-27
* @copyright (c) 2000-2013 John Lim (jlim#natsoft.com). All rights reserved. * @copyright (c) 2014 Damien Regad, Mark Newnham and the ADOdb community * Released under both BSD license and Lesser GPL library license. Whenever there is any discrepancy between the two licenses, the BSD license will take precedence. * * Set tabs to 4 for best viewing. *
< * Latest version is available at http://adodb.org/
> * Latest version is available at https://adodb.org/
* */ include_once('PEAR.php'); if (!defined('ADODB_ERROR_HANDLER')) define('ADODB_ERROR_HANDLER','ADODB_Error_PEAR'); /* * Enabled the following if you want to terminate scripts when an error occurs */ //PEAR::setErrorHandling (PEAR_ERROR_DIE); /* * Name of the PEAR_Error derived class to call. */ if (!defined('ADODB_PEAR_ERROR_CLASS')) define('ADODB_PEAR_ERROR_CLASS','PEAR_Error'); /* * Store the last PEAR_Error object here */ global $ADODB_Last_PEAR_Error; $ADODB_Last_PEAR_Error = false; /** * Error Handler with PEAR support. This will be called with the following params * * @param $dbms the RDBMS you are connecting to * @param $fn the name of the calling function (in uppercase) * @param $errno the native error number from the database * @param $errmsg the native error msg from the database * @param $p1 $fn specific parameter - see below * @param $P2 $fn specific parameter - see below */ function ADODB_Error_PEAR($dbms, $fn, $errno, $errmsg, $p1=false, $p2=false) { global $ADODB_Last_PEAR_Error; if (error_reporting() == 0) return; // obey @ protocol switch($fn) { case 'EXECUTE': $sql = $p1; $inputparams = $p2; $s = "$dbms error: [$errno: $errmsg] in $fn(\"$sql\")"; break; case 'PCONNECT': case 'CONNECT': $host = $p1; $database = $p2; $s = "$dbms error: [$errno: $errmsg] in $fn('$host', ?, ?, '$database')"; break; default: $s = "$dbms error: [$errno: $errmsg] in $fn($p1, $p2)"; break; } $class = ADODB_PEAR_ERROR_CLASS; $ADODB_Last_PEAR_Error = new $class($s, $errno, $GLOBALS['_PEAR_default_error_mode'], $GLOBALS['_PEAR_default_error_options'], $errmsg); //print "<p>!$s</p>"; } /** * Returns last PEAR_Error object. This error might be for an error that
< * occured several sql statements ago.
> * occurred several sql statements ago.
*/ function ADODB_PEAR_Error() { global $ADODB_Last_PEAR_Error; return $ADODB_Last_PEAR_Error; }