Mercurial > defr > drupal > core

annotate includes/database.pgsql.inc @ 1:c1f4ac30525a 6.0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Drupal 6.0
author Franck Deroche <webmaster@defr.org>
date Tue, 23 Dec 2008 14:28:28 +0100
parents
children fff6d4c8c043
rev   line source
webmaster@1 1 <?php
webmaster@1 2 // $Id: database.pgsql.inc,v 1.68.2.1 2008/02/07 10:17:26 goba Exp $
webmaster@1 3
webmaster@1 4 /**
webmaster@1 5 * @file
webmaster@1 6 * Database interface code for PostgreSQL database servers.
webmaster@1 7 */
webmaster@1 8
webmaster@1 9 /**
webmaster@1 10 * @ingroup database
webmaster@1 11 * @{
webmaster@1 12 */
webmaster@1 13
webmaster@1 14 /**
webmaster@1 15 * Report database status.
webmaster@1 16 */
webmaster@1 17 function db_status_report() {
webmaster@1 18 $t = get_t();
webmaster@1 19
webmaster@1 20 $version = db_version();
webmaster@1 21
webmaster@1 22 $form['pgsql'] = array(
webmaster@1 23 'title' => $t('PostgreSQL database'),
webmaster@1 24 'value' => $version,
webmaster@1 25 );
webmaster@1 26
webmaster@1 27 if (version_compare($version, DRUPAL_MINIMUM_PGSQL) < 0) {
webmaster@1 28 $form['pgsql']['severity'] = REQUIREMENT_ERROR;
webmaster@1 29 $form['pgsql']['description'] = $t('Your PostgreSQL Server is too old. Drupal requires at least PostgreSQL %version.', array('%version' => DRUPAL_MINIMUM_PGSQL));
webmaster@1 30 }
webmaster@1 31
webmaster@1 32 return $form;
webmaster@1 33 }
webmaster@1 34
webmaster@1 35 /**
webmaster@1 36 * Returns the version of the database server currently in use.
webmaster@1 37 *
webmaster@1 38 * @return Database server version
webmaster@1 39 */
webmaster@1 40 function db_version() {
webmaster@1 41 return db_result(db_query("SHOW SERVER_VERSION"));
webmaster@1 42 }
webmaster@1 43
webmaster@1 44 /**
webmaster@1 45 * Initialize a database connection.
webmaster@1 46 */
webmaster@1 47 function db_connect($url) {
webmaster@1 48 // Check if PostgreSQL support is present in PHP
webmaster@1 49 if (!function_exists('pg_connect')) {
webmaster@1 50 _db_error_page('Unable to use the PostgreSQL database because the PostgreSQL extension for PHP is not installed. Check your <code>php.ini</code> to see how you can enable it.');
webmaster@1 51 }
webmaster@1 52
webmaster@1 53 $url = parse_url($url);
webmaster@1 54 $conn_string = '';
webmaster@1 55
webmaster@1 56 // Decode url-encoded information in the db connection string
webmaster@1 57 if (isset($url['user'])) {
webmaster@1 58 $conn_string .= ' user='. urldecode($url['user']);
webmaster@1 59 }
webmaster@1 60 if (isset($url['pass'])) {
webmaster@1 61 $conn_string .= ' password='. urldecode($url['pass']);
webmaster@1 62 }
webmaster@1 63 if (isset($url['host'])) {
webmaster@1 64 $conn_string .= ' host='. urldecode($url['host']);
webmaster@1 65 }
webmaster@1 66 if (isset($url['path'])) {
webmaster@1 67 $conn_string .= ' dbname='. substr(urldecode($url['path']), 1);
webmaster@1 68 }
webmaster@1 69 if (isset($url['port'])) {
webmaster@1 70 $conn_string .= ' port='. urldecode($url['port']);
webmaster@1 71 }
webmaster@1 72
webmaster@1 73 // pg_last_error() does not return a useful error message for database
webmaster@1 74 // connection errors. We must turn on error tracking to get at a good error
webmaster@1 75 // message, which will be stored in $php_errormsg.
webmaster@1 76 $track_errors_previous = ini_get('track_errors');
webmaster@1 77 ini_set('track_errors', 1);
webmaster@1 78
webmaster@1 79 $connection = @pg_connect($conn_string);
webmaster@1 80 if (!$connection) {
webmaster@1 81 require_once './includes/unicode.inc';
webmaster@1 82 _db_error_page(decode_entities($php_errormsg));
webmaster@1 83 }
webmaster@1 84
webmaster@1 85 // Restore error tracking setting
webmaster@1 86 ini_set('track_errors', $track_errors_previous);
webmaster@1 87
webmaster@1 88 return $connection;
webmaster@1 89 }
webmaster@1 90
webmaster@1 91 /**
webmaster@1 92 * Runs a basic query in the active database.
webmaster@1 93 *
webmaster@1 94 * User-supplied arguments to the query should be passed in as separate
webmaster@1 95 * parameters so that they can be properly escaped to avoid SQL injection
webmaster@1 96 * attacks.
webmaster@1 97 *
webmaster@1 98 * @param $query
webmaster@1 99 * A string containing an SQL query.
webmaster@1 100 * @param ...
webmaster@1 101 * A variable number of arguments which are substituted into the query
webmaster@1 102 * using printf() syntax. Instead of a variable number of query arguments,
webmaster@1 103 * you may also pass a single array containing the query arguments.
webmaster@1 104 *
webmaster@1 105 * Valid %-modifiers are: %s, %d, %f, %b (binary data, do not enclose
webmaster@1 106 * in '') and %%.
webmaster@1 107 *
webmaster@1 108 * NOTE: using this syntax will cast NULL and FALSE values to decimal 0,
webmaster@1 109 * and TRUE values to decimal 1.
webmaster@1 110 *
webmaster@1 111 * @return
webmaster@1 112 * A database query result resource, or FALSE if the query was not
webmaster@1 113 * executed correctly.
webmaster@1 114 */
webmaster@1 115 function db_query($query) {
webmaster@1 116 $args = func_get_args();
webmaster@1 117 array_shift($args);
webmaster@1 118 $query = db_prefix_tables($query);
webmaster@1 119 if (isset($args[0]) and is_array($args[0])) { // 'All arguments in one array' syntax
webmaster@1 120 $args = $args[0];
webmaster@1 121 }
webmaster@1 122 _db_query_callback($args, TRUE);
webmaster@1 123 $query = preg_replace_callback(DB_QUERY_REGEXP, '_db_query_callback', $query);
webmaster@1 124 return _db_query($query);
webmaster@1 125 }
webmaster@1 126
webmaster@1 127 /**
webmaster@1 128 * Helper function for db_query().
webmaster@1 129 */
webmaster@1 130 function _db_query($query, $debug = 0) {
webmaster@1 131 global $active_db, $last_result, $queries;
webmaster@1 132
webmaster@1 133 if (variable_get('dev_query', 0)) {
webmaster@1 134 list($usec, $sec) = explode(' ', microtime());
webmaster@1 135 $timer = (float)$usec + (float)$sec;
webmaster@1 136 }
webmaster@1 137
webmaster@1 138 $last_result = pg_query($active_db, $query);
webmaster@1 139
webmaster@1 140 if (variable_get('dev_query', 0)) {
webmaster@1 141 $bt = debug_backtrace();
webmaster@1 142 $query = $bt[2]['function'] ."\n". $query;
webmaster@1 143 list($usec, $sec) = explode(' ', microtime());
webmaster@1 144 $stop = (float)$usec + (float)$sec;
webmaster@1 145 $diff = $stop - $timer;
webmaster@1 146 $queries[] = array($query, $diff);
webmaster@1 147 }
webmaster@1 148
webmaster@1 149 if ($debug) {
webmaster@1 150 print '<p>query: '. $query .'<br />error:'. pg_last_error($active_db) .'</p>';
webmaster@1 151 }
webmaster@1 152
webmaster@1 153 if ($last_result !== FALSE) {
webmaster@1 154 return $last_result;
webmaster@1 155 }
webmaster@1 156 else {
webmaster@1 157 // Indicate to drupal_error_handler that this is a database error.
webmaster@1 158 ${DB_ERROR} = TRUE;
webmaster@1 159 trigger_error(check_plain(pg_last_error($active_db) ."\nquery: ". $query), E_USER_WARNING);
webmaster@1 160 return FALSE;
webmaster@1 161 }
webmaster@1 162 }
webmaster@1 163
webmaster@1 164 /**
webmaster@1 165 * Fetch one result row from the previous query as an object.
webmaster@1 166 *
webmaster@1 167 * @param $result
webmaster@1 168 * A database query result resource, as returned from db_query().
webmaster@1 169 * @return
webmaster@1 170 * An object representing the next row of the result, or FALSE. The attributes
webmaster@1 171 * of this object are the table fields selected by the query.
webmaster@1 172 */
webmaster@1 173 function db_fetch_object($result) {
webmaster@1 174 if ($result) {
webmaster@1 175 return pg_fetch_object($result);
webmaster@1 176 }
webmaster@1 177 }
webmaster@1 178
webmaster@1 179 /**
webmaster@1 180 * Fetch one result row from the previous query as an array.
webmaster@1 181 *
webmaster@1 182 * @param $result
webmaster@1 183 * A database query result resource, as returned from db_query().
webmaster@1 184 * @return
webmaster@1 185 * An associative array representing the next row of the result, or FALSE.
webmaster@1 186 * The keys of this object are the names of the table fields selected by the
webmaster@1 187 * query, and the values are the field values for this result row.
webmaster@1 188 */
webmaster@1 189 function db_fetch_array($result) {
webmaster@1 190 if ($result) {
webmaster@1 191 return pg_fetch_assoc($result);
webmaster@1 192 }
webmaster@1 193 }
webmaster@1 194
webmaster@1 195 /**
webmaster@1 196 * Return an individual result field from the previous query.
webmaster@1 197 *
webmaster@1 198 * Only use this function if exactly one field is being selected; otherwise,
webmaster@1 199 * use db_fetch_object() or db_fetch_array().
webmaster@1 200 *
webmaster@1 201 * @param $result
webmaster@1 202 * A database query result resource, as returned from db_query().
webmaster@1 203 * @return
webmaster@1 204 * The resulting field or FALSE.
webmaster@1 205 */
webmaster@1 206 function db_result($result) {
webmaster@1 207 if ($result && pg_num_rows($result) > 0) {
webmaster@1 208 $array = pg_fetch_row($result);
webmaster@1 209 return $array[0];
webmaster@1 210 }
webmaster@1 211 return FALSE;
webmaster@1 212 }
webmaster@1 213
webmaster@1 214 /**
webmaster@1 215 * Determine whether the previous query caused an error.
webmaster@1 216 */
webmaster@1 217 function db_error() {
webmaster@1 218 global $active_db;
webmaster@1 219 return pg_last_error($active_db);
webmaster@1 220 }
webmaster@1 221
webmaster@1 222 /**
webmaster@1 223 * Returns the last insert id. This function is thread safe.
webmaster@1 224 *
webmaster@1 225 * @param $table
webmaster@1 226 * The name of the table you inserted into.
webmaster@1 227 * @param $field
webmaster@1 228 * The name of the autoincrement field.
webmaster@1 229 */
webmaster@1 230 function db_last_insert_id($table, $field) {
webmaster@1 231 return db_result(db_query("SELECT CURRVAL('{". db_escape_table($table) ."}_". db_escape_table($field) ."_seq')"));
webmaster@1 232 }
webmaster@1 233
webmaster@1 234 /**
webmaster@1 235 * Determine the number of rows changed by the preceding query.
webmaster@1 236 */
webmaster@1 237 function db_affected_rows() {
webmaster@1 238 global $last_result;
webmaster@1 239 return empty($last_result) ? 0 : pg_affected_rows($last_result);
webmaster@1 240 }
webmaster@1 241
webmaster@1 242 /**
webmaster@1 243 * Runs a limited-range query in the active database.
webmaster@1 244 *
webmaster@1 245 * Use this as a substitute for db_query() when a subset of the query
webmaster@1 246 * is to be returned.
webmaster@1 247 * User-supplied arguments to the query should be passed in as separate
webmaster@1 248 * parameters so that they can be properly escaped to avoid SQL injection
webmaster@1 249 * attacks.
webmaster@1 250 *
webmaster@1 251 * @param $query
webmaster@1 252 * A string containing an SQL query.
webmaster@1 253 * @param ...
webmaster@1 254 * A variable number of arguments which are substituted into the query
webmaster@1 255 * using printf() syntax. Instead of a variable number of query arguments,
webmaster@1 256 * you may also pass a single array containing the query arguments.
webmaster@1 257 * Valid %-modifiers are: %s, %d, %f, %b (binary data, do not enclose
webmaster@1 258 * in '') and %%.
webmaster@1 259 *
webmaster@1 260 * NOTE: using this syntax will cast NULL and FALSE values to decimal 0,
webmaster@1 261 * and TRUE values to decimal 1.
webmaster@1 262 *
webmaster@1 263 * @param $from
webmaster@1 264 * The first result row to return.
webmaster@1 265 * @param $count
webmaster@1 266 * The maximum number of result rows to return.
webmaster@1 267 * @return
webmaster@1 268 * A database query result resource, or FALSE if the query was not executed
webmaster@1 269 * correctly.
webmaster@1 270 */
webmaster@1 271 function db_query_range($query) {
webmaster@1 272 $args = func_get_args();
webmaster@1 273 $count = array_pop($args);
webmaster@1 274 $from = array_pop($args);
webmaster@1 275 array_shift($args);
webmaster@1 276
webmaster@1 277 $query = db_prefix_tables($query);
webmaster@1 278 if (isset($args[0]) and is_array($args[0])) { // 'All arguments in one array' syntax
webmaster@1 279 $args = $args[0];
webmaster@1 280 }
webmaster@1 281 _db_query_callback($args, TRUE);
webmaster@1 282 $query = preg_replace_callback(DB_QUERY_REGEXP, '_db_query_callback', $query);
webmaster@1 283 $query .= ' LIMIT '. (int)$count .' OFFSET '. (int)$from;
webmaster@1 284 return _db_query($query);
webmaster@1 285 }
webmaster@1 286
webmaster@1 287 /**
webmaster@1 288 * Runs a SELECT query and stores its results in a temporary table.
webmaster@1 289 *
webmaster@1 290 * Use this as a substitute for db_query() when the results need to stored
webmaster@1 291 * in a temporary table. Temporary tables exist for the duration of the page
webmaster@1 292 * request.
webmaster@1 293 * User-supplied arguments to the query should be passed in as separate parameters
webmaster@1 294 * so that they can be properly escaped to avoid SQL injection attacks.
webmaster@1 295 *
webmaster@1 296 * Note that if you need to know how many results were returned, you should do
webmaster@1 297 * a SELECT COUNT(*) on the temporary table afterwards. db_affected_rows() does
webmaster@1 298 * not give consistent result across different database types in this case.
webmaster@1 299 *
webmaster@1 300 * @param $query
webmaster@1 301 * A string containing a normal SELECT SQL query.
webmaster@1 302 * @param ...
webmaster@1 303 * A variable number of arguments which are substituted into the query
webmaster@1 304 * using printf() syntax. The query arguments can be enclosed in one
webmaster@1 305 * array instead.
webmaster@1 306 * Valid %-modifiers are: %s, %d, %f, %b (binary data, do not enclose
webmaster@1 307 * in '') and %%.
webmaster@1 308 *
webmaster@1 309 * NOTE: using this syntax will cast NULL and FALSE values to decimal 0,
webmaster@1 310 * and TRUE values to decimal 1.
webmaster@1 311 *
webmaster@1 312 * @param $table
webmaster@1 313 * The name of the temporary table to select into. This name will not be
webmaster@1 314 * prefixed as there is no risk of collision.
webmaster@1 315 * @return
webmaster@1 316 * A database query result resource, or FALSE if the query was not executed
webmaster@1 317 * correctly.
webmaster@1 318 */
webmaster@1 319 function db_query_temporary($query) {
webmaster@1 320 $args = func_get_args();
webmaster@1 321 $tablename = array_pop($args);
webmaster@1 322 array_shift($args);
webmaster@1 323
webmaster@1 324 $query = preg_replace('/^SELECT/i', 'CREATE TEMPORARY TABLE '. $tablename .' AS SELECT', db_prefix_tables($query));
webmaster@1 325 if (isset($args[0]) and is_array($args[0])) { // 'All arguments in one array' syntax
webmaster@1 326 $args = $args[0];
webmaster@1 327 }
webmaster@1 328 _db_query_callback($args, TRUE);
webmaster@1 329 $query = preg_replace_callback(DB_QUERY_REGEXP, '_db_query_callback', $query);
webmaster@1 330 return _db_query($query);
webmaster@1 331 }
webmaster@1 332
webmaster@1 333 /**
webmaster@1 334 * Returns a properly formatted Binary Large OBject value.
webmaster@1 335 * In case of PostgreSQL encodes data for insert into bytea field.
webmaster@1 336 *
webmaster@1 337 * @param $data
webmaster@1 338 * Data to encode.
webmaster@1 339 * @return
webmaster@1 340 * Encoded data.
webmaster@1 341 */
webmaster@1 342 function db_encode_blob($data) {
webmaster@1 343 return "'". pg_escape_bytea($data) ."'";
webmaster@1 344 }
webmaster@1 345
webmaster@1 346 /**
webmaster@1 347 * Returns text from a Binary Large OBject value.
webmaster@1 348 * In case of PostgreSQL decodes data after select from bytea field.
webmaster@1 349 *
webmaster@1 350 * @param $data
webmaster@1 351 * Data to decode.
webmaster@1 352 * @return
webmaster@1 353 * Decoded data.
webmaster@1 354 */
webmaster@1 355 function db_decode_blob($data) {
webmaster@1 356 return pg_unescape_bytea($data);
webmaster@1 357 }
webmaster@1 358
webmaster@1 359 /**
webmaster@1 360 * Prepare user input for use in a database query, preventing SQL injection attacks.
webmaster@1 361 * Note: This function requires PostgreSQL 7.2 or later.
webmaster@1 362 */
webmaster@1 363 function db_escape_string($text) {
webmaster@1 364 return pg_escape_string($text);
webmaster@1 365 }
webmaster@1 366
webmaster@1 367 /**
webmaster@1 368 * Lock a table.
webmaster@1 369 * This function automatically starts a transaction.
webmaster@1 370 */
webmaster@1 371 function db_lock_table($table) {
webmaster@1 372 db_query('BEGIN; LOCK TABLE {'. db_escape_table($table) .'} IN EXCLUSIVE MODE');
webmaster@1 373 }
webmaster@1 374
webmaster@1 375 /**
webmaster@1 376 * Unlock all locked tables.
webmaster@1 377 * This function automatically commits a transaction.
webmaster@1 378 */
webmaster@1 379 function db_unlock_tables() {
webmaster@1 380 db_query('COMMIT');
webmaster@1 381 }
webmaster@1 382
webmaster@1 383 /**
webmaster@1 384 * Check if a table exists.
webmaster@1 385 */
webmaster@1 386 function db_table_exists($table) {
webmaster@1 387 return (bool) db_result(db_query("SELECT COUNT(*) FROM pg_class WHERE relname = '{". db_escape_table($table) ."}'"));
webmaster@1 388 }
webmaster@1 389
webmaster@1 390 /**
webmaster@1 391 * Check if a column exists in the given table.
webmaster@1 392 */
webmaster@1 393 function db_column_exists($table, $column) {
webmaster@1 394 return (bool) db_result(db_query("SELECT COUNT(pg_attribute.attname) FROM pg_class, pg_attribute WHERE pg_attribute.attrelid = pg_class.oid AND pg_class.relname = '{". db_escape_table($table) ."}' AND attname = '". db_escape_table($column) ."'"));
webmaster@1 395 }
webmaster@1 396
webmaster@1 397 /**
webmaster@1 398 * Verify if the database is set up correctly.
webmaster@1 399 */
webmaster@1 400 function db_check_setup() {
webmaster@1 401 $t = get_t();
webmaster@1 402
webmaster@1 403 $encoding = db_result(db_query('SHOW server_encoding'));
webmaster@1 404 if (!in_array(strtolower($encoding), array('unicode', 'utf8'))) {
webmaster@1 405 drupal_set_message($t('Your PostgreSQL database is set up with the wrong character encoding (%encoding). It is possible it will not work as expected. It is advised to recreate it with UTF-8/Unicode encoding. More information can be found in the <a href="@url">PostgreSQL documentation</a>.', array('%encoding' => $encoding, '@url' => 'http://www.postgresql.org/docs/7.4/interactive/multibyte.html')), 'status');
webmaster@1 406 }
webmaster@1 407 }
webmaster@1 408
webmaster@1 409 /**
webmaster@1 410 * Wraps the given table.field entry with a DISTINCT(). The wrapper is added to
webmaster@1 411 * the SELECT list entry of the given query and the resulting query is returned.
webmaster@1 412 * This function only applies the wrapper if a DISTINCT doesn't already exist in
webmaster@1 413 * the query.
webmaster@1 414 *
webmaster@1 415 * @param $table Table containing the field to set as DISTINCT
webmaster@1 416 * @param $field Field to set as DISTINCT
webmaster@1 417 * @param $query Query to apply the wrapper to
webmaster@1 418 * @return SQL query with the DISTINCT wrapper surrounding the given table.field.
webmaster@1 419 */
webmaster@1 420 function db_distinct_field($table, $field, $query) {
webmaster@1 421 $field_to_select = 'DISTINCT ON ('. $table .'.'. $field .") $table.$field";
webmaster@1 422 // (?<!text) is a negative look-behind (no need to rewrite queries that already use DISTINCT).
webmaster@1 423 $query = preg_replace('/(SELECT.*)(?:'. $table .'\.|\s)(?<!DISTINCT\()(?<!DISTINCT\('. $table .'\.)'. $field .'(.*FROM )/AUsi', '\1 '. $field_to_select .'\2', $query);
webmaster@1 424 $query = preg_replace('/(ORDER BY )(?!'. $table .'\.'. $field .')/', '\1'."$table.$field, ", $query);
webmaster@1 425 return $query;
webmaster@1 426 }
webmaster@1 427
webmaster@1 428 /**
webmaster@1 429 * @} End of "ingroup database".
webmaster@1 430 */
webmaster@1 431
webmaster@1 432 /**
webmaster@1 433 * @ingroup schemaapi
webmaster@1 434 * @{
webmaster@1 435 */
webmaster@1 436
webmaster@1 437 /**
webmaster@1 438 * This maps a generic data type in combination with its data size
webmaster@1 439 * to the engine-specific data type.
webmaster@1 440 */
webmaster@1 441 function db_type_map() {
webmaster@1 442 // Put :normal last so it gets preserved by array_flip. This makes
webmaster@1 443 // it much easier for modules (such as schema.module) to map
webmaster@1 444 // database types back into schema types.
webmaster@1 445 $map = array(
webmaster@1 446 'varchar:normal' => 'varchar',
webmaster@1 447 'char:normal' => 'character',
webmaster@1 448
webmaster@1 449 'text:tiny' => 'text',
webmaster@1 450 'text:small' => 'text',
webmaster@1 451 'text:medium' => 'text',
webmaster@1 452 'text:big' => 'text',
webmaster@1 453 'text:normal' => 'text',
webmaster@1 454
webmaster@1 455 'int:tiny' => 'smallint',
webmaster@1 456 'int:small' => 'smallint',
webmaster@1 457 'int:medium' => 'int',
webmaster@1 458 'int:big' => 'bigint',
webmaster@1 459 'int:normal' => 'int',
webmaster@1 460
webmaster@1 461 'float:tiny' => 'real',
webmaster@1 462 'float:small' => 'real',
webmaster@1 463 'float:medium' => 'real',
webmaster@1 464 'float:big' => 'double precision',
webmaster@1 465 'float:normal' => 'real',
webmaster@1 466
webmaster@1 467 'numeric:normal' => 'numeric',
webmaster@1 468
webmaster@1 469 'blob:big' => 'bytea',
webmaster@1 470 'blob:normal' => 'bytea',
webmaster@1 471
webmaster@1 472 'datetime:normal' => 'timestamp',
webmaster@1 473
webmaster@1 474 'serial:tiny' => 'serial',
webmaster@1 475 'serial:small' => 'serial',
webmaster@1 476 'serial:medium' => 'serial',
webmaster@1 477 'serial:big' => 'bigserial',
webmaster@1 478 'serial:normal' => 'serial',
webmaster@1 479 );
webmaster@1 480 return $map;
webmaster@1 481 }
webmaster@1 482
webmaster@1 483 /**
webmaster@1 484 * Generate SQL to create a new table from a Drupal schema definition.
webmaster@1 485 *
webmaster@1 486 * @param $name
webmaster@1 487 * The name of the table to create.
webmaster@1 488 * @param $table
webmaster@1 489 * A Schema API table definition array.
webmaster@1 490 * @return
webmaster@1 491 * An array of SQL statements to create the table.
webmaster@1 492 */
webmaster@1 493 function db_create_table_sql($name, $table) {
webmaster@1 494 $sql_fields = array();
webmaster@1 495 foreach ($table['fields'] as $field_name => $field) {
webmaster@1 496 $sql_fields[] = _db_create_field_sql($field_name, _db_process_field($field));
webmaster@1 497 }
webmaster@1 498
webmaster@1 499 $sql_keys = array();
webmaster@1 500 if (isset($table['primary key']) && is_array($table['primary key'])) {
webmaster@1 501 $sql_keys[] = 'PRIMARY KEY ('. implode(', ', $table['primary key']) .')';
webmaster@1 502 }
webmaster@1 503 if (isset($table['unique keys']) && is_array($table['unique keys'])) {
webmaster@1 504 foreach ($table['unique keys'] as $key_name => $key) {
webmaster@1 505 $sql_keys[] = 'CONSTRAINT {'. $name .'}_'. $key_name .'_key UNIQUE ('. implode(', ', $key) .')';
webmaster@1 506 }
webmaster@1 507 }
webmaster@1 508
webmaster@1 509 $sql = "CREATE TABLE {". $name ."} (\n\t";
webmaster@1 510 $sql .= implode(",\n\t", $sql_fields);
webmaster@1 511 if (count($sql_keys) > 0) {
webmaster@1 512 $sql .= ",\n\t";
webmaster@1 513 }
webmaster@1 514 $sql .= implode(",\n\t", $sql_keys);
webmaster@1 515 $sql .= "\n)";
webmaster@1 516 $statements[] = $sql;
webmaster@1 517
webmaster@1 518 if (isset($table['indexes']) && is_array($table['indexes'])) {
webmaster@1 519 foreach ($table['indexes'] as $key_name => $key) {
webmaster@1 520 $statements[] = _db_create_index_sql($name, $key_name, $key);
webmaster@1 521 }
webmaster@1 522 }
webmaster@1 523
webmaster@1 524 return $statements;
webmaster@1 525 }
webmaster@1 526
webmaster@1 527 function _db_create_index_sql($table, $name, $fields) {
webmaster@1 528 $query = 'CREATE INDEX {'. $table .'}_'. $name .'_idx ON {'. $table .'} (';
webmaster@1 529 $query .= _db_create_key_sql($fields) .')';
webmaster@1 530 return $query;
webmaster@1 531 }
webmaster@1 532
webmaster@1 533 function _db_create_key_sql($fields) {
webmaster@1 534 $ret = array();
webmaster@1 535 foreach ($fields as $field) {
webmaster@1 536 if (is_array($field)) {
webmaster@1 537 $ret[] = 'substr('. $field[0] .', 1, '. $field[1] .')';
webmaster@1 538 }
webmaster@1 539 else {
webmaster@1 540 $ret[] = $field;
webmaster@1 541 }
webmaster@1 542 }
webmaster@1 543 return implode(', ', $ret);
webmaster@1 544 }
webmaster@1 545
webmaster@1 546 function _db_create_keys(&$ret, $table, $new_keys) {
webmaster@1 547 if (isset($new_keys['primary key'])) {
webmaster@1 548 db_add_primary_key($ret, $table, $new_keys['primary key']);
webmaster@1 549 }
webmaster@1 550 if (isset($new_keys['unique keys'])) {
webmaster@1 551 foreach ($new_keys['unique keys'] as $name => $fields) {
webmaster@1 552 db_add_unique_key($ret, $table, $name, $fields);
webmaster@1 553 }
webmaster@1 554 }
webmaster@1 555 if (isset($new_keys['indexes'])) {
webmaster@1 556 foreach ($new_keys['indexes'] as $name => $fields) {
webmaster@1 557 db_add_index($ret, $table, $name, $fields);
webmaster@1 558 }
webmaster@1 559 }
webmaster@1 560 }
webmaster@1 561
webmaster@1 562 /**
webmaster@1 563 * Set database-engine specific properties for a field.
webmaster@1 564 *
webmaster@1 565 * @param $field
webmaster@1 566 * A field description array, as specified in the schema documentation.
webmaster@1 567 */
webmaster@1 568 function _db_process_field($field) {
webmaster@1 569 if (!isset($field['size'])) {
webmaster@1 570 $field['size'] = 'normal';
webmaster@1 571 }
webmaster@1 572 // Set the correct database-engine specific datatype.
webmaster@1 573 if (!isset($field['pgsql_type'])) {
webmaster@1 574 $map = db_type_map();
webmaster@1 575 $field['pgsql_type'] = $map[$field['type'] .':'. $field['size']];
webmaster@1 576 }
webmaster@1 577 if ($field['type'] == 'serial') {
webmaster@1 578 unset($field['not null']);
webmaster@1 579 }
webmaster@1 580 return $field;
webmaster@1 581 }
webmaster@1 582
webmaster@1 583 /**
webmaster@1 584 * Create an SQL string for a field to be used in table creation or alteration.
webmaster@1 585 *
webmaster@1 586 * Before passing a field out of a schema definition into this function it has
webmaster@1 587 * to be processed by _db_process_field().
webmaster@1 588 *
webmaster@1 589 * @param $name
webmaster@1 590 * Name of the field.
webmaster@1 591 * @param $spec
webmaster@1 592 * The field specification, as per the schema data structure format.
webmaster@1 593 */
webmaster@1 594 function _db_create_field_sql($name, $spec) {
webmaster@1 595 $sql = $name .' '. $spec['pgsql_type'];
webmaster@1 596
webmaster@1 597 if ($spec['type'] == 'serial') {
webmaster@1 598 unset($spec['not null']);
webmaster@1 599 }
webmaster@1 600 if (!empty($spec['unsigned'])) {
webmaster@1 601 if ($spec['type'] == 'serial') {
webmaster@1 602 $sql .= " CHECK ($name >= 0)";
webmaster@1 603 }
webmaster@1 604 else {
webmaster@1 605 $sql .= '_unsigned';
webmaster@1 606 }
webmaster@1 607 }
webmaster@1 608
webmaster@1 609 if (!empty($spec['length'])) {
webmaster@1 610 $sql .= '('. $spec['length'] .')';
webmaster@1 611 }
webmaster@1 612 elseif (isset($spec['precision']) && isset($spec['scale'])) {
webmaster@1 613 $sql .= '('. $spec['precision'] .', '. $spec['scale'] .')';
webmaster@1 614 }
webmaster@1 615
webmaster@1 616 if (isset($spec['not null']) && $spec['not null']) {
webmaster@1 617 $sql .= ' NOT NULL';
webmaster@1 618 }
webmaster@1 619 if (isset($spec['default'])) {
webmaster@1 620 $default = is_string($spec['default']) ? "'". $spec['default'] ."'" : $spec['default'];
webmaster@1 621 $sql .= " default $default";
webmaster@1 622 }
webmaster@1 623
webmaster@1 624 return $sql;
webmaster@1 625 }
webmaster@1 626
webmaster@1 627 /**
webmaster@1 628 * Rename a table.
webmaster@1 629 *
webmaster@1 630 * @param $ret
webmaster@1 631 * Array to which query results will be added.
webmaster@1 632 * @param $table
webmaster@1 633 * The table to be renamed.
webmaster@1 634 * @param $new_name
webmaster@1 635 * The new name for the table.
webmaster@1 636 */
webmaster@1 637 function db_rename_table(&$ret, $table, $new_name) {
webmaster@1 638 $ret[] = update_sql('ALTER TABLE {'. $table .'} RENAME TO {'. $new_name .'}');
webmaster@1 639 }
webmaster@1 640
webmaster@1 641 /**
webmaster@1 642 * Drop a table.
webmaster@1 643 *
webmaster@1 644 * @param $ret
webmaster@1 645 * Array to which query results will be added.
webmaster@1 646 * @param $table
webmaster@1 647 * The table to be dropped.
webmaster@1 648 */
webmaster@1 649 function db_drop_table(&$ret, $table) {
webmaster@1 650 $ret[] = update_sql('DROP TABLE {'. $table .'}');
webmaster@1 651 }
webmaster@1 652
webmaster@1 653 /**
webmaster@1 654 * Add a new field to a table.
webmaster@1 655 *
webmaster@1 656 * @param $ret
webmaster@1 657 * Array to which query results will be added.
webmaster@1 658 * @param $table
webmaster@1 659 * Name of the table to be altered.
webmaster@1 660 * @param $field
webmaster@1 661 * Name of the field to be added.
webmaster@1 662 * @param $spec
webmaster@1 663 * The field specification array, as taken from a schema definition.
webmaster@1 664 * The specification may also contain the key 'initial', the newly
webmaster@1 665 * created field will be set to the value of the key in all rows.
webmaster@1 666 * This is most useful for creating NOT NULL columns with no default
webmaster@1 667 * value in existing tables.
webmaster@1 668 * @param $keys_new
webmaster@1 669 * Optional keys and indexes specification to be created on the
webmaster@1 670 * table along with adding the field. The format is the same as a
webmaster@1 671 * table specification but without the 'fields' element. If you are
webmaster@1 672 * adding a type 'serial' field, you MUST specify at least one key
webmaster@1 673 * or index including it in this array. @see db_change_field for more
webmaster@1 674 * explanation why.
webmaster@1 675 */
webmaster@1 676 function db_add_field(&$ret, $table, $field, $spec, $new_keys = array()) {
webmaster@1 677 $fixnull = FALSE;
webmaster@1 678 if (!empty($spec['not null']) && !isset($spec['default'])) {
webmaster@1 679 $fixnull = TRUE;
webmaster@1 680 $spec['not null'] = FALSE;
webmaster@1 681 }
webmaster@1 682 $query = 'ALTER TABLE {'. $table .'} ADD COLUMN ';
webmaster@1 683 $query .= _db_create_field_sql($field, _db_process_field($spec));
webmaster@1 684 $ret[] = update_sql($query);
webmaster@1 685 if (isset($spec['initial'])) {
webmaster@1 686 // All this because update_sql does not support %-placeholders.
webmaster@1 687 $sql = 'UPDATE {'. $table .'} SET '. $field .' = '. db_type_placeholder($spec['type']);
webmaster@1 688 $result = db_query($sql, $spec['initial']);
webmaster@1 689 $ret[] = array('success' => $result !== FALSE, 'query' => check_plain($sql .' ('. $spec['initial'] .')'));
webmaster@1 690 }
webmaster@1 691 if ($fixnull) {
webmaster@1 692 $ret[] = update_sql("ALTER TABLE {". $table ."} ALTER $field SET NOT NULL");
webmaster@1 693 }
webmaster@1 694 if (isset($new_keys)) {
webmaster@1 695 _db_create_keys($ret, $table, $new_keys);
webmaster@1 696 }
webmaster@1 697 }
webmaster@1 698
webmaster@1 699 /**
webmaster@1 700 * Drop a field.
webmaster@1 701 *
webmaster@1 702 * @param $ret
webmaster@1 703 * Array to which query results will be added.
webmaster@1 704 * @param $table
webmaster@1 705 * The table to be altered.
webmaster@1 706 * @param $field
webmaster@1 707 * The field to be dropped.
webmaster@1 708 */
webmaster@1 709 function db_drop_field(&$ret, $table, $field) {
webmaster@1 710 $ret[] = update_sql('ALTER TABLE {'. $table .'} DROP COLUMN '. $field);
webmaster@1 711 }
webmaster@1 712
webmaster@1 713 /**
webmaster@1 714 * Set the default value for a field.
webmaster@1 715 *
webmaster@1 716 * @param $ret
webmaster@1 717 * Array to which query results will be added.
webmaster@1 718 * @param $table
webmaster@1 719 * The table to be altered.
webmaster@1 720 * @param $field
webmaster@1 721 * The field to be altered.
webmaster@1 722 * @param $default
webmaster@1 723 * Default value to be set. NULL for 'default NULL'.
webmaster@1 724 */
webmaster@1 725 function db_field_set_default(&$ret, $table, $field, $default) {
webmaster@1 726 if ($default == NULL) {
webmaster@1 727 $default = 'NULL';
webmaster@1 728 }
webmaster@1 729 else {
webmaster@1 730 $default = is_string($default) ? "'$default'" : $default;
webmaster@1 731 }
webmaster@1 732
webmaster@1 733 $ret[] = update_sql('ALTER TABLE {'. $table .'} ALTER COLUMN '. $field .' SET DEFAULT '. $default);
webmaster@1 734 }
webmaster@1 735
webmaster@1 736 /**
webmaster@1 737 * Set a field to have no default value.
webmaster@1 738 *
webmaster@1 739 * @param $ret
webmaster@1 740 * Array to which query results will be added.
webmaster@1 741 * @param $table
webmaster@1 742 * The table to be altered.
webmaster@1 743 * @param $field
webmaster@1 744 * The field to be altered.
webmaster@1 745 */
webmaster@1 746 function db_field_set_no_default(&$ret, $table, $field) {
webmaster@1 747 $ret[] = update_sql('ALTER TABLE {'. $table .'} ALTER COLUMN '. $field .' DROP DEFAULT');
webmaster@1 748 }
webmaster@1 749
webmaster@1 750 /**
webmaster@1 751 * Add a primary key.
webmaster@1 752 *
webmaster@1 753 * @param $ret
webmaster@1 754 * Array to which query results will be added.
webmaster@1 755 * @param $table
webmaster@1 756 * The table to be altered.
webmaster@1 757 * @param $fields
webmaster@1 758 * Fields for the primary key.
webmaster@1 759 */
webmaster@1 760 function db_add_primary_key(&$ret, $table, $fields) {
webmaster@1 761 $ret[] = update_sql('ALTER TABLE {'. $table .'} ADD PRIMARY KEY ('.
webmaster@1 762 implode(',', $fields) .')');
webmaster@1 763 }
webmaster@1 764
webmaster@1 765 /**
webmaster@1 766 * Drop the primary key.
webmaster@1 767 *
webmaster@1 768 * @param $ret
webmaster@1 769 * Array to which query results will be added.
webmaster@1 770 * @param $table
webmaster@1 771 * The table to be altered.
webmaster@1 772 */
webmaster@1 773 function db_drop_primary_key(&$ret, $table) {
webmaster@1 774 $ret[] = update_sql('ALTER TABLE {'. $table .'} DROP CONSTRAINT {'. $table .'}_pkey');
webmaster@1 775 }
webmaster@1 776
webmaster@1 777 /**
webmaster@1 778 * Add a unique key.
webmaster@1 779 *
webmaster@1 780 * @param $ret
webmaster@1 781 * Array to which query results will be added.
webmaster@1 782 * @param $table
webmaster@1 783 * The table to be altered.
webmaster@1 784 * @param $name
webmaster@1 785 * The name of the key.
webmaster@1 786 * @param $fields
webmaster@1 787 * An array of field names.
webmaster@1 788 */
webmaster@1 789 function db_add_unique_key(&$ret, $table, $name, $fields) {
webmaster@1 790 $name = '{'. $table .'}_'. $name .'_key';
webmaster@1 791 $ret[] = update_sql('ALTER TABLE {'. $table .'} ADD CONSTRAINT '.
webmaster@1 792 $name .' UNIQUE ('. implode(',', $fields) .')');
webmaster@1 793 }
webmaster@1 794
webmaster@1 795 /**
webmaster@1 796 * Drop a unique key.
webmaster@1 797 *
webmaster@1 798 * @param $ret
webmaster@1 799 * Array to which query results will be added.
webmaster@1 800 * @param $table
webmaster@1 801 * The table to be altered.
webmaster@1 802 * @param $name
webmaster@1 803 * The name of the key.
webmaster@1 804 */
webmaster@1 805 function db_drop_unique_key(&$ret, $table, $name) {
webmaster@1 806 $name = '{'. $table .'}_'. $name .'_key';
webmaster@1 807 $ret[] = update_sql('ALTER TABLE {'. $table .'} DROP CONSTRAINT '. $name);
webmaster@1 808 }
webmaster@1 809
webmaster@1 810 /**
webmaster@1 811 * Add an index.
webmaster@1 812 *
webmaster@1 813 * @param $ret
webmaster@1 814 * Array to which query results will be added.
webmaster@1 815 * @param $table
webmaster@1 816 * The table to be altered.
webmaster@1 817 * @param $name
webmaster@1 818 * The name of the index.
webmaster@1 819 * @param $fields
webmaster@1 820 * An array of field names.
webmaster@1 821 */
webmaster@1 822 function db_add_index(&$ret, $table, $name, $fields) {
webmaster@1 823 $ret[] = update_sql(_db_create_index_sql($table, $name, $fields));
webmaster@1 824 }
webmaster@1 825
webmaster@1 826 /**
webmaster@1 827 * Drop an index.
webmaster@1 828 *
webmaster@1 829 * @param $ret
webmaster@1 830 * Array to which query results will be added.
webmaster@1 831 * @param $table
webmaster@1 832 * The table to be altered.
webmaster@1 833 * @param $name
webmaster@1 834 * The name of the index.
webmaster@1 835 */
webmaster@1 836 function db_drop_index(&$ret, $table, $name) {
webmaster@1 837 $name = '{'. $table .'}_'. $name .'_idx';
webmaster@1 838 $ret[] = update_sql('DROP INDEX '. $name);
webmaster@1 839 }
webmaster@1 840
webmaster@1 841 /**
webmaster@1 842 * Change a field definition.
webmaster@1 843 *
webmaster@1 844 * IMPORTANT NOTE: To maintain database portability, you have to explicitly
webmaster@1 845 * recreate all indices and primary keys that are using the changed field.
webmaster@1 846 *
webmaster@1 847 * That means that you have to drop all affected keys and indexes with
webmaster@1 848 * db_drop_{primary_key,unique_key,index}() before calling db_change_field().
webmaster@1 849 * To recreate the keys and indices, pass the key definitions as the
webmaster@1 850 * optional $new_keys argument directly to db_change_field().
webmaster@1 851 *
webmaster@1 852 * For example, suppose you have:
webmaster@1 853 * @code
webmaster@1 854 * $schema['foo'] = array(
webmaster@1 855 * 'fields' => array(
webmaster@1 856 * 'bar' => array('type' => 'int', 'not null' => TRUE)
webmaster@1 857 * ),
webmaster@1 858 * 'primary key' => array('bar')
webmaster@1 859 * );
webmaster@1 860 * @endcode
webmaster@1 861 * and you want to change foo.bar to be type serial, leaving it as the
webmaster@1 862 * primary key. The correct sequence is:
webmaster@1 863 * @code
webmaster@1 864 * db_drop_primary_key($ret, 'foo');
webmaster@1 865 * db_change_field($ret, 'foo', 'bar', 'bar',
webmaster@1 866 * array('type' => 'serial', 'not null' => TRUE),
webmaster@1 867 * array('primary key' => array('bar')));
webmaster@1 868 * @endcode
webmaster@1 869 *
webmaster@1 870 * The reasons for this are due to the different database engines:
webmaster@1 871 *
webmaster@1 872 * On PostgreSQL, changing a field definition involves adding a new field
webmaster@1 873 * and dropping an old one which* causes any indices, primary keys and
webmaster@1 874 * sequences (from serial-type fields) that use the changed field to be dropped.
webmaster@1 875 *
webmaster@1 876 * On MySQL, all type 'serial' fields must be part of at least one key
webmaster@1 877 * or index as soon as they are created. You cannot use
webmaster@1 878 * db_add_{primary_key,unique_key,index}() for this purpose because
webmaster@1 879 * the ALTER TABLE command will fail to add the column without a key
webmaster@1 880 * or index specification. The solution is to use the optional
webmaster@1 881 * $new_keys argument to create the key or index at the same time as
webmaster@1 882 * field.
webmaster@1 883 *
webmaster@1 884 * You could use db_add_{primary_key,unique_key,index}() in all cases
webmaster@1 885 * unless you are converting a field to be type serial. You can use
webmaster@1 886 * the $new_keys argument in all cases.
webmaster@1 887 *
webmaster@1 888 * @param $ret
webmaster@1 889 * Array to which query results will be added.
webmaster@1 890 * @param $table
webmaster@1 891 * Name of the table.
webmaster@1 892 * @param $field
webmaster@1 893 * Name of the field to change.
webmaster@1 894 * @param $field_new
webmaster@1 895 * New name for the field (set to the same as $field if you don't want to change the name).
webmaster@1 896 * @param $spec
webmaster@1 897 * The field specification for the new field.
webmaster@1 898 * @param $new_keys
webmaster@1 899 * Optional keys and indexes specification to be created on the
webmaster@1 900 * table along with changing the field. The format is the same as a
webmaster@1 901 * table specification but without the 'fields' element.
webmaster@1 902 */
webmaster@1 903 function db_change_field(&$ret, $table, $field, $field_new, $spec, $new_keys = array()) {
webmaster@1 904 $ret[] = update_sql("ALTER TABLE {". $table ."} RENAME $field TO ". $field ."_old");
webmaster@1 905 $not_null = isset($spec['not null']) ? $spec['not null'] : FALSE;
webmaster@1 906 unset($spec['not null']);
webmaster@1 907
webmaster@1 908 db_add_field($ret, $table, "$field_new", $spec);
webmaster@1 909
webmaster@1 910 $ret[] = update_sql("UPDATE {". $table ."} SET $field_new = ". $field ."_old");
webmaster@1 911
webmaster@1 912 if ($not_null) {
webmaster@1 913 $ret[] = update_sql("ALTER TABLE {". $table ."} ALTER $field_new SET NOT NULL");
webmaster@1 914 }
webmaster@1 915
webmaster@1 916 db_drop_field($ret, $table, $field .'_old');
webmaster@1 917
webmaster@1 918 if (isset($new_keys)) {
webmaster@1 919 _db_create_keys($ret, $table, $new_keys);
webmaster@1 920 }
webmaster@1 921 }
webmaster@1 922
webmaster@1 923 /**
webmaster@1 924 * @} End of "ingroup schemaapi".
webmaster@1 925 */
webmaster@1 926