block.module 32.6 KB
Newer Older
Dries's avatar
   
Dries committed
1
<?php
2
// $Id$
Dries's avatar
 
Dries committed
3

Dries's avatar
   
Dries committed
4
5
/**
 * @file
6
 * Controls the visual building blocks a page is constructed with.
Dries's avatar
   
Dries committed
7
8
 */

9
10
11
/**
 * Denotes that a block is not enabled in any region and should not be shown.
 */
12
13
define('BLOCK_REGION_NONE', -1);

Dries's avatar
   
Dries committed
14
/**
15
 * Implement hook_help().
Dries's avatar
   
Dries committed
16
 */
17
18
function block_help($path, $arg) {
  switch ($path) {
Dries's avatar
   
Dries committed
19
    case 'admin/help#block':
20
      $output = '';
21
22
      $output .= '<h3>' . t('About') . '</h3>';
      $output .= '<p>' . t('The Block module allows you to create boxes of content, which are rendered into an area, or region, of one or more pages of a website. The default theme Seven, for example, implements the regions "Content", "Help", "Dashboard main", and "Dashboard sidebar", and a block may appear in any one of these areas. The <a href="@blocks">blocks administration page</a> provides a drag-and-drop interface for assigning a block to a region, and for controlling the order of blocks within regions. For more information, see the online handbook entry for <a href="@block">Block module</a>.', array('@block' => 'http://drupal.org/handbook/modules/block/', '@blocks' => url('admin/structure/block'))) . '</p>';
23
24
25
26
27
28
29
30
31
      $output .= '<h3>' . t('Uses') . '</h3>';
      $output .= '<dl>';
      $output .= '<dt>' . t('Positioning content') . '</dt>';
      $output .= '<dd>' . t('When working with blocks, remember that all themes do <em>not</em> implement the same regions, or display regions in the same way. Blocks are positioned on a per-theme basis. Users with the <em>Administer blocks</em> permission can disable blocks. Disabled blocks are listed on the <a href="@blocks">blocks administration page</a>, but are not displayed in any region.', array('@block' => 'http://drupal.org/handbook/modules/block/', '@blocks' => url('admin/structure/block'))) . '</dd>';
      $output .= '<dt>' . t('Controlling visibility') . '</dt>';
      $output .= '<dd>' . t('Blocks can be configured to be visible only on certain pages, only to users of certain roles, or only on pages displaying certain <a href="@content-type">content types</a>. Administrators can also allow specific blocks to be enabled or disabled by users when they edit their <a href="@user">My account</a> page. Some dynamic blocks, such as those generated by modules, will be displayed only on certain pages.', array('@content-type' => url('admin/structure/types'), '@user' => url('user'))) . '</dd>';
      $output .= '<dt>' . t('Creating custom blocks') . '</dt>';
      $output .= '<dd>' . t('Users with the <em>Administer blocks</em> permission can <a href="@block-add">add custom blocks</a>, which are then listed on the <a href="@blocks">blocks administration page</a>. Once created, custom blocks behave just like default and module-generated blocks.', array('@blocks' => url('admin/structure/block'), '@block-add' => url('admin/structure/block/add'))) . '</dd>';
      $output .= '</dl>';
32
      return $output;
33
34
    case 'admin/structure/block/add':
      return '<p>' . t('Use this page to create a new custom block. New blocks are disabled by default, and must be moved to a region on the <a href="@blocks">blocks administration page</a> to be visible.', array('@blocks' => url('admin/structure/block'))) . '</p>';
Dries's avatar
   
Dries committed
35
  }
36
  if ($arg[0] == 'admin' && $arg[1] == 'structure' && $arg['2'] == 'block' && (empty($arg[3]) || $arg[3] == 'list')) {
37
38
39
40
41
42
    $demo_theme = !empty($arg[4]) ? $arg[4] : variable_get('theme_default', 'garland');
    $themes = list_themes();
    $output = '<p>' . t('This page provides a drag-and-drop interface for assigning a block to a region, and for controlling the order of blocks within regions. Since not all themes implement the same regions, or display regions in the same way, blocks are positioned on a per-theme basis. Remember that your changes will not be saved until you click the <em>Save blocks</em> button at the bottom of the page. Click the <em>configure</em> link next to each block to configure its specific title and visibility settings.') . '</p>';
    $output .= '<p>' . l(t('Demonstrate block regions (@theme)', array('@theme' => $themes[$demo_theme]->info['name'])), 'admin/structure/block/demo/' . $demo_theme) . '</p>';
    return $output;
  }
Dries's avatar
   
Dries committed
43
44
}

45
/**
46
 * Implement hook_theme().
47
48
49
 */
