function devel_node_access_block in Devel 6
Same name and namespace in other branches
- 5 devel_node_access.module \devel_node_access_block()
File
- ./
devel_node_access.module, line 216 - This module gives developers feedback as to what their node_access table contains, and which nodes are protected or visible to the public.
Code
function devel_node_access_block($op = 'list', $delta = 0) {
global $user;
global $theme_key;
static $block1_visible, $hint = '';
if (!isset($block1_visible)) {
$block1_visible = db_result(db_query("SELECT status FROM {blocks} WHERE module = 'devel_node_access' AND delta = '1' AND theme = '%s'", $theme_key));
if (!$block1_visible) {
$hint = t('For per-user access permissions enable the second DNA <a href="@link">block</a>.', array(
'@link' => url('admin/build/block'),
));
}
}
switch ($op) {
case 'list':
$blocks[0]['info'] = t('Devel Node Access');
$blocks[0]['status'] = 1;
$blocks[0]['region'] = 'footer';
$blocks[1]['info'] = t('Devel Node Access by User');
$blocks[1]['status'] = 0;
$blocks[1]['region'] = 'footer';
return $blocks;
case 'view':
if (!user_access(DNA_ACCESS_VIEW)) {
return;
}
switch ($delta) {
case 0:
if (!count(dna_visible_nodes())) {
return;
}
// include rows where nid == 0
$nids = array_merge(array(
0 => 0,
), dna_visible_nodes());
$result = db_query('SELECT na.*, n.title FROM {node_access} na LEFT JOIN {node} n ON n.nid = na.nid WHERE na.nid IN (' . db_placeholders($nids) . ') ORDER BY na.nid, na.realm, na.gid', $nids);
if (!variable_get('devel_node_access_debug_mode', FALSE)) {
$headers = array(
t('node'),
t('realm'),
t('gid'),
t('view'),
t('update'),
t('delete'),
t('explained'),
);
$rows = array();
while ($row = db_fetch_object($result)) {
$explained = module_invoke_all('node_access_explain', $row);
$rows[] = array(
'<a href="#node-' . $row->nid . '">' . _devel_node_access_get_node_title($row, TRUE) . '</a>',
$row->realm,
$row->gid,
$row->grant_view,
$row->grant_update,
$row->grant_delete,
implode('<br />', $explained),
);
}
$output = theme('table', $headers, $rows, array(
'style' => 'text-align: left',
));
$hint = t('To see more details enable <a href="@debug_mode">debug mode</a>.', array(
'@debug_mode' => url('admin/settings/devel', array(
'fragment' => 'edit-devel-node-access-debug-mode',
)),
)) . ' ' . $hint;
}
else {
$tr = 't';
$variables = array(
'!na' => '{node_access}',
);
$states = array(
'default' => array(
t('default'),
'ok',
t('Default grant supplied by core in the absence of any other non-empty grants, in !na.', $variables),
),
'ok' => array(
t('ok'),
'ok',
t('Highest priority grant, in !na.', $variables),
),
'static' => array(
t('static'),
'ok',
t('Non-standard grant in !na.', $variables),
),
'unexpected' => array(
t('unexpected'),
'warning',
t('The 0/0/all/... grant applies to all nodes and all users -- usually it should not be present if any node access module is active!'),
),
'ignored' => array(
t('ignored'),
'warning',
t('Lower priority grant, not in !na and thus ignored.', $variables),
),
'empty' => array(
t('empty'),
'warning',
t('Does not grant any access, but could block lower priority grants; not in !na.', $variables),
),
'missing' => array(
t('missing'),
'error',
t("Should be in !na but isn't!", $variables),
),
'illegitimate' => array(
t('illegitimate'),
'error',
t('Should NOT be in !na because of lower priority!', $variables),
),
'alien' => array(
t('alien'),
'error',
t('Should NOT be in !na because of unknown origin!', $variables),
),
);
$active_states = array(
'default',
'ok',
'static',
'unexpected',
'illegitimate',
'alien',
);
$headers = array(
t('node'),
t('prio'),
t('status'),
t('realm'),
t('gid'),
t('view'),
t('update'),
t('delete'),
t('explained'),
);
$active_grants = array();
while ($active_grant = db_fetch_object($result)) {
$active_grants[$active_grant->nid][$active_grant->realm][$active_grant->gid] = $active_grant;
}
$all_grants = $checked_grants = $checked_status = array();
foreach ($nids as $nid) {
$acquired_grants_nid = array();
if ($node = node_load($nid)) {
// check node_access_acquire_grants()
$grants = _devel_node_access_module_invoke_all('node_access_records', $node);
if (!empty($grants)) {
$top_priority = NULL;
foreach ($grants as $grant) {
$priority = intval($grant['priority']);
$top_priority = isset($top_priority) ? max($top_priority, $priority) : $priority;
$grant['priority'] = isset($grant['priority']) ? $priority : '– ';
$acquired_grants_nid[$priority][$grant['realm']][$grant['gid']] = $grant + array(
'#title' => _devel_node_access_get_node_title($node),
'#module' => isset($grant['#module']) ? $grant['#module'] : '',
);
}
krsort($acquired_grants_nid);
}
// check node_access_grants()
$checked_status[$nid] = $node->status;
if ($node->nid) {
foreach (array(
'view',
'update',
'delete',
) as $op) {
$checked_grants[$nid][$op] = array_merge(array(
'all' => array(
0,
),
), _devel_node_access_module_invoke_all('node_grants', $user, $op));
}
}
}
// check for grants in the node_access table that aren't returned by node_access_acquire_grants()
if (isset($active_grants[$nid])) {
foreach ($active_grants[$nid] as $realm => $active_grants_realm) {
foreach ($active_grants_realm as $gid => $active_grant) {
$found = FALSE;
$count_nonempty_grants = 0;
foreach ($acquired_grants_nid as $priority => $acquired_grants_nid_priority) {
if (isset($acquired_grants_nid_priority[$realm][$gid])) {
$found = TRUE;
}
}
if ($acquired_grants_nid_priority = reset($acquired_grants_nid)) {
// highest priority only
foreach ($acquired_grants_nid_priority as $acquired_grants_nid_priority_realm) {
foreach ($acquired_grants_nid_priority_realm as $acquired_grants_nid_priority_realm_gid) {
$count_nonempty_grants += !empty($acquired_grants_nid_priority_realm_gid['grant_view']) || !empty($acquired_grants_nid_priority_realm_gid['grant_update']) || !empty($acquired_grants_nid_priority_realm_gid['grant_delete']);
}
}
}
$fixed_grant = (array) $active_grant;
if ($count_nonempty_grants == 0 && $realm == 'all' && $gid == 0) {
$fixed_grant += array(
'priority' => '–',
'state' => 'default',
);
}
elseif (!$found) {
$acknowledged = _devel_node_access_module_invoke_all('node_access_acknowledge', $fixed_grant);
if (empty($acknowledged)) {
// no one acknowledged this record, mark it as alien:
$fixed_grant += array(
'priority' => '?',
'state' => 'alien',
);
}
else {
// at least one module acknowledged the record, attribute it to the first one:
$fixed_grant += array(
'priority' => '–',
'state' => 'static',
'#module' => reset(array_keys($acknowledged)),
);
}
}
else {
continue;
}
$fixed_grant += array(
'nid' => $nid,
'#title' => _devel_node_access_get_node_title($node),
);
$all_grants[] = $fixed_grant;
}
}
}
// order grants and evaluate their status
foreach ($acquired_grants_nid as $priority => $acquired_grants_priority) {
ksort($acquired_grants_priority);
foreach ($acquired_grants_priority as $realm => $acquired_grants_realm) {
ksort($acquired_grants_realm);
foreach ($acquired_grants_realm as $gid => $acquired_grant) {
if ($priority == $top_priority) {
if (empty($acquired_grant['grant_view']) && empty($acquired_grant['grant_update']) && empty($acquired_grant['grant_delete'])) {
$acquired_grant['state'] = 'empty';
}
else {
$acquired_grant['state'] = isset($active_grants[$nid][$realm][$gid]) ? 'ok' : 'missing';
if ($acquired_grant['state'] == 'ok') {
foreach (array(
'view',
'update',
'delete',
) as $op) {
$active_grant = (array) $active_grants[$nid][$realm][$gid];
if (empty($acquired_grant["grant_{$op}"]) != empty($active_grant["grant_{$op}"])) {
$acquired_grant["grant_{$op}!"] = $active_grant["grant_{$op}"];
}
}
}
}
}
else {
$acquired_grant['state'] = isset($active_grants[$nid][$realm][$gid]) ? 'illegitimate' : 'ignored';
}
$all_grants[] = $acquired_grant + array(
'nid' => $nid,
);
}
}
}
}
// fill in the table rows
$rows = array();
$error_count = 0;
foreach ($all_grants as $grant) {
$row = new stdClass();
$row->nid = $grant['nid'];
$row->title = $grant['#title'];
$row->priority = $grant['priority'];
$row->state = array(
'data' => $states[$grant['state']][0],
'title' => $states[$grant['state']][2],
);
$row->realm = $grant['realm'];
$row->gid = $grant['gid'];
$row->grant_view = $grant['grant_view'];
$row->grant_update = $grant['grant_update'];
$row->grant_delete = $grant['grant_delete'];
$row->explained = implode('<br />', module_invoke_all('node_access_explain', $row));
unset($row->title);
// possibly needed above
if ($row->nid == 0 && $row->gid == 0 && $row->realm == 'all' && count($all_grants) > 1) {
$row->state = array(
'data' => $states['unexpected'][0],
'title' => $states['unexpected'][2],
);
$class = $states['unexpected'][1];
}
else {
$class = $states[$grant['state']][1];
}
$error_count += $class == 'error';
$row = (array) $row;
foreach (array(
'view',
'update',
'delete',
) as $op) {
$row["grant_{$op}"] = array(
'data' => $row["grant_{$op}"],
);
if ((isset($checked_grants[$grant['nid']][$op][$grant['realm']]) && in_array($grant['gid'], $checked_grants[$grant['nid']][$op][$grant['realm']]) || $row['nid'] == 0 && $row['gid'] == 0 && $row['realm'] == 'all') && !empty($row["grant_{$op}"]['data']) && in_array($grant['state'], $active_states)) {
$row["grant_{$op}"]['data'] .= '′';
$row["grant_{$op}"]['title'] = t('This entry grants access to this node to this user.');
}
if (isset($grant["grant_{$op}!"])) {
$row["grant_{$op}"]['data'] = $grant["grant_{$op}!"] . '>' . (!$row["grant_{$op}"]['data'] ? 0 : $row["grant_{$op}"]['data']);
$row["grant_{$op}"]['class'] = 'error';
}
}
$row['nid'] = '<a href="#node-' . $grant['nid'] . '">' . $row['nid'] . '</a>';
foreach (array(
'nid',
'priority',
'gid',
) as $key) {
$row[$key] = array(
'data' => $row[$key],
'style' => 'text-align: right',
);
}
$row['nid']['title'] = $grant['#title'];
$row['realm'] = (empty($grant['#module']) || strpos($grant['realm'], $grant['#module']) === 0 ? '' : $grant['#module'] . ':<br />') . $grant['realm'];
$rows[] = array(
'data' => array_values($row),
'class' => 'even ' . $class,
);
}
$output = theme('table', $headers, $rows, array(
'class' => 'system-status-report',
'style' => 'text-align: left',
));
$output .= theme('item', array(
'#value' => '',
'#description' => '(Some of the table elements provide additional information if you hover your mouse over them.)',
));
if ($error_count > 0) {
$variables['!Rebuild_permissions'] = '<a href="' . url('admin/content/node-settings/rebuild') . '">' . $tr('Rebuild permissions') . '</a>';
$output .= theme('item', array(
'#value' => '<div class="error">' . t("You have errors in your !na table! You may be able to fix these for now by running !Rebuild_permissions, but this is likely to destroy the evidence and make it impossible to identify the underlying issues. If you don't fix those, the errors will probably come back again. <br /> DON'T do this just yet if you intend to ask for help with this situation.", $variables) . '</div>',
));
}
// Explain whether access is granted or denied, and why (using code from node_access()).
$tr = 't';
array_shift($nids);
// remove the 0
$accounts = array();
if (!isset($user->name)) {
$user->name = '';
}
$variables += array(
'!username' => theme('username', $user),
'%uid' => $user->uid,
);
if (user_access('administer nodes')) {
$variables['%administer_nodes'] = $tr('administer nodes');
$output .= t('!username has the %administer_nodes permission and thus full access to all nodes.', $variables) . '<br /> ';
}
else {
$variables['!list'] = '<div style="margin-left: 2em">' . _devel_node_access_get_grant_list($nid, $checked_status, $checked_grants) . '</div>';
$variables['%access'] = 'view';
$output .= "\n<div style='text-align: left' title='" . t('These are the grants returned by hook_node_grants() for this user.') . "'>" . t('!username (user %uid) can use these grants for %access access (if they are present above): !list', $variables) . "</div>\n";
$accounts[] = $user;
}
if (arg(0) == 'node' && is_numeric(arg(1)) && !$block1_visible) {
// only for single nodes
if (user_is_logged_in()) {
$accounts[] = user_load(0);
// Anonymous, too
}
foreach ($accounts as $account) {
$variables['!username'] = theme('username', $account);
$output .= "\n<div style='text-align: left'>" . t("!username has the following access", $variables) . ' ';
$nid_items = array();
foreach ($nids as $nid) {
$op_items = array();
foreach (array(
'create',
'view',
'update',
'delete',
) as $op) {
$explain = _devel_node_access_explain_access($op, $nid, $account);
$op_items[] = "<div style='width: 5em; display: inline-block'>" . t('%op:', array(
'%op' => $op,
)) . ' </div>' . $explain[2];
}
$nid_items[] = t('to node !nid:', array(
'!nid' => l($nid, 'node/' . $nid),
)) . "\n<div style='margin-left: 2em'>" . theme('item_list', $op_items, NULL, 'ul') . '</div>';
}
if (count($nid_items) == 1) {
$output .= $nid_items[0];
}
else {
$output .= "\n<div style='margin-left: 2em'>" . theme('item_list', $nid_items, NULL, 'ul') . '</div>';
}
$output .= "\n</div>\n";
}
}
}
if (!empty($hint)) {
$output .= theme('item', array(
'#value' => '',
'#description' => '(' . $hint . ')',
));
}
$subject = t('node_access entries for nodes shown on this page');
return array(
'subject' => $subject,
'content' => $output . '<br /><br />',
);
case 1:
// show which users can access this node
if (arg(0) == 'node' && is_numeric($nid = arg(1)) && arg(2) == null && ($node = node_load($nid))) {
$headers = array(
t('username'),
'<span title="' . t("Create nodes of the '@Node_type' type.", array(
'@Node_type' => node_get_types('name', $node),
)) . '">' . t('create') . '</span>',
t('view'),
t('update'),
t('delete'),
);
$rows = array();
// Find all users. The following operations are very inefficient, so we
// limit the number of users returned. It would be better to make a
// pager query, or at least make the number of users configurable. If
// anyone is up for that please submit a patch.
$result = db_query_range('SELECT DISTINCT u.uid, u.*, (u.uid <> 0) AS authorized FROM {users} u ORDER BY authorized ASC, u.access DESC', 0, 10);
while ($data = db_fetch_object($result)) {
$account = user_load($data->uid);
$username = theme('username', $data);
if ($account->uid == $user->uid) {
$username = '<strong>' . $username . '</strong>';
}
$rows[] = array(
$username,
theme('dna_permission', _devel_node_access_explain_access('create', $nid, $account)),
theme('dna_permission', _devel_node_access_explain_access('view', $nid, $account)),
theme('dna_permission', _devel_node_access_explain_access('update', $nid, $account)),
theme('dna_permission', _devel_node_access_explain_access('delete', $nid, $account)),
);
}
if (count($rows)) {
$output = theme('table', $headers, $rows, array(
'style' => 'text-align: left',
));
$output .= theme('item', array(
'#value' => '',
'#description' => t('(This table lists the most-recently active users. Hover your mouse over each result for more details.)'),
));
return array(
'subject' => t('Access permissions by user'),
'content' => $output,
);
}
}
break;
}
break;
}
}