Issue #1196588: use ctype_digit to check if a given string is a number.
[project/print.git] / print.pages.inc
index 6acf957..7e11f17 100644 (file)
@@ -1,5 +1,4 @@
 <?php
-// $Id$
 
 /**
  * @file
@@ -8,21 +7,38 @@
  * This file is included by the core PF module, and includes all the
  * functions necessary to generate a PF version of the original page
  * in HTML format.
+ *
+ * @ingroup print
  */
 
+$_print_urls = PRINT_URLS_DEFAULT;
+
 /**
  * Generate an HTML version of the printer-friendly page
  *
  * @see print_controller()
- * @see _print_get_template()
  */
 function print_controller_html() {
-  // Remove the print/ prefix
-  $path = substr($_GET['q'], strpos($_GET['q'], '/')+1);
-  $cid = isset($_GET['comment']) ? $_GET['comment'] : NULL;
-
-  $print = print_controller($path, $cid);
-  include_once(_print_get_template("html", $print["type"]));
+  $args = func_get_args();
+  $path = implode('/', $args);
+  $cid = isset($_GET['comment']) ? (int)$_GET['comment'] : NULL;
+
+  $print = print_controller($path, $cid, PRINT_HTML_FORMAT);
+  if ($print !== FALSE) {
+    $node = $print['node'];
+    $html = theme('print', array('print' => $print, 'type' => PRINT_HTML_FORMAT, 'node' => $node));
+    print $html;
+
+    $nodepath = (isset($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 + :inc', array(':inc' => 1))
+      ->execute();
+  }
 }
 
 /**
@@ -35,6 +51,8 @@ function print_controller_html() {
  *   path of the original page
  * @param $cid
  *   comment ID of the individual comment to be rendered
+ * @param $format
+ *   format of the page being generated
  * @param $teaser
  *   if set to TRUE, outputs only the node's teaser
  * @param $message
@@ -45,28 +63,39 @@ function print_controller_html() {
  * @see _print_generate_path()
  * @see _print_generate_book()
  */
-function print_controller($path, $cid, $teaser = FALSE, $message = NULL) {
-  if (!is_numeric($path)) {
+function print_controller($path, $cid = NULL, $format = PRINT_HTML_FORMAT, $teaser = FALSE, $message = NULL) {
+  if (empty($path)) {
+    // If no path was provided, let's try to generate a page for the referer
+    global $base_url;
+
+    $ref = $_SERVER['HTTP_REFERER'];
+    $path = preg_replace("!^$base_url/!", '', $ref);
+    if ($path === $ref) {
+      $path = '';
+    }
+  }
+  if (!ctype_digit($path)) {
     // Indirect call with print/alias
     // If there is a path alias with these arguments, generate a printer-friendly version for it
     $path = drupal_get_normal_path($path);
-    $ret = preg_match("/^node\/(.*)/i", $path, $matches);
+    $ret = preg_match('!^node/(.*)!i', $path, $matches);
     if ($ret == 1) {
       $path = $matches[1];
     }
   }
-  if (is_numeric($path)) {
-    $print = _print_generate_node($path, $cid, $teaser, $message);
+  $parts = explode('/', $path);
+  if (ctype_digit($parts[0]) && (count($parts) == 1)) {
+    $print = _print_generate_node($path, $cid, $format, $teaser, $message);
   }
   else {
-    $ret = preg_match("/^book\/export\/html\/(.*)/i", $path, $matches);
+    $ret = preg_match('!^book/export/html/(.*)!i', $path, $matches);
     if ($ret == 1) {
       // This is a book PF page link, handle trough the book handling functions
-      $print = _print_generate_book($matches[1], $teaser, $message);
+      $print = _print_generate_book($matches[1], $format, $teaser, $message);
     }
     else {
       // If no content node was found, handle the page printing with the 'printable' engine
-      $print = _print_generate_path($path, $teaser, $message);
+      $print = _print_generate_path($path, $format, $teaser, $message);
     }
   }
 
@@ -77,25 +106,27 @@ function print_controller($path, $cid, $teaser = FALSE, $message = NULL) {
  * Generates a robots meta tag to tell them what they may index
  *
  * @return
- *   string with the meta robots tag 
+ *   string with the meta robots tag
  */
 function _print_robots_meta_generator() {
-  $robots_settings = variable_get('print_robot_settings', print_robot_settings_default());
+  $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($robots_settings['noindex'])) {
+  if (!empty($print_robots_noindex)) {
     $robots_meta[] = 'noindex';
   }
-  if (!empty($robots_settings['nofollow'])) {
+  if (!empty($print_robots_nofollow)) {
     $robots_meta[] = 'nofollow';
   }
-  if (!empty($robots_settings['noarchive'])) {
+  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";
+    $robots_meta = "<meta name='robots' content='$robots_meta' />\n";
   }
   else {
     $robots_meta = '';
@@ -112,155 +143,163 @@ function _print_robots_meta_generator() {
  * @param $message
  *   optional sender's message (used by the send e-mail module)
  * @param $cid
- *   id of current comment being generated (NULL when not generating 
+ *   id of current comment being generated (NULL when not generating
  *   an individual comment)
  * @return
  *   array with the fields to be used in the template
  */
 function _print_var_generator($node, $message = NULL, $cid = NULL) {
-  global $base_url, $language;
+  global $base_url, $language, $_print_urls;
 
   $path = empty($node->nid) ? $node->path : "node/$node->nid";
 
-  $themed = theme('print_text');
-
   // print module settings
-  $print_settings = variable_get('print_settings', print_settings_default());
-  $print_html_settings = variable_get('print_html_settings', print_html_settings_default());
-  $print_sourceurl_settings = variable_get('print_sourceurl_settings', print_sourceurl_settings_default());
-
-  $print["language"] = $language->language;
-  $print["title"] = $node->title;
-  $print["head"] = drupal_get_html_head();
-  $print["scripts"] = drupal_get_js();
-  $print["robots_meta"] = _print_robots_meta_generator();
-  $print["url"] = url($path, array('absolute' => TRUE));
-  $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" : "";
-
-  $css_files = array();
-  if (!empty($print_settings['css'])) {
-    $css_files[] = strip_tags($print_settings['css']);
+  $print_css = variable_get('print_css', PRINT_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['robots_meta'] = _print_robots_meta_generator();
+  $print['url'] = url($path, array('absolute' => TRUE));
+  $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' => path_to_theme())));
   }
   else {
-    $css_files[] = base_path() . drupal_get_path('module', 'print') ."/print.css";
+    drupal_add_css(drupal_get_path('module', 'print') . '/css/print.css');
   }
-  // Add CCK's CSS file to properly display the fields
-  if (module_exists('content')) {
-    $css_files[] = base_path() . drupal_get_path('module', 'content') ."/content.css";
+  $drupal_css = drupal_add_css();
+  foreach ($drupal_css as $key => $css_file) {
+    if ($css_file['group'] == CSS_THEME) {
+    // Unset the theme's CSS
+      unset($drupal_css[$key]);
+    }
   }
 
   // If we are sending a message via e-mail, the CSS must be embedded
   if (!empty($message)) {
-    ob_start();
-    foreach ($css_files as $value) {
-      include($value);
+    $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;
+      }
     }
-    $style = ob_get_contents();
-    ob_end_clean();
-    $print["css"] = "<style type=\"text/css\" media=\"all\">". $style ."</style>\n";
+    $print['css'] = "<style type='text/css' media='all'>$style</style>\n";
   }
   else {
-    $print["css"] = "";
-    foreach ($css_files as $value) {
-      $print["css"] .= "<link type=\"text/css\" rel=\"stylesheet\" media=\"all\" href=\"". $value ."\" />\n";
-    }
-  }
-
-  $print["sendtoprinter"] = $print_html_settings['sendtoprinter'] ? " onload=\"window.print();\"" : "";
-    
-  $logo_url = !empty($print_settings['logo_url']) ? strip_tags($print_settings['logo_url']) : theme_get_setting('logo');
-  $print["logo"] = $logo_url ? "<img class=\"print-logo\" src=\"". $logo_url ."\" alt=\"\" />\n" : "";
+    $print['css'] = drupal_get_css($drupal_css);
+  }
+
+  $window_close = ($print_html_new_window && $print_html_windowclose) ? 'window.close();' : '';
+  $print['sendtoprinter'] = $print_html_sendtoprinter ? "<script type='text/javascript'>(function ($) { Drupal.behaviors.print = { attach: function(context) {window.print();$window_close}};}(jQuery));</script>" : '';
+
+  switch ($print_logo_options) {
+    case 0: // none
+      $logo_url = 0;
+      break;
+    case 1: // theme's
+      $logo_url = theme_get_setting('logo');
+      break;
+    case 2: // user-specifed
+      $logo_url = strip_tags($print_logo_url);
+      break;
+  }
+  $site_name = variable_get('site_name', 'Drupal');
+  $print['logo'] = $logo_url ? "<img class='print-logo' src='" . check_url($logo_url) . "' alt='$site_name' id='logo' />\n" : '';
+
+  switch ($print_footer_options) {
+    case 0: // none
+      $footer = '';
+      break;
+    case 1: // theme's
+      $footer = variable_get('site_footer', FALSE) . "\n" . theme('blocks', 'footer');
+      break;
+    case 2: // user-specifed
+      $footer = $print_footer_user;
+      break;
+  }
+  $print['footer_message'] = filter_xss_admin($footer);
 
   $published_site = variable_get('site_name', 0);
   if ($published_site) {
-    $published = (empty($themed["published"])) ? t('Published on %site_name', array('%site_name' => $published_site)) : ($themed['published'] ." ". $published_site);
-    $print["site_name"] = $published ." (". l($base_url, $base_url) .")";
+    $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"] = "";
+    $print['site_name'] = '';
   }
 
-  if ($print_sourceurl_settings['enabled'] == 1) {
+  if ($print_sourceurl_enabled == 1) {
     /* Grab and format the src URL */
-    if (empty($print_sourceurl_settings['forcenode'])) {
-      $url = $print["url"];
+    if (empty($print_sourceurl_forcenode)) {
+      $url = $print['url'];
     }
     else {
-      $url = $base_url .'/'. (((bool)variable_get('clean_url', '0')) ? '' : '?q=') . $path;
+      $url = $base_url . '/' . (((bool)variable_get('clean_url', '0')) ? '' : '?q=') . $path;
     }
-    if ($cid) {
-      $url .= "#comment-$cid";
+    if (is_int($cid)) {
+      $url .= '#comment-$cid';
     }
-    $retrieved_date = format_date(time(), 'small');
-    $retrieved = (empty($themed["retrieved"])) ? t('retrieved on %date', array('%date' => $retrieved_date)) : ($themed["retrieved"] ." ". $retrieved_date);
-    $print["printdate"] = $print_sourceurl_settings['date'] ? " ($retrieved)" : "";
+    $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 = (empty($themed["sourceURL"])) ? t('Source URL') : $themed["sourceURL"];
-    $print["source_url"] = "<strong>". $source_url . $print["printdate"] .":</strong> ". l($url, $url);
+    $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['source_url'] = '';
   }
 
-  if (isset($node->type)) {
-    $node_type = $node->type;
-
-    if (theme_get_setting("toggle_node_info_$node_type")) {
-      $by_author = ($node->name ? $node->name : variable_get('anonymous', t('Anonymous')));
-      $by = (empty($themed["by"])) ? t('By %author', array('%author' => $by_author)) : ($themed["by"] ." ". $by_author);
-      $print["submitted"] = $by;
-
-      $created_datetime = format_date($node->created, 'small');
-      $created = (empty($themed["created"])) ? t('Created %date', array('%date' => $created_datetime)) : ($themed["created"] ." ". $created_datetime);
-      $print["created"] = $created;
-    }
-    else {
-      $print["submitted"] = "";
-      $print["created"] = "";
-    }
-
-    $print["type"] = $node->type;
-  }
-  else {
-    $print["submitted"] = "";
-    $print["created"] = "";
-    $print["type"] = '';
-  }
+  $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"] = implode(" > ", $breadcrumb);
+    $print['breadcrumb'] = filter_xss(implode(' > ', $breadcrumb));
   }
   else {
-    $print["breadcrumb"] = "";
+    $print['breadcrumb'] = '';
   }
 
   // Display the collected links at the bottom of the page. Code once taken from Kjartan Mannes' project.module
-  if (!empty($print_settings['urls'])) {
+  $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) .'] '. $urls[$i] ."<br />\n";
+        $pfp_links .= '[' . ($i + 1) . '] ' . check_plain($urls[$i]) . "<br />\n";
       }
-      $links = (empty($themed["links"])) ? t('Links') : $themed["links"];
-      $print["pfp_links"] = "<p><strong>". $links .":</strong><br />". $pfp_links ."</p>";
+      $links = filter_xss(variable_get('print_text_links', t('Links')));
+      $print['pfp_links'] = "<p><strong>$links:</strong><br />$pfp_links</p>";
     }
   }
 
-  if (module_exists('taxonomy')) {
-    $terms = taxonomy_link('taxonomy terms', $node);
-    $print["taxonomy"] = theme('links', $terms);
-  }
-
-  $print["content"] = $node->body;
-  $print["node"] = $node;
-  $print["message"] = $message;
-  $print["footer_message"] = filter_xss_admin(variable_get('site_footer', FALSE)) ."\n". theme('blocks', 'footer') ;
+  $print['node'] = $node;
+  $print['message'] = $message;
 
   return $print;
 }
@@ -268,77 +307,66 @@ function _print_var_generator($node, $message = NULL, $cid = NULL) {
 /**
  * Callback function for the preg_replace_callback for URL-capable patterns
  *
- * Manipulate URLs to make them absolute in the URLs list, and to add a 
+ * Manipulate URLs to make them absolute in the URLs list, and to add a
  * [n] footnote marker.
- * 
+ *
  * @param $matches
  *   array with the matched tag patterns, usually <a...>+text+</a>
  * @return
- *   tag with re-written URL and when appropriate the [n] index to the 
+ *   tag with re-written URL and when appropriate the [n] index to the
  *   URL list
  */
 function _print_rewrite_urls($matches) {
-  global $base_url, $base_root;
+  global $base_url, $base_root, $_print_urls;
 
-  // Get value of Printer-friendly URLs setting
-  $print_settings = variable_get('print_settings', print_settings_default());
-  $pfurls = (!empty($print_settings['urls']));
-
-  //Temporarily convert spaces to %20 so that it isn't split below
-  $in_string = FALSE;
-  for ($i=0; $i < strlen($matches[1]); $i++) {
-    if ($matches[1][$i] == '"') {
-      $in_string = !$in_string;
-    }
-    if (($matches[1][$i] == ' ') && ($in_string)) {
-      $matches[1]=substr_replace($matches[1], "%20", $i, 1);
-    }
-  }
-  // remove whitespace immediately before and after the '=' sign
-  $matches[1]=preg_replace("/\s*=\s*/", "=", $matches[1]);
+  $include_anchors = variable_get('print_urls_anchors', PRINT_URLS_ANCHORS_DEFAULT);
 
   // first, split the html into the different tag attributes
-  $attribs = preg_split("/\s+/m", $matches[1]);
+  $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);
+  }
 
-  for ($i=1; $i < count($attribs); $i++) {
+  $size = count($attribs);
+  for ($i=1; $i < $size; $i++) {
     // If the attribute is href or src, we may need to rewrite the URL in the value
-    if (preg_match("/^(href|src)\s*?=/i", $attribs[$i]) > 0) {
-      // We may need to rewrite the URL, so let's isolate it
-      preg_match("/.*?=(.*)/is", $attribs[$i], $urls);
-      $url = trim($urls[1], " \t\n\r\0\x0B\"\'");
+    if (preg_match('!^(?:href|src)\s*?=(.*)!i', $attribs[$i], $urls) > 0) {
+      $url = trim($urls[1], " \t\n\r\0\x0B\"'");
 
-      if (strpos($url, '://') || preg_match("/^mailto:.*?@.*?\..*?$/iu", $url)) {
+      if (strpos(html_entity_decode($url), '://') || preg_match('!^mailto:.*?@.*?\..*?$!iu', html_entity_decode($url))) {
         // URL is absolute, do nothing
-        $newurl = urldecode($url);
+        $newurl = $url;
       }
       else {
-        if (substr($url, 0, 1) == "#") {
+        if ($url[0] == '#') {
           // URL is an anchor tag
-          if ($pfurls) {
-            $path = substr($_GET['q'], strpos($_GET['q'], '/')+1);
-            if (is_numeric($path)) {
+          if ($include_anchors && (!empty($_print_urls))) {
+            $path = explode('/', $_GET['q']);
+            unset($path[0]);
+            $path = implode('/', $path);
+            if (ctype_digit($path)) {
               $path = "node/$path";
             }
             // Printer-friendly URLs is on, so we need to make it absolute
-            $newurl = url($path, array('fragment' => substr(urldecode($url), 1), 'absolute' => TRUE));
+            $newurl = url($path, array('fragment' => substr($url, 1), 'absolute' => TRUE));
           }
           // Because base href is the original page, change the link to
           // still be usable inside the print page
-          $matches[1] = str_replace($url, $_GET['q'] . $url, $matches[1]);
+          $matches[1] = str_replace($url, base_path() . $_GET['q'] . $url, $matches[1]);
         }
         else {
           // URL is relative, convert it into absolute URL
-          $clean_url = (bool)variable_get('clean_url', '0');
-          if (substr($url, 0, 1) == "/") {
+          if ($url[0] == '/') {
             // If it starts with '/' just append it to the server name
-            $newurl = $base_root .'/'. trim(urldecode($url), "/");
+            $newurl = $base_root . '/' . trim($url, '/');
           }
-          elseif ((!$clean_url) && (preg_match("/^[index.php]?\?q=.*/i", $url))) {
-            // If Clean URLs is disabled, and it starts with q=?, just prepend with the base URL
-            $newurl = $base_url .'/'. trim(urldecode($url), "/");
+          elseif (preg_match('!^(?:index.php)?\?q=!i', $url)) {
+            // If it starts with ?q=, just prepend with the base URL
+            $newurl = $base_url . '/' . trim($url, '/');
           }
           else {
-            $newurl = url(trim(urldecode($url), "/"), array('absolute' => TRUE));
+            $newurl = url(trim($url, '/'), array('absolute' => TRUE));
           }
           $matches[1] = str_replace($url, $newurl, $matches[1]);
         }
@@ -346,14 +374,11 @@ function _print_rewrite_urls($matches) {
     }
   }
 
-  //Revert all %20 in strings back to spaces
-  $matches[1] = str_replace("%20", " ", $matches[1]);
-
-  $ret = '<'. $matches[1] .'>';
+  $ret = '<' . $matches[1] . '>';
   if (count($matches) == 4) {
     $ret .= $matches[2] . $matches[3];
-    if (($pfurls) && (isset($newurl))) {
-      $ret .= ' <span class="print-footnote">['. _print_friendly_urls(trim(stripslashes($newurl))) .']</span>';
+    if ((!empty($_print_urls)) && (isset($newurl))) {
+      $ret .= ' <span class="print-footnote">[' . _print_friendly_urls(trim($newurl)) . ']</span>';
     }
   }
 
@@ -365,8 +390,8 @@ function _print_rewrite_urls($matches) {
  *
  * @param $url
  *   absolute URL to be inserted in the list
- * @return 
- *   list of URLs previously stored if $url is 0, or the current count 
+ * @return
+ *   list of URLs previously stored if $url is 0, or the current count
  *   otherwise.
  */
 function _print_friendly_urls($url = 0) {
@@ -381,61 +406,55 @@ function _print_friendly_urls($url = 0) {
       return count($urls);
     }
   }
-  return $urls;
+  $ret = $urls;
+  $urls = array();
+  return $ret;
 }
 
 /**
- * Choose most appropriate template
- * 
- * Auxiliary function to resolve the most appropriate template trying to find
- * a content specific template in the theme or module dir before falling back
- * on a generic template also in those dirs.
+ * Check URL list settings for this node
  *
- * @param format
- *   format of the PF page being rendered (html, pdf, etc.)
- * @param $type
- *   name of the node type being rendered in a PF page
+ * @param node
+ *   node object
+ * @param $format
+ *   format of the page being generated
  * @return
- *   filename of the most suitable template
+ *   TRUE if URL list should be displayed, FALSE otherwise
  */
-function _print_get_template($format = NULL, $type = NULL) {
-  $filenames = array();
-  // First try to find a template defined both for the format and then the type
-  if (!empty($format) && !empty($type)) {
-    $filenames[] = "print_$format.node-$type.tpl.php";
-  }
-  // Then only for the format
-  if (!empty($format)) {
-    $filenames[] = "print_$format.tpl.php";
-  }
-  // If the node type is known, then try to find that type's template file
-  if (!empty($type)) {
-    $filenames[] = "print.node-$type.tpl.php";
-  }
-  // Finally search for a generic template file
-  $filenames[] = "print.tpl.php";
-
-  foreach ($filenames as $value) {
-    // First in the theme directory
-    $file = drupal_get_path('theme', $GLOBALS['theme_key']) ."/". $value;
-    if (file_exists($file)) {
-      return $file;
-    }
-    // Then in the module directory
-    $file = drupal_get_path('module', 'print') ."/". $value;
-    if (file_exists($file)) {
-      return $file;
-    }
-  }
+function _print_url_list_enabled($node, $format = PRINT_HTML_FORMAT) {
+  if (!isset($node->type)) {
+    return variable_get('print_urls', PRINT_URLS_DEFAULT);
+  }
+
+  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);
+      $fmt = '';
+      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);
+      $fmt = $format . '_';
+      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);
+      $fmt = $format . '_';
+      break;
+  }
+  if (!isset($node_urllist)) $node_urllist = PRINT_TYPE_URLLIST_DEFAULT;
+
+  // Get value of Printer-friendly URLs setting
+  return (variable_get('print_urls', PRINT_URLS_DEFAULT) && ($node_urllist));
 }
 
 /**
  * Prepare a Printer-friendly-ready node body for content nodes
- * 
+ *
  * @param $nid
  *   node ID of the node to be rendered into a printer-friendly page
  * @param $cid
  *   comment ID of the individual comment to be rendered
+ * @param $format
+ *   format of the page being generated
  * @param $teaser
  *   if set to TRUE, outputs only the node's teaser
  * @param $message
@@ -443,59 +462,75 @@ function _print_get_template($format = NULL, $type = NULL) {
  * @return
  *   filled array ready to be used in the template
  */
-function _print_generate_node($nid, $cid = NULL, $teaser = FALSE, $message = NULL) {
+function _print_generate_node($nid, $cid = NULL, $format = PRINT_HTML_FORMAT, $teaser = FALSE, $message = NULL) {
+  global $_print_urls;
+
+  if (!isset($langcode)) {
+    $langcode = $GLOBALS['language_content']->language;
+  }
+
   // We can take a node id
-  $node = node_load(array('nid' => $nid));
-  if (!node_access('view', $node)) {
+  $node = node_load($nid);
+  if (!$node) {
+    // Node not found
+    drupal_not_found();
+    return FALSE;
+  }
+  elseif (!node_access('view', $node)) {
     // Access is denied
-    return drupal_access_denied();
+    drupal_access_denied();
+    return FALSE;
   }
+  $view_mode = $teaser ? 'teaser' : 'full';
   drupal_set_title($node->title);
 
-  //alert other modules that we are generating a printer-friendly page, so they can choose to show/hide info
-  $node->printing = TRUE;
   // Turn off Pagination by the Paging module
   unset($node->pages);
   unset($node->page_count);
 
-  if ($teaser) {
-    unset($node->body);
+  // Make this page a member of the original page's organic group
+  if (function_exists('og_set_group_context') && isset($node->og_groups)) {
+    og_set_group_context($node->og_groups);
   }
-  else {
-    unset($node->teaser);
-  }
-  $node = (object)$node;
+
   if ($cid === NULL) {
-    // Adapted (simplified) version of node_view for Drupal 5.x
+    // Adapted (simplified) version of node_view
     //Render the node content
-    $node = node_build_content($node, $teaser, TRUE);
+    node_build_content($node, $view_mode);
+
+    // Disable the links area
+    unset($node->content['links']);
     // Disable fivestar widget output
-    unset($node->content["fivestar_widget"]);
+    unset($node->content['fivestar_widget']);
     // Disable service links module output
-    unset($node->content["service_links"]);
-  
-    $node->body = drupal_render($node->content);
+    unset($node->content['service_links']);
+
+    $build = $node->content;
+    unset($node->content);
+
+    // Disable the AdSense module ads
+//    $content = preg_replace('!<div class=[\'"]adsense[\'"].*?</div>!sim', '', $content);
   }
 
-  $print_settings = variable_get('print_settings', print_settings_default());
+  $print_comments = variable_get('print_comments', PRINT_COMMENTS_DEFAULT);
 
-  if (function_exists('comment_render') && (($cid != NULL) || ($print_settings['comments']))) {
+  if (function_exists('comment_render') && (($cid != NULL) || ($print_comments))) {
     //Print only the requested comment (or if $cid is NULL, all of them)
     $comments = comment_render($node, $cid);
-    
+
     //Remove the comment forms
-    $comments = preg_replace("/<form.*?id=\"comment-.*?\">.*?<\/form>/sim", "", $comments);
+    $comments = preg_replace('!<form.*?id="comment-.*?">.*?</form>!sim', '', $comments);
     //Remove the 'Post new comment' title
-    $comments = preg_replace("/<h2.*?>Post new comment<\/h2>/", "", $comments);
+    $comments = preg_replace('!<h2.*?>' . t('Post new comment') . '</h2>!', '', $comments);
     //Remove the comment title hyperlink
-    $comments = preg_replace("/(<h3.*?>)(<a.*?>)(.*?)<\/a>(<\/h3>)/", "$1$3$4", $comments);
+    $comments = preg_replace('!(<h3.*?>.*?)<a.*?>(.*?)</a>(.*?</h3>)!i', '$1$2$3', $comments);
     //Remove the comment author link
-    $pattern = "/(<span class=\"submitted\">)(.*?)<a.*?>(.*?)<\/a>(<\/span>)/sim";
+    $pattern = '!(<(?:span|div) class="submitted">.*?)<a.*?>(.*?)</a>(.*?</(?:span|div)>)!sim';
     if (preg_match($pattern, $comments)) {
-      $comments = preg_replace($pattern , "$1$2$3$4", $comments);
+      $comments = preg_replace($pattern , '$1$2$3', $comments);
     }
     //Remove the comment links
-    $comments = preg_replace("/\s*<ul class=\"links\">.*?<\/ul>/sim", "", $comments);
+    $comments = preg_replace('!\s*<ul class="links">.*?</ul>!sim', '', $comments);
     if ($cid != NULL) {
       // Single comment requested, output only the comment
       unset($node->body);
@@ -503,24 +538,41 @@ function _print_generate_node($nid, $cid = NULL, $teaser = FALSE, $message = NUL
     $node->body .= $comments;
   }
 
-  node_invoke_nodeapi($node, 'alter', FALSE, TRUE);
+  $build += array(
+    '#theme' => 'node',
+    '#node' => $node,
+    '#view_mode' => $view_mode,
+    '#language' => $langcode,
+  );
 
-  // Convert the a href elements
-  $pattern = "@<(a\s[^>]*?)>(.*?)(</a>)@is";
-  $node->body = preg_replace_callback($pattern, "_print_rewrite_urls", $node->body);
+  drupal_alter('node_view', $build);
+
+  $content = render($build);
 
-  init_theme();
+  //Get rid of the annoying D7 title link
+  $pattern = '!(<h2 property="dc:title" datatype="">)\s*<a [^>]*?>(.*?)</a>\s*(</h2>)!mis';
+  $content = preg_replace($pattern, '$1$2$3', $content);
+
+  //Check URL list settings
+  $_print_urls = _print_url_list_enabled($node, $format);
+
+  // Convert the a href elements
+  $pattern = '!<(a\s[^>]*?)>(.*?)(</a>)!is';
+  $content = preg_replace_callback($pattern, '_print_rewrite_urls', $content);
 
   $print = _print_var_generator($node, $message, $cid);
+  $print['content'] = $content;
 
   return $print;
 }
 
 /**
  * Prepare a Printer-friendly-ready node body for non-content pages
- * 
+ *
  * @param $path
  *   path of the node to be rendered into a printer-friendly page
+ * @param $format
+ *   format of the page being generated
  * @param $teaser
  *   if set to TRUE, outputs only the node's teaser
  * @param $message
@@ -528,40 +580,51 @@ function _print_generate_node($nid, $cid = NULL, $teaser = FALSE, $message = NUL
  * @return
  *   filled array ready to be used in the template
  */
-function _print_generate_path($path, $teaser = FALSE, $message = NULL) {
+function _print_generate_path($path, $format = PRINT_HTML_FORMAT, $teaser = FALSE, $message = NULL) {
+  global $_print_urls;
+
+  // Handle node tabs
+  $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);
   // Adapted from index.php.
   $node = new stdClass();
-  $node->body = menu_execute_active_handler($path);
-  $node->title = drupal_get_title();
-  $node->path = $path;
-
-  // It may happen that a drupal_not_found is called in the above call
-  if (preg_match('/404 Not Found/', drupal_get_headers()) == 1) {
-    return;
+  $node->body = menu_execute_active_handler($path, FALSE);
+
+  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;
+    }
   }
 
-  switch ($node->body) {
-  case MENU_NOT_FOUND:
-    return drupal_not_found();
-    break;
-  case MENU_ACCESS_DENIED:
-    return drupal_access_denied();
-    break;
-  }
+  $node->title = drupal_get_title();
+  $node->path = $path;
+  $node->changed = 0;
 
   // Delete any links area
-  $node->body = preg_replace("/\s*<div class=\"links\">.*?<\/div>/sim", "", $node->body);
+  $node->body = preg_replace('!\s*<div class="links">.*?</div>!sim', '', $node->body);
 
-  // Convert the a href elements
-  $pattern = "@<(a\s[^>]*?)>(.*?)(</a>)@is";
-  $node->body = preg_replace_callback($pattern, "_print_rewrite_urls", $node->body);
+  //Check URL list settings
+  $_print_urls = _print_url_list_enabled($node, $format);
 
-  init_theme();
+  // Convert the a href elements
+  $pattern = '!<(a\s[^>]*?)>(.*?)(</a>)!is';
+  $node->body = preg_replace_callback($pattern, '_print_rewrite_urls', $node->body);
 
   $print = _print_var_generator($node, $message);
+  $print['content'] = $node->body;
 
   return $print;
 }
@@ -569,9 +632,11 @@ function _print_generate_path($path, $teaser = FALSE, $message = NULL) {
 
 /**
  * Prepare a Printer-friendly-ready node body for book pages
- * 
+ *
  * @param $nid
  *   node ID of the node to be rendered into a printer-friendly page
+ * @param $format
+ *   format of the page being generated
  * @param $teaser
  *   if set to TRUE, outputs only the node's teaser
  * @param $message
@@ -579,25 +644,36 @@ function _print_generate_path($path, $teaser = FALSE, $message = NULL) {
  * @return
  *   filled array ready to be used in the template
  */
-function _print_generate_book($nid, $teaser = FALSE, $message = NULL) {
-  $node = node_load(array('nid' => $nid));
-  if (!node_access('view', $node) || (!user_access('access printer-friendly version'))) {
+function _print_generate_book($nid, $format = PRINT_HTML_FORMAT, $teaser = FALSE, $message = NULL) {
+  global $_print_urls;
+
+  $node = node_load($nid);
+  if (!$node) {
+    // Node not found
+    drupal_not_found();
+    return FALSE;
+  }
+  elseif (!node_access('view', $node) || (!user_access('access printer-friendly version'))) {
     // Access is denied
-    return drupal_access_denied();
+    drupal_access_denied();
+    return FALSE;
   }
 
   $tree = book_menu_subtree_data($node->book);
   $node->body = book_export_traverse($tree, 'book_node_export');
 
-  // Convert the a href elements
-  $pattern = "@<(a\s[^>]*?)>(.*?)(</a>)@is";
-  $node->body = preg_replace_callback($pattern, "_print_rewrite_urls", $node->body);
+  //Check URL list settings
+  $_print_urls = _print_url_list_enabled($node, $format);
 
-  init_theme();
+  // Convert the a href elements
+  $pattern = '!<(a\s[^>]*?)>(.*?)(</a>)!is';
+  $node->body = preg_replace_callback($pattern, '_print_rewrite_urls', $node->body);
 
   $print = _print_var_generator($node, $message);
+  $print['content'] = $node->body;
+
   // The title is already displayed by the book_recurse, so avoid duplication
-  $print["title"] = "";
+  $print['title'] = '';
 
   return $print;
 }