function block_theme() {
  return array(
50
    'block' => array(
51
      'render element' => 'elements',
52
      'template' => 'block',
53
    ),
54
55
    'block_admin_display_form' => array(
      'template' => 'block-admin-display-form',
56
      'file' => 'block.admin.inc',
57
      'render element' => 'form',
58
59
60
61
    ),
  );
}

Dries's avatar
   
Dries committed
62
/**
63
 * Implement hook_permission().
Dries's avatar
   
Dries committed
64
 */
65
function block_permission() {
66
  return array(
67
68
69
    'administer blocks' => array(
      'title' => t('Administer blocks'),
    ),
70
  );
Dries's avatar
   
Dries committed
71
72
}

Dries's avatar
   
Dries committed
73
/**
74
 * Implement hook_menu().
Dries's avatar
   
Dries committed
75
 */
76
function block_menu() {
77
  $default_theme = variable_get('theme_default', 'garland');
78
  $items['admin/structure/block'] = array(
79
80
    'title' => 'Blocks',
    'description' => 'Configure what block content appears in your site\'s sidebars and other regions.',
81
    'page callback' => 'block_admin_display',
82
    'page arguments' => array($default_theme),
83
    'access arguments' => array('administer blocks'),
84
    'file' => 'block.admin.inc',
85
  );
86
  $items['admin/structure/block/list'] = array(
87
    'title' => 'List',
88
89
90
    'type' => MENU_DEFAULT_LOCAL_TASK,
    'weight' => -10,
  );
91
  $items['admin/structure/block/manage/%/%'] = array(
92
    'title' => 'Configure block',
93
    'page callback' => 'drupal_get_form',
94
    'page arguments' => array('block_admin_configure', 4, 5),
95
    'access arguments' => array('administer blocks'),
96
    'file' => 'block.admin.inc',
97
  );
98
  $items['admin/structure/block/manage/%/%/configure'] = array(
99
100
101
102
    'title' => 'Configure block',
    'type' => MENU_DEFAULT_LOCAL_TASK,
    'context' => MENU_CONTEXT_INLINE,
  );
103
  $items['admin/structure/block/manage/%/%/delete'] = array(
104
    'title' => 'Delete block',
105
    'page callback' => 'drupal_get_form',
106
    'page arguments' => array('block_custom_block_delete', 4, 5),
107
    'access arguments' => array('administer blocks'),
108
109
    'type' => MENU_LOCAL_TASK,
    'context' => MENU_CONTEXT_NONE,
110
    'file' => 'block.admin.inc',
111
  );
112
  $items['admin/structure/block/add'] = array(
113
    'title' => 'Add block',
114
    'page callback' => 'drupal_get_form',
115
    'page arguments' => array('block_add_block_form'),
116
    'access arguments' => array('administer blocks'),
117
    'type' => MENU_LOCAL_ACTION,
118
    'file' => 'block.admin.inc',
119
120
  );
  foreach (list_themes() as $key => $theme) {
121
    $items['admin/structure/block/list/' . $key] = array(
122
123
      'title' => check_plain($theme->info['name']),
      'page arguments' => array($key),
124
125
126
127
128
129
130
131
132
133
134
      'type' => $key == $default_theme ? MENU_DEFAULT_LOCAL_TASK : MENU_LOCAL_TASK,
      'weight' => $key == $default_theme ? -10 : 0,
      'access callback' => '_block_themes_access',
      'access arguments' => array($theme),
      'file' => 'block.admin.inc',
    );
    $items['admin/structure/block/demo/' . $key] = array(
      'title' => check_plain($theme->info['name']),
      'page callback' => 'block_admin_demo',
      'page arguments' => array($key),
      'type' => MENU_CALLBACK,
135
136
      'access callback' => '_block_themes_access',
      'access arguments' => array($theme),
137
138
      'theme callback' => '_block_custom_theme',
      'theme arguments' => array($key),
139
      'file' => 'block.admin.inc',
140
    );
Dries's avatar
   
Dries committed
141
  }
Dries's avatar
   
Dries committed
142
  return $items;
Dries's avatar
   
Dries committed
143
144
}

145
/**
146
 * Menu item access callback - only admin or enabled themes can be accessed.
147
148
 */
function _block_themes_access($theme) {
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
  return user_access('administer blocks') && drupal_theme_access($theme);
}

/**
 * Theme callback for the block configuration pages.
 *
 * @param $theme
 *   The theme whose blocks are being configured. If not set, the default theme
 *   is assumed.
 * @return
 *   The theme that should be used for the block configuration page, or NULL
 *   to indicate that the default theme should be used.
 */
function _block_custom_theme($theme = NULL) {
  // We return exactly what was passed in, to guarantee that the page will
  // always be displayed using the theme whose blocks are being configured.
  return $theme;
166
167
}

Dries's avatar
   
