Issue #1196588: use ctype_digit to check if a given string is a number.
[project/print.git] / print_pdf / print_pdf.module
index 44d3b6f..46cee93 100644 (file)
@@ -1,16 +1,21 @@
 <?php
-// $Id$
 
 /**
  * @file
  * Displays Printer-friendly versions of Drupal pages.
+ *
+ * @ingroup print
  */
 
 define('PRINTPDF_PATH', 'printpdf');
 
-define('PRINT_PDF_FORMAT', 'pdf');
+// Defined in print.module
+//define('PRINT_PDF_FORMAT', 'pdf');
+
+define('PRINT_PDF_LIB_PATH', 'sites/all/libraries');
 
 define('PRINT_PDF_LINK_POS_DEFAULT', 'link');
+define('PRINT_PDF_LINK_TEASER_DEFAULT', 0);
 define('PRINT_PDF_SHOW_LINK_DEFAULT', 1);
 define('PRINT_PDF_NODE_LINK_VISIBILITY_DEFAULT', 0);
 define('PRINT_PDF_NODE_LINK_PAGES_DEFAULT', '');
@@ -23,41 +28,63 @@ define('PRINT_PDF_PDF_TOOL_DEFAULT', 0);
 define('PRINT_PDF_CONTENT_DISPOSITION_DEFAULT', 2);
 define('PRINT_PDF_PAPER_SIZE_DEFAULT', 'A4');
 define('PRINT_PDF_PAGE_ORIENTATION_DEFAULT', 'portrait');
+define('PRINT_PDF_AUTOCONFIG_DEFAULT', 1);
 define('PRINT_PDF_FONT_FAMILY_DEFAULT', 'dejavusans');
 define('PRINT_PDF_FONT_SIZE_DEFAULT', 10);
