/[drupal]/drupal/modules/block.module
ViewVC logotype

Contents of /drupal/modules/block.module

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.206.2.2 - (show annotations) (download) (as text)
Sun Jul 2 20:53:52 2006 UTC (3 years, 4 months ago) by killes
Branch: DRUPAL-4-7
CVS Tags: DRUPAL-4-7-3
Changes since 1.206.2.1: +2 -2 lines
File MIME type: text/x-php
#71772 by Bart Jansens, fix various php warnings, backport from HEAD
1 <?php
2 // $Id: block.module,v 1.206.2.1 2006/05/21 13:49:07 killes Exp $
3
4 /**
5 * @file
6 * Controls the boxes that are displayed around the main content.
7 */
8
9 /**
10 * Implementation of hook_help().
11 */
12 function block_help($section) {
13 switch ($section) {
14 case 'admin/help#block':
15 $output = '<p>'. t('Blocks are boxes of content that may be rendered into certain regions of your web pages, for example, into sidebars. Blocks are usually generated automatically by modules (e.g., Recent Forum Topics), but administrators can also define custom blocks.') .'</p>';
16 $output .= '<p>'. t('The region each block appears in depends on both which theme you are using (some themes allow greater control over block placement than others), and on the settings in the block administration section.') .'</p>';
17 $output .= '<p>'. t('The block administration screen lets you specify the vertical placement of the blocks within a region. You do this by assigning a weight to each block. Lighter blocks (those having a smaller weight) "float up" towards the top of the region; heavier ones "sink".') .'</p>';
18 $output .= t('<p>A block\'s visibility depends on:</p>
19 <ul>
20 <li>Its enabled checkbox. Disabled blocks are never shown.</li>
21 <li>Its throttle checkbox. Throttled blocks are hidden during high server loads.</li>
22 <li>Its page visibility settings. Blocks can be configured to be visible/hidden on certain pages.</li>
23 <li>Its custom visibility settings. Blocks can be configured to be visible only when specific conditions are true.</li>
24 <li>Its user visibility settings. Administrators can choose to let users decide whether to show/hide certain blocks.</li>
25 <li>Its function. Some dynamic blocks, such as those generated by modules, will be displayed only on certain pages.</li>
26 </ul>
27 ');
28 $output .= '<h3>'. t('Module blocks') .'</h3>';
29 $output .= '<p>'. t('Some modules generate blocks that become available when the modules are enabled. These blocks can be administered via the <a href="%admin-block">blocks administration page</a>.</p>', array('%admin-block' => url('admin/block'))) .'</p>';
30 $output .= '<h3>'. t('Administrator defined blocks') .'</h3>';
31 $output .= '<p>'. t('Administrators can also define custom blocks. These blocks consist of a title, a description, and a body which can be as long as you wish. Block content can be in any of the input formats supported for other content.') .'</p>';
32 $output .= t('<p>You can</p>
33 <ul>
34 <li>enable, throttle and configure blocks at <a href="%admin-block">administer &gt;&gt; blocks</a>.</li>
35 <li>add an administrator-defined block at <a href="%admin-block-add">administer &gt;&gt; blocks &gt;&gt; add block</a>.</li>
36 </ul>
37 ', array('%admin-block' => url('admin/block'), '%admin-block-add' => url('admin/block/add')));
38 $output .= '<p>'. t('For more information please read the configuration and customization handbook <a href="%block">Block page</a>.', array('%block' => 'http://drupal.org/handbook/modules/block/')) .'</p>';
39 return $output;
40 case 'admin/modules#description':
41 return t('Controls the boxes that are displayed around the main content.');
42 case 'admin/block':
43 return t("
44 <p>Blocks are boxes of content that may be rendered into certain regions of your web pages, for example, into sidebars. They are usually generated automatically by modules, but administrators can create blocks manually.</p>
45 <p>Only enabled blocks are shown. You can position blocks by specifying which area of the page they should appear in (e.g., a sidebar). Highlighted labels on this page show the regions into which blocks can be rendered. You can specify where within a region a block will appear by adjusting its weight.</p>
46 <p>If you want certain blocks to disable themselves temporarily during high server loads, check the 'Throttle' box. You can configure the auto-throttle on the <a href=\"%throttle\">throttle configuration page</a> after having enabled the throttle module.</p>
47 <p>You can configure the behaviour of each block (for example, specifying on which pages and for what users it will appear) by clicking the 'configure' link for each block.</p>
48 ", array('%throttle' => url('admin/settings/throttle')));
49 case 'admin/block/add':
50 return t('<p>Here you can create a new block. Once you have created this block you must make it active and give it a place on the page using <a href="%overview">blocks</a>. The title is used when displaying the block. The description is used in the "block" column on the <a href="%overview">blocks</a> page.</p>', array('%overview' => url('admin/block')));
51 }
52 }
53
54 /**
55 * Implementation of hook_perm().
56 */
57 function block_perm() {
58 return array('administer blocks', 'use PHP for block visibility');
59 }
60
61 /**
62 * Implementation of hook_menu().
63 */
64 function block_menu($may_cache) {
65 $items = array();
66
67 if ($may_cache) {
68 $items[] = array('path' => 'admin/block', 'title' => t('blocks'),
69 'access' => user_access('administer blocks'),
70 'callback' => 'block_admin_display');
71 $items[] = array('path' => 'admin/block/list', 'title' => t('list'),
72 'type' => MENU_DEFAULT_LOCAL_TASK, 'weight' => -10);
73 $items[] = array('path' => 'admin/block/configure', 'title' => t('configure block'),
74 'access' => user_access('administer blocks'),
75 'callback' => 'block_admin_configure',
76 'type' => MENU_CALLBACK);
77 $items[] = array('path' => 'admin/block/delete', 'title' => t('delete block'),
78 'access' => user_access('administer blocks'),
79 'callback' => 'block_box_delete',
80 'type' => MENU_CALLBACK);
81 $items[] = array('path' => 'admin/block/add', 'title' => t('add block'),
82 'access' => user_access('administer blocks'),
83 'callback' => 'block_box_add',
84 'type' => MENU_LOCAL_TASK);
85 foreach (list_themes() as $key => $theme) {
86 if ($theme->status) {
87 if ($key == variable_get('theme_default', 'bluemarine')) {
88 $items[] = array('path' => 'admin/block/list/' . $key, 'title' => t('%key settings', array('%key' => $key)),
89 'access' => user_access('administer blocks'), 'type' => MENU_DEFAULT_LOCAL_TASK, 'weight' => -10);
90 }
91 else {
92 $items[] = array('path' => 'admin/block/list/' . $key, 'title' => t('%key settings', array('%key' => $key)),
93 'access' => user_access('administer blocks'), 'type' => MENU_LOCAL_TASK);
94 }
95 }
96 }
97 }
98
99 return $items;
100 }
101
102 /**
103 * Implementation of hook_block().
104 *
105 * Generates the administrator-defined blocks for display.
106 */
107 function block_block($op = 'list', $delta = 0, $edit = array()) {
108 switch ($op) {
109 case 'list':
110 $blocks = array();
111
112 $result = db_query('SELECT bid, title, info FROM {boxes} ORDER BY title');
113 while ($block = db_fetch_object($result)) {
114 $blocks[$block->bid]['info'] = $block->info ? check_plain($block->info) : check_plain($block->title);
115 }
116 return $blocks;
117
118 case 'configure':
119 $box = block_box_get($delta);
120 if (filter_access($box['format'])) {
121 return block_box_form($box);
122 }
123 break;
124
125 case 'save':
126 block_box_save($edit, $delta);
127 break;
128
129 case 'view':
130 $block = db_fetch_object(db_query('SELECT * FROM {boxes} WHERE bid = %d', $delta));
131 $data['subject'] = check_plain($block->title);
132 $data['content'] = check_markup($block->body, $block->format, FALSE);
133 return $data;
134 }
135 }
136
137 /**
138 * Update the 'blocks' DB table with the blocks currently exported by modules.
139 *
140 * @return
141 * Blocks currently exported by modules.
142 */
143 function _block_rehash() {
144 global $theme_key;
145
146 init_theme();
147
148 $result = db_query("SELECT * FROM {blocks} WHERE theme = '%s'", $theme_key);
149 while ($old_block = db_fetch_object($result)) {
150 $old_blocks[$old_block->module][$old_block->delta] = $old_block;
151 }
152
153 db_query("DELETE FROM {blocks} WHERE theme = '%s'", $theme_key);
154
155 foreach (module_list() as $module) {
156 $module_blocks = module_invoke($module, 'block', 'list');
157 if ($module_blocks) {
158 foreach ($module_blocks as $delta => $block) {
159 $block['module'] = $module;
160 $block['delta'] = $delta;
161 // If previously written to database, load values.
162 if ($old_blocks[$module][$delta]) {
163 $block['status'] = $old_blocks[$module][$delta]->status;
164 $block['weight'] = $old_blocks[$module][$delta]->weight;
165 $block['region'] = $old_blocks[$module][$delta]->region;
166 $block['visibility'] = $old_blocks[$module][$delta]->visibility;
167 $block['pages'] = $old_blocks[$module][$delta]->pages;
168 $block['custom'] = $old_blocks[$module][$delta]->custom;
169 $block['throttle'] = $old_blocks[$module][$delta]->throttle;
170 }
171 // Otherwise, use any set values, or else substitute defaults.
172 else {
173 $properties = array('status' => 0, 'weight' => 0, 'region' => 'left', 'pages' => '', 'custom' => 0);
174 foreach ($properties as $property => $default) {
175 if (!isset($block[$property])) {
176 $block[$property] = $default;
177 }
178 }
179 }
180
181 // Reinsert blocks into table
182 db_query("INSERT INTO {blocks} (module, delta, theme, status, weight, region, visibility, pages, custom, throttle) VALUES ('%s', '%s', '%s', %d, %d, '%s', %d, '%s', %d, %d)",
183 $block['module'], $block['delta'], $theme_key, $block['status'], $block['weight'], $block['region'], $block['visibility'], $block['pages'], $block['custom'], $block['throttle']);
184 $blocks[] = $block;
185 }
186 }
187 }
188
189 return $blocks;
190 }
191
192 /**
193 * Generate main block administration form.
194 */
195 function block_admin_display() {
196 global $theme_key, $custom_theme;
197
198 // If non-default theme configuration has been selected, set the custom theme.
199 if (arg(3)) {
200 $custom_theme = arg(3);
201 }
202 else {
203 $custom_theme = variable_get('theme_default', 'bluemarine');
204 }
205 init_theme();
206
207 // Fetch and sort blocks
208 $blocks = _block_rehash();
209 usort($blocks, '_block_compare');
210
211 $throttle = module_exist('throttle');
212 $block_regions = system_region_list($theme_key);
213
214 // Build form tree
215 $form['#action'] = arg(3) ? url('admin/block/list/' . $theme_key) : url('admin/block');
216 $form['#tree'] = TRUE;
217 foreach ($blocks as $i => $block) {
218 $form[$i]['module'] = array('#type' => 'value', '#value' => $block['module']);
219 $form[$i]['delta'] = array('#type' => 'value', '#value' => $block['delta']);
220 $form[$i]['info'] = array('#value' => $block['info']);
221 $form[$i]['status'] = array('#type' => 'checkbox', '#default_value' => $block['status']);
222 $form[$i]['theme'] = array('#type' => 'hidden', '#value' => $theme_key);
223 $form[$i]['weight'] = array('#type' => 'weight', '#default_value' => $block['weight']);
224 $form[$i]['region'] = array('#type' => 'select',
225 '#default_value' => isset($block['region']) ? $block['region'] : system_default_region($theme_key),
226 '#options' => $block_regions,
227 );
228
229 if ($throttle) {
230 $form[$i]['throttle'] = array('#type' => 'checkbox', '#default_value' => $block['throttle']);
231 }
232 $form[$i]['configure'] = array('#value' => l(t('configure'), 'admin/block/configure/'. $block['module'] .'/'. $block['delta']));
233 if ($block['module'] == 'block') {
234 $form[$i]['delete'] = array('#value' => l(t('delete'), 'admin/block/delete/'. $block['delta']));
235 }
236 }
237 $form['submit'] = array('#type' => 'submit', '#value' => t('Save blocks'));
238
239 return drupal_get_form('block_admin_display', $form);
240 }
241
242 /**
243 * Helper function for sorting blocks on admin/block.
244 *
245 * Active blocks are sorted by region, then by weight.
246 * Disabled blocks are sorted by name.
247 */
248 function _block_compare($a, $b) {
249 $status = $b['status'] - $a['status'];
250 // Separate enabled from disabled.
251 if ($status) {
252 return $status;
253 }
254 // Enabled blocks
255 if ($a['status']) {
256 $place = strcmp($a['region'], $b['region']);
257 return $place ? $place : ($a['weight'] - $b['weight']);
258 }
259 // Disabled blocks
260 else {
261 return strcmp($a['info'], $b['info']);
262 }
263 }
264
265 /**
266 * Process main block administration form submission.
267 */
268 function block_admin_display_submit($form_id, $form_values) {
269 foreach ($form_values as $block) {
270 db_query("UPDATE {blocks} SET status = %d, weight = %d, region = '%s', throttle = %d WHERE module = '%s' AND delta = '%s' AND theme = '%s'", $block['status'], $block['weight'], $block['region'], $block['throttle'], $block['module'], $block['delta'], $block['theme']);
271 }
272 drupal_set_message(t('The block settings have been updated.'));
273 cache_clear_all();
274 }
275
276 /**
277 * Theme main block administration form submission.
278 *
279 * Note: the blocks are already sorted in the right order,
280 * grouped by status, region and weight.
281 */
282 function theme_block_admin_display($form) {
283 global $theme_key;
284
285 $throttle = module_exist('throttle');
286 $block_regions = system_region_list($theme_key);
287
288 // Highlight regions on page to provide visual reference.
289 foreach ($block_regions as $key => $value) {
290 drupal_set_content($key, '<div class="block-region">' . $value . '</div>');
291 }
292
293 // Build rows
294 $rows = array();
295 $last_region = '';
296 $last_status = 1;
297 foreach (element_children($form) as $i) {
298 $block = $form[$i];
299 // Only take form elements that are blocks.
300 if (is_array($block['info'])) {
301 // Fetch values
302 $region = $block['region']['#default_value'];
303 $status = $block['status']['#default_value'];
304
305 // Output region header
306 if ($status && $region != $last_region) {
307 $region_title = t('%region', array('%region' => drupal_ucfirst($block_regions[$region])));
308 $rows[] = array(array('data' => $region_title, 'class' => 'region', 'colspan' => ($throttle ? 7 : 6)));
309 $last_region = $region;
310 }
311 // Output disabled header
312 elseif ($status != $last_status) {
313 $rows[] = array(array('data' => t('Disabled'), 'class' => 'region', 'colspan' => ($throttle ? 7 : 6)));
314 $last_status = $status;
315 }
316
317 // Generate block row
318 $row = array(
319 array('data' => form_render($block['info']), 'class' => 'block'),
320 form_render($block['status']) . form_render($block['theme']),
321 form_render($block['weight']),
322 form_render($block['region'])
323 );
324 if ($throttle) {
325 $row[] = form_render($block['throttle']);
326 }
327 $row[] = form_render($block['configure']);
328 $row[] = $block['delete'] ? form_render($block['delete']) : '';
329 $rows[] = $row;
330 }
331 }
332
333 // Finish table
334 $header = array(t('Block'), t('Enabled'), t('Weight'), t('Placement'));
335 if ($throttle) {
336 $header[] = t('Throttle');
337 }
338 $header[] = array('data' => t('Operations'), 'colspan' => 2);
339
340 $output = theme('table', $header, $rows, array('id' => 'blocks'));
341 $output .= form_render($form['submit']);
342 // Also render the form_id as there is no form_render($form) call (as form_render does not appear to handle the
343 // multi-dimensional block form array very well).
344 $output .= form_render($form['form_id']);
345
346 return $output;
347 }
348
349 function block_box_get($bid) {
350 return db_fetch_array(db_query('SELECT * FROM {boxes} WHERE bid = %d', $bid));
351 }
352
353 /**
354 * Menu callback; displays the block configuration form.
355 */
356 function block_admin_configure($module = NULL, $delta = 0) {
357
358 $form['module'] = array('#type' => 'value', '#value' => $module);
359 $form['delta'] = array('#type' => 'value', '#value' => $delta);
360
361 $edit = db_fetch_array(db_query("SELECT pages, visibility, custom FROM {blocks} WHERE module = '%s' AND delta = '%s'", $module, $delta));
362
363 // Module-specific block configurations.
364 if ($settings = module_invoke($module, 'block', 'configure', $delta)) {
365 $form['block_settings'] = array(
366 '#type' => 'fieldset',
367 '#title' => t('Block specific settings'),
368 '#collapsible' => true,
369 );
370
371 foreach ($settings as $k => $v) {
372 $form['block_settings'][$k] = $v;
373 }
374 }
375
376 // Get the block subject for the page title.
377 $info = module_invoke($module, 'block', 'list');
378 drupal_set_title(t("'%name' block", array('%name' => $info[$delta]['info'])));
379
380 // Standard block configurations.
381
382 $form['user_vis_settings'] = array(
383 '#type' => 'fieldset',
384 '#title' => t('User specific visibility settings'),
385 '#collapsible' => true,
386 );
387 $form['user_vis_settings']['custom'] = array(
388 '#type' => 'radios',
389 '#title' => t('Custom visibility settings'),
390 '#options' => array(t('Users cannot control whether or not they see this block.'), t('Show this block by default, but let individual users hide it.'), t('Hide this block by default but let individual users show it.')),
391 '#description' => t('Allow individual users to customize the visibility of this block in their account settings.'),
392 '#default_value' => $edit['custom'],
393 );
394 $form['page_vis_settings'] = array(
395 '#type' => 'fieldset',
396 '#title' => t('Page specific visibility settings'),
397 '#collapsible' => true,
398 );
399 $access = user_access('use PHP for block visibility');
400
401 if ($edit['visibility'] == 2 && !$access) {
402 $form['page_vis_settings'] = array();
403 $form['page_vis_settings']['visibility'] = array('#type' => 'value', '#value' => 2);
404 $form['page_vis_settings']['pages'] = array('#type' => 'value', '#value' => $edit['pages']);
405 }
406 else {
407 $options = array(t('Show on every page except the listed pages.'), t('Show on only the listed pages.'));
408 $description = t("Enter one page per line as Drupal paths. The '*' character is a wildcard. Example paths are '%blog' for the blog page and %blog-wildcard for every personal blog. %front is the front page.", array('%blog' => theme('placeholder', 'blog'), '%blog-wildcard' => theme('placeholder', 'blog/*'), '%front' => theme('placeholder', '<front>')));
409
410 if ($access) {
411 $options[] = t('Show if the following PHP code returns <code>TRUE</code> (PHP-mode, experts only).');
412 $description .= t('If the PHP-mode is chosen, enter PHP code between %php. Note that executing incorrect PHP-code can break your Drupal site.', array('%php' => theme('placeholder', '<?php ?>')));
413 }
414 $form['page_vis_settings']['visibility'] = array(
415 '#type' => 'radios',
416 '#title' => t('Show block on specific pages'),
417 '#options' => $options,
418 '#default_value' => $edit['visibility'],
419 );
420 $form['page_vis_settings']['pages'] = array(
421 '#type' => 'textarea',
422 '#title' => t('Pages'),
423 '#default_value' => $edit['pages'],
424 '#description' => $description,
425 );
426 }
427
428 $form['submit'] = array(
429 '#type' => 'submit',
430 '#value' => t('Save block'),
431 );
432
433 return drupal_get_form('block_admin_configure', $form);
434 }
435
436 function block_admin_configure_validate($form_id, $form_values) {
437 if ($form_values['module'] == 'block') {
438 if (empty($form_values['info']) || db_num_rows(db_query("SELECT bid FROM {boxes} WHERE bid != %d AND info = '%s'", $form_values['delta'], $form_values['info']))) {
439 form_set_error('info', t('Please ensure that each block description is unique.'));
440 }
441 }
442 }
443
444 function block_admin_configure_submit($form_id, $form_values) {
445 if (!form_get_errors()) {
446 db_query("UPDATE {blocks} SET visibility = %d, pages = '%s', custom = %d WHERE module = '%s' AND delta = '%s'", $form_values['visibility'], $form_values['pages'], $form_values['custom'], $form_values['module'], $form_values['delta']);
447 module_invoke($form_values['module'], 'block', 'save', $form_values['delta'], $form_values);
448 drupal_set_message(t('The block configuration has been saved.'));
449 cache_clear_all();
450 return 'admin/block';
451 }
452 }
453
454 /**
455 * Menu callback; displays the block creation form.
456 */
457 function block_box_add() {
458 $form = block_box_form();
459 $form['submit'] = array('#type' => 'submit', '#value' => t('Save block'));
460
461 return drupal_get_form('block_box_add', $form);
462 }
463
464 function block_box_add_validate($form_id, $form_values) {
465 if (empty($form_values['info']) || db_num_rows(db_query("SELECT info FROM {boxes} WHERE info = '%s'", $form_values['info']))) {
466 form_set_error('info', t('Please ensure that each block description is unique.'));
467 }
468 }
469
470 function block_box_add_submit($form_id, $form_values) {
471 if (!form_get_errors()) {
472 if (block_box_save($form_values)) {
473 drupal_set_message(t('The block has been created.'));
474 return 'admin/block';
475 }
476 }
477 }
478
479 /**
480 * Menu callback; confirm deletion of custom blocks.
481 */
482 function block_box_delete($bid = 0) {
483 $box = block_box_get($bid);
484 $form['info'] = array('#type' => 'hidden', '#value' => $box['info'] ? $box['info'] : $box['title']);
485 $form['bid'] = array('#type' => 'hidden', '#value' => $bid);
486
487 return confirm_form('block_box_delete_confirm', $form, t('Are you sure you want to delete the block %name?', array('%name' => theme('placeholder', $box['info']))), 'admin/block', '', t('Delete'), t('Cancel'));
488 }
489
490 /**
491 * Deletion of custom blocks.
492 */
493 function block_box_delete_confirm_submit($form_id, $form_values) {
494 db_query('DELETE FROM {boxes} WHERE bid = %d', $form_values['bid']);
495 drupal_set_message(t('The block %name has been removed.', array('%name' => theme('placeholder', $form_values['info']))));
496 cache_clear_all();
497 return 'admin/block';
498 };
499
500 function block_box_form($edit = array()) {
501 $form['info'] = array(
502 '#type' => 'textfield',
503 '#title' => t('Block description'),
504 '#default_value' => $edit['info'],
505 '#maxlength' => 64,
506 '#description' => t('A brief description of your block. Used on the <a href="%overview">block overview page</a>.', array('%overview' => url('admin/block'))),
507 '#required' => TRUE,
508 '#weight' => -19,
509 );
510 $form['title'] = array(
511 '#type' => 'textfield',
512 '#title' => t('Block title'),
513 '#default_value' => $edit['title'],
514 '#maxlength' => 64,
515 '#description' => t('The title of the block as shown to the user.'),
516 '#weight' => -18,
517 );
518 $form['body_filter']['#weight'] = -17;
519 $form['body_filter']['body'] = array(
520 '#type' => 'textarea',
521 '#title' => t('Block body'),
522 '#default_value' => $edit['body'],
523 '#rows' => 15,
524 '#description' => t('The content of the block as shown to the user.'),
525 '#weight' => -17,
526 );
527 $form['body_filter']['format'] = filter_form($edit['format'], -16);
528
529 return $form;
530 }
531
532 function block_box_save($edit, $delta = NULL) {
533 if (!filter_access($edit['format'])) {
534 $edit['format'] = FILTER_FORMAT_DEFAULT;
535 }
536
537 if (isset($delta)) {
538 db_query("UPDATE {boxes} SET title = '%s', body = '%s', info = '%s', format = %d WHERE bid = %d", $edit['title'], $edit['body'], $edit['info'], $edit['format'], $delta);
539 }
540 else {
541 db_query("INSERT INTO {boxes} (title, body, info, format) VALUES ('%s', '%s', '%s', %d)", $edit['title'], $edit['body'], $edit['info'], $edit['format']);
542 }
543 return true;
544 }
545
546 /**
547 * Implementation of hook_user().
548 *
549 * Allow users to decide which custom blocks to display when they visit
550 * the site.
551 */
552 function block_user($type, $edit, &$user, $category = NULL) {
553 switch ($type) {
554 case 'form':
555 if ($category == 'account') {
556 $result = db_query('SELECT * FROM {blocks} WHERE status = 1 AND custom != 0 ORDER BY weight, module, delta');
557 $form['block'] = array('#type' => 'fieldset', '#title' => t('Block configuration'), '#weight' => 3, '#collapsible' => TRUE, '#tree' => TRUE);
558 while ($block = db_fetch_object($result)) {
559 $data = module_invoke($block->module, 'block', 'list');
560 if ($data[$block->delta]['info']) {
561 $return = TRUE;
562 $form['block'][$block->module][$block->delta] = array('#type' => 'checkbox', '#title' => $data[$block->delta]['info'], '#default_value' => isset($user->block[$block->module][$block->delta]) ? $user->block[$block->module][$block->delta] : ($block->custom == 1));
563 }
564 }
565
566 if ($return) {
567 return $form;
568 }
569 }
570
571 break;
572 case 'validate':
573 if (!$edit['block']) {
574 $edit['block'] = array();
575 }
576 return $edit;
577 }
578 }
579
580 /**
581 * Return all blocks in the specified region for the current user.
582 *
583 * @param $region
584 * The name of a region.
585 *
586 * @return
587 * An array of block objects, indexed with <i>module</i>_<i>delta</i>.
588 * If you are displaying your blocks in one or two sidebars, you may check
589 * whether this array is empty to see how many columns are going to be
590 * displayed.
591 *
592 * @todo
593 * Add a proper primary key (bid) to the blocks table so we don't have
594 * to mess around with this <i>module</i>_<i>delta</i> construct.
595 * Currently, the blocks table has no primary key defined!
596 */
597 function block_list($region) {
598 global $user, $theme_key;
599
600 static $blocks = array();
601
602 if (!count($blocks)) {
603 $result = db_query("SELECT * FROM {blocks} WHERE theme = '%s' AND status = 1 ORDER BY region, weight, module", $theme_key);
604 while ($block = db_fetch_object($result)) {
605 if (!isset($blocks[$block->region])) {
606 $blocks[$block->region] = array();
607 }
608 // Use the user's block visibility setting, if necessary
609 if ($block->custom != 0) {
610 if ($user->uid && isset($user->block[$block->module][$block->delta])) {
611 $enabled = $user->block[$block->module][$block->delta];
612 }
613 else {
614 $enabled = ($block->custom == 1);
615 }
616 }
617 else {
618 $enabled = TRUE;
619 }
620
621 // Match path if necessary
622 if ($block->pages) {
623 if ($block->visibility < 2) {
624 $path = drupal_get_path_alias($_GET['q']);
625 $regexp = '/^('. preg_replace(array('/(\r\n?|\n)/', '/\\\\\*/', '/(^|\|)\\\\<front\\\\>($|\|)/'), array('|', '.*', '\1'. preg_quote(variable_get('site_frontpage', 'node'), '/') .'\2'), preg_quote($block->pages, '/')) .')$/';
626 $page_match = !($block->visibility xor preg_match($regexp, $path));
627 }
628 else {
629 $page_match = drupal_eval($block->pages);
630 }
631 }
632 else {
633 $page_match = TRUE;
634 }
635
636 if ($enabled && $page_match) {
637 // Check the current throttle status and see if block should be displayed
638 // based on server load.
639 if (!($block->throttle && (module_invoke('throttle', 'status') > 0))) {
640 $array = module_invoke($block->module, 'block', 'view', $block->delta);
641 if (isset($array) && is_array($array)) {
642 foreach ($array as $k => $v) {
643 $block->$k = $v;
644 }
645 }
646 }
647 if (isset($block->content) && $block->content) {
648 $blocks[$block->region]["{$block->module}_{$block->delta}"] = $block;
649 }
650 }
651 }
652 }
653 // Create an empty array if there were no entries
654 if (!isset($blocks[$region])) {
655 $blocks[$region] = array();
656 }
657 return $blocks[$region];
658 }
659
660

  ViewVC Help
Powered by ViewVC 1.1.2