Dries committed
168
/**
169
 * Implement hook_block_info().
Dries's avatar
   
Dries committed
170
 */
171
function block_block_info() {
172
  $blocks = array();
173

174
  $result = db_query('SELECT bid, info FROM {block_custom} ORDER BY info');
175
  foreach ($result as $block) {
176
177
    $blocks[$block->bid]['info'] = $block->info;
    // Not worth caching.
178
    $blocks[$block->bid]['cache'] = DRUPAL_NO_CACHE;
179
180
181
  }
  return $blocks;
}
182

183
/**
184
 * Implement hook_block_configure().
185
 */
186
function block_block_configure($delta = 0) {
187
  $custom_block = array('format' => filter_default_format());
188
  if ($delta) {
189
    $custom_block = block_custom_block_get($delta);
190
  }
191
  return block_custom_block_form($custom_block);
192
193
}

194
/**
195
 * Implement hook_block_save().
196
197
 */
function block_block_save($delta = 0, $edit = array()) {
198
  block_custom_block_save($edit, $delta);
199
200
201
}

/**
202
 * Implement hook_block_view().
203
204
205
206
 *
 * Generates the administrator-defined blocks for display.
 */
function block_block_view($delta = 0, $edit = array()) {
207
  $block = db_query('SELECT body, format FROM {block_custom} WHERE bid = :bid', array(':bid' => $delta))->fetchObject();
208
  $data['content'] = check_markup($block->body, $block->format, '', TRUE);
209
210
211
  return $data;
}

212
/**
213
 * Implement hook_page_build().
214
215
216
 *
 * Render blocks into their regions.
 */
217
function block_page_build(&$page) {
218
219
220
  global $theme;

  // The theme system might not yet be initialized. We need $theme.
221
  drupal_theme_initialize();
222
223

  // Populate all block regions
224
  $all_regions = system_region_list($theme);
225

226
227
228
229
230
231
232
233
234
  $item = menu_get_item();
  if ($item['path'] != 'admin/structure/block/demo/' . $theme) {
    // Load all region content assigned via blocks.
    foreach (array_keys($all_regions) as $region) {
      $page[$region] = array();
      // Assign blocks to region.
      if ($blocks = block_get_blocks_by_region($region)) {
        $page[$region] = $blocks;
      }
235
    }
236
237
238
  }
  else {
    // Append region description if we are rendering the regions demo page.
239
    $item = menu_get_item();
240
241
242
    if ($item['path'] == 'admin/structure/block/demo/' . $theme) {
      $visible_regions = array_keys(system_region_list($theme, REGIONS_VISIBLE));
      foreach ($visible_regions as $region) {
243
244
245
246
247
        $description = '<div class="block-region">' . $all_regions[$region] . '</div>';
        $page[$region]['block_description'] = array(
          '#markup' => $description,
          '#weight' => 15,
        );
248
249
250
251
252
253
254
255
256
257
258
259
260
261
      }
    }
  }
}

/**
 * Get a renderable array of a region containing all enabled blocks.
 *
 * @param $region
 *   The requested region.
 */
function block_get_blocks_by_region($region) {
  $build = array();
  if ($list = block_list($region)) {
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
    $build = _block_get_renderable_array($list);
  }
  return $build;
}

/**
 * Get an array of blocks suitable for drupal_render().
 *
 * @param $list
 *   A list of blocks such as that returned by block_list().
 * @return
 *   A renderable array.
 */
function _block_get_renderable_array($list = array()) {
  $weight = 0;
  $build = array();
  foreach ($list as $key => $block) {
    $build[$key] = $block->content;
    unset($block->content);
281
282
283

    // Add contextual links for this block; skipping the system main block.
    if ($key != 'system_main') {
284
      $build[$key]['#contextual_links']['block'] = array('admin/structure/block/manage', array($block->module, $block->delta));
285
286
    }

287
288
289
290
291
    $build[$key] += array(
      '#block' => $block,
      '#weight' => ++$weight,
    );
    $build[$key]['#theme_wrappers'][] ='block';
292
  }
293
  $build['#sorted'] = TRUE;
294
295
296
  return $build;
}

Dries's avatar
   
Dries committed
297
/**
298
 * Update the 'block' DB table with the blocks currently exported by modules.
Dries's avatar
   
Dries committed
299
 *
300
301
302
 * @param $theme
 *   The theme to rehash blocks for. If not provided, defaults to the currently
 *   used theme.
303
 *
Dries's avatar
   
Dries committed
304
 * @return
305
 *   Blocks currently exported by modules.
Dries's avatar
   
Dries committed
306
 */
