spip / SPIP

 * @return string

 * 		erreur eventuelle

 **/

function spip_sqlite_error($query = '', $serveur = ''){

	$link = _sqlite_link($serveur);

	if (_sqlite_is_version(3, $link)){

		$errs = $link->errorInfo();

		/*

			$errs[0]

				numero SQLState ('HY000' souvent lors d'une erreur)

				http://www.easysoft.com/developer/interfaces/odbc/sqlstate_status_return_codes.html

			$errs[1]

				numéro d'erreur SQLite (souvent 1 lors d'une erreur)

				http://www.sqlite.org/c3ref/c_abort.html

			$errs[2]

				Le texte du message d'erreur

		*/

		$s = '';

		if (ltrim($errs[0],'0')) { // 00000 si pas d'erreur

			$s = "$errs[2]";

		}

	} elseif ($link) {

		$s = sqlite_error_string(sqlite_last_error($link));

	} else {

		$s = ": aucune ressource sqlite (link)";

	}

	if ($s) spip_log("$s - $query", 'sqlite.'._LOG_ERREUR);

	return $s;

}

/**

 * Retourne le numero de la dernière erreur SQL

 * 		1 ou autre erreur (en sqlite 2)

 * 		'HY000/1' : numéro de l'erreur SQLState / numéro d'erreur interne SQLite (en sqlite 3)

 **/

function spip_sqlite_errno($serveur = ''){

	$link = _sqlite_link($serveur);

	if (_sqlite_is_version(3, $link)){

		$t = $link->errorInfo();

		$s = ltrim($t[0],'0'); // 00000 si pas d'erreur

		if ($s) $s .= ' / ' . $t[1]; // ajoute l'erreur du moteur SQLite

	} elseif ($link) {

		$s = sqlite_last_error($link);

	} else {

		$s = ": aucune ressource sqlite (link)";

	}

	if ($s) spip_log("Erreur sqlite $s", 'sqlite.'._LOG_ERREUR);

	return $s ? $s : 0;

}

// http://doc.spip.org/@spip_sqlite_explain