View source
<?php
$_print_urls = PRINT_URLS_DEFAULT;
function print_controller_html() {
$args = func_get_args();
$path = filter_xss(implode('/', $args));
$cid = isset($_GET['comment']) ? (int) $_GET['comment'] : NULL;
$query = $_GET;
unset($query['q']);
$print = print_controller($path, $query, $cid, PRINT_HTML_FORMAT);
if ($print !== FALSE) {
$node = $print['node'];
$html = theme('print', array(
'print' => $print,
'type' => PRINT_HTML_FORMAT,
'node' => $node,
));
drupal_add_http_header('Content-Type', 'text/html; charset=utf-8');
drupal_send_headers();
print $html;
$nodepath = isset($node->path) && is_string($node->path) ? drupal_get_normal_path($node->path) : 'node/' . $path;
db_merge('print_page_counter')
->key(array(
'path' => $nodepath,
))
->fields(array(
'totalcount' => 1,
'timestamp' => REQUEST_TIME,
))
->expression('totalcount', 'totalcount + 1')
->execute();
}
}
function print_controller($path, $query = NULL, $cid = NULL, $format = PRINT_HTML_FORMAT, $teaser = FALSE, $message = NULL) {
if (empty($path)) {
global $base_url;
$ref = $_SERVER['HTTP_REFERER'];
$path = preg_replace("!^{$base_url}/!", '', $ref);
if ($path === $ref || empty($path)) {
$path = variable_get('site_frontpage', 'node');
}
}
if ($alias = drupal_lookup_path('source', $path)) {
$path = $alias;
}
$parts = explode('/', $path);
if ($parts[0] == 'node' && count($parts) > 1 && ctype_digit($parts[1])) {
array_shift($parts);
$path = implode('/', $parts);
}
if (ctype_digit($parts[0]) && count($parts) == 1) {
$print = _print_generate_node($path, $query, $cid, $format, $teaser, $message);
}
else {
$ret = preg_match('!^book/export/html/(.*)!i', $path, $matches);
if ($ret == 1) {
$print = _print_generate_book($matches[1], $query, $format, $teaser, $message);
}
else {
$print = _print_generate_path($path, $query, $format, $teaser, $message);
}
}
return $print;
}
function _print_robots_meta_generator() {
$print_robots_noindex = variable_get('print_robots_noindex', PRINT_ROBOTS_NOINDEX_DEFAULT);
$print_robots_nofollow = variable_get('print_robots_nofollow', PRINT_ROBOTS_NOFOLLOW_DEFAULT);
$print_robots_noarchive = variable_get('print_robots_noarchive', PRINT_ROBOTS_NOARCHIVE_DEFAULT);
$robots_meta = array();
if (!empty($print_robots_noindex)) {
$robots_meta[] = 'noindex';
}
if (!empty($print_robots_nofollow)) {
$robots_meta[] = 'nofollow';
}
if (!empty($print_robots_noarchive)) {
$robots_meta[] = 'noarchive';
}
if (count($robots_meta) > 0) {
$robots_meta = implode(', ', $robots_meta);
$robots_meta = "<meta name='robots' content='{$robots_meta}' />\n";
}
else {
$robots_meta = '';
}
return $robots_meta;
}
function _print_var_generator($node, $query = NULL, $message = NULL, $cid = NULL) {
global $base_url, $language, $_print_urls;
$path = empty($node->nid) ? $node->path : "node/{$node->nid}";
$print_css = variable_get('print_css', PRINT_CSS_DEFAULT);
$print_keep_theme_css = variable_get('print_keep_theme_css', PRINT_KEEP_THEME_CSS_DEFAULT);
$print_logo_options = variable_get('print_logo_options', PRINT_LOGO_OPTIONS_DEFAULT);
$print_logo_url = variable_get('print_logo_url', PRINT_LOGO_URL_DEFAULT);
$print_html_new_window = variable_get('print_html_new_window', PRINT_HTML_NEW_WINDOW_DEFAULT);
$print_html_sendtoprinter = variable_get('print_html_sendtoprinter', PRINT_HTML_SENDTOPRINTER_DEFAULT);
$print_html_windowclose = variable_get('print_html_windowclose', PRINT_HTML_WINDOWCLOSE_DEFAULT);
$print_sourceurl_enabled = variable_get('print_sourceurl_enabled', PRINT_SOURCEURL_ENABLED_DEFAULT);
$print_sourceurl_forcenode = variable_get('print_sourceurl_forcenode', PRINT_SOURCEURL_FORCENODE_DEFAULT);
$print_sourceurl_date = variable_get('print_sourceurl_date', PRINT_SOURCEURL_DATE_DEFAULT);
$print_footer_options = variable_get('print_footer_options', PRINT_FOOTER_OPTIONS_DEFAULT);
$print_footer_user = variable_get('print_footer_user', PRINT_FOOTER_USER_DEFAULT);
$print['language'] = $language->language;
$print['title'] = check_plain($node->title);
$print['head'] = drupal_get_html_head();
if ($print_html_sendtoprinter) {
drupal_add_js('misc/drupal.js', array(
'weight' => JS_LIBRARY,
));
}
$print['scripts'] = drupal_get_js();
$print['footer_scripts'] = drupal_get_js('footer');
$print['robots_meta'] = _print_robots_meta_generator();
$print['url'] = url($path, array(
'absolute' => TRUE,
'query' => $query,
));
$print['base_href'] = "<base href='" . $print['url'] . "' />\n";
$print['favicon'] = theme_get_setting('toggle_favicon') ? "<link rel='shortcut icon' href='" . theme_get_setting('favicon') . "' type='image/x-icon' />\n" : '';
if (!empty($print_css)) {
drupal_add_css(strtr($print_css, array(
'%t' => drupal_get_path('theme', variable_get('theme_default')),
)));
}
else {
drupal_add_css(drupal_get_path('module', 'print') . '/css/print.css');
}
$drupal_css = drupal_add_css();
if (!$print_keep_theme_css) {
foreach ($drupal_css as $key => $css_file) {
if ($css_file['group'] == CSS_THEME) {
unset($drupal_css[$key]);
}
}
}
if (!empty($message)) {
$style = '';
$css_files = array_keys($drupal_css);
foreach ($css_files as $filename) {
$res = file_exists($filename) ? file_get_contents($filename, TRUE) : FALSE;
if ($res != FALSE) {
$style .= $res;
}
}
$print['css'] = "<style type='text/css' media='all'>{$style}</style>\n";
}
else {
$print['css'] = drupal_get_css($drupal_css);
}
$window_close = $print_html_new_window && $print_html_windowclose ? 'setTimeout(function(){window.close();},1);' : '';
$print['sendtoprinter'] = $print_html_sendtoprinter ? '<script type="text/javascript">(function ($) { Drupal.behaviors.print = {attach: function(context) {$(window).load(function() {window.print();' . $window_close . '})}}})(jQuery);</script>' : '';
switch ($print_logo_options) {
case 0:
$logo_url = 0;
break;
case 1:
$logo_url = theme_get_setting('logo');
break;
case 2:
$logo_url = strip_tags($print_logo_url);
break;
}
$logo_url = preg_replace('!^' . base_path() . '!', '', $logo_url);
$site_name = variable_get('site_name', 'Drupal');
$print['logo'] = $logo_url ? theme('image', array(
'path' => $logo_url,
'alt' => $site_name,
'attributes' => array(
'class' => array(
'print-logo',
),
'id' => 'logo',
),
)) : '';
switch ($print_footer_options) {
case 0:
$footer = '';
break;
case 1:
$footer_blocks = block_get_blocks_by_region('footer');
$footer = variable_get('site_footer', FALSE) . "\n" . drupal_render($footer_blocks);
break;
case 2:
$footer = $print_footer_user;
break;
}
$footer = preg_replace('!\\s*<div class="contextual-links-wrapper">.*?</div>!sim', '', $footer);
$print['footer_message'] = filter_xss_admin($footer);
$published_site = variable_get('site_name', 0);
if ($published_site) {
$print_text_published = filter_xss(variable_get('print_text_published', t('Published on %site_name')));
$published = t($print_text_published, array(
'%site_name' => $published_site,
));
$print['site_name'] = $published . ' (' . l($base_url, $base_url) . ')';
}
else {
$print['site_name'] = '';
}
if ($print_sourceurl_enabled == 1) {
if (empty($print_sourceurl_forcenode)) {
$url = $print['url'];
}
else {
$url = $base_url . '/' . ((bool) variable_get('clean_url', '0') ? '' : '?q=') . $path;
}
if (is_int($cid)) {
$url .= "#comment-{$cid}";
}
$retrieved_date = format_date(REQUEST_TIME, 'short');
$print_text_retrieved = filter_xss(variable_get('print_text_retrieved', t('retrieved on %date')));
$retrieved = t($print_text_retrieved, array(
'%date' => $retrieved_date,
));
$print['printdate'] = $print_sourceurl_date ? " ({$retrieved})" : '';
$source_url = filter_xss(variable_get('print_text_source_url', t('Source URL')));
$print['source_url'] = '<strong>' . $source_url . $print['printdate'] . ':</strong> ' . l($url, $url);
}
else {
$print['source_url'] = '';
}
$print['type'] = isset($node->type) ? $node->type : '';
menu_set_active_item($path);
$breadcrumb = drupal_get_breadcrumb();
if (!empty($breadcrumb)) {
$breadcrumb[] = menu_get_active_title();
$print['breadcrumb'] = filter_xss(implode(' > ', $breadcrumb));
}
else {
$print['breadcrumb'] = '';
}
$print['pfp_links'] = '';
if (!empty($_print_urls)) {
$urls = _print_friendly_urls();
$max = count($urls);
$pfp_links = '';
if ($max) {
for ($i = 0; $i < $max; $i++) {
$pfp_links .= '[' . ($i + 1) . '] ' . check_plain($urls[$i]) . "<br />\n";
}
$links = filter_xss(variable_get('print_text_links', t('Links')));
$print['pfp_links'] = "<p><strong>{$links}:</strong><br />{$pfp_links}</p>";
}
}
$print['node'] = $node;
$print['message'] = $message;
return $print;
}
function _print_rewrite_urls($matches) {
global $base_url, $base_root, $_print_urls;
$include_anchors = variable_get('print_urls_anchors', PRINT_URLS_ANCHORS_DEFAULT);
$pattern = '!\\s*(\\w+\\s*=\\s*"(?:\\\\"|[^"])*")\\s*|\\s*(\\w+\\s*=\\s*\'(?:\\\\\'|[^\'])*\')\\s*|\\s*(\\w+\\s*=\\s*\\w+)\\s*|\\s+!';
$attribs = preg_split($pattern, $matches[1], -1, PREG_SPLIT_NO_EMPTY | PREG_SPLIT_DELIM_CAPTURE);
foreach ($attribs as $key => $value) {
$attribs[$key] = preg_replace('!(\\w)\\s*=\\s*(.*)!', '$1=$2', $value);
}
$size = count($attribs);
for ($i = 1; $i < $size; $i++) {
if (preg_match('!^(?:href|src)\\s*?=(.*)!i', $attribs[$i], $urls) > 0) {
$url = trim($urls[1], " \t\n\r\0\v\"'");
if (empty($url)) {
$path = explode('/', $_GET['q']);
unset($path[0]);
$path = implode('/', $path);
if (ctype_digit($path)) {
$path = "node/{$path}";
}
$newurl = url($path, array(
'fragment' => drupal_substr($url, 1),
'absolute' => TRUE,
));
}
elseif (strpos(html_entity_decode($url), '://') || preg_match('!^mailto:.*?@.*?\\..*?$!iu', html_entity_decode($url))) {
$newurl = $url;
}
elseif (strpos(html_entity_decode($url), '//') === 0) {
$newurl = (empty($_SERVER['HTTPS']) ? 'http' : 'https') . ":" . $url;
$matches[1] = str_replace($url, $newurl, $matches[1]);
}
else {
if ($url[0] == '#') {
if ($include_anchors && !empty($_print_urls)) {
$path = explode('/', $_GET['q']);
unset($path[0]);
$path = implode('/', $path);
if (ctype_digit($path)) {
$path = "node/{$path}";
}
$newurl = url($path, array(
'fragment' => drupal_substr($url, 1),
'absolute' => TRUE,
));
}
$matches[1] = str_replace($url, check_plain(base_path() . $_GET['q'] . $url), $matches[1]);
}
else {
if ($url[0] == '/') {
$newurl = $base_root . '/' . trim($url, '/');
}
elseif (preg_match('!^(?:index.php)?\\?q=!i', $url)) {
$newurl = $base_url . '/' . trim($url, '/');
}
else {
$newurl = url(trim($url, '/'), array(
'absolute' => TRUE,
));
}
$matches[1] = str_replace($url, $newurl, $matches[1]);
}
}
}
}
$ret = '<' . $matches[1] . '>';
if (count($matches) == 4) {
$ret .= $matches[2] . $matches[3];
if (!empty($_print_urls) && isset($newurl)) {
$ret .= ' <span class="print-footnote">[' . _print_friendly_urls(trim($newurl)) . ']</span>';
}
}
return filter_xss_admin($ret);
}
function _print_friendly_urls($url = 0) {
static $urls = array();
if ($url !== 0) {
$url_idx = array_search($url, $urls);
if ($url_idx !== FALSE) {
return $url_idx + 1;
}
else {
$urls[] = $url;
return count($urls);
}
}
$ret = $urls;
$urls = array();
return $ret;
}
function _print_url_list_enabled($node, $format = PRINT_HTML_FORMAT) {
if (!isset($node->type)) {
switch ($format) {
case PRINT_HTML_FORMAT:
$node_urllist = variable_get('print_display_sys_urllist', PRINT_TYPE_SYS_URLLIST_DEFAULT);
break;
case PRINT_MAIL_FORMAT:
$node_urllist = variable_get('print_mail_display_sys_urllist', PRINT_TYPE_SYS_URLLIST_DEFAULT);
break;
case PRINT_PDF_FORMAT:
$node_urllist = variable_get('print_pdf_display_sys_urllist', PRINT_TYPE_SYS_URLLIST_DEFAULT);
break;
default:
$node_urllist = PRINT_TYPE_SYS_URLLIST_DEFAULT;
}
}
else {
switch ($format) {
case PRINT_HTML_FORMAT:
$node_urllist = isset($node->print_display_urllist) ? $node->print_display_urllist : variable_get('print_display_urllist_' . $node->type, PRINT_TYPE_URLLIST_DEFAULT);
break;
case PRINT_MAIL_FORMAT:
$node_urllist = isset($node->print_mail_display_urllist) ? $node->print_mail_display_urllist : variable_get('print_mail_display_urllist_' . $node->type, PRINT_TYPE_URLLIST_DEFAULT);
break;
case PRINT_PDF_FORMAT:
$node_urllist = isset($node->print_pdf_display_urllist) ? $node->print_pdf_display_urllist : variable_get('print_pdf_display_urllist_' . $node->type, PRINT_TYPE_URLLIST_DEFAULT);
break;
default:
$node_urllist = PRINT_TYPE_URLLIST_DEFAULT;
}
}
return variable_get('print_urls', PRINT_URLS_DEFAULT) && $node_urllist;
}
function _print_generate_node($nid, $query = NULL, $cid = NULL, $format = PRINT_HTML_FORMAT, $teaser = FALSE, $message = NULL) {
global $_print_urls;
if (!isset($langcode)) {
$langcode = $GLOBALS['language_content']->language;
}
$node = node_load($nid);
if (!$node) {
drupal_not_found();
return FALSE;
}
elseif (!node_access('view', $node)) {
drupal_access_denied();
return FALSE;
}
drupal_set_title($node->title);
$view_mode = $teaser ? 'teaser' : 'print';
unset($node->pages);
unset($node->page_count);
if (function_exists('og_set_group_context') && isset($node->og_groups)) {
og_set_group_context($node->og_groups);
}
if ($cid === NULL) {
node_build_content($node, $view_mode);
unset($node->content['links']);
unset($node->content['fivestar_widget']);
unset($node->content['service_links']);
$build = $node->content;
unset($node->content);
}
$print_comments = variable_get('print_comments', PRINT_COMMENTS_DEFAULT);
if (function_exists('comment_node_page_additions') && ($cid != NULL || $print_comments)) {
$comments = comment_node_page_additions($node);
if (!empty($comments)) {
unset($comments['comment_form']);
foreach ($comments['comments'] as $key => &$comment) {
if (is_numeric($key)) {
if ($cid != NULL && $key != $cid) {
unset($comments['comments'][$key]);
}
else {
unset($comment['links']);
}
}
}
$build['comments'] = $comments;
}
}
$build += array(
'#theme' => 'node',
'#node' => $node,
'#view_mode' => $view_mode,
'#language' => $langcode,
'#print_format' => $format,
);
$type = 'node';
drupal_alter(array(
'node_view',
'entity_view',
), $build, $type);
$content = render($build);
$parts = explode('<div class="content', $content, 2);
if (count($parts) == 2) {
$pattern = '!(.*?)<a [^>]*?>(.*?)</a>(.*?)!mis';
$parts[0] = preg_replace($pattern, '$1$2$3', $parts[0]);
$content = implode('<div class="content', $parts);
}
$_print_urls = _print_url_list_enabled($node, $format);
$pattern = '!<(a\\s[^>]*?)>(.*?)(</a>)!is';
$content = preg_replace_callback($pattern, '_print_rewrite_urls', $content);
$print = _print_var_generator($node, $query, $message, $cid);
$print['content'] = $content;
return $print;
}
function _print_generate_path($path, $query = NULL, $format = PRINT_HTML_FORMAT, $teaser = FALSE, $message = NULL) {
global $_print_urls;
$parts = explode('/', $path);
if (ctype_digit($parts[0]) && count($parts) > 1) {
$path = 'node/' . $path;
}
$path = drupal_get_normal_path($path);
menu_set_active_item($path);
$node = new stdClass();
$node->body = menu_execute_active_handler($path, FALSE);
if (is_array($node->body)) {
$node->body = drupal_render($node->body);
}
if (is_int($node->body)) {
switch ($node->body) {
case MENU_NOT_FOUND:
drupal_not_found();
return FALSE;
break;
case MENU_ACCESS_DENIED:
drupal_access_denied();
return FALSE;
break;
}
}
$node->title = drupal_get_title();
$node->path = $path;
$node->changed = 0;
$node->body = preg_replace('!\\s*<div class="links">.*?</div>!sim', '', $node->body);
$node->body = preg_replace('!\\s*<div class="contextual-links-wrapper">.*?</div>!sim', '', $node->body);
$_print_urls = _print_url_list_enabled($node, $format);
$pattern = '!<(a\\s[^>]*?)>(.*?)(</a>)!is';
$node->body = preg_replace_callback($pattern, '_print_rewrite_urls', $node->body);
$print = _print_var_generator($node, $query, $message);
$print['content'] = $node->body;
return $print;
}
function _print_generate_book($nid, $query = NULL, $format = PRINT_HTML_FORMAT, $teaser = FALSE, $message = NULL) {
global $_print_urls;
$node = node_load($nid);
if (!$node) {
drupal_not_found();
return FALSE;
}
elseif (!node_access('view', $node) || !user_access('access printer-friendly version')) {
drupal_access_denied();
return FALSE;
}
$tree = book_menu_subtree_data($node->book);
$node->body = book_export_traverse($tree, 'book_node_export');
$_print_urls = _print_url_list_enabled($node, $format);
$pattern = '!<(a\\s[^>]*?)>(.*?)(</a>)!is';
$node->body = preg_replace_callback($pattern, '_print_rewrite_urls', $node->body);
$print = _print_var_generator($node, $query, $message);
$print['content'] = $node->body;
$print['title'] = '';
return $print;
}