307
function _block_rehash($theme = NULL) {
308
  global $theme_key;
309

310
  drupal_theme_initialize();
311

312
313
314
315
316
  if (!isset($theme)) {
    // If theme is not specifically set, rehash for the current theme.
    $theme = $theme_key;
  }

317
  $old_blocks = array();
318
  $result = db_query("SELECT * FROM {block} WHERE theme = :theme", array(':theme' => $theme));
319
320
  foreach ($result as $old_block) {
    $old_block = is_object($old_block) ? get_object_vars($old_block) : $old_block;
321
    $old_blocks[$old_block['module']][$old_block['delta']] = $old_block;
Dries's avatar
   
Dries committed
322
323
  }

324
  $blocks = array();
325
  // Valid region names for the theme.
326
  $regions = system_region_list($theme);
Dries's avatar
   
Dries committed
327

328
329
  foreach (module_implements('block_info') as $module) {
    $module_blocks = module_invoke($module, 'block_info');
Dries's avatar
   
Dries committed
330
331
    if ($module_blocks) {
      foreach ($module_blocks as $delta => $block) {
332
333
334
335
        if (empty($old_blocks[$module][$delta])) {
          // If it's a new block, add identifiers.
          $block['module'] = $module;
          $block['delta']  = $delta;
336
          $block['theme']  = $theme;
337
338
339
340
341
342
          if (!isset($block['pages'])) {
            // {block}.pages is type 'text', so it cannot have a
            // default value, and not null, so we need to provide
            // value if the module did not.
            $block['pages']  = '';
          }
343
          // Add defaults and save it into the database.
344
          drupal_write_record('block', $block);
345
346
347
          // Set region to none if not enabled.
          $block['region'] = $block['status'] ? $block['region'] : BLOCK_REGION_NONE;
          // Add to the list of blocks we return.
348
          $blocks[] = $block;
Dries's avatar
   
Dries committed
349
350
        }
        else {
351
352
353
354
355
356
          // If it's an existing block, database settings should overwrite
          // the code. But aside from 'info' everything that's definable in
          // code is stored in the database and we do not store 'info', so we
          // do not need to update the database here.
          // Add 'info' to this block.
          $old_blocks[$module][$delta]['info'] = $block['info'];
357
358
359
360
361
362
363
364
365
          // If the region name does not exist, disable the block and assign it to none.
          if (!empty($old_blocks[$module][$delta]['region']) && !isset($regions[$old_blocks[$module][$delta]['region']])) {
            drupal_set_message(t('The block %info was assigned to the invalid region %region and has been disabled.', array('%info' => $old_blocks[$module][$delta]['info'], '%region' => $old_blocks[$module][$delta]['region'])), 'warning');
            $old_blocks[$module][$delta]['status'] = 0;
            $old_blocks[$module][$delta]['region'] = BLOCK_REGION_NONE;
          }
          else {
            $old_blocks[$module][$delta]['region'] = $old_blocks[$module][$delta]['status'] ? $old_blocks[$module][$delta]['region'] : BLOCK_REGION_NONE;
          }
366
          // Add this block to the list of blocks we return.
367
368
369
          $blocks[] = $old_blocks[$module][$delta];
          // Remove this block from the list of blocks to be deleted.
          unset($old_blocks[$module][$delta]);
Dries's avatar
   
Dries committed
370
371
372
373
374
        }
      }
    }
  }

375
376
377
  // Remove blocks that are no longer defined by the code from the database.
  foreach ($old_blocks as $module => $old_module_blocks) {
    foreach ($old_module_blocks as $delta => $block) {
378
379
380
      db_delete('block')
        ->condition('module', $module)
        ->condition('delta', $delta)
381
        ->condition('theme', $theme)
382
        ->execute();
383
    }
384
  }
Dries's avatar
   
Dries committed
385
386
  return $blocks;
}
Dries's avatar
   
Dries committed
387

388
389
390
391
392
393
394
395
396
397
398
399
400
/**
 * Returns information from database about a user-created (custom) block.
 *
 * @param $bid
 *   ID of the block to get information for.
 * @return
 *   Associative array of information stored in the database for this block.
 *   Array keys:
 *   - bid: Block ID.
 *   - info: Block description.
 *   - body: Block contents.
 *   - format: Filter ID of the filter format for the body.
 */
401
402
function block_custom_block_get($bid) {
  return db_query("SELECT * FROM {block_custom} WHERE bid = :bid", array(':bid' => $bid))->fetchAssoc();
Dries's avatar
   
Dries committed
403
404
}

405
406
407
/**
 * Define the custom block form.
 */
