diff --git a/config/example-config.php b/config/example-config.php
index 8942b67c..ef1cbd88 100644
--- a/config/example-config.php
+++ b/config/example-config.php
@@ -198,6 +198,16 @@ $c->admin_email ='calendar-admin@example.com';
 //include('drivers_ldap.php');
 
 
+/**
+* Authentication against PAM using the Squid helper script.
+*/
+//$c->authenticate_hook = array(
+//    'call'   => 'SQUID_PAM_check',
+//    'config' =>  array( 'script' => '/usr/bin/pam_auth', 'email_base' => 'example.com' );
+//    );
+//include('drivers_squid_pam.php');
+
+
 /**
 * The default locale will be "en_NZ";
 * If you are in a non-English locale, you can set the default_locale
diff --git a/inc/drivers_squid_pam.php b/inc/drivers_squid_pam.php
new file mode 100644
index 00000000..39230ad6
--- /dev/null
+++ b/inc/drivers_squid_pam.php
@@ -0,0 +1,83 @@
+<?php
+/**
+* Manages PAM repository connection with SQUID help
+*
+* @package   davical
+* @category Technical
+* @subpackage   ldap
+* @author    Eric Seigne <eric.seigne@ryxeo.com>
+* @copyright Eric Seigne
+* @license   http://gnu.org/copyleft/gpl.html GNU GPL v2
+*/
+
+require_once("auth-functions.php");
+
+class squidPamDrivers
+{
+  /**#@+
+  * @access private
+  */
+
+  /**#@-*/
+
+
+  /**
+  * Constructor.
+  * @param string $config path where /usr/lib/squid/pam_auth is
+  */
+  function squidPamDrivers($config){
+      $this->__construct($config);
+  }
+
+
+  /**
+  * The constructor
+  *
+  * @param string $config path where /usr/lib/squid/pam_auth is
+  */
+  function __construct($config)
+  {
+      global $c;
+      if (! file_exists($config)){
+          $c->messages[] = sprintf(i18n( "drivers_squid_pam : Unable to find %s file"), $config );
+          $this->valid=false;
+          return ;
+      }
+  }
+}
+
+
+/**
+* Check the username / password against the PAM system
+*/
+function SQUID_PAM_check($username, $password ){
+  global $c;
+
+  $cmd = "echo '" . $username . "' '" . $password . "' | " . $c->authenticate_hook['config']['script'] . " -n common-auth";
+  $auth_result = exec($cmd);
+  if ( $auth_result == "OK") {
+    if ( $usr = getUserByName($username) ) {
+      return $usr;
+    }
+    else {
+      dbg_error_log( "PAM", "user %s doesn't exist in local DB, we need to create it",$username );
+      $fullname = trim( exec("getent passwd | grep ^" . $username ." | cut -d \":\" -f5"), ' ,' );
+      $usr = (object) array(
+              'user_no' => 0,
+              'username' => $username,
+              'active' => 't',
+              'email' => $username . "@" . $c->authenticate_hook['config']['email_base'],
+              'updated' => date(),
+              'fullname' => $fullname
+      );
+
+      UpdateUserFromExternal( $usr );
+      return $usr;
+    }
+  }
+  else {
+    dbg_error_log( "PAM", "User %s is not a valid username (or password was wrong)", $username );
+    return false;
+  }
+
+}