-define('PRINT_PDF_FILENAME_DEFAULT', '[site-name] - [title] - [mod-yyyy]-[mod-mm]-[mod-dd]');
+define('PRINT_PDF_FONT_SUBSETTING_DEFAULT', 0);
+define('PRINT_PDF_FILENAME_DEFAULT', '[site:name] - [node:title] - [node:changed:custom:Y-m-d]');
+define('PRINT_PDF_DOMPDF_UNICODE_DEFAULT', 0);
+define('PRINT_PDF_WKHTMLTOPDF_OPTIONS', "--footer-font-size 7 --footer-right '[page]'");
 
 /**
- * Implementation of hook_theme().
+ * Implements hook_permission().
+ */
+function print_pdf_permission() {
+  return array(
+    'access PDF version' => array(
+      'title' => t('Access the PDF version'),
+      'description' => t('View the PDF versions and the links to them in the original pages.'),
+    ),
+  );
+}
+
+/**
+ * Implements hook_theme().
  */
 function print_pdf_theme() {
   return array(
     'print_pdf_format_link' => array(
-      'arguments' => array(),
+      'variables' => array(),
     ),
     'print_pdf_dompdf_footer' => array(
-      'arguments' => array(),
+      'variables' => array('html' => ''),
+      'file' => 'print_pdf.pages.inc',
     ),
     'print_pdf_tcpdf_header' => array(
-      'arguments' => array(),
+      'variables' => array('pdf' => NULL, 'html' => '', 'font' => array()),
+      'file' => 'print_pdf.pages.inc',
     ),
     'print_pdf_tcpdf_page' => array(
-      'arguments' => array(),
+      'variables' => array('pdf' => NULL),
+      'file' => 'print_pdf.pages.inc',
     ),
     'print_pdf_tcpdf_content' => array(
-      'arguments' => array(),
+      'variables' => array('pdf' => NULL, 'html' => '', 'font' => array()),
+      'file' => 'print_pdf.pages.inc',
     ),
     'print_pdf_tcpdf_footer' => array(
-      'arguments' => array(),
+      'variables' => array('pdf' => NULL, 'html' => '', 'font' => array()),
+      'file' => 'print_pdf.pages.inc',
     ),
     'print_pdf_tcpdf_footer2' => array(
-      'arguments' => array(),
+      'variables' => array('pdf' => NULL),
+      'file' => 'print_pdf.pages.inc',
     ),
   );
 }
 
 /**
- * Implementation of hook_menu().
+ * Implements hook_menu().
  */
 function print_pdf_menu() {
   $items = array();
@@ -65,42 +92,62 @@ function print_pdf_menu() {
   $items[PRINTPDF_PATH] = array(
     'title' => 'Printer-friendly PDF',
     'page callback' => 'print_pdf_controller',
-    'access arguments' => array('access print'),
+    'access arguments' => array('access PDF version'),
     'type' => MENU_CALLBACK,
+    'file' => 'print_pdf.pages.inc',
+  );
+  $items[PRINTPDF_PATH . '/' . PRINTPDF_PATH] = array(
+    'access callback' => FALSE,
   );
-  $items['admin/settings/print/pdf'] = array(
+  $items['admin/config/user-interface/print/pdf'] = array(
     'title' => 'PDF',
     'page callback' => 'drupal_get_form',
     'page arguments' => array('print_pdf_settings'),
     'access arguments'  => array('administer print'),
     'weight' => 3,
     'type' => MENU_LOCAL_TASK,
+    'file' => 'print_pdf.admin.inc',
+  );
+  $items['admin/config/user-interface/print/pdf/options'] = array(
+    'title' => 'Options',
+    'weight' => 1,
+    'type' => MENU_DEFAULT_LOCAL_TASK,
+  );
+  $items['admin/config/user-interface/print/pdf/strings'] = array(
+    'title' => 'Text strings',
+    'page callback' => 'drupal_get_form',
+    'page arguments' => array('print_pdf_strings_settings'),
+    'access arguments'  => array('administer print'),
+    'weight' => 2,
+    'type' => MENU_LOCAL_TASK,
+    'file' => 'print_pdf.admin.inc',
   );
 
   return $items;
 }
 
 /**
- * Implementation of hook_block_list().
+ * Implements hook_block_info().
  */
-function print_pdf_block_list() {
-      $block[0]['info'] = t('Most PDFd');
+function print_pdf_block_info() {
+      $block['print_pdf-top']['info'] = t('Most PDFd');
+      $block['print_pdf-top']['cache'] = DRUPAL_CACHE_GLOBAL;
       return $block;
 }
 
 /**
- * Implementation of hook_block_view().
+ * Implements hook_block_view().
  */
 function print_pdf_block_view($delta = 0) {
       switch ($delta) {
-      case 0:
+      case 'print_pdf-top':
         $block['subject'] = t('Most PDFd');
         $result = db_query_range("SELECT path FROM {print_pdf_page_counter} ORDER BY totalcount DESC", 0, 3)
                     ->fetchAll();
         if (count($result)) {
           $block['content'] = '<div class="item-list"><ul>';
           foreach ($result as $obj) {
-            $block['content'] .= '<li>'. l(_print_get_title($obj->path), $obj->path) .'</li>';
+            $block['content'] .= '<li>' . l(_print_get_title($obj->path), $obj->path) . '</li>';
           }
           $block['content'] .= '</ul></div>';
         }
@@ -110,7 +157,7 @@ function print_pdf_block_view($delta = 0) {
 }
 
 /**
- * Implementation of hook_requirements().
+ * Implements hook_requirements().
  */
 function print_pdf_requirements($phase) {
   $requirements = array();
@@ -121,56 +168,86 @@ function print_pdf_requirements($phase) {
       $print_pdf_pdf_tool = variable_get('print_pdf_pdf_tool', PRINT_PDF_PDF_TOOL_DEFAULT);
       if (empty($print_pdf_pdf_tool)) {
         $requirements['print_pdf_tool'] = array(
-          'title' => $t('PDF version'),
+          'title' => $t('PDF generation library'),
           'value' => $t('No PDF tool selected'),
-          'description' => $t('Please configure it in the <a href="@url">PDF settings page</a>.', array('@url' => url('admin/settings/print/pdf'))),
+          'description' => $t('Please configure it in the <a href="@url">PDF settings page</a>.', array('@url' => url('admin/config/user-interface/print/pdf'))),
           'severity' => REQUIREMENT_ERROR,
         );
       }
+      else {
+        if (!is_file($print_pdf_pdf_tool) || !is_readable($print_pdf_pdf_tool)) {
+          $requirements['print_pdf_tool'] = array(
+            'title' => $t('PDF generation tool'),
+            'value' => $t('File not found'),
+            'description' => $t('The currently selected PDF generation library (%file) is no longer accessible.', array('%file' => $print_pdf_pdf_tool)),
+            'severity' => REQUIREMENT_ERROR,
+          );
+        }
+        elseif (basename($print_pdf_pdf_tool) == 'dompdf_config.inc.php') {
+          $directory = dirname($print_pdf_pdf_tool) . '/lib/fonts';
+          if (!is_dir($directory) || !is_writable($directory)) {
+            $requirements['print_pdf_tool'] = array(
+              'title' => $t('DOMPDF font cache directory'),
+              'value' => $t('Non-writable permissions'),
+              'description' => $t('You must change the %fontdir permissions to be writable, as dompdf requires write-access to that directory.', array('%fontdir' => $directory)),
+              'severity' => REQUIREMENT_ERROR,
+            );
+          }
+        }
+        elseif (basename($print_pdf_pdf_tool) == 'tcpdf.php') {
+          $version = _print_pdf_tcpdf_version();
+
+          if (version_compare($version, '5.9.012', '<')) {
+            $requirements['print_pdf_tool'] = array(
+              'title' => $t('TCPDF library'),
+              'value' => $t('Unsupported version'),
+              'description' => $t('The currently selected version of TCPDF (@version) is not supported. Please update to a <a href="@url">newer version</a>.', array('@version' => $version, '@url' => url('http://www.tcpdf.org'))),
+              'severity' => REQUIREMENT_ERROR,
+            );
+          }
+        }
+        elseif (substr(basename($print_pdf_pdf_tool, '.exe'), 0, 11) == 'wkhtmltopdf') {
+          if (function_exists('is_executable') && !is_executable($print_pdf_pdf_tool)) {
+            $requirements['print_pdf_tool'] = array(
+              'title' => $t('wkhtmltopdf library'),
+              'value' => $t('Non-executable permissions'),
+              'description' => $t('You must modify the permissions of the wkhtmltopdf file (%file) to make it executable.', array('%file' => $print_pdf_pdf_tool)),
+              'severity' => REQUIREMENT_ERROR,
+            );
+          }
+          else {
+            $version = _print_pdf_wkhtmltopdf_version();
+            if (version_compare($version, '0.9.6', '<')) {
+              $requirements['print_pdf_tool'] = array(
+                'title' => $t('wkhtmltopdf library'),
+                'value' => $t('Unsupported version'),
+                'description' => $t('The currently selected version of wkhtmltopdf (@version) is not supported. Please update to a <a href="@url">newer version</a>.', array('@version' => $version, '@url' => url('http://code.google.com/p/wkhtmltopdf/'))),
+                'severity' => REQUIREMENT_ERROR,
+              );
+            }
+          }
+        }
+      }
       break;
   }
   return $requirements;
 }
 
 /**
- * Implementation of hook_help().
- */
-function print_pdf_help($path, $arg) {
-  $print_pdf_link_pos = variable_get('print_pdf_link_pos', array(PRINT_PDF_LINK_POS_DEFAULT => PRINT_PDF_LINK_POS_DEFAULT));
-  if ((preg_match('!^node/!i', $path) == 0) &&
-      !(empty($print_pdf_link_pos['link']) && empty($print_pdf_link_pos['corner']))) {
-    static $output = FALSE;
-
-    if ($output === FALSE) {
-      $output = TRUE;
-
-      $link = print_pdf_insert_link();
-      if ($link) {
-        return "<span class='print-syslink'>$link</span>";
-      }
-    }
-  }
-}
-
-/**
- * Implementation of hook_nodeapi_view().
+ * Implements hook_node_view().
  */
-function print_pdf_nodeapi_view(&$node, $teaser, $page) {
-      if ($teaser === FALSE) {
-        _print_pdf_set_node_fields($node);
-      }
-
+function print_pdf_node_view($node, $build_mode) {
   $print_pdf_link_pos = variable_get('print_pdf_link_pos', array(PRINT_PDF_LINK_POS_DEFAULT => PRINT_PDF_LINK_POS_DEFAULT));
   $print_pdf_link_use_alias = variable_get('print_pdf_link_use_alias', PRINT_PDF_LINK_USE_ALIAS_DEFAULT);
-  $allowed_type = print_pdf_link_allowed(array('type' => 'node', 'node' => $node, 'teaser' => $teaser));
+  $allowed_type = print_pdf_link_allowed(array('type' => 'node', 'node' => $node, 'teaser' => ($build_mode == 'teaser')));
   if (($allowed_type) && !empty($print_pdf_link_pos['link'])) {
-    drupal_add_css(drupal_get_path('module', 'print') .'/css/printlinks.css');
+    drupal_add_css(drupal_get_path('module', 'print') . '/css/printlinks.css');
     $links = array();
     $format = theme('print_pdf_format_link');
 
     // Show book link
     if ($allowed_type === PRINT_ALLOW_BOOK_LINK) {
-      $links['book_pdf'] = array('href' => PRINTPDF_PATH .'/book/export/html/'. $node->nid,
+      $links['book_pdf'] = array('href' => PRINTPDF_PATH . '/book/export/html/' . $node->nid,
                                  'title' => $format['text'],
                                  'attributes' => $format['attributes'],
                                  'html' => $format['html'],
@@ -185,13 +262,13 @@ function print_pdf_nodeapi_view(&$node, $teaser, $page) {
       if (empty($query)) $query = NULL;
 
       if ($print_pdf_link_use_alias) {
-        $path = drupal_get_path_alias('node/'. $node->nid);
+        $path = drupal_get_path_alias('node/' . $node->nid);
       }
       else {
         $path = $node->nid;
       }
 
-      $links['print_pdf'] = array('href' => PRINTPDF_PATH .'/'. $path,
+      $links['print_pdf'] = array('href' => PRINTPDF_PATH . '/' . $path,
                                   'title' => $format['text'],
                                   'attributes' => $format['attributes'],
                                   'html' => $format['html'],
@@ -199,60 +276,94 @@ function print_pdf_nodeapi_view(&$node, $teaser, $page) {
       );
     }
     $node->content['links']['print_pdf'] = array(
-      '#type' => 'node_links',
-      '#value' => $links,
+      '#theme' => 'links',
+      '#links' => $links,
+      '#attributes' => array('class' => array('links', 'inline')),
     );
   }
 
-      // Insert content corner links
-      if (($teaser === FALSE) && !empty($print_pdf_link_pos['corner']) &&
-          (preg_match('!^print!i', $_GET['q']) == 0)) {
-        $link = print_pdf_insert_link(NULL, $node);
-        if ($link) {
-          $node->content['print_pdf_link'] = array(
-            '#markup' => "<span class='print-link'>$link</span>",
-            '#weight' => -103,
-          );
-        }
+  // Insert content corner links
+  if ((!empty($print_pdf_link_pos['corner'])) && ($build_mode == 'full')) {
+    $node->content['print_links']['#markup'] .= print_pdf_insert_link(NULL, $node);
+  }
+}
+
+/**
+ * Implements hook_help().
+ */
+function print_pdf_help($path, $arg) {
+  $print_pdf_link_pos = variable_get('print_pdf_link_pos', array(PRINT_PDF_LINK_POS_DEFAULT => PRINT_PDF_LINK_POS_DEFAULT));
+  if (($path !== 'node/%') && !(empty($print_pdf_link_pos['link']) && empty($print_pdf_link_pos['corner']))) {
+    static $output = FALSE;
+
+    if ($output === FALSE) {
+      $output = TRUE;
+
+      $link = print_pdf_insert_link();
+      if ($link) {
+        return "<span class='print-syslink'>$link</span>";
       }
+    }
+  }
+}
+
+/**
+ * Implements hook_node_load().
+ */
+function print_pdf_node_load($nodes, $types) {
+  foreach ($nodes as $node) {
+    _print_pdf_set_node_fields($node);
+  }
 }
 
 /**
- * Implementation of hook_nodeapi_prepare().
+ * Implements hook_node_insert().
  */
-function print_pdf_nodeapi_prepare(&$node, $teaser, $page) {
-  _print_pdf_set_node_fields($node);
+function print_pdf_node_insert($node) {
+  if (user_access('administer print') || user_access('node-specific print configuration')) {
+    if ($node->print_pdf_display === NULL) $node->print_pdf_display = variable_get('print_pdf_display_' . $node->type, PRINT_TYPE_SHOW_LINK_DEFAULT);
+    if ($node->print_pdf_display_comment === NULL) $node->print_pdf_display_comment = variable_get('print_pdf_display_comment_' . $node->type, PRINT_TYPE_COMMENT_LINK_DEFAULT);
+    if ($node->print_pdf_display_urllist === NULL) $node->print_pdf_display_urllist = variable_get('print_pdf_display_urllist_' . $node->type, PRINT_TYPE_URLLIST_DEFAULT);
+
+    _print_pdf_node_conf_modify($node->nid, $node->print_pdf_display, $node->print_pdf_display_comment, $node->print_pdf_display_urllist);
+  }
 }
 
 /**
- * Implementation of hook_nodeapi_update().
+ * Implements hook_node_update().
  */
-function print_pdf_nodeapi_update(&$node, $teaser, $page) {
-  _print_pdf_node_conf_modify($node->nid, $node->print_pdf_display, $node->print_pdf_display_comment, $node->print_pdf_display_urllist);
+function print_pdf_node_update($node) {
+  if (user_access('administer print') || user_access('node-specific print configuration')) {
+    if ($node->print_pdf_display === NULL) $node->print_pdf_display = variable_get('print_pdf_display_' . $node->type, PRINT_TYPE_SHOW_LINK_DEFAULT);
+    if ($node->print_pdf_display_comment === NULL) $node->print_pdf_display_comment = variable_get('print_pdf_display_comment_' . $node->type, PRINT_TYPE_COMMENT_LINK_DEFAULT);
+    if ($node->print_pdf_display_urllist === NULL) $node->print_pdf_display_urllist = variable_get('print_pdf_display_urllist_' . $node->type, PRINT_TYPE_URLLIST_DEFAULT);
+
+    _print_pdf_node_conf_modify($node->nid, $node->print_pdf_display, $node->print_pdf_display_comment, $node->print_pdf_display_urllist);
+  }
 }
 
 /**
- * Implementation of hook_nodeapi_delete().
+ * Implements hook_node_delete().
  */
-function print_pdf_nodeapi_delete(&$node, $teaser, $page) {
+function print_pdf_node_delete($node) {
   db_delete('print_pdf_node_conf')
     ->condition('nid', $node->nid)
     ->execute();
   db_delete('print_pdf_page_counter')
-    ->condition('path', $node->path)
+    ->condition('path', 'node/' . $node->nid)
     ->execute();
 }
 
 /**
- * Implementation of hook_form_alter().
+ * Implements hook_form_alter().
  */
-function print_pdf_form_alter(&$form, $form_state, $form_id) {
+function print_pdf_form_alter(&$form, &$form_state, $form_id) {
   // Add the node-type settings option to activate the PDF version link
-  if ((user_access('administer print') || user_access('node-specific print configuration')) && 
+  if ((user_access('administer print') || user_access('node-specific print configuration')) &&
       (($form_id == 'node_type_form') || !empty($form['#node_edit_form']))) {
     $form['print']['pdf_label'] = array(
       '#type' => 'markup',
-      '#markup' => '<p><strong>'. t('PDF version') .'</strong></p>',
+      '#markup' => '<p><strong>' . t('PDF version') . '</strong></p>',
     );
 
     $form['print']['print_pdf_display'] = array(
@@ -269,14 +380,15 @@ function print_pdf_form_alter(&$form, $form_state, $form_id) {
     );
 
     if ($form_id == 'node_type_form') {
-      $form['print']['print_pdf_display']['#default_value'] = variable_get('print_pdf_display_'. $form['#node_type']->type, PRINT_TYPE_SHOW_LINK_DEFAULT);
-      $form['print']['print_pdf_display_comment']['#default_value'] = variable_get('print_pdf_display_comment_'. $form['#node_type']->type, PRINT_TYPE_COMMENT_LINK_DEFAULT);
-      $form['print']['print_pdf_display_urllist']['#default_value'] = variable_get('print_pdf_display_urllist_'. $form['#node_type']->type, PRINT_TYPE_URLLIST_DEFAULT);
+      $form['print']['print_pdf_display']['#default_value'] = variable_get('print_pdf_display_' . $form['#node_type']->type, PRINT_TYPE_SHOW_LINK_DEFAULT);
+      $form['print']['print_pdf_display_comment']['#default_value'] = variable_get('print_pdf_display_comment_' . $form['#node_type']->type, PRINT_TYPE_COMMENT_LINK_DEFAULT);
+      $form['print']['print_pdf_display_urllist']['#default_value'] = variable_get('print_pdf_display_urllist_' . $form['#node_type']->type, PRINT_TYPE_URLLIST_DEFAULT);
     }
     else {
-      $form['print']['print_pdf_display']['#default_value'] = $form['#node']->print_pdf_display;
-      $form['print']['print_pdf_display_comment']['#default_value'] = $form['#node']->print_pdf_display_comment;
-      $form['print']['print_pdf_display_urllist']['#default_value'] = $form['#node']->print_pdf_display_urllist;
+      $node = $form['#node'];
+      $form['print']['print_pdf_display']['#default_value'] = isset($node->print_pdf_display) ? $node->print_pdf_display : variable_get('print_pdf_display_' . $node->type, PRINT_TYPE_SHOW_LINK_DEFAULT);
+      $form['print']['print_pdf_display_comment']['#default_value'] = isset($node->print_pdf_display_comment) ? $node->print_pdf_display_comment : variable_get('print_pdf_display_comment_' . $node->type, PRINT_TYPE_COMMENT_LINK_DEFAULT);
+      $form['print']['print_pdf_display_urllist']['#default_value'] = isset($node->print_pdf_display_urllist) ? $node->print_pdf_display_urllist : variable_get('print_pdf_display_urllist_' . $node->type, PRINT_TYPE_URLLIST_DEFAULT);
     }
   }
 }
@@ -290,14 +402,14 @@ function print_pdf_form_alter(&$form, $form_state, $form_id) {
 function _print_pdf_set_node_fields(&$node) {
   if (isset($node->nid)) {
     $res = db_query("SELECT link, comments, url_list FROM {print_pdf_node_conf} WHERE nid = :nid", array(':nid' => $node->nid))
-             ->fetch();
+              ->fetch();
   }
   else {
     $res = FALSE;
   }
-  $node->print_pdf_display = $res ? intval($res->link) : PRINT_TYPE_SHOW_LINK_DEFAULT;
-  $node->print_pdf_display_comment = $res ? intval($res->comments) : PRINT_TYPE_COMMENT_LINK_DEFAULT;
-  $node->print_pdf_display_urllist = $res ? intval($res->url_list) : PRINT_TYPE_URLLIST_DEFAULT;
+  $node->print_pdf_display = $res ? intval($res->link) : variable_get('print_pdf_display_' . $node->type, PRINT_TYPE_SHOW_LINK_DEFAULT);
+  $node->print_pdf_display_comment = $res ? intval($res->comments) : variable_get('print_pdf_display_comment_' . $node->type, PRINT_TYPE_COMMENT_LINK_DEFAULT);
+  $node->print_pdf_display_urllist = $res ? intval($res->url_list) : variable_get('print_pdf_display_urllist_' . $node->type, PRINT_TYPE_URLLIST_DEFAULT);
 }
 
 /**
@@ -314,13 +426,6 @@ function _print_pdf_set_node_fields(&$node) {
  *   value of the url_list field (0 or 1)
  */
 function _print_pdf_node_conf_modify($nid, $link, $comments, $url_list) {
-  if (($link == PRINT_TYPE_SHOW_LINK_DEFAULT) && ($comments == PRINT_TYPE_COMMENT_LINK_DEFAULT) &&
-      ($url_list == PRINT_TYPE_URLLIST_DEFAULT)) {
-    db_delete('print_pdf_node_conf')
-      ->condition('nid', $nid)
-      ->execute();
-  }
-  else {
     db_merge('print_pdf_node_conf')
       ->key(array('nid' => $nid))
       ->fields(array(
@@ -329,7 +434,6 @@ function _print_pdf_node_conf_modify($nid, $link, $comments, $url_list) {
         'url_list' => $url_list,
       ))
       ->execute();
-  }
 }
 
 /**
@@ -343,9 +447,9 @@ function theme_print_pdf_format_link() {
   $print_pdf_link_class  = variable_get('print_pdf_link_class', PRINT_PDF_LINK_CLASS_DEFAULT);
   $print_pdf_content_disposition = variable_get('print_pdf_content_disposition', PRINT_PDF_CONTENT_DISPOSITION_DEFAULT);
   $print_pdf_show_link = variable_get('print_pdf_show_link', PRINT_PDF_SHOW_LINK_DEFAULT);
-  $print_pdf_link_text = variable_get('print_pdf_link_text', t('PDF version'));
+  $print_pdf_link_text = filter_xss(variable_get('print_pdf_link_text', t('PDF version')));
 
-  $img = drupal_get_path('module', 'print') .'/icons/pdf_icon.gif';
+  $img = drupal_get_path('module', 'print') . '/icons/pdf_icon.gif';
   $title = t('Display a PDF version of this page.');
   $class = strip_tags($print_pdf_link_class);
   $new_window = ($print_pdf_content_disposition == 1);
@@ -375,7 +479,7 @@ function theme_print_pdf_format_link() {
 function print_pdf_insert_link($path = NULL, $node = NULL) {
   if ($node !== NULL) {
     $nid = $node->nid;
-    $path = 'node/'. $nid;
+    $path = 'node/' . $nid;
     $allowed_type = print_pdf_link_allowed(array('node' => $node));
   }
   else {
@@ -392,7 +496,7 @@ function print_pdf_insert_link($path = NULL, $node = NULL) {
   if ($allowed_type) {
     if ($nid !== NULL) {
       if ($allowed_type === PRINT_ALLOW_BOOK_LINK) {
-        $path = 'book/export/html/'. $nid;
+        $path = 'book/export/html/' . $nid;
       }
       else {
         if (variable_get('print_pdf_link_use_alias', PRINT_PDF_LINK_USE_ALIAS_DEFAULT)) {
@@ -402,7 +506,7 @@ function print_pdf_insert_link($path = NULL, $node = NULL) {
           $path = $nid;
         }
       }
-      $path = PRINTPDF_PATH .'/'. $path;
+      $path = PRINTPDF_PATH . '/' . $path;
       $query = print_query_string_encode($_GET, array('q'));
       if (empty($query)) {
         $query = NULL;
@@ -411,9 +515,9 @@ function print_pdf_insert_link($path = NULL, $node = NULL) {
     else {
       $query = NULL;
     }
-    drupal_add_css(drupal_get_path('module', 'print') .'/css/printlinks.css');
+    drupal_add_css(drupal_get_path('module', 'print') . '/css/printlinks.css');
     $format = theme('print_pdf_format_link');
-    return '<span class="print_pdf">'. l($format['text'], $path, array('attributes' => $format['attributes'], 'query' => $query, 'absolute' => TRUE, 'html' => $format['html'])) .'</span>';
+    return '<span class="print_pdf">' . l($format['text'], $path, array('attributes' => $format['attributes'], 'query' => $query, 'absolute' => TRUE, 'html' => $format['html'])) . '</span>';
   }
   else {
     return FALSE;
@@ -433,13 +537,14 @@ function print_pdf_insert_link($path = NULL, $node = NULL) {
  */
 function print_pdf_link_allowed($args) {
   $print_pdf_pdf_tool = variable_get('print_pdf_pdf_tool', PRINT_PDF_PDF_TOOL_DEFAULT);
-  if (!empty($args['teaser']) || !user_access('access print') || (empty($print_pdf_pdf_tool))) {
-    // If showing only the teaser or the user is not allowed or link is disabled
+  if ((!empty($args['teaser']) && !variable_get('print_pdf_link_teaser', PRINT_PDF_LINK_TEASER_DEFAULT))
+      || !user_access('access PDF version') || (empty($print_pdf_pdf_tool))) {
+    // If the teaser link is disabled or the user is not allowed
     return FALSE;
   }
   if (!empty($args['path'])) {
     $nid = preg_replace('!^node/!', '', drupal_get_normal_path($args['path']));
-    if (is_numeric($nid)) {
+    if (ctype_digit($nid)) {
       $args['node'] = node_load($nid);
     }
   }
@@ -447,38 +552,34 @@ function print_pdf_link_allowed($args) {
     static $node_type = FALSE;
 
     $node = $args['node'];
-    if ($node_type === FALSE) {
-      if (isset($node->type)) {
-        $node_type = $node->type;
-      }
-      else {
-        $node_type = '';
-      }
+    if (isset($node->type)) {
+      $node_type = $node->type;
     }
     // Node
     $print_pdf_node_link_visibility = variable_get('print_pdf_node_link_visibility', PRINT_PDF_NODE_LINK_VISIBILITY_DEFAULT);
     $print_pdf_node_link_pages = variable_get('print_pdf_node_link_pages', PRINT_PDF_NODE_LINK_PAGES_DEFAULT);
 
-    if (!empty($node->printing) ||
-        !_print_page_match($print_pdf_node_link_visibility, $print_pdf_node_link_pages)) {
-      // Page not in visibility list or we are working!
+    if (!_print_page_match($print_pdf_node_link_visibility, "node/" . $node->nid, $print_pdf_node_link_pages)) {
+      // Page not in visibility list
       return FALSE;
     }
     elseif (isset($args['type']) && ($args['type'] == 'comment') && isset($node_type)) {
       // Link is for a comment, return the configured setting
-      $res = db_query("SELECT comments FROM {print_pdf_node_conf} WHERE nid = :nid", array(':nid' => $node->nid))
-               ->fetch();
-      $print_display_comment = $res ? intval($res->comments) : PRINT_TYPE_COMMENT_LINK_DEFAULT;
-      if (($print_display_comment) ||
-          variable_get('print_pdf_display_comment_'. $node_type, PRINT_TYPE_COMMENT_LINK_DEFAULT)) {
+      // Cache this statically to avoid duplicate queries for every comment.
+      static $res = array();
+      if (!isset($res[$node->nid])) {
+        $res[$node->nid] = db_query("SELECT comments FROM {print_pdf_node_conf} WHERE nid = :nid", array(':nid' => $node->nid))
+                                    ->fetch();
+      }
+      $print_display_comment = $res ? intval($res[$node->nid]->comments) : variable_get('print_pdf_display_comment_' . $node_type, PRINT_TYPE_COMMENT_LINK_DEFAULT);
+      if ($print_display_comment) {
         return PRINT_ALLOW_NORMAL_LINK;
       }
     }
     else {
       // Node link
-      if ((!$node->print_pdf_display) || (isset($node_type) &&
-          !variable_get('print_pdf_display_'. $node_type, PRINT_TYPE_SHOW_LINK_DEFAULT))) {
-        // Link for this node type is disabled
+      if (!$node->print_pdf_display) {
+        // Link for this node is disabled
         return FALSE;
       }
       elseif (isset($node->book)) {
@@ -504,7 +605,39 @@ function print_pdf_link_allowed($args) {
     $print_pdf_sys_link_visibility = variable_get('print_pdf_sys_link_visibility', PRINT_PDF_SYS_LINK_VISIBILITY_DEFAULT);
     $print_pdf_sys_link_pages = variable_get('print_pdf_sys_link_pages', PRINT_PDF_SYS_LINK_PAGES_DEFAULT);
 
-    return _print_page_match($print_pdf_sys_link_visibility, $print_pdf_sys_link_pages);
+    return _print_page_match($print_pdf_sys_link_visibility, $_GET['q'], $print_pdf_sys_link_pages);
   }
   return FALSE;
 }
+
+/**
+ * Find out the version of the TCPDF library
+ */
+function _print_pdf_tcpdf_version() {
+  $print_pdf_pdf_tool = variable_get('print_pdf_pdf_tool', PRINT_PDF_PDF_TOOL_DEFAULT);
+  require_once(DRUPAL_ROOT . '/' . $print_pdf_pdf_tool);
+
+  $pdf = new TCPDF();
+
+  return $pdf->getTCPDFVersion();
+}
+
+/**
+ * Find out the version of the wkhtmltopdf library
+ */
+function _print_pdf_wkhtmltopdf_version() {
+  $print_pdf_pdf_tool = variable_get('print_pdf_pdf_tool', PRINT_PDF_PDF_TOOL_DEFAULT);
+  $descriptor = array(0 => array('pipe', 'r'), 1 => array('pipe', 'w'), 2 => array('pipe', 'w'));
+
+  $cmd = realpath($print_pdf_pdf_tool) . ' --version';
+  $process = proc_open($cmd, $descriptor, $pipes, NULL, NULL);
+  if (is_resource($process)) {
+    $out = preg_match('!.*?(\d+\.\d+\.\d+).*$!m', stream_get_contents($pipes[1]), $matches);
+    fclose($pipes[0]);
+    fclose($pipes[1]);
+    fclose($pipes[2]);
+    $retval = proc_terminate($process);
+  }
+
+  return ($matches[1]);
+}