408
function block_custom_block_form($edit = array()) {
409
410
411
412
  $edit += array(
    'info' => '',
    'body' => '',
  );
413
414
415
  $form['info'] = array(
    '#type' => 'textfield',
    '#title' => t('Block description'),
416
    '#default_value' => $edit['info'],
417
    '#maxlength' => 64,
418
    '#description' => t('A brief description of your block. Used on the <a href="@overview">blocks administration page</a>.', array('@overview' => url('admin/structure/block'))),
419
420
421
    '#required' => TRUE,
    '#weight' => -19,
  );
422
423
  $form['body_field']['#weight'] = -17;
  $form['body_field']['body'] = array(
424
425
    '#type' => 'textarea',
    '#title' => t('Block body'),
426
    '#default_value' => $edit['body'],
427
    '#text_format' => isset($edit['format']) ? $edit['format'] : filter_default_format(),
428
429
    '#rows' => 15,
    '#description' => t('The content of the block as shown to the user.'),
430
    '#required' => TRUE,
431
    '#weight' => -17,
432
    '#access' => filter_access(filter_format_load($edit['format'])),
433
  );
434

435
  return $form;
436
437
}

438
439
440
441
442
443
444
445
446
447
448
449
450
/**
 * Saves a user-created block in the database.
 *
 * @param $edit
 *   Associative array of fields to save. Array keys:
 *   - info: Block description.
 *   - body: Block contents.
 *   - format: Filter ID of the filter format for the body.
 * @param $delta
 *   Block ID of the block to save.
 * @return
 *   Always returns TRUE.
 */
451
452
function block_custom_block_save($edit, $delta) {
  db_update('block_custom')
453
454
455
456
457
458
459
    ->fields(array(
      'body' => $edit['body'],
      'info' => $edit['info'],
      'format' => $edit['body_format'],
    ))
    ->condition('bid', $delta)
    ->execute();
460
  return TRUE;
461
462
}

Dries's avatar
   
Dries committed
463
/**
464
 * Implement hook_form_FORM_ID_alter().
Dries's avatar
   
Dries committed
465
 */
466
467
468
function block_form_user_profile_form_alter(&$form, &$form_state) {
  if ($form['#user_category'] == 'account') {
    $account = $form['#user'];
469
    $rids = array_keys($account->roles);
470
    $result = db_query("SELECT DISTINCT b.* FROM {block} b LEFT JOIN {block_role} r ON b.module = r.module AND b.delta = r.delta WHERE b.status = 1 AND b.custom <> 0 AND (r.rid IN (:rids) OR r.rid IS NULL) ORDER BY b.weight, b.module", array(':rids' => $rids));
471
472

    $blocks = array();
473
    foreach ($result as $block) {
474
      $data = module_invoke($block->module, 'block_info');
475
      if ($data[$block->delta]['info']) {
476
        $blocks[$block->module][$block->delta] = array(
477
478
479
480
          '#type' => 'checkbox',
          '#title' => check_plain($data[$block->delta]['info']),
          '#default_value' => isset($account->block[$block->module][$block->delta]) ? $account->block[$block->module][$block->delta] : ($block->custom == 1),
        );
481
      }
482
    }
483
484
485
486
487
488
489
490
491
492
493
    // Only display the fieldset if there are any personalizable blocks.
    if ($blocks) {
      $form['block'] = array(
        '#type' => 'fieldset',
        '#title' => t('Personalize blocks'),
        '#description' => t('Blocks consist of content or information that complements the main content of the page. Enable or disable optional blocks using the checkboxes below.'),
        '#weight' => 3,
        '#collapsible' => TRUE,
        '#tree' => TRUE,
      );
      $form['block'] += $blocks;
494
495
496
497
    }
  }
}

498
499
500
/**
 * Initialize blocks for enabled themes.
 */
501
502
503
function block_themes_enabled($theme_list) {
  foreach ($theme_list as $theme) {
    block_theme_initialize($theme);
504
505
506
507
508
  }
}

/**
 * Assign an initial, default set of blocks for a theme.
509
 *
510
511
512
513
 * This function is called the first time a new theme is enabled. The new theme
 * gets a copy of the default theme's blocks, with the difference that if a
 * particular region isn't available in the new theme, the block is assigned
 * to the new theme's default region.
514
 *
515
516
517
 * @param $theme
 *   The name of a theme.
 */
518
function block_theme_initialize($theme) {
519
  // Initialize theme's blocks if none already registered.
520
  $has_blocks = (bool) db_query_range('SELECT 1 FROM {block} WHERE theme = :theme', 0, 1, array(':theme' => $theme))->fetchField();
521
  if (!$has_blocks) {
522
523
    $default_theme = variable_get('theme_default', 'garland');
    $regions = system_region_list($theme);
524
525
    $result = db_query("SELECT * FROM {block} WHERE theme = :theme", array(':theme' => $default_theme), array('fetch' => PDO::FETCH_ASSOC));
    foreach ($result as $block) {
526
527
528
529
      // If the region isn't supported by the theme, assign the block to the theme's default region.
      if (!array_key_exists($block['region'], $regions)) {
        $block['region'] = system_default_region($theme);
      }
530
      $block['theme'] = $theme;
531
532
      unset($block['bid']);
      drupal_write_record('block', $block);
533
534
535
536
    }
  }
}

537
538
539
540
541
542
543
544
545
546
547
548
549
/**
 * Return all blocks in the specified region for the current user.
 *
 * @param $region
 *   The name of a region.
 *
 * @return
 *   An array of block objects, indexed with <i>module</i>_<i>delta</i>.
 *   If you are displaying your blocks in one or two sidebars, you may check
 *   whether this array is empty to see how many columns are going to be
 *   displayed.
 *
 * @todo
550
551
 *   Now that the blocks table has a primary key, we should use that as the
 *   array key instead of <i>module</i>_<i>delta</i>.
552
553
 */
function block_list($region) {
554
  $blocks = &drupal_static(__FUNCTION__);
555

556
  if (!isset($blocks)) {
557
558
559
    $blocks = _block_load_blocks();
  }

560
  // Create an empty array if there are no entries.
561
562
563
  if (!isset($blocks[$region])) {
    $blocks[$region] = array();
  }
564
565
566
  else {
    $blocks[$region] = _block_render_blocks($blocks[$region]);
  }
567
568
569
570

  return $blocks[$region];
}

571
572
573
574
575
576
/**
 * Load a block object from the database.
 *
 * @param $module
 *   Name of the module that implements the block to load.
 * @param $delta
577
578
 *   Unique ID of the block within the context of $module. Pass NULL to return
 *   an empty $block object for $module.
579
580
581
582
583
 *
 * @return
 *   A block object.
 */
function block_load($module, $delta) {
584
585
586
  if (isset($delta)) {
    $block = db_query('SELECT * FROM {block} WHERE module = :module AND delta = :delta', array(':module' => $module, ':delta' => $delta))->fetchObject();
  }
587
588
589

  // If the block does not exist in the database yet return a stub block
  // object.
590
  if (empty($block)) {
591
592
593
594
595
596
597
598
    $block = new stdClass;
    $block->module = $module;
    $block->delta = $delta;
  }

  return $block;
}

599
/**
600
 * Load blocks information from the database.
601
602
 */
function _block_load_blocks() {
603
  global $theme_key;
604

605
606
607
608
609
610
611
612
613
  $query = db_select('block', 'b');
  $result = $query
    ->fields('b')
    ->condition('b.theme', $theme_key)
    ->condition('b.status', 1)
    ->orderBy('b.region')
    ->orderBy('b.weight')
    ->orderBy('b.module')
    ->addTag('block_load')
614
    ->addTag('translatable')
615
    ->execute();
616

617
  $block_info = $result->fetchAllAssoc('bid');
618
  // Allow modules to modify the block list.
619
  drupal_alter('block_info', $block_info);
620
621

  $blocks = array();
622
  foreach ($block_info as $block) {
623
624
625
626
627
628
    $blocks[$block->region]["{$block->module}_{$block->delta}"] = $block;
  }
  return $blocks;
}

/**
629
 * Implement hook_block_info_alter().
630
 *
631
632
 * Check the page, user role, content type and user specific visibilty settings.
 * Remove the block if the visibility conditions are not met.
633
 */
634
function block_block_info_alter(&$blocks) {
635
636
637
638
639
640
641
642
643
  global $user, $theme_key;

  // Build an array of roles for each block.
  $block_roles = array();
  $result = db_query('SELECT module, delta, rid FROM {block_role}');
  foreach ($result as $record) {
    $block_roles[$record->module][$record->delta][] = $record->rid;
  }

644
645
646
647
648
649
650
  // Build an array of node types for each block.
  $block_node_types = array();
  $result = db_query('SELECT module, delta, type FROM {block_node_type}');
  foreach ($result as $record) {
    $block_node_types[$record->module][$record->delta][] = $record->type;
  }

651
652
653
654
  foreach ($blocks as $key => $block) {
    if ($block->theme != $theme_key || $block->status != 1) {
      // This block was added by a contrib module, leave it in the list.
      continue;
655
    }
656
657
658
659

    // If a block has no roles associated, it is displayed for every role.
    // For blocks with roles associated, if none of the user's roles matches
    // the settings from this block, remove it from the block list.
660
    if (isset($block_roles[$block->module][$block->delta]) && !array_intersect($block_roles[$block->module][$block->delta], array_keys($user->roles))) {
661
662
663
      // No match.
      unset($blocks[$key]);
      continue;
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
    }

    // If a block has no node types associated, it is displayed for every type.
    // For blocks with node types associated, if the node type does not match
    // the settings from this block, remove it from the block list.
    if (isset($block_node_types[$block->module][$block->delta])) {
      $node = menu_get_object();
      if (!empty($node)) {
        // This is a node or node edit page.
        if (!in_array($node->type, $block_node_types[$block->module][$block->delta])) {
          // This block should not be displayed for this node type.
          unset($blocks[$key]);
          continue;
        }
      }
      elseif (arg(0) == 'node' && arg(1) == 'add' && in_array(arg(2), array_keys(node_type_get_types()))) {
        // This is a node creation page
        if (!in_array(arg(2), $block_node_types[$block->module][$block->delta])) {
          // This block should not be displayed for this node type.
          unset($blocks[$key]);
          continue;
        }
      }
      else {
        // This is not a node page, remove the block.
        unset($blocks[$key]);
        continue;
      }
    }
693

694
    // Use the user's block visibility setting, if necessary.
695
696
697
    if ($block->custom != 0) {
      if ($user->uid && isset($user->block[$block->module][$block->delta])) {
        $enabled = $user->block[$block->module][$block->delta];
698
699
      }
      else {
700
        $enabled = ($block->custom == 1);
701
      }
702
703
704
705
    }
    else {
      $enabled = TRUE;
    }
706
707
708
709
    if (!$enabled) {
      unset($blocks[$key]);
      continue;
    }
710

711
    // Match path if necessary.
712
713
714
715
716
717
718
    if ($block->pages) {
      if ($block->visibility < 2) {
        $path = drupal_get_path_alias($_GET['q']);
        // Compare with the internal and path alias (if any).
        $page_match = drupal_match_path($path, $block->pages);
        if ($path != $_GET['q']) {
          $page_match = $page_match || drupal_match_path($_GET['q'], $block->pages);
719
        }
720
721
722
723
        // When $block->visibility has a value of 0, the block is displayed on
        // all pages except those listed in $block->pages. When set to 1, it
        // is displayed only on those pages listed in $block->pages.
        $page_match = !($block->visibility xor $page_match);
724
      }
725
726
727
      elseif (module_exists('php')) {
        $page_match = php_eval($block->pages);
      }
728
      else {
729
        $page_match = FALSE;
730
      }
731
732
733
734
    }
    else {
      $page_match = TRUE;
    }
735
736
737
    if (!$page_match) {
      unset($blocks[$key]);
    }
738
739
  }
}
740

741
742
743
744
/**
 * Render the content and subject for a set of blocks.
 *
 * @param $region_blocks
745
 *   An array of block objects such as returned for one region by _block_load_blocks().
746
747
 *
 * @return
748
 *   An array of visible blocks as expected by drupal_render().
749
750
751
752
753
 */
function _block_render_blocks($region_blocks) {
  foreach ($region_blocks as $key => $block) {
    // Render the block content if it has not been created already.
    if (!isset($block->content)) {
754
755
      // Erase the block from the static array - we'll put it back if it has
      // content.
756
      unset($region_blocks[$key]);
757
758
759
760
761
762
763
764
765
      // Try fetching the block from cache. Block caching is not compatible
      // with node_access modules. We also preserve the submission of forms in
      // blocks, by fetching from cache only if the request method is 'GET'
      // (or 'HEAD').
      if (!count(module_implements('node_grants')) && ($_SERVER['REQUEST_METHOD'] == 'GET' || $_SERVER['REQUEST_METHOD'] == 'HEAD') && ($cid = _block_get_cache_id($block)) && ($cache = cache_get($cid, 'cache_block'))) {
        $array = $cache->data;
      }
      else {
        $array = module_invoke($block->module, 'block_view', $block->delta);
766
767
768
769
770
771

        // Allow modules to modify the block before it is viewed, via either
        // hook_block_view_MODULE_DELTA_alter() or hook_block_view_alter().
        drupal_alter("block_view_{$block->module}_{$block->delta}", $array, $block);
        drupal_alter('block_view', $array, $block);

772
773
        if (isset($cid)) {
          cache_set($cid, $array, 'cache_block', CACHE_TEMPORARY);
774
        }
775
      }
776

777
778
779
      if (isset($array) && is_array($array)) {
        foreach ($array as $k => $v) {
          $block->$k = $v;
Dries's avatar
   
Dries committed
780
        }
781
782
      }
      if (isset($block->content) && $block->content) {
783
        // Normalize to the drupal_render() structure.
784
785
786
        if (is_string($block->content)) {
          $block->content = array('#markup' => $block->content);
        }
787
788
789
790
791
792
793
794
        // Override default block title if a custom display title is present.
        if ($block->title) {
          // Check plain here to allow module generated titles to keep any
          // markup.
          $block->subject = $block->title == '<none>' ? '' : check_plain($block->title);
        }
        if (!isset($block->subject)) {
          $block->subject = '';
795
        }
796
        $region_blocks["{$block->module}_{$block->delta}"] = $block;
797
798
799
      }
    }
  }
800
  return $region_blocks;
801
}
802
803
804
805
806
807
808
809
810
811

/**
 * Assemble the cache_id to use for a given block.
 *
 * The cache_id string reflects the viewing context for the current block
 * instance, obtained by concatenating the relevant context information
 * (user, page, ...) according to the block's cache settings (BLOCK_CACHE_*
 * constants). Two block instances can use the same cached content when
 * they share the same cache_id.
 *
812
 * Theme and language contexts are automatically differentiated.
813
814
815
816
817
818
 *
 * @param $block
 * @return
 *   The string used as cache_id for the block.
 */
function _block_get_cache_id($block) {
819
  global $user;
820

821
822
823
824
  // User 1 being out of the regular 'roles define permissions' schema,
  // it brings too many chances of having unwanted output get in the cache
  // and later be served to other users. We therefore exclude user 1 from
  // block caching.
825
  if (variable_get('block_cache', 0) && !in_array($block->cache, array(DRUPAL_NO_CACHE, DRUPAL_CACHE_CUSTOM)) && $user->uid != 1) {
826
827
828
    // Start with common sub-patterns: block identification, theme, language.
    $cid_parts[] = $block->module;
    $cid_parts[] = $block->delta;
829
    $cid_parts += drupal_render_cid_parts($block->cache);
830
831
832

    return implode(':', $cid_parts);
  }
833
}
834
835

/**
836
 * Implement hook_flush_caches().
837
838
839
840
 */
function block_flush_caches() {
  return array('cache_block');
}
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859

/**
 * Process variables for block.tpl.php
 *
 * Prepare the values passed to the theme_block function to be passed
 * into a pluggable template engine. Uses block properties to generate a
 * series of template file suggestions. If none are found, the default
 * block.tpl.php is used.
 *
 * Most themes utilize their own copy of block.tpl.php. The default is located
 * inside "modules/block/block.tpl.php". Look in there for the full list of
 * variables.
 *
 * The $variables array contains the following arguments:
 * - $block
 *
 * @see block.tpl.php
 */
function template_preprocess_block(&$variables) {
860
  $block_counter = &drupal_static(__FUNCTION__, array());
861
  $variables['block'] = $variables['elements']['#block'];
862
863
864
865
866
867
868
869
  // All blocks get an independent counter for each region.
  if (!isset($block_counter[$variables['block']->region])) {
    $block_counter[$variables['block']->region] = 1;
  }
  // Same with zebra striping.
  $variables['block_zebra'] = ($block_counter[$variables['block']->region] % 2) ? 'odd' : 'even';
  $variables['block_id'] = $block_counter[$variables['block']->region]++;

870
871
  // Create the $content variable that templates expect.
  $variables['content'] = $variables['elements']['#children'];
872

873
  $variables['classes_array'][] = drupal_html_class('block-' . $variables['block']->module);
874

875
876
877
  $variables['template_files'][] = 'block-' . $variables['block']->region;
  $variables['template_files'][] = 'block-' . $variables['block']->module;
  $variables['template_files'][] = 'block-' . $variables['block']->module . '-' . $variables['block']->delta;
878
}
879

880
881
882
/**
 * Implement hook_user_role_delete().
 *
883
 * Remove deleted role from blocks that use it.
884
885
886
887
888
889
890
 */
function block_user_role_delete($role) {
  db_delete('block_role')
    ->condition('rid', $role->rid)
    ->execute();
}

891
892
893
/**
 * Implement hook_filter_format_delete().
 */
894
function block_filter_format_delete($format, $fallback) {
895
  db_update('block_custom')
896
    ->fields(array('format' => $fallback->format))
897
898
899
900
    ->condition('format', $format->format)
    ->execute();
}

901
902
903
904
905
906
907
908
909
910
911
912
913
914
/**
 * Implement hook_menu_delete().
 */
function block_menu_delete($menu) {
  db_delete('block')
    ->condition('module', 'menu')
    ->condition('delta', $menu['menu_name'])
    ->execute();
  db_delete('block_role')
    ->condition('module', 'menu')
    ->condition('delta', $menu['menu_name'])
    ->execute();
}

915
916
917
918
919
920
921
922
923
924
925
926
927
928
/**
 * Implement hook_form_FORM_ID_alter().
 */
function block_form_system_performance_settings_alter(&$form, &$form_state) {
  $disabled = count(module_implements('node_grants'));
  $form['caching']['block_cache'] = array(
    '#type' => 'checkbox',
    '#title' => t('Cache blocks'),
    '#default_value' => variable_get('block_cache', FALSE),
    '#disabled' => $disabled,
    '#description' => $disabled ? t('Block caching is inactive because you have enabled modules defining content access restrictions.') : NULL,
    '#weight' => -1,
  );
}