]> git.mxchange.org Git - quix0rs-gnu-social.git/commitdiff
Bump to phpCAS 1.1.0RC6
authorCraig Andrews <candrews@integralblue.com>
Wed, 3 Mar 2010 04:24:50 +0000 (23:24 -0500)
committerCraig Andrews <candrews@integralblue.com>
Wed, 3 Mar 2010 04:25:34 +0000 (23:25 -0500)
15 files changed:
plugins/CasAuthentication/extlib/CAS.php
plugins/CasAuthentication/extlib/CAS/PGTStorage/pgt-db.php
plugins/CasAuthentication/extlib/CAS/PGTStorage/pgt-file.php
plugins/CasAuthentication/extlib/CAS/PGTStorage/pgt-main.php
plugins/CasAuthentication/extlib/CAS/client.php
plugins/CasAuthentication/extlib/CAS/domxml-php4-php5.php [deleted file]
plugins/CasAuthentication/extlib/CAS/domxml-php4-to-php5.php [new file with mode: 0644]
plugins/CasAuthentication/extlib/CAS/languages/catalan.php
plugins/CasAuthentication/extlib/CAS/languages/english.php
plugins/CasAuthentication/extlib/CAS/languages/french.php
plugins/CasAuthentication/extlib/CAS/languages/german.php
plugins/CasAuthentication/extlib/CAS/languages/greek.php
plugins/CasAuthentication/extlib/CAS/languages/japanese.php
plugins/CasAuthentication/extlib/CAS/languages/languages.php
plugins/CasAuthentication/extlib/CAS/languages/spanish.php

index f5ea0b12a7b2094fd580afbba9c41adf1eafaee7..e754374198d1d9aa3669ba7464b0aec432c84d5b 100644 (file)
-<?php
-
-// commented in 0.4.22-RC2 for Sylvain Derosiaux
-// error_reporting(E_ALL ^ E_NOTICE);
-
-//
-// hack by Vangelis Haniotakis to handle the absence of $_SERVER['REQUEST_URI'] in IIS
-//
-if (!$_SERVER['REQUEST_URI']) {
-       $_SERVER['REQUEST_URI'] = $_SERVER['SCRIPT_NAME'].'?'.$_SERVER['QUERY_STRING'];
-}
-
-//
-// another one by Vangelis Haniotakis also to make phpCAS work with PHP5
-//
-if (version_compare(PHP_VERSION,'5','>=')) {
-       require_once(dirname(__FILE__).'/CAS/domxml-php4-php5.php');
-}
-
-/**
- * @file CAS/CAS.php
- * Interface class of the phpCAS library
- *
- * @ingroup public
- */
-
-// ########################################################################
-//  CONSTANTS
-// ########################################################################
-
-// ------------------------------------------------------------------------
-//  CAS VERSIONS
-// ------------------------------------------------------------------------
-
-/**
- * phpCAS version. accessible for the user by phpCAS::getVersion().
- */
-define('PHPCAS_VERSION','1.0.1');
-
-// ------------------------------------------------------------------------
-//  CAS VERSIONS
-// ------------------------------------------------------------------------
- /**
-  * @addtogroup public
-  * @{
-  */
-
-/**
- * CAS version 1.0
- */
-define("CAS_VERSION_1_0",'1.0');
-/*!
- * CAS version 2.0
- */
-define("CAS_VERSION_2_0",'2.0');
-
-/** @} */
- /**
-  * @addtogroup publicPGTStorage
-  * @{
-  */
-// ------------------------------------------------------------------------
-//  FILE PGT STORAGE
-// ------------------------------------------------------------------------
- /**
-  * Default path used when storing PGT's to file
-  */
-define("CAS_PGT_STORAGE_FILE_DEFAULT_PATH",'/tmp');
-/**
- * phpCAS::setPGTStorageFile()'s 2nd parameter to write plain text files
- */
-define("CAS_PGT_STORAGE_FILE_FORMAT_PLAIN",'plain');
-/**
- * phpCAS::setPGTStorageFile()'s 2nd parameter to write xml files
- */
-define("CAS_PGT_STORAGE_FILE_FORMAT_XML",'xml');
-/**
- * Default format used when storing PGT's to file
- */
-define("CAS_PGT_STORAGE_FILE_DEFAULT_FORMAT",CAS_PGT_STORAGE_FILE_FORMAT_PLAIN);
-// ------------------------------------------------------------------------
-//  DATABASE PGT STORAGE
-// ------------------------------------------------------------------------
- /**
-  * default database type when storing PGT's to database
-  */
-define("CAS_PGT_STORAGE_DB_DEFAULT_DATABASE_TYPE",'mysql');
-/**
- * default host when storing PGT's to database
- */
-define("CAS_PGT_STORAGE_DB_DEFAULT_HOSTNAME",'localhost');
-/**
- * default port when storing PGT's to database
- */
-define("CAS_PGT_STORAGE_DB_DEFAULT_PORT",'');
-/**
- * default database when storing PGT's to database
- */
-define("CAS_PGT_STORAGE_DB_DEFAULT_DATABASE",'phpCAS');
-/**
- * default table when storing PGT's to database
- */
-define("CAS_PGT_STORAGE_DB_DEFAULT_TABLE",'pgt');
-
-/** @} */
-// ------------------------------------------------------------------------
-// SERVICE ACCESS ERRORS
-// ------------------------------------------------------------------------
- /**
-  * @addtogroup publicServices
-  * @{
-  */
-
-/**
- * phpCAS::service() error code on success
- */
-define("PHPCAS_SERVICE_OK",0);
-/**
- * phpCAS::service() error code when the PT could not retrieve because
- * the CAS server did not respond.
- */
-define("PHPCAS_SERVICE_PT_NO_SERVER_RESPONSE",1);
-/**
- * phpCAS::service() error code when the PT could not retrieve because
- * the response of the CAS server was ill-formed.
- */
-define("PHPCAS_SERVICE_PT_BAD_SERVER_RESPONSE",2);
-/**
- * phpCAS::service() error code when the PT could not retrieve because
- * the CAS server did not want to.
- */
-define("PHPCAS_SERVICE_PT_FAILURE",3);
-/**
- * phpCAS::service() error code when the service was not available.
- */
-define("PHPCAS_SERVICE_NOT AVAILABLE",4);
-
-/** @} */
-// ------------------------------------------------------------------------
-//  LANGUAGES
-// ------------------------------------------------------------------------
- /**
-  * @addtogroup publicLang
-  * @{
-  */
-
-define("PHPCAS_LANG_ENGLISH",    'english');
-define("PHPCAS_LANG_FRENCH",     'french');
-define("PHPCAS_LANG_GREEK",      'greek');
-define("PHPCAS_LANG_GERMAN",     'german');
-define("PHPCAS_LANG_JAPANESE",   'japanese');
-define("PHPCAS_LANG_SPANISH",    'spanish');
-define("PHPCAS_LANG_CATALAN",    'catalan');
-
-/** @} */
-
-/**
- * @addtogroup internalLang
- * @{
- */
-
-/**
- * phpCAS default language (when phpCAS::setLang() is not used)
- */
-define("PHPCAS_LANG_DEFAULT", PHPCAS_LANG_ENGLISH);
-
-/** @} */
-// ------------------------------------------------------------------------
-//  DEBUG
-// ------------------------------------------------------------------------
- /**
-  * @addtogroup publicDebug
-  * @{
-  */
-
-/**
- * The default directory for the debug file under Unix.
- */
-define('DEFAULT_DEBUG_DIR','/tmp/');
-
-/** @} */
-// ------------------------------------------------------------------------
-//  MISC
-// ------------------------------------------------------------------------
- /**
-  * @addtogroup internalMisc
-  * @{
-  */
-
-/**
- * This global variable is used by the interface class phpCAS.
- *
- * @hideinitializer
- */
-$GLOBALS['PHPCAS_CLIENT']  = null;
-
-/**
- * This global variable is used to store where the initializer is called from 
- * (to print a comprehensive error in case of multiple calls).
- *
- * @hideinitializer
- */
-$GLOBALS['PHPCAS_INIT_CALL'] = array('done' => FALSE,
-       'file' => '?',
-       'line' => -1,
-       'method' => '?');
-
-/**
- * This global variable is used to store where the method checking
- * the authentication is called from (to print comprehensive errors)
- *
- * @hideinitializer
- */
-$GLOBALS['PHPCAS_AUTH_CHECK_CALL'] = array('done' => FALSE,
-       'file' => '?',
-       'line' => -1,
-       'method' => '?',
-       'result' => FALSE);
-
-/**
- * This global variable is used to store phpCAS debug mode.
- *
- * @hideinitializer
- */
-$GLOBALS['PHPCAS_DEBUG']  = array('filename' => FALSE,
-       'indent' => 0,
-       'unique_id' => '');
-
-/** @} */
-
-// ########################################################################
-//  CLIENT CLASS
-// ########################################################################
-
-// include client class
-include_once(dirname(__FILE__).'/CAS/client.php');
-
-// ########################################################################
-//  INTERFACE CLASS
-// ########################################################################
-
-/**
- * @class phpCAS
- * The phpCAS class is a simple container for the phpCAS library. It provides CAS
- * authentication for web applications written in PHP.
- *
- * @ingroup public
- * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>
- *
- * \internal All its methods access the same object ($PHPCAS_CLIENT, declared 
- * at the end of CAS/client.php).
- */
-
-
-
-class phpCAS
-{
-       
-       // ########################################################################
-       //  INITIALIZATION
-       // ########################################################################
-       
-       /**
-        * @addtogroup publicInit
-        * @{
-        */
-       
-       /**
-        * phpCAS client initializer.
-        * @note Only one of the phpCAS::client() and phpCAS::proxy functions should be
-        * called, only once, and before all other methods (except phpCAS::getVersion()
-        * and phpCAS::setDebug()).
-        *
-        * @param $server_version the version of the CAS server
-        * @param $server_hostname the hostname of the CAS server
-        * @param $server_port the port the CAS server is running on
-        * @param $server_uri the URI the CAS server is responding on
-        * @param $start_session Have phpCAS start PHP sessions (default true)
-        *
-        * @return a newly created CASClient object
-        */
-       function client($server_version,
-                                       $server_hostname,
-                                       $server_port,
-                                       $server_uri,
-                                       $start_session = true)
-               {
-               global $PHPCAS_CLIENT, $PHPCAS_INIT_CALL;
-               
-               phpCAS::traceBegin();
-               if ( is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error($PHPCAS_INIT_CALL['method'].'() has already been called (at '.$PHPCAS_INIT_CALL['file'].':'.$PHPCAS_INIT_CALL['line'].')');
-               }
-               if ( gettype($server_version) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $server_version (should be `string\')');
-               }
-               if ( gettype($server_hostname) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $server_hostname (should be `string\')');
-               }
-               if ( gettype($server_port) != 'integer' ) {
-                       phpCAS::error('type mismatched for parameter $server_port (should be `integer\')');
-               }
-               if ( gettype($server_uri) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $server_uri (should be `string\')');
-               }
-               
-               // store where the initialzer is called from
-               $dbg = phpCAS::backtrace();
-               $PHPCAS_INIT_CALL = array('done' => TRUE,
-                       'file' => $dbg[0]['file'],
-                       'line' => $dbg[0]['line'],
-                       'method' => __CLASS__.'::'.__FUNCTION__);
-               
-               // initialize the global object $PHPCAS_CLIENT
-               $PHPCAS_CLIENT = new CASClient($server_version,FALSE/*proxy*/,$server_hostname,$server_port,$server_uri,$start_session);
-               phpCAS::traceEnd();
-               }
-       
-       /**
-        * phpCAS proxy initializer.
-        * @note Only one of the phpCAS::client() and phpCAS::proxy functions should be
-        * called, only once, and before all other methods (except phpCAS::getVersion()
-        * and phpCAS::setDebug()).
-        *
-        * @param $server_version the version of the CAS server
-        * @param $server_hostname the hostname of the CAS server
-        * @param $server_port the port the CAS server is running on
-        * @param $server_uri the URI the CAS server is responding on
-        * @param $start_session Have phpCAS start PHP sessions (default true)
-        *
-        * @return a newly created CASClient object
-        */
-       function proxy($server_version,
-                                  $server_hostname,
-                                  $server_port,
-                                  $server_uri,
-                                  $start_session = true)
-               {
-               global $PHPCAS_CLIENT, $PHPCAS_INIT_CALL;
-               
-               phpCAS::traceBegin();
-               if ( is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error($PHPCAS_INIT_CALL['method'].'() has already been called (at '.$PHPCAS_INIT_CALL['file'].':'.$PHPCAS_INIT_CALL['line'].')');
-               }
-               if ( gettype($server_version) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $server_version (should be `string\')');
-               }
-               if ( gettype($server_hostname) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $server_hostname (should be `string\')');
-               }
-               if ( gettype($server_port) != 'integer' ) {
-                       phpCAS::error('type mismatched for parameter $server_port (should be `integer\')');
-               }
-               if ( gettype($server_uri) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $server_uri (should be `string\')');
-               }
-               
-               // store where the initialzer is called from
-               $dbg = phpCAS::backtrace();
-               $PHPCAS_INIT_CALL = array('done' => TRUE,
-                       'file' => $dbg[0]['file'],
-                       'line' => $dbg[0]['line'],
-                       'method' => __CLASS__.'::'.__FUNCTION__);
-               
-               // initialize the global object $PHPCAS_CLIENT
-               $PHPCAS_CLIENT = new CASClient($server_version,TRUE/*proxy*/,$server_hostname,$server_port,$server_uri,$start_session);
-               phpCAS::traceEnd();
-               }
-       
-       /** @} */
-       // ########################################################################
-       //  DEBUGGING
-       // ########################################################################
-       
-       /**
-        * @addtogroup publicDebug
-        * @{
-        */
-       
-       /**
-        * Set/unset debug mode
-        *
-        * @param $filename the name of the file used for logging, or FALSE to stop debugging.
-        */
-       function setDebug($filename='')
-               {
-               global $PHPCAS_DEBUG;
-               
-               if ( $filename != FALSE && gettype($filename) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $dbg (should be FALSE or the name of the log file)');
-               }
-               
-               if ( empty($filename) ) {
-                       if ( preg_match('/^Win.*/',getenv('OS')) ) {
-                               if ( isset($_ENV['TMP']) ) {
-                                       $debugDir = $_ENV['TMP'].'/';
-                               } else if ( isset($_ENV['TEMP']) ) {
-                                       $debugDir = $_ENV['TEMP'].'/';
-                               } else {
-                                       $debugDir = '';
-                               }
-                       } else {
-                               $debugDir = DEFAULT_DEBUG_DIR;
-                       }
-                       $filename = $debugDir . 'phpCAS.log';
-               }
-               
-               if ( empty($PHPCAS_DEBUG['unique_id']) ) {
-                       $PHPCAS_DEBUG['unique_id'] = substr(strtoupper(md5(uniqid(''))),0,4);
-               }
-               
-               $PHPCAS_DEBUG['filename'] = $filename;
-               
-               phpCAS::trace('START ******************');
-               }
-       
-       /** @} */
-       /**
-        * @addtogroup internalDebug
-        * @{
-        */
-       
-       /**
-        * This method is a wrapper for debug_backtrace() that is not available 
-        * in all PHP versions (>= 4.3.0 only)
-        */
-       function backtrace()
-               {
-               if ( function_exists('debug_backtrace') ) {
-                       return debug_backtrace();
-               } else {
-                       // poor man's hack ... but it does work ...
-                       return array();
-               }
-               }
-       
-       /**
-        * Logs a string in debug mode.
-        *
-        * @param $str the string to write
-        *
-        * @private
-        */
-       function log($str)
-               {
-               $indent_str = ".";
-               global $PHPCAS_DEBUG;
-               
-               if ( $PHPCAS_DEBUG['filename'] ) {
-                       for ($i=0;$i<$PHPCAS_DEBUG['indent'];$i++) {
-                               $indent_str .= '|    ';
-                       }
-                       error_log($PHPCAS_DEBUG['unique_id'].' '.$indent_str.$str."\n",3,$PHPCAS_DEBUG['filename']);
-               }
-               
-               }
-       
-       /**
-        * This method is used by interface methods to print an error and where the function
-        * was originally called from.
-        *
-        * @param $msg the message to print
-        *
-        * @private
-        */
-       function error($msg)
-               {
-               $dbg = phpCAS::backtrace();
-               $function = '?';
-               $file = '?';
-               $line = '?';
-               if ( is_array($dbg) ) {
-                       for ( $i=1; $i<sizeof($dbg); $i++) {
-                               if ( is_array($dbg[$i]) ) {
-                                       if ( $dbg[$i]['class'] == __CLASS__ ) {
-                                               $function = $dbg[$i]['function'];
-                                               $file = $dbg[$i]['file'];
-                                               $line = $dbg[$i]['line'];
-                                       }
-                               }
-                       }
-               }
-               echo "<br />\n<b>phpCAS error</b>: <font color=\"FF0000\"><b>".__CLASS__."::".$function.'(): '.htmlentities($msg)."</b></font> in <b>".$file."</b> on line <b>".$line."</b><br />\n";
-               phpCAS::trace($msg);
-               phpCAS::traceExit();
-               exit();
-               }
-       
-       /**
-        * This method is used to log something in debug mode.
-        */
-       function trace($str)
-               {
-               $dbg = phpCAS::backtrace();
-               phpCAS::log($str.' ['.basename($dbg[1]['file']).':'.$dbg[1]['line'].']');
-               }
-       
-       /**
-        * This method is used to indicate the start of the execution of a function in debug mode.
-        */
-       function traceBegin()
-               {
-               global $PHPCAS_DEBUG;
-               
-               $dbg = phpCAS::backtrace();
-               $str = '=> ';
-               if ( !empty($dbg[2]['class']) ) {
-                       $str .= $dbg[2]['class'].'::';
-               }
-               $str .= $dbg[2]['function'].'(';      
-               if ( is_array($dbg[2]['args']) ) {
-                       foreach ($dbg[2]['args'] as $index => $arg) {
-                               if ( $index != 0 ) {
-                                       $str .= ', ';
-                               }
-                               $str .= str_replace("\n","",var_export($arg,TRUE));
-                       }
-               }
-               $str .= ') ['.basename($dbg[2]['file']).':'.$dbg[2]['line'].']';
-               phpCAS::log($str);
-               $PHPCAS_DEBUG['indent'] ++;
-               }
-       
-       /**
-        * This method is used to indicate the end of the execution of a function in debug mode.
-        *
-        * @param $res the result of the function
-        */
-       function traceEnd($res='')
-               {
-               global $PHPCAS_DEBUG;
-               
-               $PHPCAS_DEBUG['indent'] --;
-               $dbg = phpCAS::backtrace();
-               $str = '';
-               $str .= '<= '.str_replace("\n","",var_export($res,TRUE));
-               phpCAS::log($str);
-               }
-       
-       /**
-        * This method is used to indicate the end of the execution of the program
-        */
-       function traceExit()
-               {
-               global $PHPCAS_DEBUG;
-               
-               phpCAS::log('exit()');
-               while ( $PHPCAS_DEBUG['indent'] > 0 ) {
-                       phpCAS::log('-');
-                       $PHPCAS_DEBUG['indent'] --;
-               }
-               }
-       
-       /** @} */
-       // ########################################################################
-       //  INTERNATIONALIZATION
-       // ########################################################################
-       /**
-        * @addtogroup publicLang
-        * @{
-        */
-       
-       /**
-        * This method is used to set the language used by phpCAS. 
-        * @note Can be called only once.
-        *
-        * @param $lang a string representing the language.
-        *
-        * @sa PHPCAS_LANG_FRENCH, PHPCAS_LANG_ENGLISH
-        */
-       function setLang($lang)
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               if ( gettype($lang) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $lang (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setLang($lang);
-               }
-       
-       /** @} */
-       // ########################################################################
-       //  VERSION
-       // ########################################################################
-       /**
-        * @addtogroup public
-        * @{
-        */
-       
-       /**
-        * This method returns the phpCAS version.
-        *
-        * @return the phpCAS version.
-        */
-       function getVersion()
-               {
-               return PHPCAS_VERSION;
-               }
-       
-       /** @} */
-       // ########################################################################
-       //  HTML OUTPUT
-       // ########################################################################
-       /**
-        * @addtogroup publicOutput
-        * @{
-        */
-       
-       /**
-        * This method sets the HTML header used for all outputs.
-        *
-        * @param $header the HTML header.
-        */
-       function setHTMLHeader($header)
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               if ( gettype($header) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $header (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setHTMLHeader($header);
-               }
-       
-       /**
-        * This method sets the HTML footer used for all outputs.
-        *
-        * @param $footer the HTML footer.
-        */
-       function setHTMLFooter($footer)
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               if ( gettype($footer) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $footer (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setHTMLFooter($footer);
-               }
-       
-       /** @} */
-       // ########################################################################
-       //  PGT STORAGE
-       // ########################################################################
-       /**
-        * @addtogroup publicPGTStorage
-        * @{
-        */
-       
-       /**
-        * This method is used to tell phpCAS to store the response of the
-        * CAS server to PGT requests onto the filesystem. 
-        *
-        * @param $format the format used to store the PGT's (`plain' and `xml' allowed)
-        * @param $path the path where the PGT's should be stored
-        */
-       function setPGTStorageFile($format='',
-               $path='')
-               {
-               global $PHPCAS_CLIENT,$PHPCAS_AUTH_CHECK_CALL;
-               
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( !$PHPCAS_CLIENT->isProxy() ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( $PHPCAS_AUTH_CHECK_CALL['done'] ) {
-                       phpCAS::error('this method should only be called before '.$PHPCAS_AUTH_CHECK_CALL['method'].'() (called at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].')');
-               }
-               if ( gettype($format) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $format (should be `string\')');
-               }
-               if ( gettype($path) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $format (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setPGTStorageFile($format,$path);
-               phpCAS::traceEnd();
-               }
-       
-       /**
-        * This method is used to tell phpCAS to store the response of the
-        * CAS server to PGT requests into a database. 
-        * @note The connection to the database is done only when needed. 
-        * As a consequence, bad parameters are detected only when 
-        * initializing PGT storage, except in debug mode.
-        *
-        * @param $user the user to access the data with
-        * @param $password the user's password
-        * @param $database_type the type of the database hosting the data
-        * @param $hostname the server hosting the database
-        * @param $port the port the server is listening on
-        * @param $database the name of the database
-        * @param $table the name of the table storing the data
-        */
-       function setPGTStorageDB($user,
-                                                        $password,
-                                                        $database_type='',
-                                                                $hostname='',
-                                                                        $port=0,
-                                                                                $database='',
-                                                                                        $table='')
-               {
-               global $PHPCAS_CLIENT,$PHPCAS_AUTH_CHECK_CALL;
-               
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( !$PHPCAS_CLIENT->isProxy() ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( $PHPCAS_AUTH_CHECK_CALL['done'] ) {
-                       phpCAS::error('this method should only be called before '.$PHPCAS_AUTH_CHECK_CALL['method'].'() (called at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].')');
-               }
-               if ( gettype($user) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $user (should be `string\')');
-               }
-               if ( gettype($password) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $password (should be `string\')');
-               }
-               if ( gettype($database_type) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $database_type (should be `string\')');
-               }
-               if ( gettype($hostname) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $hostname (should be `string\')');
-               }
-               if ( gettype($port) != 'integer' ) {
-                       phpCAS::error('type mismatched for parameter $port (should be `integer\')');
-               }
-               if ( gettype($database) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $database (should be `string\')');
-               }
-               if ( gettype($table) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $table (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setPGTStorageDB($this,$user,$password,$hostname,$port,$database,$table);
-               phpCAS::traceEnd();
-               }
-       
-       /** @} */
-       // ########################################################################
-       // ACCESS TO EXTERNAL SERVICES
-       // ########################################################################
-       /**
-        * @addtogroup publicServices
-        * @{
-        */
-       
-       /**
-        * This method is used to access an HTTP[S] service.
-        * 
-        * @param $url the service to access.
-        * @param $err_code an error code Possible values are PHPCAS_SERVICE_OK (on
-        * success), PHPCAS_SERVICE_PT_NO_SERVER_RESPONSE, PHPCAS_SERVICE_PT_BAD_SERVER_RESPONSE,
-        * PHPCAS_SERVICE_PT_FAILURE, PHPCAS_SERVICE_NOT AVAILABLE.
-        * @param $output the output of the service (also used to give an error
-        * message on failure).
-        *
-        * @return TRUE on success, FALSE otherwise (in this later case, $err_code
-        * gives the reason why it failed and $output contains an error message).
-        */
-       function serviceWeb($url,&$err_code,&$output)
-               {
-               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;
-               
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( !$PHPCAS_CLIENT->isProxy() ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( !$PHPCAS_AUTH_CHECK_CALL['done'] ) {
-                       phpCAS::error('this method should only be called after the programmer is sure the user has been authenticated (by calling '.__CLASS__.'::checkAuthentication() or '.__CLASS__.'::forceAuthentication()');
-               }
-               if ( !$PHPCAS_AUTH_CHECK_CALL['result'] ) {
-                       phpCAS::error('authentication was checked (by '.$PHPCAS_AUTH_CHECK_CALL['method'].'() at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].') but the method returned FALSE');
-               }
-               if ( gettype($url) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $url (should be `string\')');
-               }
-               
-               $res = $PHPCAS_CLIENT->serviceWeb($url,$err_code,$output);
-               
-               phpCAS::traceEnd($res);
-               return $res;
-               }
-       
-       /**
-        * This method is used to access an IMAP/POP3/NNTP service.
-        * 
-        * @param $url a string giving the URL of the service, including the mailing box
-        * for IMAP URLs, as accepted by imap_open().
-        * @param $flags options given to imap_open().
-        * @param $err_code an error code Possible values are PHPCAS_SERVICE_OK (on
-        * success), PHPCAS_SERVICE_PT_NO_SERVER_RESPONSE, PHPCAS_SERVICE_PT_BAD_SERVER_RESPONSE,
-        * PHPCAS_SERVICE_PT_FAILURE, PHPCAS_SERVICE_NOT AVAILABLE.
-        * @param $err_msg an error message on failure
-        * @param $pt the Proxy Ticket (PT) retrieved from the CAS server to access the URL
-        * on success, FALSE on error).
-        *
-        * @return an IMAP stream on success, FALSE otherwise (in this later case, $err_code
-        * gives the reason why it failed and $err_msg contains an error message).
-        */
-       function serviceMail($url,$flags,&$err_code,&$err_msg,&$pt)
-               {
-               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;
-               
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( !$PHPCAS_CLIENT->isProxy() ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( !$PHPCAS_AUTH_CHECK_CALL['done'] ) {
-                       phpCAS::error('this method should only be called after the programmer is sure the user has been authenticated (by calling '.__CLASS__.'::checkAuthentication() or '.__CLASS__.'::forceAuthentication()');
-               }
-               if ( !$PHPCAS_AUTH_CHECK_CALL['result'] ) {
-                       phpCAS::error('authentication was checked (by '.$PHPCAS_AUTH_CHECK_CALL['method'].'() at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].') but the method returned FALSE');
-               }
-               if ( gettype($url) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $url (should be `string\')');
-               }
-               
-               if ( gettype($flags) != 'integer' ) {
-                       phpCAS::error('type mismatched for parameter $flags (should be `integer\')');
-               }
-               
-               $res = $PHPCAS_CLIENT->serviceMail($url,$flags,$err_code,$err_msg,$pt);
-               
-               phpCAS::traceEnd($res);
-               return $res;
-               }
-       
-       /** @} */
-       // ########################################################################
-       //  AUTHENTICATION
-       // ########################################################################
-       /**
-        * @addtogroup publicAuth
-        * @{
-        */
-       
-       /**
-        * Set the times authentication will be cached before really accessing the CAS server in gateway mode: 
-        * - -1: check only once, and then never again (until you pree login)
-        * - 0: always check
-        * - n: check every "n" time
-        *
-        * @param $n an integer.
-        */
-       function setCacheTimesForAuthRecheck($n)
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               if ( gettype($n) != 'integer' ) {
-                       phpCAS::error('type mismatched for parameter $header (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setCacheTimesForAuthRecheck($n);
-               }
-       
-       /**
-        * This method is called to check if the user is authenticated (use the gateway feature).
-        * @return TRUE when the user is authenticated; otherwise FALSE.
-        */
-       function checkAuthentication()
-               {
-               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;
-               
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               
-               $auth = $PHPCAS_CLIENT->checkAuthentication();
-               
-               // store where the authentication has been checked and the result
-               $dbg = phpCAS::backtrace();
-               $PHPCAS_AUTH_CHECK_CALL = array('done' => TRUE,
-                       'file' => $dbg[0]['file'],
-                       'line' => $dbg[0]['line'],
-                       'method' => __CLASS__.'::'.__FUNCTION__,
-                       'result' => $auth );
-               phpCAS::traceEnd($auth);
-               return $auth; 
-               }
-       
-       /**
-        * This method is called to force authentication if the user was not already 
-        * authenticated. If the user is not authenticated, halt by redirecting to 
-        * the CAS server.
-        */
-       function forceAuthentication()
-               {
-               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;
-               
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               
-               $auth = $PHPCAS_CLIENT->forceAuthentication();
-               
-               // store where the authentication has been checked and the result
-               $dbg = phpCAS::backtrace();
-               $PHPCAS_AUTH_CHECK_CALL = array('done' => TRUE,
-                       'file' => $dbg[0]['file'],
-                       'line' => $dbg[0]['line'],
-                       'method' => __CLASS__.'::'.__FUNCTION__,
-                       'result' => $auth );
-               
-               if ( !$auth ) {
-                       phpCAS::trace('user is not authenticated, redirecting to the CAS server');
-                       $PHPCAS_CLIENT->forceAuthentication();
-               } else {
-                       phpCAS::trace('no need to authenticate (user `'.phpCAS::getUser().'\' is already authenticated)');
-               }
-               
-               phpCAS::traceEnd();
-               return $auth; 
-               }
-       
-       /**
-        * This method is called to renew the authentication.
-        **/
-       function renewAuthentication() {
-               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;
-               
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before'.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               
-               // store where the authentication has been checked and the result
-               $dbg = phpCAS::backtrace();
-               $PHPCAS_AUTH_CHECK_CALL = array('done' => TRUE, 'file' => $dbg[0]['file'], 'line' => $dbg[0]['line'], 'method' => __CLASS__.'::'.__FUNCTION__, 'result' => $auth );
-               
-               $PHPCAS_CLIENT->renewAuthentication();
-               phpCAS::traceEnd();
-       }
-
-       /**
-        * This method has been left from version 0.4.1 for compatibility reasons.
-        */
-       function authenticate()
-               {
-               phpCAS::error('this method is deprecated. You should use '.__CLASS__.'::forceAuthentication() instead');
-               }
-       
-       /**
-        * This method is called to check if the user is authenticated (previously or by
-        * tickets given in the URL).
-        *
-        * @return TRUE when the user is authenticated.
-        */
-       function isAuthenticated()
-               {
-               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;
-               
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               
-               // call the isAuthenticated method of the global $PHPCAS_CLIENT object
-               $auth = $PHPCAS_CLIENT->isAuthenticated();
-               
-               // store where the authentication has been checked and the result
-               $dbg = phpCAS::backtrace();
-               $PHPCAS_AUTH_CHECK_CALL = array('done' => TRUE,
-                       'file' => $dbg[0]['file'],
-                       'line' => $dbg[0]['line'],
-                       'method' => __CLASS__.'::'.__FUNCTION__,
-                       'result' => $auth );
-               phpCAS::traceEnd($auth);
-               return $auth;
-               }
-       
-       /**
-        * Checks whether authenticated based on $_SESSION. Useful to avoid
-        * server calls.
-        * @return true if authenticated, false otherwise.
-        * @since 0.4.22 by Brendan Arnold
-        */
-       function isSessionAuthenticated ()
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               return($PHPCAS_CLIENT->isSessionAuthenticated());
-               }
-       
-       /**
-        * This method returns the CAS user's login name.
-        * @warning should not be called only after phpCAS::forceAuthentication()
-        * or phpCAS::checkAuthentication().
-        *
-        * @return the login name of the authenticated user
-        */
-       function getUser()
-               {
-               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               if ( !$PHPCAS_AUTH_CHECK_CALL['done'] ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::forceAuthentication() or '.__CLASS__.'::isAuthenticated()');
-               }
-               if ( !$PHPCAS_AUTH_CHECK_CALL['result'] ) {
-                       phpCAS::error('authentication was checked (by '.$PHPCAS_AUTH_CHECK_CALL['method'].'() at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].') but the method returned FALSE');
-               }
-               return $PHPCAS_CLIENT->getUser();
-               }
-       
-    /**
-     * Handle logout requests.
-     */
-    function handleLogoutRequests($check_client=true, $allowed_clients=false)
-        {
-            global $PHPCAS_CLIENT;
-            if ( !is_object($PHPCAS_CLIENT) ) {
-                phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-            }
-            return($PHPCAS_CLIENT->handleLogoutRequests($check_client, $allowed_clients));
-        }
-   
-       /**
-        * This method returns the URL to be used to login.
-        * or phpCAS::isAuthenticated().
-        *
-        * @return the login name of the authenticated user
-        */
-       function getServerLoginURL()
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               return $PHPCAS_CLIENT->getServerLoginURL();
-               }
-       
-       /**
-        * Set the login URL of the CAS server.
-        * @param $url the login URL
-        * @since 0.4.21 by Wyman Chan
-        */
-       function setServerLoginURL($url='')
-               {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after
-                               '.__CLASS__.'::client()');
-               }
-               if ( gettype($url) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $url (should be
-                       `string\')');
-               }
-               $PHPCAS_CLIENT->setServerLoginURL($url);
-               phpCAS::traceEnd();
-               }
-       
-       /**
-        * This method returns the URL to be used to login.
-        * or phpCAS::isAuthenticated().
-        *
-        * @return the login name of the authenticated user
-        */
-       function getServerLogoutURL()
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');
-               }
-               return $PHPCAS_CLIENT->getServerLogoutURL();
-               }
-       
-       /**
-        * Set the logout URL of the CAS server.
-        * @param $url the logout URL
-        * @since 0.4.21 by Wyman Chan
-        */
-       function setServerLogoutURL($url='')
-               {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after
-                               '.__CLASS__.'::client()');
-               }
-               if ( gettype($url) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $url (should be
-                       `string\')');
-               }
-               $PHPCAS_CLIENT->setServerLogoutURL($url);
-               phpCAS::traceEnd();
-               }
-       
-       /**
-        * This method is used to logout from CAS.
-        * @params $params an array that contains the optional url and service parameters that will be passed to the CAS server
-        * @public
-        */
-       function logout($params = "") {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if (!is_object($PHPCAS_CLIENT)) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');
-               }
-               $parsedParams = array();
-               if ($params != "") {
-                       if (is_string($params)) {
-                               phpCAS::error('method `phpCAS::logout($url)\' is now deprecated, use `phpCAS::logoutWithUrl($url)\' instead');
-                       }
-                       if (!is_array($params)) {
-                               phpCAS::error('type mismatched for parameter $params (should be `array\')');
-                       }
-                       foreach ($params as $key => $value) {
-                               if ($key != "service" && $key != "url") {
-                                       phpCAS::error('only `url\' and `service\' parameters are allowed for method `phpCAS::logout($params)\'');
-                               }
-                               $parsedParams[$key] = $value;
-                       }
-               }
-               $PHPCAS_CLIENT->logout($parsedParams);
-               // never reached
-               phpCAS::traceEnd();
-       }
-       
-       /**
-        * This method is used to logout from CAS. Halts by redirecting to the CAS server.
-        * @param $service a URL that will be transmitted to the CAS server
-        */
-       function logoutWithRedirectService($service) {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');
-               }
-               if (!is_string($service)) {
-                       phpCAS::error('type mismatched for parameter $service (should be `string\')');
-               }
-               $PHPCAS_CLIENT->logout(array("service" => $service));
-               // never reached
-               phpCAS::traceEnd();
-       }
-       
-       /**
-        * This method is used to logout from CAS. Halts by redirecting to the CAS server.
-        * @param $url a URL that will be transmitted to the CAS server
-        */
-       function logoutWithUrl($url) {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');
-               }
-               if (!is_string($url)) {
-                       phpCAS::error('type mismatched for parameter $url (should be `string\')');
-               }
-               $PHPCAS_CLIENT->logout(array("url" => $url));
-               // never reached
-               phpCAS::traceEnd();
-       }
-       
-       /**
-        * This method is used to logout from CAS. Halts by redirecting to the CAS server.
-        * @param $service a URL that will be transmitted to the CAS server
-        * @param $url a URL that will be transmitted to the CAS server
-        */
-       function logoutWithRedirectServiceAndUrl($service, $url) {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');
-               }
-               if (!is_string($service)) {
-                       phpCAS::error('type mismatched for parameter $service (should be `string\')');
-               }
-               if (!is_string($url)) {
-                       phpCAS::error('type mismatched for parameter $url (should be `string\')');
-               }
-               $PHPCAS_CLIENT->logout(array("service" => $service, "url" => $url));
-               // never reached
-               phpCAS::traceEnd();
-       }
-       
-       /**
-        * Set the fixed URL that will be used by the CAS server to transmit the PGT.
-        * When this method is not called, a phpCAS script uses its own URL for the callback.
-        *
-        * @param $url the URL
-        */
-       function setFixedCallbackURL($url='')
-               {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( !$PHPCAS_CLIENT->isProxy() ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }
-               if ( gettype($url) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $url (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setCallbackURL($url);
-               phpCAS::traceEnd();
-               }
-       
-       /**
-        * Set the fixed URL that will be set as the CAS service parameter. When this
-        * method is not called, a phpCAS script uses its own URL.
-        *
-        * @param $url the URL
-        */
-       function setFixedServiceURL($url)
-               {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }  
-               if ( gettype($url) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $url (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setURL($url);
-               phpCAS::traceEnd();
-               }
-       
-       /**
-        * Get the URL that is set as the CAS service parameter.
-        */
-       function getServiceURL()
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }  
-               return($PHPCAS_CLIENT->getURL());
-               }
-       
-       /**
-        * Retrieve a Proxy Ticket from the CAS server.
-        */
-       function retrievePT($target_service,&$err_code,&$err_msg)
-               {
-               global $PHPCAS_CLIENT;
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');
-               }  
-               if ( gettype($target_service) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $target_service(should be `string\')');
-               }
-               return($PHPCAS_CLIENT->retrievePT($target_service,$err_code,$err_msg));
-               }
-       
-       /**
-        * Set the certificate of the CAS server.
-        *
-        * @param $cert the PEM certificate
-        */
-       function setCasServerCert($cert)
-               {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');
-               }  
-               if ( gettype($cert) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $cert (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setCasServerCert($cert);
-               phpCAS::traceEnd();
-               }
-       
-       /**
-        * Set the certificate of the CAS server CA.
-        *
-        * @param $cert the CA certificate
-        */
-       function setCasServerCACert($cert)
-               {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');
-               }  
-               if ( gettype($cert) != 'string' ) {
-                       phpCAS::error('type mismatched for parameter $cert (should be `string\')');
-               }
-               $PHPCAS_CLIENT->setCasServerCACert($cert);
-               phpCAS::traceEnd();
-               }
-       
-       /**
-        * Set no SSL validation for the CAS server.
-        */
-       function setNoCasServerValidation()
-               {
-               global $PHPCAS_CLIENT;
-               phpCAS::traceBegin();
-               if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');
-               }  
-               $PHPCAS_CLIENT->setNoCasServerValidation();
-               phpCAS::traceEnd();
-               }
-       
-       /** @} */
-       
-  /**
-   * Change CURL options.
-   * CURL is used to connect through HTTPS to CAS server
-   * @param $key the option key
-   * @param $value the value to set
-   */
-   function setExtraCurlOption($key, $value)
-               {
-                 global $PHPCAS_CLIENT;
-                 phpCAS::traceBegin();
-                 if ( !is_object($PHPCAS_CLIENT) ) {
-                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');
-                 }  
-                 $PHPCAS_CLIENT->setExtraCurlOption($key, $value);
-                 phpCAS::traceEnd();
-               }
-
-}
-
-// ########################################################################
-// DOCUMENTATION
-// ########################################################################
-
-// ########################################################################
-//  MAIN PAGE
-
-/**
- * @mainpage
- *
- * The following pages only show the source documentation.
- *
- */
-
-// ########################################################################
-//  MODULES DEFINITION
-
-/** @defgroup public User interface */
-
-/** @defgroup publicInit Initialization
- *  @ingroup public */
-
-/** @defgroup publicAuth Authentication
- *  @ingroup public */
-
-/** @defgroup publicServices Access to external services
- *  @ingroup public */
-
-/** @defgroup publicConfig Configuration
- *  @ingroup public */
-
-/** @defgroup publicLang Internationalization
- *  @ingroup publicConfig */
-
-/** @defgroup publicOutput HTML output
- *  @ingroup publicConfig */
-
-/** @defgroup publicPGTStorage PGT storage
- *  @ingroup publicConfig */
-
-/** @defgroup publicDebug Debugging
- *  @ingroup public */
-
-
-/** @defgroup internal Implementation */
-
-/** @defgroup internalAuthentication Authentication
- *  @ingroup internal */
-
-/** @defgroup internalBasic CAS Basic client features (CAS 1.0, Service Tickets)
- *  @ingroup internal */
-
-/** @defgroup internalProxy CAS Proxy features (CAS 2.0, Proxy Granting Tickets)
- *  @ingroup internal */
-
-/** @defgroup internalPGTStorage PGT storage
- *  @ingroup internalProxy */
-
-/** @defgroup internalPGTStorageDB PGT storage in a database
- *  @ingroup internalPGTStorage */
-
-/** @defgroup internalPGTStorageFile PGT storage on the filesystem
- *  @ingroup internalPGTStorage */
-
-/** @defgroup internalCallback Callback from the CAS server
- *  @ingroup internalProxy */
-
-/** @defgroup internalProxied CAS proxied client features (CAS 2.0, Proxy Tickets)
- *  @ingroup internal */
-
-/** @defgroup internalConfig Configuration
- *  @ingroup internal */
-
-/** @defgroup internalOutput HTML output
- *  @ingroup internalConfig */
-
-/** @defgroup internalLang Internationalization
- *  @ingroup internalConfig
- *
- * To add a new language:
- * - 1. define a new constant PHPCAS_LANG_XXXXXX in CAS/CAS.php
- * - 2. copy any file from CAS/languages to CAS/languages/XXXXXX.php
- * - 3. Make the translations
- */
-
-/** @defgroup internalDebug Debugging
- *  @ingroup internal */
-
-/** @defgroup internalMisc Miscellaneous
- *  @ingroup internal */
-
-// ########################################################################
-//  EXAMPLES
-
-/**
- * @example example_simple.php
- */
- /**
-  * @example example_proxy.php
-  */
-  /**
-   * @example example_proxy2.php
-   */
-   /**
-    * @example example_lang.php
-    */
-    /**
-     * @example example_html.php
-     */
-     /**
-      * @example example_file.php
-      */
-      /**
-       * @example example_db.php
-       */
-       /**
-        * @example example_service.php
-        */
-        /**
-         * @example example_session_proxy.php
-         */
-         /**
-          * @example example_session_service.php
-          */
-          /**
-           * @example example_gateway.php
-           */
-
-
-
-?>
+<?php\r
+\r
+// commented in 0.4.22-RC2 for Sylvain Derosiaux\r
+// error_reporting(E_ALL ^ E_NOTICE);\r
+\r
+//\r
+// hack by Vangelis Haniotakis to handle the absence of $_SERVER['REQUEST_URI'] in IIS\r
+//\r
+if (!$_SERVER['REQUEST_URI']) {\r
+       $_SERVER['REQUEST_URI'] = $_SERVER['SCRIPT_NAME'].'?'.$_SERVER['QUERY_STRING'];\r
+}\r
+\r
+//\r
+// another one by Vangelis Haniotakis also to make phpCAS work with PHP5\r
+//\r
+if (version_compare(PHP_VERSION,'5','>=')) {\r
+       require_once(dirname(__FILE__).'/CAS/domxml-php4-to-php5.php');\r
+}\r
+\r
+/**\r
+ * @file CAS/CAS.php\r
+ * Interface class of the phpCAS library\r
+ *\r
+ * @ingroup public\r
+ */\r
+\r
+// ########################################################################\r
+//  CONSTANTS\r
+// ########################################################################\r
+\r
+// ------------------------------------------------------------------------\r
+//  CAS VERSIONS\r
+// ------------------------------------------------------------------------\r
+\r
+/**\r
+ * phpCAS version. accessible for the user by phpCAS::getVersion().\r
+ */\r
+define('PHPCAS_VERSION','1.1.0RC6');\r
+\r
+// ------------------------------------------------------------------------\r
+//  CAS VERSIONS\r
+// ------------------------------------------------------------------------\r
+ /**\r
+  * @addtogroup public\r
+  * @{\r
+  */\r
+\r
+/**\r
+ * CAS version 1.0\r
+ */\r
+define("CAS_VERSION_1_0",'1.0');\r
+/*!\r
+ * CAS version 2.0\r
+ */\r
+define("CAS_VERSION_2_0",'2.0');\r
+\r
+// ------------------------------------------------------------------------\r
+//  SAML defines\r
+// ------------------------------------------------------------------------\r
+\r
+/**\r
+ * SAML protocol\r
+ */\r
+define("SAML_VERSION_1_1", 'S1');\r
+\r
+/**\r
+ * XML header for SAML POST\r
+ */\r
+define("SAML_XML_HEADER", '<?xml version="1.0" encoding="UTF-8"?>');\r
+\r
+/**\r
+ * SOAP envelope for SAML POST\r
+ */\r
+define ("SAML_SOAP_ENV", '<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"><SOAP-ENV:Header/>');\r
+\r
+/**\r
+ * SOAP body for SAML POST\r
+ */\r
+define ("SAML_SOAP_BODY", '<SOAP-ENV:Body>');\r
+\r
+/**\r
+ * SAMLP request\r
+ */\r
+define ("SAMLP_REQUEST", '<samlp:Request xmlns:samlp="urn:oasis:names:tc:SAML:1.0:protocol"  MajorVersion="1" MinorVersion="1" RequestID="_192.168.16.51.1024506224022" IssueInstant="2002-06-19T17:03:44.022Z">');\r
+define ("SAMLP_REQUEST_CLOSE", '</samlp:Request>');\r
+\r
+/**\r
+ * SAMLP artifact tag (for the ticket)\r
+ */\r
+define ("SAML_ASSERTION_ARTIFACT", '<samlp:AssertionArtifact>');\r
+\r
+/**\r
+ * SAMLP close\r
+ */\r
+define ("SAML_ASSERTION_ARTIFACT_CLOSE", '</samlp:AssertionArtifact>');\r
+\r
+/**\r
+ * SOAP body close\r
+ */\r
+define ("SAML_SOAP_BODY_CLOSE", '</SOAP-ENV:Body>');\r
+\r
+/**\r
+ * SOAP envelope close\r
+ */\r
+define ("SAML_SOAP_ENV_CLOSE", '</SOAP-ENV:Envelope>');\r
+\r
+/**\r
+ * SAML Attributes\r
+ */\r
+define("SAML_ATTRIBUTES", 'SAMLATTRIBS');\r
+\r
+\r
+\r
+/** @} */\r
+ /**\r
+  * @addtogroup publicPGTStorage\r
+  * @{\r
+  */\r
+// ------------------------------------------------------------------------\r
+//  FILE PGT STORAGE\r
+// ------------------------------------------------------------------------\r
+ /**\r
+  * Default path used when storing PGT's to file\r
+  */\r
+define("CAS_PGT_STORAGE_FILE_DEFAULT_PATH",'/tmp');\r
+/**\r
+ * phpCAS::setPGTStorageFile()'s 2nd parameter to write plain text files\r
+ */\r
+define("CAS_PGT_STORAGE_FILE_FORMAT_PLAIN",'plain');\r
+/**\r
+ * phpCAS::setPGTStorageFile()'s 2nd parameter to write xml files\r
+ */\r
+define("CAS_PGT_STORAGE_FILE_FORMAT_XML",'xml');\r
+/**\r
+ * Default format used when storing PGT's to file\r
+ */\r
+define("CAS_PGT_STORAGE_FILE_DEFAULT_FORMAT",CAS_PGT_STORAGE_FILE_FORMAT_PLAIN);\r
+// ------------------------------------------------------------------------\r
+//  DATABASE PGT STORAGE\r
+// ------------------------------------------------------------------------\r
+ /**\r
+  * default database type when storing PGT's to database\r
+  */\r
+define("CAS_PGT_STORAGE_DB_DEFAULT_DATABASE_TYPE",'mysql');\r
+/**\r
+ * default host when storing PGT's to database\r
+ */\r
+define("CAS_PGT_STORAGE_DB_DEFAULT_HOSTNAME",'localhost');\r
+/**\r
+ * default port when storing PGT's to database\r
+ */\r
+define("CAS_PGT_STORAGE_DB_DEFAULT_PORT",'');\r
+/**\r
+ * default database when storing PGT's to database\r
+ */\r
+define("CAS_PGT_STORAGE_DB_DEFAULT_DATABASE",'phpCAS');\r
+/**\r
+ * default table when storing PGT's to database\r
+ */\r
+define("CAS_PGT_STORAGE_DB_DEFAULT_TABLE",'pgt');\r
+\r
+/** @} */\r
+// ------------------------------------------------------------------------\r
+// SERVICE ACCESS ERRORS\r
+// ------------------------------------------------------------------------\r
+ /**\r
+  * @addtogroup publicServices\r
+  * @{\r
+  */\r
+\r
+/**\r
+ * phpCAS::service() error code on success\r
+ */\r
+define("PHPCAS_SERVICE_OK",0);\r
+/**\r
+ * phpCAS::service() error code when the PT could not retrieve because\r
+ * the CAS server did not respond.\r
+ */\r
+define("PHPCAS_SERVICE_PT_NO_SERVER_RESPONSE",1);\r
+/**\r
+ * phpCAS::service() error code when the PT could not retrieve because\r
+ * the response of the CAS server was ill-formed.\r
+ */\r
+define("PHPCAS_SERVICE_PT_BAD_SERVER_RESPONSE",2);\r
+/**\r
+ * phpCAS::service() error code when the PT could not retrieve because\r
+ * the CAS server did not want to.\r
+ */\r
+define("PHPCAS_SERVICE_PT_FAILURE",3);\r
+/**\r
+ * phpCAS::service() error code when the service was not available.\r
+ */\r
+define("PHPCAS_SERVICE_NOT AVAILABLE",4);\r
+\r
+/** @} */\r
+// ------------------------------------------------------------------------\r
+//  LANGUAGES\r
+// ------------------------------------------------------------------------\r
+ /**\r
+  * @addtogroup publicLang\r
+  * @{\r
+  */\r
+\r
+define("PHPCAS_LANG_ENGLISH",    'english');\r
+define("PHPCAS_LANG_FRENCH",     'french');\r
+define("PHPCAS_LANG_GREEK",      'greek');\r
+define("PHPCAS_LANG_GERMAN",     'german');\r
+define("PHPCAS_LANG_JAPANESE",   'japanese');\r
+define("PHPCAS_LANG_SPANISH",    'spanish');\r
+define("PHPCAS_LANG_CATALAN",    'catalan');\r
+\r
+/** @} */\r
+\r
+/**\r
+ * @addtogroup internalLang\r
+ * @{\r
+ */\r
+\r
+/**\r
+ * phpCAS default language (when phpCAS::setLang() is not used)\r
+ */\r
+define("PHPCAS_LANG_DEFAULT", PHPCAS_LANG_ENGLISH);\r
+\r
+/** @} */\r
+// ------------------------------------------------------------------------\r
+//  DEBUG\r
+// ------------------------------------------------------------------------\r
+ /**\r
+  * @addtogroup publicDebug\r
+  * @{\r
+  */\r
+\r
+/**\r
+ * The default directory for the debug file under Unix.\r
+ */\r
+define('DEFAULT_DEBUG_DIR','/tmp/');\r
+\r
+/** @} */\r
+// ------------------------------------------------------------------------\r
+//  MISC\r
+// ------------------------------------------------------------------------\r
+ /**\r
+  * @addtogroup internalMisc\r
+  * @{\r
+  */\r
+\r
+/**\r
+ * This global variable is used by the interface class phpCAS.\r
+ *\r
+ * @hideinitializer\r
+ */\r
+$GLOBALS['PHPCAS_CLIENT']  = null;\r
+\r
+/**\r
+ * This global variable is used to store where the initializer is called from \r
+ * (to print a comprehensive error in case of multiple calls).\r
+ *\r
+ * @hideinitializer\r
+ */\r
+$GLOBALS['PHPCAS_INIT_CALL'] = array('done' => FALSE,\r
+       'file' => '?',\r
+       'line' => -1,\r
+       'method' => '?');\r
+\r
+/**\r
+ * This global variable is used to store where the method checking\r
+ * the authentication is called from (to print comprehensive errors)\r
+ *\r
+ * @hideinitializer\r
+ */\r
+$GLOBALS['PHPCAS_AUTH_CHECK_CALL'] = array('done' => FALSE,\r
+       'file' => '?',\r
+       'line' => -1,\r
+       'method' => '?',\r
+       'result' => FALSE);\r
+\r
+/**\r
+ * This global variable is used to store phpCAS debug mode.\r
+ *\r
+ * @hideinitializer\r
+ */\r
+$GLOBALS['PHPCAS_DEBUG']  = array('filename' => FALSE,\r
+       'indent' => 0,\r
+       'unique_id' => '');\r
+\r
+/** @} */\r
+\r
+// ########################################################################\r
+//  CLIENT CLASS\r
+// ########################################################################\r
+\r
+// include client class\r
+include_once(dirname(__FILE__).'/CAS/client.php');\r
+\r
+// ########################################################################\r
+//  INTERFACE CLASS\r
+// ########################################################################\r
+\r
+/**\r
+ * @class phpCAS\r
+ * The phpCAS class is a simple container for the phpCAS library. It provides CAS\r
+ * authentication for web applications written in PHP.\r
+ *\r
+ * @ingroup public\r
+ * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>\r
+ *\r
+ * \internal All its methods access the same object ($PHPCAS_CLIENT, declared \r
+ * at the end of CAS/client.php).\r
+ */\r
+\r
+\r
+\r
+class phpCAS\r
+{\r
+       \r
+       // ########################################################################\r
+       //  INITIALIZATION\r
+       // ########################################################################\r
+       \r
+       /**\r
+        * @addtogroup publicInit\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * phpCAS client initializer.\r
+        * @note Only one of the phpCAS::client() and phpCAS::proxy functions should be\r
+        * called, only once, and before all other methods (except phpCAS::getVersion()\r
+        * and phpCAS::setDebug()).\r
+        *\r
+        * @param $server_version the version of the CAS server\r
+        * @param $server_hostname the hostname of the CAS server\r
+        * @param $server_port the port the CAS server is running on\r
+        * @param $server_uri the URI the CAS server is responding on\r
+        * @param $start_session Have phpCAS start PHP sessions (default true)\r
+        *\r
+        * @return a newly created CASClient object\r
+        */\r
+       function client($server_version,\r
+                                       $server_hostname,\r
+                                       $server_port,\r
+                                       $server_uri,\r
+                                       $start_session = true)\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_INIT_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error($PHPCAS_INIT_CALL['method'].'() has already been called (at '.$PHPCAS_INIT_CALL['file'].':'.$PHPCAS_INIT_CALL['line'].')');\r
+               }\r
+               if ( gettype($server_version) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $server_version (should be `string\')');\r
+               }\r
+               if ( gettype($server_hostname) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $server_hostname (should be `string\')');\r
+               }\r
+               if ( gettype($server_port) != 'integer' ) {\r
+                       phpCAS::error('type mismatched for parameter $server_port (should be `integer\')');\r
+               }\r
+               if ( gettype($server_uri) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $server_uri (should be `string\')');\r
+               }\r
+               \r
+               // store where the initializer is called from\r
+               $dbg = phpCAS::backtrace();\r
+               $PHPCAS_INIT_CALL = array('done' => TRUE,\r
+                       'file' => $dbg[0]['file'],\r
+                       'line' => $dbg[0]['line'],\r
+                       'method' => __CLASS__.'::'.__FUNCTION__);\r
+               \r
+               // initialize the global object $PHPCAS_CLIENT\r
+               $PHPCAS_CLIENT = new CASClient($server_version,FALSE/*proxy*/,$server_hostname,$server_port,$server_uri,$start_session);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /**\r
+        * phpCAS proxy initializer.\r
+        * @note Only one of the phpCAS::client() and phpCAS::proxy functions should be\r
+        * called, only once, and before all other methods (except phpCAS::getVersion()\r
+        * and phpCAS::setDebug()).\r
+        *\r
+        * @param $server_version the version of the CAS server\r
+        * @param $server_hostname the hostname of the CAS server\r
+        * @param $server_port the port the CAS server is running on\r
+        * @param $server_uri the URI the CAS server is responding on\r
+        * @param $start_session Have phpCAS start PHP sessions (default true)\r
+        *\r
+        * @return a newly created CASClient object\r
+        */\r
+       function proxy($server_version,\r
+                                  $server_hostname,\r
+                                  $server_port,\r
+                                  $server_uri,\r
+                                  $start_session = true)\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_INIT_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error($PHPCAS_INIT_CALL['method'].'() has already been called (at '.$PHPCAS_INIT_CALL['file'].':'.$PHPCAS_INIT_CALL['line'].')');\r
+               }\r
+               if ( gettype($server_version) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $server_version (should be `string\')');\r
+               }\r
+               if ( gettype($server_hostname) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $server_hostname (should be `string\')');\r
+               }\r
+               if ( gettype($server_port) != 'integer' ) {\r
+                       phpCAS::error('type mismatched for parameter $server_port (should be `integer\')');\r
+               }\r
+               if ( gettype($server_uri) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $server_uri (should be `string\')');\r
+               }\r
+               \r
+               // store where the initialzer is called from\r
+               $dbg = phpCAS::backtrace();\r
+               $PHPCAS_INIT_CALL = array('done' => TRUE,\r
+                       'file' => $dbg[0]['file'],\r
+                       'line' => $dbg[0]['line'],\r
+                       'method' => __CLASS__.'::'.__FUNCTION__);\r
+               \r
+               // initialize the global object $PHPCAS_CLIENT\r
+               $PHPCAS_CLIENT = new CASClient($server_version,TRUE/*proxy*/,$server_hostname,$server_port,$server_uri,$start_session);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /** @} */\r
+       // ########################################################################\r
+       //  DEBUGGING\r
+       // ########################################################################\r
+       \r
+       /**\r
+        * @addtogroup publicDebug\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * Set/unset debug mode\r
+        *\r
+        * @param $filename the name of the file used for logging, or FALSE to stop debugging.\r
+        */\r
+       function setDebug($filename='')\r
+               {\r
+               global $PHPCAS_DEBUG;\r
+               \r
+               if ( $filename != FALSE && gettype($filename) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $dbg (should be FALSE or the name of the log file)');\r
+               }\r
+               \r
+               if ( empty($filename) ) {\r
+                       if ( preg_match('/^Win.*/',getenv('OS')) ) {\r
+                               if ( isset($_ENV['TMP']) ) {\r
+                                       $debugDir = $_ENV['TMP'].'/';\r
+                               } else if ( isset($_ENV['TEMP']) ) {\r
+                                       $debugDir = $_ENV['TEMP'].'/';\r
+                               } else {\r
+                                       $debugDir = '';\r
+                               }\r
+                       } else {\r
+                               $debugDir = DEFAULT_DEBUG_DIR;\r
+                       }\r
+                       $filename = $debugDir . 'phpCAS.log';\r
+               }\r
+               \r
+               if ( empty($PHPCAS_DEBUG['unique_id']) ) {\r
+                       $PHPCAS_DEBUG['unique_id'] = substr(strtoupper(md5(uniqid(''))),0,4);\r
+               }\r
+               \r
+               $PHPCAS_DEBUG['filename'] = $filename;\r
+               \r
+               phpCAS::trace('START ******************');\r
+               }\r
+       \r
+       /** @} */\r
+       /**\r
+        * @addtogroup internalDebug\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * This method is a wrapper for debug_backtrace() that is not available \r
+        * in all PHP versions (>= 4.3.0 only)\r
+        */\r
+       function backtrace()\r
+               {\r
+               if ( function_exists('debug_backtrace') ) {\r
+                       return debug_backtrace();\r
+               } else {\r
+                       // poor man's hack ... but it does work ...\r
+                       return array();\r
+               }\r
+               }\r
+       \r
+       /**\r
+        * Logs a string in debug mode.\r
+        *\r
+        * @param $str the string to write\r
+        *\r
+        * @private\r
+        */\r
+       function log($str)\r
+               {\r
+               $indent_str = ".";\r
+               global $PHPCAS_DEBUG;\r
+               \r
+               if ( $PHPCAS_DEBUG['filename'] ) {\r
+                       for ($i=0;$i<$PHPCAS_DEBUG['indent'];$i++) {\r
+                               $indent_str .= '|    ';\r
+                       }\r
+                       error_log($PHPCAS_DEBUG['unique_id'].' '.$indent_str.$str."\n",3,$PHPCAS_DEBUG['filename']);\r
+               }\r
+               \r
+               }\r
+       \r
+       /**\r
+        * This method is used by interface methods to print an error and where the function\r
+        * was originally called from.\r
+        *\r
+        * @param $msg the message to print\r
+        *\r
+        * @private\r
+        */\r
+       function error($msg)\r
+               {\r
+               $dbg = phpCAS::backtrace();\r
+               $function = '?';\r
+               $file = '?';\r
+               $line = '?';\r
+               if ( is_array($dbg) ) {\r
+                       for ( $i=1; $i<sizeof($dbg); $i++) {\r
+                               if ( is_array($dbg[$i]) ) {\r
+                                       if ( $dbg[$i]['class'] == __CLASS__ ) {\r
+                                               $function = $dbg[$i]['function'];\r
+                                               $file = $dbg[$i]['file'];\r
+                                               $line = $dbg[$i]['line'];\r
+                                       }\r
+                               }\r
+                       }\r
+               }\r
+               echo "<br />\n<b>phpCAS error</b>: <font color=\"FF0000\"><b>".__CLASS__."::".$function.'(): '.htmlentities($msg)."</b></font> in <b>".$file."</b> on line <b>".$line."</b><br />\n";\r
+               phpCAS::trace($msg);\r
+               phpCAS::traceExit();\r
+               exit();\r
+               }\r
+       \r
+       /**\r
+        * This method is used to log something in debug mode.\r
+        */\r
+       function trace($str)\r
+               {\r
+               $dbg = phpCAS::backtrace();\r
+               phpCAS::log($str.' ['.basename($dbg[1]['file']).':'.$dbg[1]['line'].']');\r
+               }\r
+       \r
+       /**\r
+        * This method is used to indicate the start of the execution of a function in debug mode.\r
+        */\r
+       function traceBegin()\r
+               {\r
+               global $PHPCAS_DEBUG;\r
+               \r
+               $dbg = phpCAS::backtrace();\r
+               $str = '=> ';\r
+               if ( !empty($dbg[2]['class']) ) {\r
+                       $str .= $dbg[2]['class'].'::';\r
+               }\r
+               $str .= $dbg[2]['function'].'(';      \r
+               if ( is_array($dbg[2]['args']) ) {\r
+                       foreach ($dbg[2]['args'] as $index => $arg) {\r
+                               if ( $index != 0 ) {\r
+                                       $str .= ', ';\r
+                               }\r
+                               $str .= str_replace("\n","",var_export($arg,TRUE));\r
+                       }\r
+               }\r
+               $str .= ') ['.basename($dbg[2]['file']).':'.$dbg[2]['line'].']';\r
+               phpCAS::log($str);\r
+               $PHPCAS_DEBUG['indent'] ++;\r
+               }\r
+       \r
+       /**\r
+        * This method is used to indicate the end of the execution of a function in debug mode.\r
+        *\r
+        * @param $res the result of the function\r
+        */\r
+       function traceEnd($res='')\r
+               {\r
+               global $PHPCAS_DEBUG;\r
+               \r
+               $PHPCAS_DEBUG['indent'] --;\r
+               $dbg = phpCAS::backtrace();\r
+               $str = '';\r
+               $str .= '<= '.str_replace("\n","",var_export($res,TRUE));\r
+               phpCAS::log($str);\r
+               }\r
+       \r
+       /**\r
+        * This method is used to indicate the end of the execution of the program\r
+        */\r
+       function traceExit()\r
+               {\r
+               global $PHPCAS_DEBUG;\r
+               \r
+               phpCAS::log('exit()');\r
+               while ( $PHPCAS_DEBUG['indent'] > 0 ) {\r
+                       phpCAS::log('-');\r
+                       $PHPCAS_DEBUG['indent'] --;\r
+               }\r
+               }\r
+       \r
+       /** @} */\r
+       // ########################################################################\r
+       //  INTERNATIONALIZATION\r
+       // ########################################################################\r
+       /**\r
+        * @addtogroup publicLang\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * This method is used to set the language used by phpCAS. \r
+        * @note Can be called only once.\r
+        *\r
+        * @param $lang a string representing the language.\r
+        *\r
+        * @sa PHPCAS_LANG_FRENCH, PHPCAS_LANG_ENGLISH\r
+        */\r
+       function setLang($lang)\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( gettype($lang) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $lang (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setLang($lang);\r
+               }\r
+       \r
+       /** @} */\r
+       // ########################################################################\r
+       //  VERSION\r
+       // ########################################################################\r
+       /**\r
+        * @addtogroup public\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * This method returns the phpCAS version.\r
+        *\r
+        * @return the phpCAS version.\r
+        */\r
+       function getVersion()\r
+               {\r
+               return PHPCAS_VERSION;\r
+               }\r
+       \r
+       /** @} */\r
+       // ########################################################################\r
+       //  HTML OUTPUT\r
+       // ########################################################################\r
+       /**\r
+        * @addtogroup publicOutput\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * This method sets the HTML header used for all outputs.\r
+        *\r
+        * @param $header the HTML header.\r
+        */\r
+       function setHTMLHeader($header)\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( gettype($header) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $header (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setHTMLHeader($header);\r
+               }\r
+       \r
+       /**\r
+        * This method sets the HTML footer used for all outputs.\r
+        *\r
+        * @param $footer the HTML footer.\r
+        */\r
+       function setHTMLFooter($footer)\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( gettype($footer) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $footer (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setHTMLFooter($footer);\r
+               }\r
+       \r
+       /** @} */\r
+       // ########################################################################\r
+       //  PGT STORAGE\r
+       // ########################################################################\r
+       /**\r
+        * @addtogroup publicPGTStorage\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * This method is used to tell phpCAS to store the response of the\r
+        * CAS server to PGT requests onto the filesystem. \r
+        *\r
+        * @param $format the format used to store the PGT's (`plain' and `xml' allowed)\r
+        * @param $path the path where the PGT's should be stored\r
+        */\r
+       function setPGTStorageFile($format='',\r
+               $path='')\r
+               {\r
+               global $PHPCAS_CLIENT,$PHPCAS_AUTH_CHECK_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_CLIENT->isProxy() ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( $PHPCAS_AUTH_CHECK_CALL['done'] ) {\r
+                       phpCAS::error('this method should only be called before '.$PHPCAS_AUTH_CHECK_CALL['method'].'() (called at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].')');\r
+               }\r
+               if ( gettype($format) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $format (should be `string\')');\r
+               }\r
+               if ( gettype($path) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $format (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setPGTStorageFile($format,$path);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /**\r
+        * This method is used to tell phpCAS to store the response of the\r
+        * CAS server to PGT requests into a database. \r
+        * @note The connection to the database is done only when needed. \r
+        * As a consequence, bad parameters are detected only when \r
+        * initializing PGT storage, except in debug mode.\r
+        *\r
+        * @param $user the user to access the data with\r
+        * @param $password the user's password\r
+        * @param $database_type the type of the database hosting the data\r
+        * @param $hostname the server hosting the database\r
+        * @param $port the port the server is listening on\r
+        * @param $database the name of the database\r
+        * @param $table the name of the table storing the data\r
+        */\r
+       function setPGTStorageDB($user,\r
+                                                        $password,\r
+                                                        $database_type='',\r
+                                                                $hostname='',\r
+                                                                        $port=0,\r
+                                                                                $database='',\r
+                                                                                        $table='')\r
+               {\r
+               global $PHPCAS_CLIENT,$PHPCAS_AUTH_CHECK_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_CLIENT->isProxy() ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( $PHPCAS_AUTH_CHECK_CALL['done'] ) {\r
+                       phpCAS::error('this method should only be called before '.$PHPCAS_AUTH_CHECK_CALL['method'].'() (called at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].')');\r
+               }\r
+               if ( gettype($user) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $user (should be `string\')');\r
+               }\r
+               if ( gettype($password) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $password (should be `string\')');\r
+               }\r
+               if ( gettype($database_type) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $database_type (should be `string\')');\r
+               }\r
+               if ( gettype($hostname) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $hostname (should be `string\')');\r
+               }\r
+               if ( gettype($port) != 'integer' ) {\r
+                       phpCAS::error('type mismatched for parameter $port (should be `integer\')');\r
+               }\r
+               if ( gettype($database) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $database (should be `string\')');\r
+               }\r
+               if ( gettype($table) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $table (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setPGTStorageDB($user,$password,$database_type,$hostname,$port,$database,$table);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /** @} */\r
+       // ########################################################################\r
+       // ACCESS TO EXTERNAL SERVICES\r
+       // ########################################################################\r
+       /**\r
+        * @addtogroup publicServices\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * This method is used to access an HTTP[S] service.\r
+        * \r
+        * @param $url the service to access.\r
+        * @param $err_code an error code Possible values are PHPCAS_SERVICE_OK (on\r
+        * success), PHPCAS_SERVICE_PT_NO_SERVER_RESPONSE, PHPCAS_SERVICE_PT_BAD_SERVER_RESPONSE,\r
+        * PHPCAS_SERVICE_PT_FAILURE, PHPCAS_SERVICE_NOT AVAILABLE.\r
+        * @param $output the output of the service (also used to give an error\r
+        * message on failure).\r
+        *\r
+        * @return TRUE on success, FALSE otherwise (in this later case, $err_code\r
+        * gives the reason why it failed and $output contains an error message).\r
+        */\r
+       function serviceWeb($url,&$err_code,&$output)\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_CLIENT->isProxy() ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_AUTH_CHECK_CALL['done'] ) {\r
+                       phpCAS::error('this method should only be called after the programmer is sure the user has been authenticated (by calling '.__CLASS__.'::checkAuthentication() or '.__CLASS__.'::forceAuthentication()');\r
+               }\r
+               if ( !$PHPCAS_AUTH_CHECK_CALL['result'] ) {\r
+                       phpCAS::error('authentication was checked (by '.$PHPCAS_AUTH_CHECK_CALL['method'].'() at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].') but the method returned FALSE');\r
+               }\r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be `string\')');\r
+               }\r
+               \r
+               $res = $PHPCAS_CLIENT->serviceWeb($url,$err_code,$output);\r
+               \r
+               phpCAS::traceEnd($res);\r
+               return $res;\r
+               }\r
+       \r
+       /**\r
+        * This method is used to access an IMAP/POP3/NNTP service.\r
+        * \r
+        * @param $url a string giving the URL of the service, including the mailing box\r
+        * for IMAP URLs, as accepted by imap_open().\r
+        * @param $service a string giving for CAS retrieve Proxy ticket\r
+        * @param $flags options given to imap_open().\r
+        * @param $err_code an error code Possible values are PHPCAS_SERVICE_OK (on\r
+        * success), PHPCAS_SERVICE_PT_NO_SERVER_RESPONSE, PHPCAS_SERVICE_PT_BAD_SERVER_RESPONSE,\r
+        * PHPCAS_SERVICE_PT_FAILURE, PHPCAS_SERVICE_NOT AVAILABLE.\r
+        * @param $err_msg an error message on failure\r
+        * @param $pt the Proxy Ticket (PT) retrieved from the CAS server to access the URL\r
+        * on success, FALSE on error).\r
+        *\r
+        * @return an IMAP stream on success, FALSE otherwise (in this later case, $err_code\r
+        * gives the reason why it failed and $err_msg contains an error message).\r
+        */\r
+       function serviceMail($url,$service,$flags,&$err_code,&$err_msg,&$pt)\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_CLIENT->isProxy() ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_AUTH_CHECK_CALL['done'] ) {\r
+                       phpCAS::error('this method should only be called after the programmer is sure the user has been authenticated (by calling '.__CLASS__.'::checkAuthentication() or '.__CLASS__.'::forceAuthentication()');\r
+               }\r
+               if ( !$PHPCAS_AUTH_CHECK_CALL['result'] ) {\r
+                       phpCAS::error('authentication was checked (by '.$PHPCAS_AUTH_CHECK_CALL['method'].'() at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].') but the method returned FALSE');\r
+               }\r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be `string\')');\r
+               }\r
+               \r
+               if ( gettype($flags) != 'integer' ) {\r
+                       phpCAS::error('type mismatched for parameter $flags (should be `integer\')');\r
+               }\r
+               \r
+               $res = $PHPCAS_CLIENT->serviceMail($url,$service,$flags,$err_code,$err_msg,$pt);\r
+               \r
+               phpCAS::traceEnd($res);\r
+               return $res;\r
+               }\r
+       \r
+       /** @} */\r
+       // ########################################################################\r
+       //  AUTHENTICATION\r
+       // ########################################################################\r
+       /**\r
+        * @addtogroup publicAuth\r
+        * @{\r
+        */\r
+       \r
+       /**\r
+        * Set the times authentication will be cached before really accessing the CAS server in gateway mode: \r
+        * - -1: check only once, and then never again (until you pree login)\r
+        * - 0: always check\r
+        * - n: check every "n" time\r
+        *\r
+        * @param $n an integer.\r
+        */\r
+       function setCacheTimesForAuthRecheck($n)\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( gettype($n) != 'integer' ) {\r
+                       phpCAS::error('type mismatched for parameter $header (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setCacheTimesForAuthRecheck($n);\r
+               }\r
+       \r
+       /**\r
+        * This method is called to check if the user is authenticated (use the gateway feature).\r
+        * @return TRUE when the user is authenticated; otherwise FALSE.\r
+        */\r
+       function checkAuthentication()\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               \r
+               $auth = $PHPCAS_CLIENT->checkAuthentication();\r
+               \r
+               // store where the authentication has been checked and the result\r
+               $dbg = phpCAS::backtrace();\r
+               $PHPCAS_AUTH_CHECK_CALL = array('done' => TRUE,\r
+                       'file' => $dbg[0]['file'],\r
+                       'line' => $dbg[0]['line'],\r
+                       'method' => __CLASS__.'::'.__FUNCTION__,\r
+                       'result' => $auth );\r
+               phpCAS::traceEnd($auth);\r
+               return $auth; \r
+               }\r
+\r
+       /**\r
+        * This method is called to force authentication if the user was not already \r
+        * authenticated. If the user is not authenticated, halt by redirecting to \r
+        * the CAS server.\r
+        */\r
+       function forceAuthentication()\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               \r
+               $auth = $PHPCAS_CLIENT->forceAuthentication();\r
+               \r
+               // store where the authentication has been checked and the result\r
+               $dbg = phpCAS::backtrace();\r
+               $PHPCAS_AUTH_CHECK_CALL = array('done' => TRUE,\r
+                       'file' => $dbg[0]['file'],\r
+                       'line' => $dbg[0]['line'],\r
+                       'method' => __CLASS__.'::'.__FUNCTION__,\r
+                       'result' => $auth );\r
+               \r
+               if ( !$auth ) {\r
+                       phpCAS::trace('user is not authenticated, redirecting to the CAS server');\r
+                       $PHPCAS_CLIENT->forceAuthentication();\r
+               } else {\r
+                       phpCAS::trace('no need to authenticate (user `'.phpCAS::getUser().'\' is already authenticated)');\r
+               }\r
+               \r
+               phpCAS::traceEnd();\r
+               return $auth; \r
+               }\r
+       \r
+       /**\r
+        * This method is called to renew the authentication.\r
+        **/\r
+       function renewAuthentication() {\r
+               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before'.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               \r
+               // store where the authentication has been checked and the result\r
+               $dbg = phpCAS::backtrace();\r
+               $PHPCAS_AUTH_CHECK_CALL = array('done' => TRUE, 'file' => $dbg[0]['file'], 'line' => $dbg[0]['line'], 'method' => __CLASS__.'::'.__FUNCTION__, 'result' => $auth );\r
+               \r
+               $PHPCAS_CLIENT->renewAuthentication();\r
+               phpCAS::traceEnd();\r
+       }\r
+\r
+       /**\r
+        * This method has been left from version 0.4.1 for compatibility reasons.\r
+        */\r
+       function authenticate()\r
+               {\r
+               phpCAS::error('this method is deprecated. You should use '.__CLASS__.'::forceAuthentication() instead');\r
+               }\r
+       \r
+       /**\r
+        * This method is called to check if the user is authenticated (previously or by\r
+        * tickets given in the URL).\r
+        *\r
+        * @return TRUE when the user is authenticated.\r
+        */\r
+       function isAuthenticated()\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;\r
+               \r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               \r
+               // call the isAuthenticated method of the global $PHPCAS_CLIENT object\r
+               $auth = $PHPCAS_CLIENT->isAuthenticated();\r
+               \r
+               // store where the authentication has been checked and the result\r
+               $dbg = phpCAS::backtrace();\r
+               $PHPCAS_AUTH_CHECK_CALL = array('done' => TRUE,\r
+                       'file' => $dbg[0]['file'],\r
+                       'line' => $dbg[0]['line'],\r
+                       'method' => __CLASS__.'::'.__FUNCTION__,\r
+                       'result' => $auth );\r
+               phpCAS::traceEnd($auth);\r
+               return $auth;\r
+               }\r
+       \r
+       /**\r
+        * Checks whether authenticated based on $_SESSION. Useful to avoid\r
+        * server calls.\r
+        * @return true if authenticated, false otherwise.\r
+        * @since 0.4.22 by Brendan Arnold\r
+        */\r
+       function isSessionAuthenticated ()\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               return($PHPCAS_CLIENT->isSessionAuthenticated());\r
+               }\r
+       \r
+       /**\r
+        * This method returns the CAS user's login name.\r
+        * @warning should not be called only after phpCAS::forceAuthentication()\r
+        * or phpCAS::checkAuthentication().\r
+        *\r
+        * @return the login name of the authenticated user\r
+        */\r
+       function getUser()\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_AUTH_CHECK_CALL['done'] ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::forceAuthentication() or '.__CLASS__.'::isAuthenticated()');\r
+               }\r
+               if ( !$PHPCAS_AUTH_CHECK_CALL['result'] ) {\r
+                       phpCAS::error('authentication was checked (by '.$PHPCAS_AUTH_CHECK_CALL['method'].'() at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].') but the method returned FALSE');\r
+               }\r
+               return $PHPCAS_CLIENT->getUser();\r
+               }\r
+       \r
+       /**\r
+        * This method returns the CAS user's login name.\r
+        * @warning should not be called only after phpCAS::forceAuthentication()\r
+        * or phpCAS::checkAuthentication().\r
+        *\r
+        * @return the login name of the authenticated user\r
+        */\r
+       function getAttributes()\r
+               {\r
+               global $PHPCAS_CLIENT, $PHPCAS_AUTH_CHECK_CALL;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_AUTH_CHECK_CALL['done'] ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::forceAuthentication() or '.__CLASS__.'::isAuthenticated()');\r
+               }\r
+               if ( !$PHPCAS_AUTH_CHECK_CALL['result'] ) {\r
+                       phpCAS::error('authentication was checked (by '.$PHPCAS_AUTH_CHECK_CALL['method'].'() at '.$PHPCAS_AUTH_CHECK_CALL['file'].':'.$PHPCAS_AUTH_CHECK_CALL['line'].') but the method returned FALSE');\r
+               }\r
+               return $PHPCAS_CLIENT->getAttributes();\r
+               }\r
+    /**\r
+     * Handle logout requests.\r
+     */\r
+    function handleLogoutRequests($check_client=true, $allowed_clients=false)\r
+        {\r
+            global $PHPCAS_CLIENT;\r
+            if ( !is_object($PHPCAS_CLIENT) ) {\r
+                phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+            }\r
+            return($PHPCAS_CLIENT->handleLogoutRequests($check_client, $allowed_clients));\r
+        }\r
+   \r
+       /**\r
+        * This method returns the URL to be used to login.\r
+        * or phpCAS::isAuthenticated().\r
+        *\r
+        * @return the login name of the authenticated user\r
+        */\r
+       function getServerLoginURL()\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               return $PHPCAS_CLIENT->getServerLoginURL();\r
+               }\r
+       \r
+       /**\r
+        * Set the login URL of the CAS server.\r
+        * @param $url the login URL\r
+        * @since 0.4.21 by Wyman Chan\r
+        */\r
+       function setServerLoginURL($url='')\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after\r
+                               '.__CLASS__.'::client()');\r
+               }\r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be\r
+                       `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setServerLoginURL($url);\r
+               phpCAS::traceEnd();\r
+               }\r
+               \r
+               \r
+       /**\r
+        * Set the serviceValidate URL of the CAS server.\r
+        * @param $url the serviceValidate URL\r
+        * @since 1.1.0 by Joachim Fritschi\r
+        */\r
+       function setServerServiceValidateURL($url='')\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after\r
+                               '.__CLASS__.'::client()');\r
+               }\r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be\r
+                       `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setServerServiceValidateURL($url);\r
+               phpCAS::traceEnd();\r
+               }\r
+               \r
+               \r
+        /**\r
+        * Set the proxyValidate URL of the CAS server.\r
+        * @param $url the proxyValidate URL\r
+        * @since 1.1.0 by Joachim Fritschi\r
+        */\r
+       function setServerProxyValidateURL($url='')\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after\r
+                               '.__CLASS__.'::client()');\r
+               }\r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be\r
+                       `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setServerProxyValidateURL($url);\r
+               phpCAS::traceEnd();\r
+               }\r
+               \r
+     /**\r
+        * Set the samlValidate URL of the CAS server.\r
+        * @param $url the samlValidate URL\r
+        * @since 1.1.0 by Joachim Fritschi\r
+        */\r
+       function setServerSamlValidateURL($url='')\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after\r
+                               '.__CLASS__.'::client()');\r
+               }\r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be\r
+                       `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setServerSamlValidateURL($url);\r
+               phpCAS::traceEnd();\r
+               }                       \r
+       \r
+       /**\r
+        * This method returns the URL to be used to login.\r
+        * or phpCAS::isAuthenticated().\r
+        *\r
+        * @return the login name of the authenticated user\r
+        */\r
+       function getServerLogoutURL()\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should not be called before '.__CLASS__.'::client() or '.__CLASS__.'::proxy()');\r
+               }\r
+               return $PHPCAS_CLIENT->getServerLogoutURL();\r
+               }\r
+       \r
+       /**\r
+        * Set the logout URL of the CAS server.\r
+        * @param $url the logout URL\r
+        * @since 0.4.21 by Wyman Chan\r
+        */\r
+       function setServerLogoutURL($url='')\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after\r
+                               '.__CLASS__.'::client()');\r
+               }\r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be\r
+                       `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setServerLogoutURL($url);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /**\r
+        * This method is used to logout from CAS.\r
+        * @params $params an array that contains the optional url and service parameters that will be passed to the CAS server\r
+        * @public\r
+        */\r
+       function logout($params = "") {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if (!is_object($PHPCAS_CLIENT)) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');\r
+               }\r
+               $parsedParams = array();\r
+               if ($params != "") {\r
+                       if (is_string($params)) {\r
+                               phpCAS::error('method `phpCAS::logout($url)\' is now deprecated, use `phpCAS::logoutWithUrl($url)\' instead');\r
+                       }\r
+                       if (!is_array($params)) {\r
+                               phpCAS::error('type mismatched for parameter $params (should be `array\')');\r
+                       }\r
+                       foreach ($params as $key => $value) {\r
+                               if ($key != "service" && $key != "url") {\r
+                                       phpCAS::error('only `url\' and `service\' parameters are allowed for method `phpCAS::logout($params)\'');\r
+                               }\r
+                               $parsedParams[$key] = $value;\r
+                       }\r
+               }\r
+               $PHPCAS_CLIENT->logout($parsedParams);\r
+               // never reached\r
+               phpCAS::traceEnd();\r
+       }\r
+       \r
+       /**\r
+        * This method is used to logout from CAS. Halts by redirecting to the CAS server.\r
+        * @param $service a URL that will be transmitted to the CAS server\r
+        */\r
+       function logoutWithRedirectService($service) {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');\r
+               }\r
+               if (!is_string($service)) {\r
+                       phpCAS::error('type mismatched for parameter $service (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->logout(array("service" => $service));\r
+               // never reached\r
+               phpCAS::traceEnd();\r
+       }\r
+       \r
+       /**\r
+        * This method is used to logout from CAS. Halts by redirecting to the CAS server.\r
+        * @param $url a URL that will be transmitted to the CAS server\r
+        */\r
+       function logoutWithUrl($url) {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');\r
+               }\r
+               if (!is_string($url)) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->logout(array("url" => $url));\r
+               // never reached\r
+               phpCAS::traceEnd();\r
+       }\r
+       \r
+       /**\r
+        * This method is used to logout from CAS. Halts by redirecting to the CAS server.\r
+        * @param $service a URL that will be transmitted to the CAS server\r
+        * @param $url a URL that will be transmitted to the CAS server\r
+        */\r
+       function logoutWithRedirectServiceAndUrl($service, $url) {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');\r
+               }\r
+               if (!is_string($service)) {\r
+                       phpCAS::error('type mismatched for parameter $service (should be `string\')');\r
+               }\r
+               if (!is_string($url)) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->logout(array("service" => $service, "url" => $url));\r
+               // never reached\r
+               phpCAS::traceEnd();\r
+       }\r
+       \r
+       /**\r
+        * Set the fixed URL that will be used by the CAS server to transmit the PGT.\r
+        * When this method is not called, a phpCAS script uses its own URL for the callback.\r
+        *\r
+        * @param $url the URL\r
+        */\r
+       function setFixedCallbackURL($url='')\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( !$PHPCAS_CLIENT->isProxy() ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }\r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setCallbackURL($url);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /**\r
+        * Set the fixed URL that will be set as the CAS service parameter. When this\r
+        * method is not called, a phpCAS script uses its own URL.\r
+        *\r
+        * @param $url the URL\r
+        */\r
+       function setFixedServiceURL($url)\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }  \r
+               if ( gettype($url) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $url (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setURL($url);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /**\r
+        * Get the URL that is set as the CAS service parameter.\r
+        */\r
+       function getServiceURL()\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }  \r
+               return($PHPCAS_CLIENT->getURL());\r
+               }\r
+       \r
+       /**\r
+        * Retrieve a Proxy Ticket from the CAS server.\r
+        */\r
+       function retrievePT($target_service,&$err_code,&$err_msg)\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::proxy()');\r
+               }  \r
+               if ( gettype($target_service) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $target_service(should be `string\')');\r
+               }\r
+               return($PHPCAS_CLIENT->retrievePT($target_service,$err_code,$err_msg));\r
+               }\r
+       \r
+       /**\r
+        * Set the certificate of the CAS server.\r
+        *\r
+        * @param $cert the PEM certificate\r
+        */\r
+       function setCasServerCert($cert)\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');\r
+               }  \r
+               if ( gettype($cert) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $cert (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setCasServerCert($cert);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /**\r
+        * Set the certificate of the CAS server CA.\r
+        *\r
+        * @param $cert the CA certificate\r
+        */\r
+       function setCasServerCACert($cert)\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');\r
+               }  \r
+               if ( gettype($cert) != 'string' ) {\r
+                       phpCAS::error('type mismatched for parameter $cert (should be `string\')');\r
+               }\r
+               $PHPCAS_CLIENT->setCasServerCACert($cert);\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /**\r
+        * Set no SSL validation for the CAS server.\r
+        */\r
+       function setNoCasServerValidation()\r
+               {\r
+               global $PHPCAS_CLIENT;\r
+               phpCAS::traceBegin();\r
+               if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');\r
+               }  \r
+               $PHPCAS_CLIENT->setNoCasServerValidation();\r
+               phpCAS::traceEnd();\r
+               }\r
+       \r
+       /** @} */\r
+       \r
+  /**\r
+   * Change CURL options.\r
+   * CURL is used to connect through HTTPS to CAS server\r
+   * @param $key the option key\r
+   * @param $value the value to set\r
+   */\r
+   function setExtraCurlOption($key, $value)\r
+               {\r
+                 global $PHPCAS_CLIENT;\r
+                 phpCAS::traceBegin();\r
+                 if ( !is_object($PHPCAS_CLIENT) ) {\r
+                       phpCAS::error('this method should only be called after '.__CLASS__.'::client() or'.__CLASS__.'::proxy()');\r
+                 }  \r
+                 $PHPCAS_CLIENT->setExtraCurlOption($key, $value);\r
+                 phpCAS::traceEnd();\r
+               }\r
+\r
+}\r
+\r
+// ########################################################################\r
+// DOCUMENTATION\r
+// ########################################################################\r
+\r
+// ########################################################################\r
+//  MAIN PAGE\r
+\r
+/**\r
+ * @mainpage\r
+ *\r
+ * The following pages only show the source documentation.\r
+ *\r
+ */\r
+\r
+// ########################################################################\r
+//  MODULES DEFINITION\r
+\r
+/** @defgroup public User interface */\r
+\r
+/** @defgroup publicInit Initialization\r
+ *  @ingroup public */\r
+\r
+/** @defgroup publicAuth Authentication\r
+ *  @ingroup public */\r
+\r
+/** @defgroup publicServices Access to external services\r
+ *  @ingroup public */\r
+\r
+/** @defgroup publicConfig Configuration\r
+ *  @ingroup public */\r
+\r
+/** @defgroup publicLang Internationalization\r
+ *  @ingroup publicConfig */\r
+\r
+/** @defgroup publicOutput HTML output\r
+ *  @ingroup publicConfig */\r
+\r
+/** @defgroup publicPGTStorage PGT storage\r
+ *  @ingroup publicConfig */\r
+\r
+/** @defgroup publicDebug Debugging\r
+ *  @ingroup public */\r
+\r
+\r
+/** @defgroup internal Implementation */\r
+\r
+/** @defgroup internalAuthentication Authentication\r
+ *  @ingroup internal */\r
+\r
+/** @defgroup internalBasic CAS Basic client features (CAS 1.0, Service Tickets)\r
+ *  @ingroup internal */\r
+\r
+/** @defgroup internalProxy CAS Proxy features (CAS 2.0, Proxy Granting Tickets)\r
+ *  @ingroup internal */\r
+\r
+/** @defgroup internalPGTStorage PGT storage\r
+ *  @ingroup internalProxy */\r
+\r
+/** @defgroup internalPGTStorageDB PGT storage in a database\r
+ *  @ingroup internalPGTStorage */\r
+\r
+/** @defgroup internalPGTStorageFile PGT storage on the filesystem\r
+ *  @ingroup internalPGTStorage */\r
+\r
+/** @defgroup internalCallback Callback from the CAS server\r
+ *  @ingroup internalProxy */\r
+\r
+/** @defgroup internalProxied CAS proxied client features (CAS 2.0, Proxy Tickets)\r
+ *  @ingroup internal */\r
+\r
+/** @defgroup internalConfig Configuration\r
+ *  @ingroup internal */\r
+\r
+/** @defgroup internalOutput HTML output\r
+ *  @ingroup internalConfig */\r
+\r
+/** @defgroup internalLang Internationalization\r
+ *  @ingroup internalConfig\r
+ *\r
+ * To add a new language:\r
+ * - 1. define a new constant PHPCAS_LANG_XXXXXX in CAS/CAS.php\r
+ * - 2. copy any file from CAS/languages to CAS/languages/XXXXXX.php\r
+ * - 3. Make the translations\r
+ */\r
+\r
+/** @defgroup internalDebug Debugging\r
+ *  @ingroup internal */\r
+\r
+/** @defgroup internalMisc Miscellaneous\r
+ *  @ingroup internal */\r
+\r
+// ########################################################################\r
+//  EXAMPLES\r
+\r
+/**\r
+ * @example example_simple.php\r
+ */\r
+ /**\r
+  * @example example_proxy.php\r
+  */\r
+  /**\r
+   * @example example_proxy2.php\r
+   */\r
+   /**\r
+    * @example example_lang.php\r
+    */\r
+    /**\r
+     * @example example_html.php\r
+     */\r
+     /**\r
+      * @example example_file.php\r
+      */\r
+      /**\r
+       * @example example_db.php\r
+       */\r
+       /**\r
+        * @example example_service.php\r
+        */\r
+        /**\r
+         * @example example_session_proxy.php\r
+         */\r
+         /**\r
+          * @example example_session_service.php\r
+          */\r
+          /**\r
+           * @example example_gateway.php\r
+           */\r
+\r
+\r
+\r
+?>\r
index 00797b9c5673598d672f156ac4cd64ce0c405bc2..5a589e4b2822bf405bdfcdc0a31194ec5c068cb0 100644 (file)
-<?php
-
-/**
- * @file CAS/PGTStorage/pgt-db.php
- * Basic class for PGT database storage
- */
-
-/**
- * @class PGTStorageDB
- * The PGTStorageDB class is a class for PGT database storage. An instance of 
- * this class is returned by CASClient::SetPGTStorageDB().
- *
- * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>
- *
- * @ingroup internalPGTStorageDB
- */
-
-class PGTStorageDB extends PGTStorage
-{
-  /** 
-   * @addtogroup internalPGTStorageDB
-   * @{ 
-   */
-
-  /**
-   * a string representing a PEAR DB URL to connect to the database. Written by
-   * PGTStorageDB::PGTStorageDB(), read by getURL().
-   *
-   * @hideinitializer
-   * @private
-   */
-  var $_url='';
-
-  /**
-   * This method returns the PEAR DB URL to use to connect to the database.
-   *
-   * @return a PEAR DB URL
-   *
-   * @private
-   */
-  function getURL()
-    {
-      return $this->_url;
-    }
-
-  /**
-   * The handle of the connection to the database where PGT's are stored. Written by
-   * PGTStorageDB::init(), read by getLink().
-   *
-   * @hideinitializer
-   * @private
-   */
-  var $_link = null;
-
-  /**
-   * This method returns the handle of the connection to the database where PGT's are 
-   * stored.
-   *
-   * @return a handle of connection.
-   *
-   * @private
-   */
-  function getLink()
-    {
-      return $this->_link;
-    }
-
-  /**
-   * The name of the table where PGT's are stored. Written by 
-   * PGTStorageDB::PGTStorageDB(), read by getTable().
-   *
-   * @hideinitializer
-   * @private
-   */
-  var $_table = '';
-
-  /**
-   * This method returns the name of the table where PGT's are stored.
-   *
-   * @return the name of a table.
-   *
-   * @private
-   */
-  function getTable()
-    {
-      return $this->_table;
-    }
-
-  // ########################################################################
-  //  DEBUGGING
-  // ########################################################################
-  
-  /**
-   * This method returns an informational string giving the type of storage
-   * used by the object (used for debugging purposes).
-   *
-   * @return an informational string.
-   * @public
-   */
-  function getStorageType()
-    {
-      return "database";
-    }
-
-  /**
-   * This method returns an informational string giving informations on the
-   * parameters of the storage.(used for debugging purposes).
-   *
-   * @public
-   */
-  function getStorageInfo()
-    {
-      return 'url=`'.$this->getURL().'\', table=`'.$this->getTable().'\'';
-    }
-
-  // ########################################################################
-  //  CONSTRUCTOR
-  // ########################################################################
-  
-  /**
-   * The class constructor, called by CASClient::SetPGTStorageDB().
-   *
-   * @param $cas_parent the CASClient instance that creates the object.
-   * @param $user the user to access the data with
-   * @param $password the user's password
-   * @param $database_type the type of the database hosting the data
-   * @param $hostname the server hosting the database
-   * @param $port the port the server is listening on
-   * @param $database the name of the database
-   * @param $table the name of the table storing the data
-   *
-   * @public
-   */
-  function PGTStorageDB($cas_parent,$user,$password,$database_type,$hostname,$port,$database,$table)
-    {
-      phpCAS::traceBegin();
-
-      // call the ancestor's constructor
-      $this->PGTStorage($cas_parent);
-
-      if ( empty($database_type) ) $database_type = CAS_PGT_STORAGE_DB_DEFAULT_DATABASE_TYPE;
-      if ( empty($hostname) ) $hostname = CAS_PGT_STORAGE_DB_DEFAULT_HOSTNAME;
-      if ( $port==0 ) $port = CAS_PGT_STORAGE_DB_DEFAULT_PORT;
-      if ( empty($database) ) $database = CAS_PGT_STORAGE_DB_DEFAULT_DATABASE;
-      if ( empty($table) ) $table = CAS_PGT_STORAGE_DB_DEFAULT_TABLE;
-
-      // build and store the PEAR DB URL
-      $this->_url = $database_type.':'.'//'.$user.':'.$password.'@'.$hostname.':'.$port.'/'.$database;
-
-      // XXX should use setURL and setTable
-      phpCAS::traceEnd();
-    }
-  
-  // ########################################################################
-  //  INITIALIZATION
-  // ########################################################################
-  
-  /**
-   * This method is used to initialize the storage. Halts on error.
-   *
-   * @public
-   */
-  function init()
-    {
-      phpCAS::traceBegin();
-      // if the storage has already been initialized, return immediatly
-      if ( $this->isInitialized() )
-               return;
-      // call the ancestor's method (mark as initialized)
-      parent::init();
-      
-         //include phpDB library (the test was introduced in release 0.4.8 for 
-         //the integration into Tikiwiki).
-         if (!class_exists('DB')) {
-               include_once('DB.php');
-         }
-
-      // try to connect to the database
-      $this->_link = DB::connect($this->getURL());
-      if ( DB::isError($this->_link) ) {
-       phpCAS::error('could not connect to database ('.DB::errorMessage($this->_link).')');
-      }
-      var_dump($this->_link);
-      phpCAS::traceBEnd();
-    }
-
-  /** @} */
-}
-
+<?php\r
+\r
+/**\r
+ * @file CAS/PGTStorage/pgt-db.php\r
+ * Basic class for PGT database storage\r
+ */\r
+\r
+/**\r
+ * @class PGTStorageDB\r
+ * The PGTStorageDB class is a class for PGT database storage. An instance of \r
+ * this class is returned by CASClient::SetPGTStorageDB().\r
+ *\r
+ * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>\r
+ *\r
+ * @ingroup internalPGTStorageDB\r
+ */\r
+\r
+class PGTStorageDB extends PGTStorage\r
+{\r
+  /** \r
+   * @addtogroup internalPGTStorageDB\r
+   * @{ \r
+   */\r
+\r
+  /**\r
+   * a string representing a PEAR DB URL to connect to the database. Written by\r
+   * PGTStorageDB::PGTStorageDB(), read by getURL().\r
+   *\r
+   * @hideinitializer\r
+   * @private\r
+   */\r
+  var $_url='';\r
+\r
+  /**\r
+   * This method returns the PEAR DB URL to use to connect to the database.\r
+   *\r
+   * @return a PEAR DB URL\r
+   *\r
+   * @private\r
+   */\r
+  function getURL()\r
+    {\r
+      return $this->_url;\r
+    }\r
+\r
+  /**\r
+   * The handle of the connection to the database where PGT's are stored. Written by\r
+   * PGTStorageDB::init(), read by getLink().\r
+   *\r
+   * @hideinitializer\r
+   * @private\r
+   */\r
+  var $_link = null;\r
+\r
+  /**\r
+   * This method returns the handle of the connection to the database where PGT's are \r
+   * stored.\r
+   *\r
+   * @return a handle of connection.\r
+   *\r
+   * @private\r
+   */\r
+  function getLink()\r
+    {\r
+      return $this->_link;\r
+    }\r
+\r
+  /**\r
+   * The name of the table where PGT's are stored. Written by \r
+   * PGTStorageDB::PGTStorageDB(), read by getTable().\r
+   *\r
+   * @hideinitializer\r
+   * @private\r
+   */\r
+  var $_table = '';\r
+\r
+  /**\r
+   * This method returns the name of the table where PGT's are stored.\r
+   *\r
+   * @return the name of a table.\r
+   *\r
+   * @private\r
+   */\r
+  function getTable()\r
+    {\r
+      return $this->_table;\r
+    }\r
+\r
+  // ########################################################################\r
+  //  DEBUGGING\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * This method returns an informational string giving the type of storage\r
+   * used by the object (used for debugging purposes).\r
+   *\r
+   * @return an informational string.\r
+   * @public\r
+   */\r
+  function getStorageType()\r
+    {\r
+      return "database";\r
+    }\r
+\r
+  /**\r
+   * This method returns an informational string giving informations on the\r
+   * parameters of the storage.(used for debugging purposes).\r
+   *\r
+   * @public\r
+   */\r
+  function getStorageInfo()\r
+    {\r
+      return 'url=`'.$this->getURL().'\', table=`'.$this->getTable().'\'';\r
+    }\r
+\r
+  // ########################################################################\r
+  //  CONSTRUCTOR\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * The class constructor, called by CASClient::SetPGTStorageDB().\r
+   *\r
+   * @param $cas_parent the CASClient instance that creates the object.\r
+   * @param $user the user to access the data with\r
+   * @param $password the user's password\r
+   * @param $database_type the type of the database hosting the data\r
+   * @param $hostname the server hosting the database\r
+   * @param $port the port the server is listening on\r
+   * @param $database the name of the database\r
+   * @param $table the name of the table storing the data\r
+   *\r
+   * @public\r
+   */\r
+  function PGTStorageDB($cas_parent,$user,$password,$database_type,$hostname,$port,$database,$table)\r
+    {\r
+      phpCAS::traceBegin();\r
+\r
+      // call the ancestor's constructor\r
+      $this->PGTStorage($cas_parent);\r
+\r
+      if ( empty($database_type) ) $database_type = CAS_PGT_STORAGE_DB_DEFAULT_DATABASE_TYPE;\r
+      if ( empty($hostname) ) $hostname = CAS_PGT_STORAGE_DB_DEFAULT_HOSTNAME;\r
+      if ( $port==0 ) $port = CAS_PGT_STORAGE_DB_DEFAULT_PORT;\r
+      if ( empty($database) ) $database = CAS_PGT_STORAGE_DB_DEFAULT_DATABASE;\r
+      if ( empty($table) ) $table = CAS_PGT_STORAGE_DB_DEFAULT_TABLE;\r
+\r
+      // build and store the PEAR DB URL\r
+      $this->_url = $database_type.':'.'//'.$user.':'.$password.'@'.$hostname.':'.$port.'/'.$database;\r
+\r
+      // XXX should use setURL and setTable\r
+      phpCAS::traceEnd();\r
+    }\r
+  \r
+  // ########################################################################\r
+  //  INITIALIZATION\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * This method is used to initialize the storage. Halts on error.\r
+   *\r
+   * @public\r
+   */\r
+  function init()\r
+    {\r
+      phpCAS::traceBegin();\r
+      // if the storage has already been initialized, return immediatly\r
+      if ( $this->isInitialized() )\r
+               return;\r
+      // call the ancestor's method (mark as initialized)\r
+      parent::init();\r
+      \r
+         //include phpDB library (the test was introduced in release 0.4.8 for \r
+         //the integration into Tikiwiki).\r
+         if (!class_exists('DB')) {\r
+               include_once('DB.php');\r
+         }\r
+\r
+      // try to connect to the database\r
+      $this->_link = DB::connect($this->getURL());\r
+      if ( DB::isError($this->_link) ) {\r
+       phpCAS::error('could not connect to database ('.DB::errorMessage($this->_link).')');\r
+      }\r
+      var_dump($this->_link);\r
+      phpCAS::traceBEnd();\r
+    }\r
+\r
+  /** @} */\r
+}\r
+\r
 ?>
\ No newline at end of file
index d48a60d670af1e8b4ce1206763806330fc891903..bc07485b8f8831a870c3bd6e986f3a2f88298c26 100644 (file)
-<?php
-
-/**
- * @file CAS/PGTStorage/pgt-file.php
- * Basic class for PGT file storage
- */
-
-/**
- * @class PGTStorageFile
- * The PGTStorageFile class is a class for PGT file storage. An instance of 
- * this class is returned by CASClient::SetPGTStorageFile().
- *
- * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>
- *
- * @ingroup internalPGTStorageFile
- */
-
-class PGTStorageFile extends PGTStorage
-{
-  /** 
-   * @addtogroup internalPGTStorageFile 
-   * @{ 
-   */
-
-  /**
-   * a string telling where PGT's should be stored on the filesystem. Written by
-   * PGTStorageFile::PGTStorageFile(), read by getPath().
-   *
-   * @private
-   */
-  var $_path;
-
-  /**
-   * This method returns the name of the directory where PGT's should be stored 
-   * on the filesystem.
-   *
-   * @return the name of a directory (with leading and trailing '/')
-   *
-   * @private
-   */
-  function getPath()
-    {
-      return $this->_path;
-    }
-
-  /**
-   * a string telling the format to use to store PGT's (plain or xml). Written by
-   * PGTStorageFile::PGTStorageFile(), read by getFormat().
-   *
-   * @private
-   */
-  var $_format;
-
-  /**
-   * This method returns the format to use when storing PGT's on the filesystem.
-   *
-   * @return a string corresponding to the format used (plain or xml).
-   *
-   * @private
-   */
-  function getFormat()
-    {
-      return $this->_format;
-    }
-
-  // ########################################################################
-  //  DEBUGGING
-  // ########################################################################
-  
-  /**
-   * This method returns an informational string giving the type of storage
-   * used by the object (used for debugging purposes).
-   *
-   * @return an informational string.
-   * @public
-   */
-  function getStorageType()
-    {
-      return "file";
-    }
-
-  /**
-   * This method returns an informational string giving informations on the
-   * parameters of the storage.(used for debugging purposes).
-   *
-   * @return an informational string.
-   * @public
-   */
-  function getStorageInfo()
-    {
-      return 'path=`'.$this->getPath().'\', format=`'.$this->getFormat().'\'';
-    }
-
-  // ########################################################################
-  //  CONSTRUCTOR
-  // ########################################################################
-  
-  /**
-   * The class constructor, called by CASClient::SetPGTStorageFile().
-   *
-   * @param $cas_parent the CASClient instance that creates the object.
-   * @param $format the format used to store the PGT's (`plain' and `xml' allowed).
-   * @param $path the path where the PGT's should be stored
-   *
-   * @public
-   */
-  function PGTStorageFile($cas_parent,$format,$path)
-    {
-      phpCAS::traceBegin();
-      // call the ancestor's constructor
-      $this->PGTStorage($cas_parent);
-
-      if (empty($format) ) $format = CAS_PGT_STORAGE_FILE_DEFAULT_FORMAT;
-      if (empty($path) ) $path = CAS_PGT_STORAGE_FILE_DEFAULT_PATH;
-
-      // check that the path is an absolute path
-      if (getenv("OS")=="Windows_NT"){
-       
-        if (!preg_match('`^[a-zA-Z]:`', $path)) {
-               phpCAS::error('an absolute path is needed for PGT storage to file');
-       }
-       
-      }
-      else
-      {
-      
-       if ( $path[0] != '/' ) {
-                       phpCAS::error('an absolute path is needed for PGT storage to file');
-       }
-
-       // store the path (with a leading and trailing '/')      
-       $path = preg_replace('|[/]*$|','/',$path);
-       $path = preg_replace('|^[/]*|','/',$path);
-      }
-      
-      $this->_path = $path;
-      // check the format and store it
-      switch ($format) {
-      case CAS_PGT_STORAGE_FILE_FORMAT_PLAIN:
-      case CAS_PGT_STORAGE_FILE_FORMAT_XML:
-       $this->_format = $format;
-       break;
-      default:
-       phpCAS::error('unknown PGT file storage format (`'.CAS_PGT_STORAGE_FILE_FORMAT_PLAIN.'\' and `'.CAS_PGT_STORAGE_FILE_FORMAT_XML.'\' allowed)');
-      }
-      phpCAS::traceEnd();      
-    }
-
-  // ########################################################################
-  //  INITIALIZATION
-  // ########################################################################
-  
-  /**
-   * This method is used to initialize the storage. Halts on error.
-   *
-   * @public
-   */
-  function init()
-    {
-      phpCAS::traceBegin();
-      // if the storage has already been initialized, return immediatly
-      if ( $this->isInitialized() )
-       return;
-      // call the ancestor's method (mark as initialized)
-      parent::init();
-      phpCAS::traceEnd();      
-    }
-
-  // ########################################################################
-  //  PGT I/O
-  // ########################################################################
-
-  /**
-   * This method returns the filename corresponding to a PGT Iou.
-   *
-   * @param $pgt_iou the PGT iou.
-   *
-   * @return a filename
-   * @private
-   */
-  function getPGTIouFilename($pgt_iou)
-    {
-      phpCAS::traceBegin();
-      $filename = $this->getPath().$pgt_iou.'.'.$this->getFormat();
-      phpCAS::traceEnd($filename);
-      return $filename;
-    }
-  
-  /**
-   * This method stores a PGT and its corresponding PGT Iou into a file. Echoes a
-   * warning on error.
-   *
-   * @param $pgt the PGT
-   * @param $pgt_iou the PGT iou
-   *
-   * @public
-   */
-  function write($pgt,$pgt_iou)
-    {
-      phpCAS::traceBegin();
-      $fname = $this->getPGTIouFilename($pgt_iou);
-      if ( $f=fopen($fname,"w") ) {
-       if ( fputs($f,$pgt) === FALSE ) {
-         phpCAS::error('could not write PGT to `'.$fname.'\'');
-       }
-       fclose($f);
-      } else {
-       phpCAS::error('could not open `'.$fname.'\'');
-      }
-      phpCAS::traceEnd();      
-    }
-
-  /**
-   * This method reads a PGT corresponding to a PGT Iou and deletes the 
-   * corresponding file.
-   *
-   * @param $pgt_iou the PGT iou
-   *
-   * @return the corresponding PGT, or FALSE on error
-   *
-   * @public
-   */
-  function read($pgt_iou)
-    {
-      phpCAS::traceBegin();
-      $pgt = FALSE;
-      $fname = $this->getPGTIouFilename($pgt_iou);
-      if ( !($f=fopen($fname,"r")) ) {
-       phpCAS::trace('could not open `'.$fname.'\'');
-      } else {
-       if ( ($pgt=fgets($f)) === FALSE ) {
-         phpCAS::trace('could not read PGT from `'.$fname.'\'');
-       } 
-       fclose($f);
-      }
-
-      // delete the PGT file
-      @unlink($fname);
-
-      phpCAS::traceEnd($pgt);
-      return $pgt;
-    }
-  
-  /** @} */
-  
-}
-
-  
+<?php\r
+\r
+/**\r
+ * @file CAS/PGTStorage/pgt-file.php\r
+ * Basic class for PGT file storage\r
+ */\r
+\r
+/**\r
+ * @class PGTStorageFile\r
+ * The PGTStorageFile class is a class for PGT file storage. An instance of \r
+ * this class is returned by CASClient::SetPGTStorageFile().\r
+ *\r
+ * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>\r
+ *\r
+ * @ingroup internalPGTStorageFile\r
+ */\r
+\r
+class PGTStorageFile extends PGTStorage\r
+{\r
+  /** \r
+   * @addtogroup internalPGTStorageFile \r
+   * @{ \r
+   */\r
+\r
+  /**\r
+   * a string telling where PGT's should be stored on the filesystem. Written by\r
+   * PGTStorageFile::PGTStorageFile(), read by getPath().\r
+   *\r
+   * @private\r
+   */\r
+  var $_path;\r
+\r
+  /**\r
+   * This method returns the name of the directory where PGT's should be stored \r
+   * on the filesystem.\r
+   *\r
+   * @return the name of a directory (with leading and trailing '/')\r
+   *\r
+   * @private\r
+   */\r
+  function getPath()\r
+    {\r
+      return $this->_path;\r
+    }\r
+\r
+  /**\r
+   * a string telling the format to use to store PGT's (plain or xml). Written by\r
+   * PGTStorageFile::PGTStorageFile(), read by getFormat().\r
+   *\r
+   * @private\r
+   */\r
+  var $_format;\r
+\r
+  /**\r
+   * This method returns the format to use when storing PGT's on the filesystem.\r
+   *\r
+   * @return a string corresponding to the format used (plain or xml).\r
+   *\r
+   * @private\r
+   */\r
+  function getFormat()\r
+    {\r
+      return $this->_format;\r
+    }\r
+\r
+  // ########################################################################\r
+  //  DEBUGGING\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * This method returns an informational string giving the type of storage\r
+   * used by the object (used for debugging purposes).\r
+   *\r
+   * @return an informational string.\r
+   * @public\r
+   */\r
+  function getStorageType()\r
+    {\r
+      return "file";\r
+    }\r
+\r
+  /**\r
+   * This method returns an informational string giving informations on the\r
+   * parameters of the storage.(used for debugging purposes).\r
+   *\r
+   * @return an informational string.\r
+   * @public\r
+   */\r
+  function getStorageInfo()\r
+    {\r
+      return 'path=`'.$this->getPath().'\', format=`'.$this->getFormat().'\'';\r
+    }\r
+\r
+  // ########################################################################\r
+  //  CONSTRUCTOR\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * The class constructor, called by CASClient::SetPGTStorageFile().\r
+   *\r
+   * @param $cas_parent the CASClient instance that creates the object.\r
+   * @param $format the format used to store the PGT's (`plain' and `xml' allowed).\r
+   * @param $path the path where the PGT's should be stored\r
+   *\r
+   * @public\r
+   */\r
+  function PGTStorageFile($cas_parent,$format,$path)\r
+    {\r
+      phpCAS::traceBegin();\r
+      // call the ancestor's constructor\r
+      $this->PGTStorage($cas_parent);\r
+\r
+      if (empty($format) ) $format = CAS_PGT_STORAGE_FILE_DEFAULT_FORMAT;\r
+      if (empty($path) ) $path = CAS_PGT_STORAGE_FILE_DEFAULT_PATH;\r
+\r
+      // check that the path is an absolute path\r
+      if (getenv("OS")=="Windows_NT"){\r
+       \r
+        if (!preg_match('`^[a-zA-Z]:`', $path)) {\r
+               phpCAS::error('an absolute path is needed for PGT storage to file');\r
+       }\r
+       \r
+      }\r
+      else\r
+      {\r
+      \r
+       if ( $path[0] != '/' ) {\r
+                       phpCAS::error('an absolute path is needed for PGT storage to file');\r
+       }\r
+\r
+       // store the path (with a leading and trailing '/')      \r
+       $path = preg_replace('|[/]*$|','/',$path);\r
+       $path = preg_replace('|^[/]*|','/',$path);\r
+      }\r
+      \r
+      $this->_path = $path;\r
+      // check the format and store it\r
+      switch ($format) {\r
+      case CAS_PGT_STORAGE_FILE_FORMAT_PLAIN:\r
+      case CAS_PGT_STORAGE_FILE_FORMAT_XML:\r
+       $this->_format = $format;\r
+       break;\r
+      default:\r
+       phpCAS::error('unknown PGT file storage format (`'.CAS_PGT_STORAGE_FILE_FORMAT_PLAIN.'\' and `'.CAS_PGT_STORAGE_FILE_FORMAT_XML.'\' allowed)');\r
+      }\r
+      phpCAS::traceEnd();      \r
+    }\r
+\r
+  // ########################################################################\r
+  //  INITIALIZATION\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * This method is used to initialize the storage. Halts on error.\r
+   *\r
+   * @public\r
+   */\r
+  function init()\r
+    {\r
+      phpCAS::traceBegin();\r
+      // if the storage has already been initialized, return immediatly\r
+      if ( $this->isInitialized() )\r
+       return;\r
+      // call the ancestor's method (mark as initialized)\r
+      parent::init();\r
+      phpCAS::traceEnd();      \r
+    }\r
+\r
+  // ########################################################################\r
+  //  PGT I/O\r
+  // ########################################################################\r
+\r
+  /**\r
+   * This method returns the filename corresponding to a PGT Iou.\r
+   *\r
+   * @param $pgt_iou the PGT iou.\r
+   *\r
+   * @return a filename\r
+   * @private\r
+   */\r
+  function getPGTIouFilename($pgt_iou)\r
+    {\r
+      phpCAS::traceBegin();\r
+      $filename = $this->getPath().$pgt_iou.'.'.$this->getFormat();\r
+      phpCAS::traceEnd($filename);\r
+      return $filename;\r
+    }\r
+  \r
+  /**\r
+   * This method stores a PGT and its corresponding PGT Iou into a file. Echoes a\r
+   * warning on error.\r
+   *\r
+   * @param $pgt the PGT\r
+   * @param $pgt_iou the PGT iou\r
+   *\r
+   * @public\r
+   */\r
+  function write($pgt,$pgt_iou)\r
+    {\r
+      phpCAS::traceBegin();\r
+      $fname = $this->getPGTIouFilename($pgt_iou);\r
+      if ( $f=fopen($fname,"w") ) {\r
+       if ( fputs($f,$pgt) === FALSE ) {\r
+         phpCAS::error('could not write PGT to `'.$fname.'\'');\r
+       }\r
+       fclose($f);\r
+      } else {\r
+       phpCAS::error('could not open `'.$fname.'\'');\r
+      }\r
+      phpCAS::traceEnd();      \r
+    }\r
+\r
+  /**\r
+   * This method reads a PGT corresponding to a PGT Iou and deletes the \r
+   * corresponding file.\r
+   *\r
+   * @param $pgt_iou the PGT iou\r
+   *\r
+   * @return the corresponding PGT, or FALSE on error\r
+   *\r
+   * @public\r
+   */\r
+  function read($pgt_iou)\r
+    {\r
+      phpCAS::traceBegin();\r
+      $pgt = FALSE;\r
+      $fname = $this->getPGTIouFilename($pgt_iou);\r
+      if ( !($f=fopen($fname,"r")) ) {\r
+       phpCAS::trace('could not open `'.$fname.'\'');\r
+      } else {\r
+       if ( ($pgt=fgets($f)) === FALSE ) {\r
+         phpCAS::trace('could not read PGT from `'.$fname.'\'');\r
+       } \r
+       fclose($f);\r
+      }\r
+\r
+      // delete the PGT file\r
+      @unlink($fname);\r
+\r
+      phpCAS::traceEnd($pgt);\r
+      return $pgt;\r
+    }\r
+  \r
+  /** @} */\r
+  \r
+}\r
+\r
+  \r
 ?>
\ No newline at end of file
index 8fd3c9e12ba1577176e4ea7535c1e4789e9ff172..cd9b499671a97448a93b6db3544caab7415a0b83 100644 (file)
-<?php
-
-/**
- * @file CAS/PGTStorage/pgt-main.php
- * Basic class for PGT storage
- */
-
-/**
- * @class PGTStorage
- * The PGTStorage class is a generic class for PGT storage. This class should
- * not be instanciated itself but inherited by specific PGT storage classes.
- *
- * @author   Pascal Aubry <pascal.aubry at univ-rennes1.fr>
- *
- * @ingroup internalPGTStorage
- */
-
-class PGTStorage
-{
-  /** 
-   * @addtogroup internalPGTStorage
-   * @{ 
-   */
-
-  // ########################################################################
-  //  CONSTRUCTOR
-  // ########################################################################
-  
-  /**
-   * The constructor of the class, should be called only by inherited classes.
-   *
-   * @param $cas_parent the CASclient instance that creates the current object.
-   *
-   * @protected
-   */
-  function PGTStorage($cas_parent)
-    {
-      phpCAS::traceBegin();
-      if ( !$cas_parent->isProxy() ) {
-       phpCAS::error('defining PGT storage makes no sense when not using a CAS proxy'); 
-      }
-      phpCAS::traceEnd();
-    }
-
-  // ########################################################################
-  //  DEBUGGING
-  // ########################################################################
-  
-  /**
-   * This virtual method returns an informational string giving the type of storage
-   * used by the object (used for debugging purposes).
-   *
-   * @public
-   */
-  function getStorageType()
-    {
-      phpCAS::error(__CLASS__.'::'.__FUNCTION__.'() should never be called'); 
-    }
-
-  /**
-   * This virtual method returns an informational string giving informations on the
-   * parameters of the storage.(used for debugging purposes).
-   *
-   * @public
-   */
-  function getStorageInfo()
-    {
-      phpCAS::error(__CLASS__.'::'.__FUNCTION__.'() should never be called'); 
-    }
-
-  // ########################################################################
-  //  ERROR HANDLING
-  // ########################################################################
-  
-  /**
-   * string used to store an error message. Written by PGTStorage::setErrorMessage(),
-   * read by PGTStorage::getErrorMessage().
-   *
-   * @hideinitializer
-   * @private
-   * @deprecated not used.
-   */
-  var $_error_message=FALSE;
-
-  /**
-   * This method sets en error message, which can be read later by 
-   * PGTStorage::getErrorMessage().
-   *
-   * @param $error_message an error message
-   *
-   * @protected
-   * @deprecated not used.
-   */
-  function setErrorMessage($error_message)
-    {
-      $this->_error_message = $error_message;
-    }
-
-  /**
-   * This method returns an error message set by PGTStorage::setErrorMessage().
-   *
-   * @return an error message when set by PGTStorage::setErrorMessage(), FALSE
-   * otherwise.
-   *
-   * @public
-   * @deprecated not used.
-   */
-  function getErrorMessage()
-    {
-      return $this->_error_message;
-    }
-
-  // ########################################################################
-  //  INITIALIZATION
-  // ########################################################################
-
-  /**
-   * a boolean telling if the storage has already been initialized. Written by 
-   * PGTStorage::init(), read by PGTStorage::isInitialized().
-   *
-   * @hideinitializer
-   * @private
-   */
-  var $_initialized = FALSE;
-
-  /**
-   * This method tells if the storage has already been intialized.
-   *
-   * @return a boolean
-   *
-   * @protected
-   */
-  function isInitialized()
-    {
-      return $this->_initialized;
-    }
-
-  /**
-   * This virtual method initializes the object.
-   *
-   * @protected
-   */
-  function init()
-    {
-      $this->_initialized = TRUE;
-    }
-
-  // ########################################################################
-  //  PGT I/O
-  // ########################################################################
-
-  /**
-   * This virtual method stores a PGT and its corresponding PGT Iuo.
-   * @note Should never be called.
-   *
-   * @param $pgt the PGT
-   * @param $pgt_iou the PGT iou
-   *
-   * @protected
-   */
-  function write($pgt,$pgt_iou)
-    {
-      phpCAS::error(__CLASS__.'::'.__FUNCTION__.'() should never be called'); 
-    }
-
-  /**
-   * This virtual method reads a PGT corresponding to a PGT Iou and deletes
-   * the corresponding storage entry.
-   * @note Should never be called.
-   *
-   * @param $pgt_iou the PGT iou
-   *
-   * @protected
-   */
-  function read($pgt_iou)
-    {
-      phpCAS::error(__CLASS__.'::'.__FUNCTION__.'() should never be called'); 
-    }
-
-  /** @} */
-  
-} 
-
-// include specific PGT storage classes
-include_once(dirname(__FILE__).'/pgt-file.php'); 
-include_once(dirname(__FILE__).'/pgt-db.php');
-  
+<?php\r
+\r
+/**\r
+ * @file CAS/PGTStorage/pgt-main.php\r
+ * Basic class for PGT storage\r
+ */\r
+\r
+/**\r
+ * @class PGTStorage\r
+ * The PGTStorage class is a generic class for PGT storage. This class should\r
+ * not be instanciated itself but inherited by specific PGT storage classes.\r
+ *\r
+ * @author   Pascal Aubry <pascal.aubry at univ-rennes1.fr>\r
+ *\r
+ * @ingroup internalPGTStorage\r
+ */\r
+\r
+class PGTStorage\r
+{\r
+  /** \r
+   * @addtogroup internalPGTStorage\r
+   * @{ \r
+   */\r
+\r
+  // ########################################################################\r
+  //  CONSTRUCTOR\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * The constructor of the class, should be called only by inherited classes.\r
+   *\r
+   * @param $cas_parent the CASclient instance that creates the current object.\r
+   *\r
+   * @protected\r
+   */\r
+  function PGTStorage($cas_parent)\r
+    {\r
+      phpCAS::traceBegin();\r
+      if ( !$cas_parent->isProxy() ) {\r
+       phpCAS::error('defining PGT storage makes no sense when not using a CAS proxy'); \r
+      }\r
+      phpCAS::traceEnd();\r
+    }\r
+\r
+  // ########################################################################\r
+  //  DEBUGGING\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * This virtual method returns an informational string giving the type of storage\r
+   * used by the object (used for debugging purposes).\r
+   *\r
+   * @public\r
+   */\r
+  function getStorageType()\r
+    {\r
+      phpCAS::error(__CLASS__.'::'.__FUNCTION__.'() should never be called'); \r
+    }\r
+\r
+  /**\r
+   * This virtual method returns an informational string giving informations on the\r
+   * parameters of the storage.(used for debugging purposes).\r
+   *\r
+   * @public\r
+   */\r
+  function getStorageInfo()\r
+    {\r
+      phpCAS::error(__CLASS__.'::'.__FUNCTION__.'() should never be called'); \r
+    }\r
+\r
+  // ########################################################################\r
+  //  ERROR HANDLING\r
+  // ########################################################################\r
+  \r
+  /**\r
+   * string used to store an error message. Written by PGTStorage::setErrorMessage(),\r
+   * read by PGTStorage::getErrorMessage().\r
+   *\r
+   * @hideinitializer\r
+   * @private\r
+   * @deprecated not used.\r
+   */\r
+  var $_error_message=FALSE;\r
+\r
+  /**\r
+   * This method sets en error message, which can be read later by \r
+   * PGTStorage::getErrorMessage().\r
+   *\r
+   * @param $error_message an error message\r
+   *\r
+   * @protected\r
+   * @deprecated not used.\r
+   */\r
+  function setErrorMessage($error_message)\r
+    {\r
+      $this->_error_message = $error_message;\r
+    }\r
+\r
+  /**\r
+   * This method returns an error message set by PGTStorage::setErrorMessage().\r
+   *\r
+   * @return an error message when set by PGTStorage::setErrorMessage(), FALSE\r
+   * otherwise.\r
+   *\r
+   * @public\r
+   * @deprecated not used.\r
+   */\r
+  function getErrorMessage()\r
+    {\r
+      return $this->_error_message;\r
+    }\r
+\r
+  // ########################################################################\r
+  //  INITIALIZATION\r
+  // ########################################################################\r
+\r
+  /**\r
+   * a boolean telling if the storage has already been initialized. Written by \r
+   * PGTStorage::init(), read by PGTStorage::isInitialized().\r
+   *\r
+   * @hideinitializer\r
+   * @private\r
+   */\r
+  var $_initialized = FALSE;\r
+\r
+  /**\r
+   * This method tells if the storage has already been intialized.\r
+   *\r
+   * @return a boolean\r
+   *\r
+   * @protected\r
+   */\r
+  function isInitialized()\r
+    {\r
+      return $this->_initialized;\r
+    }\r
+\r
+  /**\r
+   * This virtual method initializes the object.\r
+   *\r
+   * @protected\r
+   */\r
+  function init()\r
+    {\r
+      $this->_initialized = TRUE;\r
+    }\r
+\r
+  // ########################################################################\r
+  //  PGT I/O\r
+  // ########################################################################\r
+\r
+  /**\r
+   * This virtual method stores a PGT and its corresponding PGT Iuo.\r
+   * @note Should never be called.\r
+   *\r
+   * @param $pgt the PGT\r
+   * @param $pgt_iou the PGT iou\r
+   *\r
+   * @protected\r
+   */\r
+  function write($pgt,$pgt_iou)\r
+    {\r
+      phpCAS::error(__CLASS__.'::'.__FUNCTION__.'() should never be called'); \r
+    }\r
+\r
+  /**\r
+   * This virtual method reads a PGT corresponding to a PGT Iou and deletes\r
+   * the corresponding storage entry.\r
+   * @note Should never be called.\r
+   *\r
+   * @param $pgt_iou the PGT iou\r
+   *\r
+   * @protected\r
+   */\r
+  function read($pgt_iou)\r
+    {\r
+      phpCAS::error(__CLASS__.'::'.__FUNCTION__.'() should never be called'); \r
+    }\r
+\r
+  /** @} */\r
+  \r
+} \r
+\r
+// include specific PGT storage classes\r
+include_once(dirname(__FILE__).'/pgt-file.php'); \r
+include_once(dirname(__FILE__).'/pgt-db.php');\r
+  \r
 ?>
\ No newline at end of file
index bbde55a284d04fedf7fcff613081ccb768c1ec93..ad5a23f8396bf6be3c307b064f8c652b10b92391 100644 (file)
@@ -351,6 +351,43 @@ class CASClient
                {
                return $this->_server['login_url'] = $url;
                }
+               
+               
+       /**
+        * This method sets the serviceValidate URL of the CAS server.
+        * @param $url the serviceValidate URL
+        * @private
+        * @since 1.1.0 by Joachim Fritschi
+        */
+       function setServerServiceValidateURL($url)
+               {
+               return $this->_server['service_validate_url'] = $url;
+               }
+               
+               
+       /**
+        * This method sets the proxyValidate URL of the CAS server.
+        * @param $url the proxyValidate URL
+        * @private
+        * @since 1.1.0 by Joachim Fritschi
+        */
+       function setServerProxyValidateURL($url)
+               {
+               return $this->_server['proxy_validate_url'] = $url;
+               }
+               
+               
+       /**
+        * This method sets the samlValidate URL of the CAS server.
+        * @param $url the samlValidate URL
+        * @private
+        * @since 1.1.0 by Joachim Fritschi
+        */
+       function setServerSamlValidateURL($url)
+               {
+               return $this->_server['saml_validate_url'] = $url;
+               }
+                       
        
        /**
         * This method is used to retrieve the service validating URL of the CAS server.
@@ -373,7 +410,25 @@ class CASClient
                //      return $this->_server['service_validate_url'].'?service='.preg_replace('/&/','%26',$this->getURL()); 
                return $this->_server['service_validate_url'].'?service='.urlencode($this->getURL()); 
                }
-       
+       /**
+       * This method is used to retrieve the SAML validating URL of the CAS server.
+       * @return a URL.
+       * @private
+       */
+       function getServerSamlValidateURL()
+       {
+       phpCAS::traceBegin();
+       // the URL is build only when needed
+       if ( empty($this->_server['saml_validate_url']) ) {
+               switch ($this->getServerVersion()) {
+               case SAML_VERSION_1_1:
+                       $this->_server['saml_validate_url'] = $this->getServerBaseURL().'samlValidate';
+                       break;
+                       }
+       }
+       phpCAS::traceEnd($this->_server['saml_validate_url'].'?TARGET='.urlencode($this->getURL()));
+       return $this->_server['saml_validate_url'].'?TARGET='.urlencode($this->getURL());
+       }
        /**
         * This method is used to retrieve the proxy validating URL of the CAS server.
         * @return a URL.
@@ -497,31 +552,51 @@ class CASClient
                
                phpCAS::traceBegin();
                
-               if (!$this->isLogoutRequest() && !empty($_GET['ticket']) && $start_session) {
-            // copy old session vars and destroy the current session
-            if (!isset($_SESSION)) {
-               session_start();
-            }
-            $old_session = $_SESSION;
-            session_destroy();
-            // set up a new session, of name based on the ticket
-                       $session_id = preg_replace('/[^\w]/','',$_GET['ticket']);
-                       phpCAS::LOG("Session ID: " . $session_id);
-                       session_id($session_id);
-            if (!isset($_SESSION)) {
-               session_start();
-            }
-            // restore old session vars
-            $_SESSION = $old_session;
-            // Redirect to location without ticket.
-            header('Location: '.$this->getURL());
-               }
-               
-               //activate session mechanism if desired
-               if (!$this->isLogoutRequest() && $start_session) {
-                       session_start();
+               // the redirect header() call and DOM parsing code from domxml-php4-php5.php won't work in PHP4 compatibility mode
+               if (version_compare(PHP_VERSION,'5','>=') && ini_get('zend.ze1_compatibility_mode')) {
+                       phpCAS::error('phpCAS cannot support zend.ze1_compatibility_mode. Sorry.');
+               }
+               // skip Session Handling for logout requests and if don't want it'
+               if ($start_session && !$this->isLogoutRequest()) {
+                       phpCAS::trace("Starting session handling");
+                       // Check for Tickets from the CAS server
+                       if (empty($_GET['ticket'])){
+                               phpCAS::trace("No ticket found");
+                               // only create a session if necessary
+                               if (!isset($_SESSION)) {
+                                       phpCAS::trace("No session found, creating new session");
+                                       session_start();
+                               }
+                       }else{
+                               phpCAS::trace("Ticket found");
+                               // We have to copy any old data before renaming the session
+                               if (isset($_SESSION)) {
+                                       phpCAS::trace("Old active session found, saving old data and destroying session");
+                                       $old_session = $_SESSION;
+                                       session_destroy();      
+                               }else{
+                                       session_start();
+                                       phpCAS::trace("Starting possible old session to copy variables");
+                                       $old_session = $_SESSION;
+                                       session_destroy();      
+                               }
+                               // set up a new session, of name based on the ticket
+                               $session_id = preg_replace('/[^\w]/','',$_GET['ticket']);
+                               phpCAS::LOG("Session ID: " . $session_id);
+                               session_id($session_id);
+                               session_start();
+                               // restore old session vars
+                               if(isset($old_session)){
+                                       phpCAS::trace("Restoring old session vars");
+                                       $_SESSION = $old_session;
+                               }
+                       }
+               }else{
+                       phpCAS::trace("Skipping session creation");
                }
+
                
+               // are we in proxy mode ?
                $this->_proxy = $proxy;
                
                //check version
@@ -533,6 +608,8 @@ class CASClient
                                break;
                        case CAS_VERSION_2_0:
                                break;
+                       case SAML_VERSION_1_1:
+                               break;
                        default:
                                phpCAS::error('this version of CAS (`'
                                        .$server_version
@@ -541,29 +618,29 @@ class CASClient
                }
                $this->_server['version'] = $server_version;
                
-               //check hostname
+               // check hostname
                if ( empty($server_hostname) 
                                || !preg_match('/[\.\d\-abcdefghijklmnopqrstuvwxyz]*/',$server_hostname) ) {
                        phpCAS::error('bad CAS server hostname (`'.$server_hostname.'\')');
                }
                $this->_server['hostname'] = $server_hostname;
                
-               //check port
+               // check port
                if ( $server_port == 0 
                        || !is_int($server_port) ) {
                        phpCAS::error('bad CAS server port (`'.$server_hostname.'\')');
                }
                $this->_server['port'] = $server_port;
                
-               //check URI
+               // check URI
                if ( !preg_match('/[\.\d\-_abcdefghijklmnopqrstuvwxyz\/]*/',$server_uri) ) {
                        phpCAS::error('bad CAS server URI (`'.$server_uri.'\')');
                }
-               //add leading and trailing `/' and remove doubles      
+               // add leading and trailing `/' and remove doubles      
                $server_uri = preg_replace('/\/\//','/','/'.$server_uri.'/');
                $this->_server['uri'] = $server_uri;
                
-               //set to callback mode if PgtIou and PgtId CGI GET parameters are provided 
+               // set to callback mode if PgtIou and PgtId CGI GET parameters are provided 
                if ( $this->isProxy() ) {
                        $this->setCallbackMode(!empty($_GET['pgtIou'])&&!empty($_GET['pgtId']));
                }
@@ -590,8 +667,12 @@ class CASClient
                                        }
                                        break;
                                case CAS_VERSION_2_0: // check for a Service or Proxy Ticket
-                                       if( preg_match('/^[SP]T-/',$ticket) ) {
-                                               phpCAS::trace('ST or PT \''.$ticket.'\' found');
+                                       if (preg_match('/^ST-/', $ticket)) {
+                                               phpCAS::trace('ST \'' . $ticket . '\' found');
+                                               $this->setST($ticket);
+                                               unset ($_GET['ticket']);
+                                       } else if (preg_match('/^PT-/', $ticket)) {
+                                               phpCAS::trace('PT \'' . $ticket . '\' found');
                                                $this->setPT($ticket);
                                                unset($_GET['ticket']);
                                        } else if ( !empty($ticket) ) {
@@ -599,6 +680,16 @@ class CASClient
                                                phpCAS::error('ill-formed ticket found in the URL (ticket=`'.htmlentities($ticket).'\')');
                                        } 
                                        break;
+                               case SAML_VERSION_1_1: // SAML just does Service Tickets
+                                       if( preg_match('/^[SP]T-/',$ticket) ) {
+                                       phpCAS::trace('SA \''.$ticket.'\' found');
+                                       $this->setSA($ticket);
+                                       unset($_GET['ticket']);
+                                       } else if ( !empty($ticket) ) {
+                                               //ill-formed ticket, halt
+                                               phpCAS::error('ill-formed ticket found in the URL (ticket=`'.htmlentities($ticket).'\')');
+                                       }
+                                       break;
                        }
                }
                phpCAS::traceEnd();
@@ -652,6 +743,45 @@ class CASClient
                }
                return $this->_user;
                }
+
+
+       
+       /***********************************************************************************************************************
+        * Atrributes section
+        * 
+        * @author Matthias Crauwels <matthias.crauwels@ugent.be>, Ghent University, Belgium
+        * 
+        ***********************************************************************************************************************/
+       /**
+        * The Authenticated users attributes. Written by CASClient::setAttributes(), read by CASClient::getAttributes().
+        * @attention client applications should use phpCAS::getAttributes().
+        *
+        * @hideinitializer
+        * @private
+        */     
+       var $_attributes = array();
+
+       function setAttributes($attributes)     
+               { $this->_attributes = $attributes; }
+               
+       function getAttributes() {
+               if ( empty($this->_user) ) { // if no user is set, there shouldn't be any attributes also...
+                       phpCAS::error('this method should be used only after '.__CLASS__.'::forceAuthentication() or '.__CLASS__.'::isAuthenticated()');
+               }
+               return $this->_attributes;
+       }
+               
+       function hasAttributes()
+               { return !empty($this->_attributes); }
+               
+       function hasAttribute($key)
+               { return (is_array($this->_attributes) && array_key_exists($key, $this->_attributes)); }
+               
+       function getAttribute($key)     {
+               if($this->hasAttribute($key)) {
+                       return $this->_attributes[$key];
+               }
+       }
        
        /**
         * This method is called to renew the authentication of the user
@@ -778,55 +908,72 @@ class CASClient
         * This method is called to check if the user is authenticated (previously or by
         * tickets given in the URL).
         *
-        * @return TRUE when the user is authenticated.
+        * @return TRUE when the user is authenticated. Also may redirect to the same URL without the ticket.
         *
         * @public
         */
        function isAuthenticated()
                {
-               phpCAS::traceBegin();
-               $res = FALSE;
-               $validate_url = '';
-               
-               if ( $this->wasPreviouslyAuthenticated() ) {
-                       // the user has already (previously during the session) been 
-                       // authenticated, nothing to be done.
-                       phpCAS::trace('user was already authenticated, no need to look for tickets');
-                       $res = TRUE;
-               } 
-               elseif ( $this->hasST() ) {
-                       // if a Service Ticket was given, validate it
-                       phpCAS::trace('ST `'.$this->getST().'\' is present');
-                       $this->validateST($validate_url,$text_response,$tree_response); // if it fails, it halts
-                       phpCAS::trace('ST `'.$this->getST().'\' was validated');
-                       if ( $this->isProxy() ) {
-                               $this->validatePGT($validate_url,$text_response,$tree_response); // idem
-                               phpCAS::trace('PGT `'.$this->getPGT().'\' was validated');
-                               $_SESSION['phpCAS']['pgt'] = $this->getPGT();
+                       phpCAS::traceBegin();
+                       $res = FALSE;
+                       $validate_url = '';
+
+                       if ( $this->wasPreviouslyAuthenticated() ) {
+                               // the user has already (previously during the session) been
+                               // authenticated, nothing to be done.
+                               phpCAS::trace('user was already authenticated, no need to look for tickets');
+                               $res = TRUE;
                        }
-                       $_SESSION['phpCAS']['user'] = $this->getUser();
-                       $res = TRUE;
-               }
-               elseif ( $this->hasPT() ) {
-                       // if a Proxy Ticket was given, validate it
-                       phpCAS::trace('PT `'.$this->getPT().'\' is present');
-                       $this->validatePT($validate_url,$text_response,$tree_response); // note: if it fails, it halts
-                       phpCAS::trace('PT `'.$this->getPT().'\' was validated');
-                       if ( $this->isProxy() ) {
-                               $this->validatePGT($validate_url,$text_response,$tree_response); // idem
-                               phpCAS::trace('PGT `'.$this->getPGT().'\' was validated');
-                               $_SESSION['phpCAS']['pgt'] = $this->getPGT();
+                       else {
+                               if ( $this->hasST() ) {
+                                       // if a Service Ticket was given, validate it
+                                       phpCAS::trace('ST `'.$this->getST().'\' is present');
+                                       $this->validateST($validate_url,$text_response,$tree_response); // if it fails, it halts
+                                       phpCAS::trace('ST `'.$this->getST().'\' was validated');
+                                       if ( $this->isProxy() ) {
+                                               $this->validatePGT($validate_url,$text_response,$tree_response); // idem
+                                               phpCAS::trace('PGT `'.$this->getPGT().'\' was validated');
+                                               $_SESSION['phpCAS']['pgt'] = $this->getPGT();
+                                       }
+                                       $_SESSION['phpCAS']['user'] = $this->getUser();
+                                       $res = TRUE;
+                               }
+                               elseif ( $this->hasPT() ) {
+                                       // if a Proxy Ticket was given, validate it
+                                       phpCAS::trace('PT `'.$this->getPT().'\' is present');
+                                       $this->validatePT($validate_url,$text_response,$tree_response); // note: if it fails, it halts
+                                       phpCAS::trace('PT `'.$this->getPT().'\' was validated');
+                                       if ( $this->isProxy() ) {
+                                               $this->validatePGT($validate_url,$text_response,$tree_response); // idem
+                                               phpCAS::trace('PGT `'.$this->getPGT().'\' was validated');
+                                               $_SESSION['phpCAS']['pgt'] = $this->getPGT();
+                                       }
+                                       $_SESSION['phpCAS']['user'] = $this->getUser();
+                                       $res = TRUE;
+                               }
+                               elseif ( $this->hasSA() ) {
+                                       // if we have a SAML ticket, validate it.
+                                       phpCAS::trace('SA `'.$this->getSA().'\' is present');
+                                       $this->validateSA($validate_url,$text_response,$tree_response); // if it fails, it halts
+                                       phpCAS::trace('SA `'.$this->getSA().'\' was validated');
+                                       $_SESSION['phpCAS']['user'] = $this->getUser();
+                                       $_SESSION['phpCAS']['attributes'] = $this->getAttributes();
+                                       $res = TRUE;
+                               }
+                               else {
+                                       // no ticket given, not authenticated
+                                       phpCAS::trace('no ticket found');
+                               }
+                               if ($res) {
+                                       // if called with a ticket parameter, we need to redirect to the app without the ticket so that CAS-ification is transparent to the browser (for later POSTS)
+                                       // most of the checks and errors should have been made now, so we're safe for redirect without masking error messages.
+                                       header('Location: '.$this->getURL());
+                                       phpCAS::log( "Prepare redirect to : ".$this->getURL() );
+                               }
                        }
-                       $_SESSION['phpCAS']['user'] = $this->getUser();
-                       $res = TRUE;
-               } 
-               else {
-                       // no ticket given, not authenticated
-                       phpCAS::trace('no ticket found');
-               }
-               
-               phpCAS::traceEnd($res);
-               return $res;
+
+                       phpCAS::traceEnd($res);
+                       return $res;
                }
        
        /**
@@ -889,6 +1036,9 @@ class CASClient
                        if ( $this->isSessionAuthenticated() ) {
                                // authentication already done
                                $this->setUser($_SESSION['phpCAS']['user']);
+                               if(isset($_SESSION['phpCAS']['attributes'])){
+                                       $this->setAttributes($_SESSION['phpCAS']['attributes']);
+                               }
                                phpCAS::trace('user = `'.$_SESSION['phpCAS']['user'].'\''); 
                                $auth = TRUE;
                        } else {
@@ -917,6 +1067,7 @@ class CASClient
                
                printf('<p>'.$this->getString(CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED).'</p>',$cas_url);
                $this->printHTMLFooter();
+               
                phpCAS::traceExit();
                exit();
        }
@@ -962,11 +1113,15 @@ class CASClient
                        $cas_url = $cas_url . $paramSeparator . "service=" . urlencode($params['service']); 
                }
                header('Location: '.$cas_url);
+               phpCAS::log( "Prepare redirect to : ".$cas_url );
                session_unset();
                session_destroy();
+               
                $this->printHTMLHeader($this->getString(CAS_STR_LOGOUT));
                printf('<p>'.$this->getString(CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED).'</p>',$cas_url);
                $this->printHTMLFooter();
+               
                phpCAS::traceExit();
                exit();
        }
@@ -1009,10 +1164,10 @@ class CASClient
                        }
                        $client_ip = $_SERVER['REMOTE_ADDR'];
                        $client = gethostbyaddr($client_ip);
-                       phpCAS::log("Client: ".$client);
+                       phpCAS::log("Client: ".$client."/".$client_ip); 
                        $allowed = false;
                        foreach ($allowed_clients as $allowed_client) {
-                               if ($client == $allowed_client) {
+                               if (($client == $allowed_client) or ($client_ip == $allowed_client)) { 
                                        phpCAS::log("Allowed client '".$allowed_client."' matches, logout request is allowed");
                                        $allowed = true;
                                        break;
@@ -1284,6 +1439,151 @@ class CASClient
                phpCAS::traceEnd(TRUE);
                return TRUE;
                }
+
+ // ########################################################################
+ //  SAML VALIDATION
+ // ########################################################################
+   /**
+    * @addtogroup internalBasic
+    * @{
+    */
+
+   /**
+    * This method is used to validate a SAML TICKET; halt on failure, and sets $validate_url,
+    * $text_reponse and $tree_response on success. These parameters are used later
+    * by CASClient::validatePGT() for CAS proxies.
+    *
+    * @param $validate_url the URL of the request to the CAS server.
+    * @param $text_response the response of the CAS server, as is (XML text).
+    * @param $tree_response the response of the CAS server, as a DOM XML tree.
+    *
+    * @return bool TRUE when successfull, halt otherwise by calling CASClient::authError().
+    *
+    * @private
+    */
+   function validateSA($validate_url,&$text_response,&$tree_response)
+     {
+       phpCAS::traceBegin();
+
+       // build the URL to validate the ticket
+       $validate_url = $this->getServerSamlValidateURL();
+
+       // open and read the URL
+       if ( !$this->readURL($validate_url,''/*cookies*/,$headers,$text_response,$err_msg) ) {
+           phpCAS::trace('could not open URL \''.$validate_url.'\' to validate ('.$err_msg.')');
+           $this->authError('SA not validated', $validate_url, TRUE/*$no_response*/);
+       }
+
+       phpCAS::trace('server version: '.$this->getServerVersion());
+
+       // analyze the result depending on the version
+       switch ($this->getServerVersion()) {
+       case SAML_VERSION_1_1:
+
+     // read the response of the CAS server into a DOM object
+       if ( !($dom = domxml_open_mem($text_response))) {
+         phpCAS::trace('domxml_open_mem() failed');
+         $this->authError('SA not validated',
+                      $validate_url,
+                      FALSE/*$no_response*/,
+                      TRUE/*$bad_response*/,
+                      $text_response);
+       }
+       // read the root node of the XML tree
+       if ( !($tree_response = $dom->document_element()) ) {
+         phpCAS::trace('document_element() failed');
+         $this->authError('SA not validated',
+                      $validate_url,
+                      FALSE/*$no_response*/,
+                      TRUE/*$bad_response*/,
+                      $text_response);
+       }
+       // insure that tag name is 'Envelope'
+       if ( $tree_response->node_name() != 'Envelope' ) {
+         phpCAS::trace('bad XML root node (should be `Envelope\' instead of `'.$tree_response->node_name().'\'');
+         $this->authError('SA not validated',
+                      $validate_url,
+                      FALSE/*$no_response*/,
+                      TRUE/*$bad_response*/,
+                      $text_response);
+       }
+     // check for the NameIdentifier tag in the SAML response
+       if ( sizeof($success_elements = $tree_response->get_elements_by_tagname("NameIdentifier")) != 0) {
+       phpCAS::trace('NameIdentifier found');
+         $user = trim($success_elements[0]->get_content());
+         phpCAS::trace('user = `'.$user.'`');
+         $this->setUser($user);
+       $this->setSessionAttributes($text_response);
+       } else {
+         phpCAS::trace('no <NameIdentifier> tag found in SAML payload');
+         $this->authError('SA not validated',
+                      $validate_url,
+                      FALSE/*$no_response*/,
+                      TRUE/*$bad_response*/,
+                      $text_response);
+       }
+       break;
+       }
+
+       // at this step, ST has been validated and $this->_user has been set,
+       phpCAS::traceEnd(TRUE);
+       return TRUE;
+     }
+
+   /**
+    * This method will parse the DOM and pull out the attributes from the SAML
+    * payload and put them into an array, then put the array into the session.
+    *
+    * @param $text_response the SAML payload.
+    * @return bool TRUE when successfull, halt otherwise by calling CASClient::authError().
+    *
+    * @private
+    */
+ function setSessionAttributes($text_response)
+ {
+           phpCAS::traceBegin();
+
+           $result = FALSE;
+
+           if (isset($_SESSION[SAML_ATTRIBUTES])) {
+             phpCAS::trace("session attrs already set.");  //testbml - do we care?
+           }
+
+           $attr_array = array();
+
+                if (($dom = domxml_open_mem($text_response))) {
+                   $xPath = $dom->xpath_new_context();
+                   $xPath->xpath_register_ns('samlp', 'urn:oasis:names:tc:SAML:1.0:protocol');
+                   $xPath->xpath_register_ns('saml', 'urn:oasis:names:tc:SAML:1.0:assertion');
+                   $nodelist = $xPath->xpath_eval("//saml:Attribute");
+                   $attrs = $nodelist->nodeset;
+                   phpCAS::trace($text_response);
+                  foreach($attrs as $attr){
+                      $xres = $xPath->xpath_eval("saml:AttributeValue", $attr);
+                      $name = $attr->get_attribute("AttributeName");
+                      $value_array = array();
+                      foreach($xres->nodeset as $node){
+                          $value_array[] = $node->get_content();
+                         
+                      }
+                      phpCAS::trace("* " . $name . "=" . $value_array);
+                      $attr_array[$name] = $value_array;
+                   }
+                   $_SESSION[SAML_ATTRIBUTES] = $attr_array;
+                  // UGent addition...
+                  foreach($attr_array as $attr_key => $attr_value) {
+                     if(count($attr_value) > 1) {
+                       $this->_attributes[$attr_key] = $attr_value;
+                     }
+                     else {
+                       $this->_attributes[$attr_key] = $attr_value[0];
+                     }
+                  }
+                   $result = TRUE;
+                }
+       phpCAS::traceEnd($result);
+       return $result;
+ }
        
        /** @} */
        
@@ -1495,6 +1795,7 @@ class CASClient
                $this->storePGT($pgt,$pgt_iou);
                $this->printHTMLFooter();
                phpCAS::traceExit();
+               exit();
                }
        
        /** @} */
@@ -1585,7 +1886,7 @@ class CASClient
                }
                
                // create the storage object
-               $this->_pgt_storage = &new PGTStorageFile($this,$format,$path);
+               $this->_pgt_storage = new PGTStorageFile($this,$format,$path);
                }
        
        /**
@@ -1622,7 +1923,7 @@ class CASClient
                trigger_error('PGT storage into database is an experimental feature, use at your own risk',E_USER_WARNING);
                
                // create the storage object
-               $this->_pgt_storage = new PGTStorageDB($this,$user,$password,$database_type,$hostname,$port,$database,$table);
+               $this->_pgt_storage = new PGTStorageDB($this,$user,$password,$database_type,$hostname,$port,$database,$table);
                }
        
        // ########################################################################
@@ -1643,7 +1944,8 @@ class CASClient
         */
        function validatePGT(&$validate_url,$text_response,$tree_response)
                {
-               phpCAS::traceBegin();
+               // here cannot use phpCAS::traceBegin(); alongside domxml-php4-to-php5.php
+               phpCAS::log('start validatePGT()');
                if ( sizeof($arr = $tree_response->get_elements_by_tagname("proxyGrantingTicket")) == 0) {
                        phpCAS::trace('<proxyGrantingTicket> not found');
                        // authentication succeded, but no PGT Iou was transmitted
@@ -1666,7 +1968,8 @@ class CASClient
                        }
                        $this->setPGT($pgt);
                }
-               phpCAS::traceEnd(TRUE);
+               // here, cannot use     phpCAS::traceEnd(TRUE); alongside domxml-php4-to-php5.php
+               phpCAS::log('end validatePGT()');
                return TRUE;
                }
        
@@ -1819,7 +2122,15 @@ class CASClient
                if ($this->_cas_server_cert == '' && $this->_cas_server_ca_cert == '' && !$this->_no_cas_server_validation) {
                        phpCAS::error('one of the methods phpCAS::setCasServerCert(), phpCAS::setCasServerCACert() or phpCAS::setNoCasServerValidation() must be called.');
                }
-               if ($this->_cas_server_cert != '' ) {
+               if ($this->_cas_server_cert != '' && $this->_cas_server_ca_cert != '') {
+                       // This branch added by IDMS. Seems phpCAS implementor got a bit confused about the curl options CURLOPT_SSLCERT and CURLOPT_CAINFO
+                       curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 1);
+                       curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 1);
+                       curl_setopt($ch, CURLOPT_SSLCERT, $this->_cas_server_cert);
+                       curl_setopt($ch, CURLOPT_CAINFO, $this->_cas_server_ca_cert);
+                       curl_setopt($ch, CURLOPT_VERBOSE, '1');
+                       phpCAS::trace('CURL: Set all required opts for mutual authentication ------');
+               } else if ($this->_cas_server_cert != '' ) {
                        curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 1);
                        curl_setopt($ch, CURLOPT_SSLCERT, $this->_cas_server_cert);
                } else if ($this->_cas_server_ca_cert != '') {
@@ -1839,11 +2150,28 @@ class CASClient
                if ( is_array($cookies) ) {
                        curl_setopt($ch,CURLOPT_COOKIE,implode(';',$cookies));
                }
+                // add extra stuff if SAML
+                if ($this->hasSA()) {
+                        $more_headers = array ("soapaction: http://www.oasis-open.org/committees/security",
+                                               "cache-control: no-cache",
+                                               "pragma: no-cache",
+                                               "accept: text/xml",
+                                               "connection: keep-alive",
+                                               "content-type: text/xml");
+
+                       curl_setopt($ch, CURLOPT_HTTPHEADER, $more_headers);
+                       curl_setopt($ch, CURLOPT_POST, 1);
+                       $data = $this->buildSAMLPayload();
+                       //phpCAS::trace('SAML Payload: '.print_r($data, TRUE));
+                       curl_setopt($ch, CURLOPT_POSTFIELDS, $data);
+                }
                // perform the query
                $buf = curl_exec ($ch);
+               //phpCAS::trace('CURL: Call completed. Response body is: \''.$buf.'\'');
                if ( $buf === FALSE ) {
                        phpCAS::trace('curl_exec() failed');
                        $err_msg = 'CURL error #'.curl_errno($ch).': '.curl_error($ch);
+                       //phpCAS::trace('curl error: '.$err_msg);
                        // close the CURL session
                        curl_close ($ch);
                        $res = FALSE;
@@ -1858,7 +2186,28 @@ class CASClient
                phpCAS::traceEnd($res);
                return $res;
        }
-       
+
+        /**
+        * This method is used to build the SAML POST body sent to /samlValidate URL.
+        *
+        * @return the SOAP-encased SAMLP artifact (the ticket).
+        *
+        * @private
+        */
+        function buildSAMLPayload()
+        {
+        phpCAS::traceBegin();
+
+        //get the ticket
+        $sa = $this->getSA();
+        //phpCAS::trace("SA: ".$sa);
+
+        $body=SAML_SOAP_ENV.SAML_SOAP_BODY.SAMLP_REQUEST.SAML_ASSERTION_ARTIFACT.$sa.SAML_ASSERTION_ARTIFACT_CLOSE.SAMLP_REQUEST_CLOSE.SAML_SOAP_BODY_CLOSE.SAML_SOAP_ENV_CLOSE;
+
+        phpCAS::traceEnd($body);
+        return ($body);
+        }
+
        /**
         * This method is the callback used by readURL method to request HTTP headers.
         */
@@ -1951,6 +2300,7 @@ class CASClient
         * 
         * @param $url a string giving the URL of the service, including the mailing box
         * for IMAP URLs, as accepted by imap_open().
+        * @param $service a string giving for CAS retrieve Proxy ticket
         * @param $flags options given to imap_open().
         * @param $err_code an error code Possible values are PHPCAS_SERVICE_OK (on
         * success), PHPCAS_SERVICE_PT_NO_SERVER_RESPONSE, PHPCAS_SERVICE_PT_BAD_SERVER_RESPONSE,
@@ -1964,11 +2314,11 @@ class CASClient
         *
         * @public
         */
-       function serviceMail($url,$flags,&$err_code,&$err_msg,&$pt)
+       function serviceMail($url,$service,$flags,&$err_code,&$err_msg,&$pt)
                {
                phpCAS::traceBegin();
                // at first retrieve a PT
-               $pt = $this->retrievePT($target_service,$err_code,$output);
+               $pt = $this->retrievePT($service,$err_code,$output);
                
                $stream = FALSE;
                
@@ -2049,7 +2399,30 @@ class CASClient
         */
        function hasPT()
                { return !empty($this->_pt); }
-       
+       /**
+       * This method returns the SAML Ticket provided in the URL of the request.
+       * @return The SAML ticket.
+       * @private
+       */
+       function getSA()
+       { return 'ST'.substr($this->_sa, 2); }
+
+       /**
+       * This method stores the SAML Ticket.
+       * @param $sa The SAML Ticket.
+       * @private
+       */
+       function setSA($sa)
+       { $this->_sa = $sa; }
+
+       /**
+       * This method tells if a SAML Ticket was stored.
+       * @return TRUE if a SAML Ticket has been stored.
+       * @private
+       */
+       function hasSA()
+       { return !empty($this->_sa); }
+
        /** @} */
        // ########################################################################
        //  PT VALIDATION
@@ -2213,8 +2586,13 @@ class CASClient
                                }
                        }
                        
-                       $final_uri .= strtok($_SERVER['REQUEST_URI'],"?");
-                       $cgi_params = '?'.strtok("?");
+                       $php_is_for_sissies = split("\?", $_SERVER['REQUEST_URI'], 2);
+                       $final_uri .= $php_is_for_sissies[0];
+                       if(sizeof($php_is_for_sissies) > 1){
+                               $cgi_params = '?' . $php_is_for_sissies[1];
+                       } else {
+                               $cgi_params = '?';
+                       }
                        // remove the ticket if present in the CGI parameters
                        $cgi_params = preg_replace('/&ticket=[^&]*/','',$cgi_params);
                        $cgi_params = preg_replace('/\?ticket=[^&;]*/','?',$cgi_params);
@@ -2294,4 +2672,4 @@ class CASClient
        /** @} */
 }
 
-?>
\ No newline at end of file
+?>
diff --git a/plugins/CasAuthentication/extlib/CAS/domxml-php4-php5.php b/plugins/CasAuthentication/extlib/CAS/domxml-php4-php5.php
deleted file mode 100644 (file)
index a0dfb99..0000000
+++ /dev/null
@@ -1,277 +0,0 @@
-<?php
-/**
- * @file domxml-php4-php5.php
- * Require PHP5, uses built-in DOM extension.
- * To be used in PHP4 scripts using DOMXML extension.
- * Allows PHP4/DOMXML scripts to run on PHP5/DOM.
- * (Requires PHP5/XSL extension for domxml_xslt functions)
- *
- * Typical use:
- * <pre>
- * {
- *  if (version_compare(PHP_VERSION,'5','>='))
- *   require_once('domxml-php4-to-php5.php');
- * }
- * </pre>
- *
- * Version 1.5.5, 2005-01-18, http://alexandre.alapetite.net/doc-alex/domxml-php4-php5/
- *
- * ------------------------------------------------------------------<br>
- * Written by Alexandre Alapetite, http://alexandre.alapetite.net/cv/
- *
- * Copyright 2004, Licence: Creative Commons "Attribution-ShareAlike 2.0 France" BY-SA (FR),
- * http://creativecommons.org/licenses/by-sa/2.0/fr/
- * http://alexandre.alapetite.net/divers/apropos/#by-sa
- * - Attribution. You must give the original author credit
- * - Share Alike. If you alter, transform, or build upon this work,
- *   you may distribute the resulting work only under a license identical to this one
- * - The French law is authoritative
- * - Any of these conditions can be waived if you get permission from Alexandre Alapetite
- * - Please send to Alexandre Alapetite the modifications you make,
- *   in order to improve this file for the benefit of everybody
- *
- * If you want to distribute this code, please do it as a link to:
- * http://alexandre.alapetite.net/doc-alex/domxml-php4-php5/
- */
-
-function domxml_new_doc($version) {return new php4DOMDocument('');}
-function domxml_open_file($filename) {return new php4DOMDocument($filename);}
-function domxml_open_mem($str)
-{
- $dom=new php4DOMDocument('');
- $dom->myDOMNode->loadXML($str);
- return $dom;
-}
-function xpath_eval($xpath_context,$eval_str,$contextnode=null) {return $xpath_context->query($eval_str,$contextnode);}
-function xpath_new_context($dom_document) {return new php4DOMXPath($dom_document);}
-
-class php4DOMAttr extends php4DOMNode
-{
- function php4DOMAttr($aDOMAttr) {$this->myDOMNode=$aDOMAttr;}
- function Name() {return $this->myDOMNode->name;}
- function Specified() {return $this->myDOMNode->specified;}
- function Value() {return $this->myDOMNode->value;}
-}
-
-class php4DOMDocument extends php4DOMNode
-{
- function php4DOMDocument($filename='')
- {
-  $this->myDOMNode=new DOMDocument();
-  if ($filename!='') $this->myDOMNode->load($filename);
- }
- function create_attribute($name,$value)
- {
-  $myAttr=$this->myDOMNode->createAttribute($name);
-  $myAttr->value=$value;
-  return new php4DOMAttr($myAttr,$this);
- }
- function create_cdata_section($content) {return new php4DOMNode($this->myDOMNode->createCDATASection($content),$this);}
- function create_comment($data) {return new php4DOMNode($this->myDOMNode->createComment($data),$this);}
- function create_element($name) {return new php4DOMElement($this->myDOMNode->createElement($name),$this);}
- function create_text_node($content) {return new php4DOMNode($this->myDOMNode->createTextNode($content),$this);}
- function document_element() {return new php4DOMElement($this->myDOMNode->documentElement,$this);}
- function dump_file($filename,$compressionmode=false,$format=false) {return $this->myDOMNode->save($filename);}
- function dump_mem($format=false,$encoding=false) {return $this->myDOMNode->saveXML();}
- function get_element_by_id($id) {return new php4DOMElement($this->myDOMNode->getElementById($id),$this);}
- function get_elements_by_tagname($name)
- {
-  $myDOMNodeList=$this->myDOMNode->getElementsByTagName($name);
-  $nodeSet=array();
-  $i=0;
-  if (isset($myDOMNodeList))
-   while ($node=$myDOMNodeList->item($i))
-   {
-    $nodeSet[]=new php4DOMElement($node,$this);
-    $i++;
-   }
-  return $nodeSet;
- }
- function html_dump_mem() {return $this->myDOMNode->saveHTML();}
- function root() {return new php4DOMElement($this->myDOMNode->documentElement,$this);}
-}
-
-class php4DOMElement extends php4DOMNode
-{
- function get_attribute($name) {return $this->myDOMNode->getAttribute($name);}
- function get_elements_by_tagname($name)
- {
-  $myDOMNodeList=$this->myDOMNode->getElementsByTagName($name);
-  $nodeSet=array();
-  $i=0;
-  if (isset($myDOMNodeList))
-   while ($node=$myDOMNodeList->item($i))
-   {
-    $nodeSet[]=new php4DOMElement($node,$this->myOwnerDocument);
-    $i++;
-   }
-  return $nodeSet;
- }
- function has_attribute($name) {return $this->myDOMNode->hasAttribute($name);}
- function remove_attribute($name) {return $this->myDOMNode->removeAttribute($name);}
- function set_attribute($name,$value) {return $this->myDOMNode->setAttribute($name,$value);}
- function tagname() {return $this->myDOMNode->tagName;}
-}
-
-class php4DOMNode
-{
- var $myDOMNode;
- var $myOwnerDocument;
- function php4DOMNode($aDomNode,$aOwnerDocument)
- {
-  $this->myDOMNode=$aDomNode;
-  $this->myOwnerDocument=$aOwnerDocument;
- }
- function __get($name)
- {
-  if ($name=='type') return $this->myDOMNode->nodeType;
-  elseif ($name=='tagname') return $this->myDOMNode->tagName;
-  elseif ($name=='content') return $this->myDOMNode->textContent;
-  else
-  {
-   $myErrors=debug_backtrace();
-   trigger_error('Undefined property: '.get_class($this).'::$'.$name.' ['.$myErrors[0]['file'].':'.$myErrors[0]['line'].']',E_USER_NOTICE);
-   return false;
-  }
- }
- function append_child($newnode) {return new php4DOMElement($this->myDOMNode->appendChild($newnode->myDOMNode),$this->myOwnerDocument);}
- function append_sibling($newnode) {return new php4DOMElement($this->myDOMNode->parentNode->appendChild($newnode->myDOMNode),$this->myOwnerDocument);}
- function attributes()
- {
-  $myDOMNodeList=$this->myDOMNode->attributes;
-  $nodeSet=array();
-  $i=0;
-  if (isset($myDOMNodeList))
-   while ($node=$myDOMNodeList->item($i))
-   {
-    $nodeSet[]=new php4DOMAttr($node,$this->myOwnerDocument);
-    $i++;
-   }
-  return $nodeSet;
- }
- function child_nodes()
- {
-  $myDOMNodeList=$this->myDOMNode->childNodes;
-  $nodeSet=array();
-  $i=0;
-  if (isset($myDOMNodeList))
-   while ($node=$myDOMNodeList->item($i))
-   {
-    $nodeSet[]=new php4DOMElement($node,$this->myOwnerDocument);
-    $i++;
-   }
-  return $nodeSet;
- }
- function children() {return $this->child_nodes();}
- function clone_node($deep=false) {return new php4DOMElement($this->myDOMNode->cloneNode($deep),$this->myOwnerDocument);}
- function first_child() {return new php4DOMElement($this->myDOMNode->firstChild,$this->myOwnerDocument);}
- function get_content() {return $this->myDOMNode->textContent;}
- function has_attributes() {return $this->myDOMNode->hasAttributes();}
- function has_child_nodes() {return $this->myDOMNode->hasChildNodes();}
- function insert_before($newnode,$refnode) {return new php4DOMElement($this->myDOMNode->insertBefore($newnode->myDOMNode,$refnode->myDOMNode),$this->myOwnerDocument);}
- function is_blank_node()
- {
-  $myDOMNodeList=$this->myDOMNode->childNodes;
-  $i=0;
-  if (isset($myDOMNodeList))
-   while ($node=$myDOMNodeList->item($i))
-   {
-    if (($node->nodeType==XML_ELEMENT_NODE)||
-        (($node->nodeType==XML_TEXT_NODE)&&!ereg('^([[:cntrl:]]|[[:space:]])*$',$node->nodeValue)))
-     return false;
-    $i++;
-   }
-  return true;
- }
- function last_child() {return new php4DOMElement($this->myDOMNode->lastChild,$this->myOwnerDocument);}
- function new_child($name,$content)
- {
-  $mySubNode=$this->myDOMNode->ownerDocument->createElement($name);
-  $mySubNode->appendChild($this->myDOMNode->ownerDocument->createTextNode($content));
-  $this->myDOMNode->appendChild($mySubNode);
-  return new php4DOMElement($mySubNode,$this->myOwnerDocument);
- }
- function next_sibling() {return new php4DOMElement($this->myDOMNode->nextSibling,$this->myOwnerDocument);}
- function node_name() {return $this->myDOMNode->localName;}
- function node_type() {return $this->myDOMNode->nodeType;}
- function node_value() {return $this->myDOMNode->nodeValue;}
- function owner_document() {return $this->myOwnerDocument;}
- function parent_node() {return new php4DOMElement($this->myDOMNode->parentNode,$this->myOwnerDocument);}
- function prefix() {return $this->myDOMNode->prefix;}
- function previous_sibling() {return new php4DOMElement($this->myDOMNode->previousSibling,$this->myOwnerDocument);}
- function remove_child($oldchild) {return new php4DOMElement($this->myDOMNode->removeChild($oldchild->myDOMNode),$this->myOwnerDocument);}
- function replace_child($oldnode,$newnode) {return new php4DOMElement($this->myDOMNode->replaceChild($oldnode->myDOMNode,$newnode->myDOMNode),$this->myOwnerDocument);}
- function set_content($text)
- {
-  if (($this->myDOMNode->hasChildNodes())&&($this->myDOMNode->firstChild->nodeType==XML_TEXT_NODE))
-   $this->myDOMNode->removeChild($this->myDOMNode->firstChild);
-  return $this->myDOMNode->appendChild($this->myDOMNode->ownerDocument->createTextNode($text));
- }
-}
-
-class php4DOMNodelist
-{
- var $myDOMNodelist;
- var $nodeset;
- function php4DOMNodelist($aDOMNodelist,$aOwnerDocument)
- {
-  $this->myDOMNodelist=$aDOMNodelist;
-  $this->nodeset=array();
-  $i=0;
-  if (isset($this->myDOMNodelist))
-   while ($node=$this->myDOMNodelist->item($i))
-   {
-    $this->nodeset[]=new php4DOMElement($node,$aOwnerDocument);
-    $i++;
-   }
- }
-}
-
-class php4DOMXPath
-{
- var $myDOMXPath;
- var $myOwnerDocument;
- function php4DOMXPath($dom_document)
- {
-  $this->myOwnerDocument=$dom_document;
-  $this->myDOMXPath=new DOMXPath($dom_document->myDOMNode);
- }
- function query($eval_str,$contextnode)
- {
-  if (isset($contextnode)) return new php4DOMNodelist($this->myDOMXPath->query($eval_str,$contextnode->myDOMNode),$this->myOwnerDocument);
-  else return new php4DOMNodelist($this->myDOMXPath->query($eval_str),$this->myOwnerDocument);
- }
- function xpath_register_ns($prefix,$namespaceURI) {return $this->myDOMXPath->registerNamespace($prefix,$namespaceURI);}
-}
-
-if (extension_loaded('xsl'))
-{//See also: http://alexandre.alapetite.net/doc-alex/xslt-php4-php5/
- function domxml_xslt_stylesheet($xslstring) {return new php4DomXsltStylesheet(DOMDocument::loadXML($xslstring));}
- function domxml_xslt_stylesheet_doc($dom_document) {return new php4DomXsltStylesheet($dom_document);}
- function domxml_xslt_stylesheet_file($xslfile) {return new php4DomXsltStylesheet(DOMDocument::load($xslfile));}
- class php4DomXsltStylesheet
- {
-  var $myxsltProcessor;
-  function php4DomXsltStylesheet($dom_document)
-  {
-   $this->myxsltProcessor=new xsltProcessor();
-   $this->myxsltProcessor->importStyleSheet($dom_document);
-  }
-  function process($dom_document,$xslt_parameters=array(),$param_is_xpath=false)
-  {
-   foreach ($xslt_parameters as $param=>$value)
-    $this->myxsltProcessor->setParameter('',$param,$value);
-   $myphp4DOMDocument=new php4DOMDocument();
-   $myphp4DOMDocument->myDOMNode=$this->myxsltProcessor->transformToDoc($dom_document->myDOMNode);
-   return $myphp4DOMDocument;
-  }
-  function result_dump_file($dom_document,$filename)
-  {
-   $html=$dom_document->myDOMNode->saveHTML();
-   file_put_contents($filename,$html);
-   return $html;
-  }
-  function result_dump_mem($dom_document) {return $dom_document->myDOMNode->saveHTML();}
- }
-}
-?>
\ No newline at end of file
diff --git a/plugins/CasAuthentication/extlib/CAS/domxml-php4-to-php5.php b/plugins/CasAuthentication/extlib/CAS/domxml-php4-to-php5.php
new file mode 100644 (file)
index 0000000..1dc4e4b
--- /dev/null
@@ -0,0 +1,499 @@
+<?php
+/*
+       Requires PHP5, uses built-in DOM extension.
+       To be used in PHP4 scripts using DOMXML extension: allows PHP4/DOMXML scripts to run on PHP5/DOM.
+       (Optional: requires PHP5/XSL extension for domxml_xslt functions, PHP>=5.1 for XPath evaluation functions, and PHP>=5.1/libxml for DOMXML error reports)
+
+       Typical use:
+       {
+               if (PHP_VERSION>='5')
+                       require_once('domxml-php4-to-php5.php');
+       }
+
+       Version 1.21, 2008-12-05, http://alexandre.alapetite.net/doc-alex/domxml-php4-php5/
+
+       ------------------------------------------------------------------
+       Written by Alexandre Alapetite, http://alexandre.alapetite.net/cv/
+
+       Copyright 2004-2008, GNU Lesser General Public License,
+       http://www.gnu.org/licenses/lgpl.html
+
+       This program is free software: you can redistribute it and/or modify
+       it under the terms of the GNU Lesser General Public License as published by
+       the Free Software Foundation, either version 3 of the License, or
+       (at your option) any later version.
+       This program is distributed in the hope that it will be useful,
+       but WITHOUT ANY WARRANTY; without even the implied warranty of
+       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+       GNU Lesser General Public License for more details.
+       You should have received a copy of the GNU Lesser General Public License
+       along with this program. If not, see <http://www.gnu.org/licenses/lgpl.html>
+
+       == Rights and obligations ==
+       - Attribution: You must give the original author credit.
+       - Share Alike: If you alter or transform this library,
+          you may distribute the resulting library only under the same license GNU/LGPL.
+       - In case of jurisdiction dispute, the French law is authoritative.
+       - Any of these conditions can be waived if you get permission from Alexandre Alapetite.
+       - Not required, but please send to Alexandre Alapetite the modifications you make,
+          in order to improve this file for the benefit of everybody.
+
+       If you want to distribute this code, please do it as a link to:
+       http://alexandre.alapetite.net/doc-alex/domxml-php4-php5/
+*/
+
+define('DOMXML_LOAD_PARSING',0);
+define('DOMXML_LOAD_VALIDATING',1);
+define('DOMXML_LOAD_RECOVERING',2);
+define('DOMXML_LOAD_SUBSTITUTE_ENTITIES',4);
+//define('DOMXML_LOAD_COMPLETE_ATTRS',8);
+define('DOMXML_LOAD_DONT_KEEP_BLANKS',16);
+
+function domxml_new_doc($version) {return new php4DOMDocument();}
+function domxml_new_xmldoc($version) {return new php4DOMDocument();}
+function domxml_open_file($filename,$mode=DOMXML_LOAD_PARSING,&$error=null)
+{
+       $dom=new php4DOMDocument($mode);
+       $errorMode=(func_num_args()>2)&&defined('LIBXML_VERSION');
+       if ($errorMode) libxml_use_internal_errors(true);
+       if (!$dom->myDOMNode->load($filename)) $dom=null;
+       if ($errorMode)
+       {
+               $error=array_map('_error_report',libxml_get_errors());
+               libxml_clear_errors();
+       }
+       return $dom;
+}
+function domxml_open_mem($str,$mode=DOMXML_LOAD_PARSING,&$error=null)
+{
+       $dom=new php4DOMDocument($mode);
+       $errorMode=(func_num_args()>2)&&defined('LIBXML_VERSION');
+       if ($errorMode) libxml_use_internal_errors(true);
+       if (!$dom->myDOMNode->loadXML($str)) $dom=null;
+       if ($errorMode)
+       {
+               $error=array_map('_error_report',libxml_get_errors());
+               libxml_clear_errors();
+       }
+       return $dom;
+}
+function html_doc($html_doc,$from_file=false)
+{
+       $dom=new php4DOMDocument();
+       if ($from_file) $result=$dom->myDOMNode->loadHTMLFile($html_doc);
+       else $result=$dom->myDOMNode->loadHTML($html_doc);
+       return $result ? $dom : null;
+}
+function html_doc_file($filename) {return html_doc($filename,true);}
+function xmldoc($str) {return domxml_open_mem($str);}
+function xmldocfile($filename) {return domxml_open_file($filename);}
+function xpath_eval($xpath_context,$eval_str,$contextnode=null) {return $xpath_context->xpath_eval($eval_str,$contextnode);}
+function xpath_new_context($dom_document) {return new php4DOMXPath($dom_document);}
+function xpath_register_ns($xpath_context,$prefix,$namespaceURI) {return $xpath_context->myDOMXPath->registerNamespace($prefix,$namespaceURI);}
+function _entityDecode($text) {return html_entity_decode(strtr($text,array('&apos;'=>'\'')),ENT_QUOTES,'UTF-8');}
+function _error_report($error) {return array('errormessage'=>$error->message,'nodename'=>'','line'=>$error->line,'col'=>$error->column)+($error->file==''?array():array('directory'=>dirname($error->file),'file'=>basename($error->file)));}
+
+class php4DOMAttr extends php4DOMNode
+{
+       function __get($name)
+       {
+               if ($name==='name') return $this->myDOMNode->name;
+               else return parent::__get($name);
+       }
+       function name() {return $this->myDOMNode->name;}
+       function set_content($text) {}
+       //function set_value($content) {return $this->myDOMNode->value=htmlspecialchars($content,ENT_QUOTES);}
+       function specified() {return $this->myDOMNode->specified;}
+       function value() {return $this->myDOMNode->value;}
+}
+
+class php4DOMDocument extends php4DOMNode
+{
+       function php4DOMDocument($mode=DOMXML_LOAD_PARSING)
+       {
+               $this->myDOMNode=new DOMDocument();
+               $this->myOwnerDocument=$this;
+               if ($mode & DOMXML_LOAD_VALIDATING) $this->myDOMNode->validateOnParse=true;
+               if ($mode & DOMXML_LOAD_RECOVERING) $this->myDOMNode->recover=true;
+               if ($mode & DOMXML_LOAD_SUBSTITUTE_ENTITIES) $this->myDOMNode->substituteEntities=true;
+               if ($mode & DOMXML_LOAD_DONT_KEEP_BLANKS) $this->myDOMNode->preserveWhiteSpace=false;
+       }
+       function add_root($name)
+       {
+               if ($this->myDOMNode->hasChildNodes()) $this->myDOMNode->removeChild($this->myDOMNode->firstChild);
+               return new php4DOMElement($this->myDOMNode->appendChild($this->myDOMNode->createElement($name)),$this->myOwnerDocument);
+       }
+       function create_attribute($name,$value)
+       {
+               $myAttr=$this->myDOMNode->createAttribute($name);
+               $myAttr->value=htmlspecialchars($value,ENT_QUOTES);
+               return new php4DOMAttr($myAttr,$this);
+       }
+       function create_cdata_section($content) {return new php4DOMNode($this->myDOMNode->createCDATASection($content),$this);}
+       function create_comment($data) {return new php4DOMNode($this->myDOMNode->createComment($data),$this);}
+       function create_element($name) {return new php4DOMElement($this->myDOMNode->createElement($name),$this);}
+       function create_element_ns($uri,$name,$prefix=null)
+       {
+               if ($prefix==null) $prefix=$this->myDOMNode->lookupPrefix($uri);
+               if (($prefix==null)&&(($this->myDOMNode->documentElement==null)||(!$this->myDOMNode->documentElement->isDefaultNamespace($uri)))) $prefix='a'.sprintf('%u',crc32($uri));
+               return new php4DOMElement($this->myDOMNode->createElementNS($uri,$prefix==null ? $name : $prefix.':'.$name),$this);
+       }
+       function create_entity_reference($content) {return new php4DOMNode($this->myDOMNode->createEntityReference($content),$this);} //By Walter Ebert 2007-01-22
+       function create_processing_instruction($target,$data=''){return new php4DomProcessingInstruction($this->myDOMNode->createProcessingInstruction($target,$data),$this);}
+       function create_text_node($content) {return new php4DOMText($this->myDOMNode->createTextNode($content),$this);}
+       function document_element() {return parent::_newDOMElement($this->myDOMNode->documentElement,$this);}
+       function dump_file($filename,$compressionmode=false,$format=false)
+       {
+               $format0=$this->myDOMNode->formatOutput;
+               $this->myDOMNode->formatOutput=$format;
+               $res=$this->myDOMNode->save($filename);
+               $this->myDOMNode->formatOutput=$format0;
+               return $res;
+       }
+       function dump_mem($format=false,$encoding=false)
+       {
+               $format0=$this->myDOMNode->formatOutput;
+               $this->myDOMNode->formatOutput=$format;
+               $encoding0=$this->myDOMNode->encoding;
+               if ($encoding) $this->myDOMNode->encoding=$encoding;
+               $dump=$this->myDOMNode->saveXML();
+               $this->myDOMNode->formatOutput=$format0;
+               if ($encoding) $this->myDOMNode->encoding= $encoding0=='' ? 'UTF-8' : $encoding0; //UTF-8 is XML default encoding
+               return $dump;
+       }
+       function free()
+       {
+               if ($this->myDOMNode->hasChildNodes()) $this->myDOMNode->removeChild($this->myDOMNode->firstChild);
+               $this->myDOMNode=null;
+               $this->myOwnerDocument=null;
+       }
+       function get_element_by_id($id) {return parent::_newDOMElement($this->myDOMNode->getElementById($id),$this);}
+       function get_elements_by_tagname($name)
+       {
+               $myDOMNodeList=$this->myDOMNode->getElementsByTagName($name);
+               $nodeSet=array();
+               $i=0;
+               if (isset($myDOMNodeList))
+                       while ($node=$myDOMNodeList->item($i++)) $nodeSet[]=new php4DOMElement($node,$this);
+               return $nodeSet;
+       }
+       function html_dump_mem() {return $this->myDOMNode->saveHTML();}
+       function root() {return parent::_newDOMElement($this->myDOMNode->documentElement,$this);}
+       function xinclude() {return $this->myDOMNode->xinclude();}
+       function xpath_new_context() {return new php4DOMXPath($this);}
+}
+
+class php4DOMElement extends php4DOMNode
+{
+       function add_namespace($uri,$prefix)
+       {
+               if ($this->myDOMNode->hasAttributeNS('http://www.w3.org/2000/xmlns/',$prefix)) return false;
+               else
+               {
+                       $this->myDOMNode->setAttributeNS('http://www.w3.org/2000/xmlns/','xmlns:'.$prefix,$uri); //By Daniel Walker 2006-09-08
+                       return true;
+               }
+       }
+       function get_attribute($name) {return $this->myDOMNode->getAttribute($name);}
+       function get_attribute_node($name) {return parent::_newDOMElement($this->myDOMNode->getAttributeNode($name),$this->myOwnerDocument);}
+       function get_elements_by_tagname($name)
+       {
+               $myDOMNodeList=$this->myDOMNode->getElementsByTagName($name);
+               $nodeSet=array();
+               $i=0;
+               if (isset($myDOMNodeList))
+                       while ($node=$myDOMNodeList->item($i++)) $nodeSet[]=new php4DOMElement($node,$this->myOwnerDocument);
+               return $nodeSet;
+       }
+       function has_attribute($name) {return $this->myDOMNode->hasAttribute($name);}
+       function remove_attribute($name) {return $this->myDOMNode->removeAttribute($name);}
+       function set_attribute($name,$value)
+       {
+               //return $this->myDOMNode->setAttribute($name,$value); //Does not return a DomAttr
+               $myAttr=$this->myDOMNode->ownerDocument->createAttribute($name);
+               $myAttr->value=htmlspecialchars($value,ENT_QUOTES); //Entity problem reported by AL-DesignWorks 2007-09-07
+               $this->myDOMNode->setAttributeNode($myAttr);
+               return new php4DOMAttr($myAttr,$this->myOwnerDocument);
+       }
+       /*function set_attribute_node($attr)
+       {
+               $this->myDOMNode->setAttributeNode($this->_importNode($attr));
+               return $attr;
+       }*/
+       function set_name($name)
+       {
+               if ($this->myDOMNode->prefix=='') $newNode=$this->myDOMNode->ownerDocument->createElement($name);
+               else $newNode=$this->myDOMNode->ownerDocument->createElementNS($this->myDOMNode->namespaceURI,$this->myDOMNode->prefix.':'.$name);
+               $myDOMNodeList=$this->myDOMNode->attributes;
+               $i=0;
+               if (isset($myDOMNodeList))
+                       while ($node=$myDOMNodeList->item($i++))
+                               if ($node->namespaceURI=='') $newNode->setAttribute($node->name,$node->value);
+                               else $newNode->setAttributeNS($node->namespaceURI,$node->nodeName,$node->value);
+               $myDOMNodeList=$this->myDOMNode->childNodes;
+               if (isset($myDOMNodeList))
+                       while ($node=$myDOMNodeList->item(0)) $newNode->appendChild($node);
+               $this->myDOMNode->parentNode->replaceChild($newNode,$this->myDOMNode);
+               $this->myDOMNode=$newNode;
+               return true;
+       }
+       function tagname() {return $this->tagname;}
+}
+
+class php4DOMNode
+{
+       public $myDOMNode;
+       public $myOwnerDocument;
+       function php4DOMNode($aDomNode,$aOwnerDocument)
+       {
+               $this->myDOMNode=$aDomNode;
+               $this->myOwnerDocument=$aOwnerDocument;
+       }
+       function __get($name)
+       {
+               switch ($name)
+               {
+                       case 'type': return $this->myDOMNode->nodeType;
+                       case 'tagname': return ($this->myDOMNode->nodeType===XML_ELEMENT_NODE) ? $this->myDOMNode->localName : $this->myDOMNode->tagName; //Avoid namespace prefix for DOMElement
+                       case 'content': return $this->myDOMNode->textContent;
+                       case 'value': return $this->myDOMNode->value;
+                       default:
+                               $myErrors=debug_backtrace();
+                               trigger_error('Undefined property: '.get_class($this).'::$'.$name.' ['.$myErrors[0]['file'].':'.$myErrors[0]['line'].']',E_USER_NOTICE);
+                               return false;
+               }
+       }
+       function add_child($newnode) {return append_child($newnode);}
+       function add_namespace($uri,$prefix) {return false;}
+       function append_child($newnode) {return self::_newDOMElement($this->myDOMNode->appendChild($this->_importNode($newnode)),$this->myOwnerDocument);}
+       function append_sibling($newnode) {return self::_newDOMElement($this->myDOMNode->parentNode->appendChild($this->_importNode($newnode)),$this->myOwnerDocument);}
+       function attributes()
+       {
+               $myDOMNodeList=$this->myDOMNode->attributes;
+               if (!(isset($myDOMNodeList)&&$this->myDOMNode->hasAttributes())) return null;
+               $nodeSet=array();
+               $i=0;
+               while ($node=$myDOMNodeList->item($i++)) $nodeSet[]=new php4DOMAttr($node,$this->myOwnerDocument);
+               return $nodeSet;
+       }
+       function child_nodes()
+       {
+               $myDOMNodeList=$this->myDOMNode->childNodes;
+               $nodeSet=array();
+               $i=0;
+               if (isset($myDOMNodeList))
+                       while ($node=$myDOMNodeList->item($i++)) $nodeSet[]=self::_newDOMElement($node,$this->myOwnerDocument);
+               return $nodeSet;
+       }
+       function children() {return $this->child_nodes();}
+       function clone_node($deep=false) {return self::_newDOMElement($this->myDOMNode->cloneNode($deep),$this->myOwnerDocument);}
+       //dump_node($node) should only be called on php4DOMDocument
+       function dump_node($node=null) {return $node==null ? $this->myOwnerDocument->myDOMNode->saveXML($this->myDOMNode) : $this->myOwnerDocument->myDOMNode->saveXML($node->myDOMNode);}
+       function first_child() {return self::_newDOMElement($this->myDOMNode->firstChild,$this->myOwnerDocument);}
+       function get_content() {return $this->myDOMNode->textContent;}
+       function has_attributes() {return $this->myDOMNode->hasAttributes();}
+       function has_child_nodes() {return $this->myDOMNode->hasChildNodes();}
+       function insert_before($newnode,$refnode) {return self::_newDOMElement($this->myDOMNode->insertBefore($this->_importNode($newnode),$refnode==null?null:$refnode->myDOMNode),$this->myOwnerDocument);}
+       function is_blank_node() {return ($this->myDOMNode->nodeType===XML_TEXT_NODE)&&preg_match('%^\s*$%',$this->myDOMNode->nodeValue);}
+       function last_child() {return self::_newDOMElement($this->myDOMNode->lastChild,$this->myOwnerDocument);}
+       function new_child($name,$content)
+       {
+               $mySubNode=$this->myDOMNode->ownerDocument->createElement($name);
+               $mySubNode->appendChild($this->myDOMNode->ownerDocument->createTextNode(_entityDecode($content)));
+               $this->myDOMNode->appendChild($mySubNode);
+               return new php4DOMElement($mySubNode,$this->myOwnerDocument);
+       }
+       function next_sibling() {return self::_newDOMElement($this->myDOMNode->nextSibling,$this->myOwnerDocument);}
+       function node_name() {return ($this->myDOMNode->nodeType===XML_ELEMENT_NODE) ? $this->myDOMNode->localName : $this->myDOMNode->nodeName;} //Avoid namespace prefix for DOMElement
+       function node_type() {return $this->myDOMNode->nodeType;}
+       function node_value() {return $this->myDOMNode->nodeValue;}
+       function owner_document() {return $this->myOwnerDocument;}
+       function parent_node() {return self::_newDOMElement($this->myDOMNode->parentNode,$this->myOwnerDocument);}
+       function prefix() {return $this->myDOMNode->prefix;}
+       function previous_sibling() {return self::_newDOMElement($this->myDOMNode->previousSibling,$this->myOwnerDocument);}
+       function remove_child($oldchild) {return self::_newDOMElement($this->myDOMNode->removeChild($oldchild->myDOMNode),$this->myOwnerDocument);}
+       function replace_child($newnode,$oldnode) {return self::_newDOMElement($this->myDOMNode->replaceChild($this->_importNode($newnode),$oldnode->myDOMNode),$this->myOwnerDocument);}
+       function replace_node($newnode) {return self::_newDOMElement($this->myDOMNode->parentNode->replaceChild($this->_importNode($newnode),$this->myDOMNode),$this->myOwnerDocument);}
+       function set_content($text) {return $this->myDOMNode->appendChild($this->myDOMNode->ownerDocument->createTextNode(_entityDecode($text)));} //Entity problem reported by AL-DesignWorks 2007-09-07
+       //function set_name($name) {return $this->myOwnerDocument->renameNode($this->myDOMNode,$this->myDOMNode->namespaceURI,$name);}
+       function set_namespace($uri,$prefix=null)
+       {//Contributions by Daniel Walker 2006-09-08
+               $nsprefix=$this->myDOMNode->lookupPrefix($uri);
+               if ($nsprefix==null)
+               {
+                       $nsprefix= $prefix==null ? $nsprefix='a'.sprintf('%u',crc32($uri)) : $prefix;
+                       if ($this->myDOMNode->nodeType===XML_ATTRIBUTE_NODE)
+                       {
+                               if (($prefix!=null)&&$this->myDOMNode->ownerElement->hasAttributeNS('http://www.w3.org/2000/xmlns/',$nsprefix)&&
+                                       ($this->myDOMNode->ownerElement->getAttributeNS('http://www.w3.org/2000/xmlns/',$nsprefix)!=$uri))
+                               {//Remove namespace
+                                       $parent=$this->myDOMNode->ownerElement;
+                                       $parent->removeAttributeNode($this->myDOMNode);
+                                       $parent->setAttribute($this->myDOMNode->localName,$this->myDOMNode->nodeValue);
+                                       $this->myDOMNode=$parent->getAttributeNode($this->myDOMNode->localName);
+                                       return;
+                               }
+                               $this->myDOMNode->ownerElement->setAttributeNS('http://www.w3.org/2000/xmlns/','xmlns:'.$nsprefix,$uri);
+                       }
+               }
+               if ($this->myDOMNode->nodeType===XML_ATTRIBUTE_NODE)
+               {
+                       $parent=$this->myDOMNode->ownerElement;
+                       $parent->removeAttributeNode($this->myDOMNode);
+                       $parent->setAttributeNS($uri,$nsprefix.':'.$this->myDOMNode->localName,$this->myDOMNode->nodeValue);
+                       $this->myDOMNode=$parent->getAttributeNodeNS($uri,$this->myDOMNode->localName);
+               }
+               elseif ($this->myDOMNode->nodeType===XML_ELEMENT_NODE)
+               {
+                       $NewNode=$this->myDOMNode->ownerDocument->createElementNS($uri,$nsprefix.':'.$this->myDOMNode->localName);
+                       foreach ($this->myDOMNode->attributes as $n) $NewNode->appendChild($n->cloneNode(true));
+                       foreach ($this->myDOMNode->childNodes as $n) $NewNode->appendChild($n->cloneNode(true));
+                       $xpath=new DOMXPath($this->myDOMNode->ownerDocument);
+                       $myDOMNodeList=$xpath->query('namespace::*[name()!="xml"]',$this->myDOMNode); //Add old namespaces
+                       foreach ($myDOMNodeList as $n) $NewNode->setAttributeNS('http://www.w3.org/2000/xmlns/',$n->nodeName,$n->nodeValue); 
+                       $this->myDOMNode->parentNode->replaceChild($NewNode,$this->myDOMNode);
+                       $this->myDOMNode=$NewNode;
+               }
+       }
+       function unlink_node()
+       {
+               if ($this->myDOMNode->parentNode!=null)
+               {
+                       if ($this->myDOMNode->nodeType===XML_ATTRIBUTE_NODE) $this->myDOMNode->parentNode->removeAttributeNode($this->myDOMNode);
+                       else $this->myDOMNode->parentNode->removeChild($this->myDOMNode);
+               }
+       }
+       protected function _importNode($newnode) {return $this->myOwnerDocument===$newnode->myOwnerDocument ? $newnode->myDOMNode : $this->myOwnerDocument->myDOMNode->importNode($newnode->myDOMNode,true);} //To import DOMNode from another DOMDocument
+       static function _newDOMElement($aDOMNode,$aOwnerDocument)
+       {//Check the PHP5 DOMNode before creating a new associated PHP4 DOMNode wrapper
+               if ($aDOMNode==null) return null;
+               switch ($aDOMNode->nodeType)
+               {
+                       case XML_ELEMENT_NODE: return new php4DOMElement($aDOMNode,$aOwnerDocument);
+                       case XML_TEXT_NODE: return new php4DOMText($aDOMNode,$aOwnerDocument);
+                       case XML_ATTRIBUTE_NODE: return new php4DOMAttr($aDOMNode,$aOwnerDocument);
+                       case XML_PI_NODE: return new php4DomProcessingInstruction($aDOMNode,$aOwnerDocument);
+                       default: return new php4DOMNode($aDOMNode,$aOwnerDocument);
+               }
+       }
+}
+
+class php4DomProcessingInstruction extends php4DOMNode
+{
+       function data() {return $this->myDOMNode->data;}
+       function target() {return $this->myDOMNode->target;}
+}
+
+class php4DOMText extends php4DOMNode
+{
+       function __get($name)
+       {
+               if ($name==='tagname') return '#text';
+               else return parent::__get($name);
+       }
+       function tagname() {return '#text';}
+       function set_content($text) {$this->myDOMNode->nodeValue=$text; return true;}
+}
+
+if (!defined('XPATH_NODESET'))
+{
+       define('XPATH_UNDEFINED',0);
+       define('XPATH_NODESET',1);
+       define('XPATH_BOOLEAN',2);
+       define('XPATH_NUMBER',3);
+       define('XPATH_STRING',4);
+       /*define('XPATH_POINT',5);
+       define('XPATH_RANGE',6);
+       define('XPATH_LOCATIONSET',7);
+       define('XPATH_USERS',8);
+       define('XPATH_XSLT_TREE',9);*/
+}
+
+class php4DOMNodelist
+{
+       private $myDOMNodelist;
+       public $nodeset;
+       public $type=XPATH_UNDEFINED;
+       public $value;
+       function php4DOMNodelist($aDOMNodelist,$aOwnerDocument)
+       {
+               if (!isset($aDOMNodelist)) return; 
+               elseif (is_object($aDOMNodelist)||is_array($aDOMNodelist))
+               {
+                       if ($aDOMNodelist->length>0)
+                       {
+                               $this->myDOMNodelist=$aDOMNodelist;
+                               $this->nodeset=array();
+                               $this->type=XPATH_NODESET;
+                               $i=0;
+                               while ($node=$this->myDOMNodelist->item($i++)) $this->nodeset[]=php4DOMNode::_newDOMElement($node,$aOwnerDocument);
+                       }
+               }
+               elseif (is_int($aDOMNodelist)||is_float($aDOMNodelist))
+               {
+                       $this->type=XPATH_NUMBER;
+                       $this->value=$aDOMNodelist;
+               }
+               elseif (is_bool($aDOMNodelist))
+               {
+                       $this->type=XPATH_BOOLEAN;
+                       $this->value=$aDOMNodelist;
+               }
+               elseif (is_string($aDOMNodelist))
+               {
+                       $this->type=XPATH_STRING;
+                       $this->value=$aDOMNodelist;
+               }
+       }
+}
+
+class php4DOMXPath
+{
+       public $myDOMXPath;
+       private $myOwnerDocument;
+       function php4DOMXPath($dom_document)
+       {
+               //TODO: If $dom_document is a DomElement, make that default $contextnode and modify XPath. Ex: '/test'
+               $this->myOwnerDocument=$dom_document->myOwnerDocument;
+               $this->myDOMXPath=new DOMXPath($this->myOwnerDocument->myDOMNode);
+       }
+       function xpath_eval($eval_str,$contextnode=null)
+       {
+               if (method_exists($this->myDOMXPath,'evaluate')) $xp=isset($contextnode) ? $this->myDOMXPath->evaluate($eval_str,$contextnode->myDOMNode) : $this->myDOMXPath->evaluate($eval_str);
+               else $xp=isset($contextnode) ? $this->myDOMXPath->query($eval_str,$contextnode->myDOMNode) : $this->myDOMXPath->query($eval_str);
+               $xp=new php4DOMNodelist($xp,$this->myOwnerDocument);
+               return ($xp->type===XPATH_UNDEFINED) ? false : $xp;
+       }
+       function xpath_register_ns($prefix,$namespaceURI) {return $this->myDOMXPath->registerNamespace($prefix,$namespaceURI);}
+}
+
+if (extension_loaded('xsl'))
+{//See also: http://alexandre.alapetite.net/doc-alex/xslt-php4-php5/
+       function domxml_xslt_stylesheet($xslstring) {return new php4DomXsltStylesheet(DOMDocument::loadXML($xslstring));}
+       function domxml_xslt_stylesheet_doc($dom_document) {return new php4DomXsltStylesheet($dom_document);}
+       function domxml_xslt_stylesheet_file($xslfile) {return new php4DomXsltStylesheet(DOMDocument::load($xslfile));}
+       class php4DomXsltStylesheet
+       {
+               private $myxsltProcessor;
+               function php4DomXsltStylesheet($dom_document)
+               {
+                       $this->myxsltProcessor=new xsltProcessor();
+                       $this->myxsltProcessor->importStyleSheet($dom_document);
+               }
+               function process($dom_document,$xslt_parameters=array(),$param_is_xpath=false)
+               {
+                       foreach ($xslt_parameters as $param=>$value) $this->myxsltProcessor->setParameter('',$param,$value);
+                       $myphp4DOMDocument=new php4DOMDocument();
+                       $myphp4DOMDocument->myDOMNode=$this->myxsltProcessor->transformToDoc($dom_document->myDOMNode);
+                       return $myphp4DOMDocument;
+               }
+               function result_dump_file($dom_document,$filename)
+               {
+                       $html=$dom_document->myDOMNode->saveHTML();
+                       file_put_contents($filename,$html);
+                       return $html;
+               }
+               function result_dump_mem($dom_document) {return $dom_document->myDOMNode->saveHTML();}
+       }
+}
+?>
index 0b139c7cad2c828abe0d66387017cb4eee4e0fb0..3d67473d98caf9a7097bb8346e29ad3a9a1fff21 100644 (file)
@@ -1,27 +1,27 @@
-<?php
-
-/**
- * @file languages/spanish.php
- * @author Iván-Benjamín García Torà <ivaniclixx AT gmail DOT com>
- * @sa @link internalLang Internationalization @endlink
- * @ingroup internalLang
- */
-
-$this->_strings = array(
- CAS_STR_USING_SERVER 
- => 'usant servidor',
- CAS_STR_AUTHENTICATION_WANTED 
- => 'Autentificació CAS necessària!',
- CAS_STR_LOGOUT 
- => 'Sortida de CAS necessària!',
- CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED 
- => 'Ja hauria d\ haver estat redireccionat al servidor CAS. Feu click <a href="%s">aquí</a> per a continuar.',
- CAS_STR_AUTHENTICATION_FAILED 
- => 'Autentificació CAS fallida!',
- CAS_STR_YOU_WERE_NOT_AUTHENTICATED 
- => '<p>No estàs autentificat.</p><p>Pots tornar a intentar-ho fent click <a href="%s">aquí</a>.</p><p>Si el problema persisteix hauría de contactar amb l\'<a href="mailto:%s">administrador d\'aquest llocc</a>.</p>',
- CAS_STR_SERVICE_UNAVAILABLE
- => 'El servei `<b>%s</b>\' no està disponible (<b>%s</b>).'
-);
-
-?>
+<?php\r
+\r
+/**\r
+ * @file languages/spanish.php\r
+ * @author Iván-Benjamín García Torà <ivaniclixx AT gmail DOT com>\r
+ * @sa @link internalLang Internationalization @endlink\r
+ * @ingroup internalLang\r
+ */\r
+\r
+$this->_strings = array(\r
+ CAS_STR_USING_SERVER \r
+ => 'usant servidor',\r
+ CAS_STR_AUTHENTICATION_WANTED \r
+ => 'Autentificació CAS necessària!',\r
+ CAS_STR_LOGOUT \r
+ => 'Sortida de CAS necessària!',\r
+ CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED \r
+ => 'Ja hauria d\ haver estat redireccionat al servidor CAS. Feu click <a href="%s">aquí</a> per a continuar.',\r
+ CAS_STR_AUTHENTICATION_FAILED \r
+ => 'Autentificació CAS fallida!',\r
+ CAS_STR_YOU_WERE_NOT_AUTHENTICATED \r
+ => '<p>No estàs autentificat.</p><p>Pots tornar a intentar-ho fent click <a href="%s">aquí</a>.</p><p>Si el problema persisteix hauría de contactar amb l\'<a href="mailto:%s">administrador d\'aquest llocc</a>.</p>',\r
+ CAS_STR_SERVICE_UNAVAILABLE\r
+ => 'El servei `<b>%s</b>\' no està disponible (<b>%s</b>).'\r
+);\r
+\r
+?>\r
index d38d42c1f7c510eeab3b32498aa46348970234e8..c14345031429cdb55be5135ece9fdc5ef3603c37 100644 (file)
@@ -1,27 +1,27 @@
-<?php
-
-/**
- * @file languages/english.php
- * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>
- * @sa @link internalLang Internationalization @endlink
- * @ingroup internalLang
- */
-
-$this->_strings = array(
- CAS_STR_USING_SERVER 
- => 'using server',
- CAS_STR_AUTHENTICATION_WANTED 
- => 'CAS Authentication wanted!',
- CAS_STR_LOGOUT 
- => 'CAS logout wanted!',
- CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED 
- => 'You should already have been redirected to the CAS server. Click <a href="%s">here</a> to continue.',
- CAS_STR_AUTHENTICATION_FAILED 
- => 'CAS Authentication failed!',
- CAS_STR_YOU_WERE_NOT_AUTHENTICATED 
- => '<p>You were not authenticated.</p><p>You may submit your request again by clicking <a href="%s">here</a>.</p><p>If the problem persists, you may contact <a href="mailto:%s">the administrator of this site</a>.</p>',
- CAS_STR_SERVICE_UNAVAILABLE
- => 'The service `<b>%s</b>\' is not available (<b>%s</b>).'
-);
-
+<?php\r
+\r
+/**\r
+ * @file languages/english.php\r
+ * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>\r
+ * @sa @link internalLang Internationalization @endlink\r
+ * @ingroup internalLang\r
+ */\r
+\r
+$this->_strings = array(\r
+ CAS_STR_USING_SERVER \r
+ => 'using server',\r
+ CAS_STR_AUTHENTICATION_WANTED \r
+ => 'CAS Authentication wanted!',\r
+ CAS_STR_LOGOUT \r
+ => 'CAS logout wanted!',\r
+ CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED \r
+ => 'You should already have been redirected to the CAS server. Click <a href="%s">here</a> to continue.',\r
+ CAS_STR_AUTHENTICATION_FAILED \r
+ => 'CAS Authentication failed!',\r
+ CAS_STR_YOU_WERE_NOT_AUTHENTICATED \r
+ => '<p>You were not authenticated.</p><p>You may submit your request again by clicking <a href="%s">here</a>.</p><p>If the problem persists, you may contact <a href="mailto:%s">the administrator of this site</a>.</p>',\r
+ CAS_STR_SERVICE_UNAVAILABLE\r
+ => 'The service `<b>%s</b>\' is not available (<b>%s</b>).'\r
+);\r
+\r
 ?>
\ No newline at end of file
index 32d14168506e5044fd9ccfdc6a7a808c68c8536a..b077ec02e94173bd326cf33e2f7cc57a05a00949 100644 (file)
@@ -1,28 +1,28 @@
-<?php
-
-/**
- * @file languages/english.php
- * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>
- * @sa @link internalLang Internationalization @endlink
- * @ingroup internalLang
- */
-
-$this->_strings = array(
- CAS_STR_USING_SERVER 
- => 'utilisant le serveur',
- CAS_STR_AUTHENTICATION_WANTED 
- => 'Authentication CAS nécessaire&nbsp;!',
- CAS_STR_LOGOUT 
- => 'Déconnexion demandée&nbsp;!',
- CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED 
- => 'Vous auriez du etre redirigé(e) vers le serveur CAS. Cliquez <a href="%s">ici</a> pour continuer.',
- CAS_STR_AUTHENTICATION_FAILED 
- => 'Authentification CAS infructueuse&nbsp;!',
- CAS_STR_YOU_WERE_NOT_AUTHENTICATED 
- => '<p>Vous n\'avez pas été authentifié(e).</p><p>Vous pouvez soumettre votre requete à nouveau en cliquant <a href="%s">ici</a>.</p><p>Si le problème persiste, vous pouvez contacter <a href="mailto:%s">l\'administrateur de ce site</a>.</p>',
- CAS_STR_SERVICE_UNAVAILABLE
- => 'Le service `<b>%s</b>\' est indisponible (<b>%s</b>)'
-
-);
-
+<?php\r
+\r
+/**\r
+ * @file languages/english.php\r
+ * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>\r
+ * @sa @link internalLang Internationalization @endlink\r
+ * @ingroup internalLang\r
+ */\r
+\r
+$this->_strings = array(\r
+ CAS_STR_USING_SERVER \r
+ => 'utilisant le serveur',\r
+ CAS_STR_AUTHENTICATION_WANTED \r
+ => 'Authentication CAS n�cessaire&nbsp;!',\r
+ CAS_STR_LOGOUT \r
+ => 'D�connexion demand�e&nbsp;!',\r
+ CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED \r
+ => 'Vous auriez du etre redirig�(e) vers le serveur CAS. Cliquez <a href="%s">ici</a> pour continuer.',\r
+ CAS_STR_AUTHENTICATION_FAILED \r
+ => 'Authentification CAS infructueuse&nbsp;!',\r
+ CAS_STR_YOU_WERE_NOT_AUTHENTICATED \r
+ => '<p>Vous n\'avez pas �t� authentifi�(e).</p><p>Vous pouvez soumettre votre requete � nouveau en cliquant <a href="%s">ici</a>.</p><p>Si le probl�me persiste, vous pouvez contacter <a href="mailto:%s">l\'administrateur de ce site</a>.</p>',\r
+ CAS_STR_SERVICE_UNAVAILABLE\r
+ => 'Le service `<b>%s</b>\' est indisponible (<b>%s</b>)'\r
+\r
+);\r
+\r
 ?>
\ No newline at end of file
index 55c3238fde3ad36bc1f313a67707defdd4a5516d..29daeb35ddebec77ae1e527c3394ece9d7d69207 100644 (file)
@@ -1,27 +1,27 @@
-<?php
-
-/**
- * @file languages/german.php
- * @author Henrik Genssen <hg at mediafactory.de>
- * @sa @link internalLang Internationalization @endlink
- * @ingroup internalLang
- */
-
-$this->_strings = array(
- CAS_STR_USING_SERVER 
- => 'via Server',
- CAS_STR_AUTHENTICATION_WANTED 
- => 'CAS Authentifizierung erforderlich!',
- CAS_STR_LOGOUT 
- => 'CAS Abmeldung!',
- CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED 
- => 'eigentlich h&auml;ten Sie zum CAS Server weitergeleitet werden sollen. Dr&uuml;cken Sie <a href="%s">hier</a> um fortzufahren.',
- CAS_STR_AUTHENTICATION_FAILED 
- => 'CAS Anmeldung fehlgeschlagen!',
- CAS_STR_YOU_WERE_NOT_AUTHENTICATED 
- => '<p>Sie wurden nicht angemeldet.</p><p>Um es erneut zu versuchen klicken Sie <a href="%s">hier</a>.</p><p>Wenn das Problem bestehen bleibt, kontkatieren Sie den <a href="mailto:%s">Administrator</a> dieser Seite.</p>',
- CAS_STR_SERVICE_UNAVAILABLE
- => 'Der Dienst `<b>%s</b>\' ist nicht verf&uuml;gbar (<b>%s</b>).'
-);
-
+<?php\r
+\r
+/**\r
+ * @file languages/german.php\r
+ * @author Henrik Genssen <hg at mediafactory.de>\r
+ * @sa @link internalLang Internationalization @endlink\r
+ * @ingroup internalLang\r
+ */\r
+\r
+$this->_strings = array(\r
+ CAS_STR_USING_SERVER \r
+ => 'via Server',\r
+ CAS_STR_AUTHENTICATION_WANTED \r
+ => 'CAS Authentifizierung erforderlich!',\r
+ CAS_STR_LOGOUT \r
+ => 'CAS Abmeldung!',\r
+ CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED \r
+ => 'eigentlich h&auml;ten Sie zum CAS Server weitergeleitet werden sollen. Dr&uuml;cken Sie <a href="%s">hier</a> um fortzufahren.',\r
+ CAS_STR_AUTHENTICATION_FAILED \r
+ => 'CAS Anmeldung fehlgeschlagen!',\r
+ CAS_STR_YOU_WERE_NOT_AUTHENTICATED \r
+ => '<p>Sie wurden nicht angemeldet.</p><p>Um es erneut zu versuchen klicken Sie <a href="%s">hier</a>.</p><p>Wenn das Problem bestehen bleibt, kontkatieren Sie den <a href="mailto:%s">Administrator</a> dieser Seite.</p>',\r
+ CAS_STR_SERVICE_UNAVAILABLE\r
+ => 'Der Dienst `<b>%s</b>\' ist nicht verf&uuml;gbar (<b>%s</b>).'\r
+);\r
+\r
 ?>
\ No newline at end of file
index d41bf783b4a602f1b534e55f58d81a3cbc4f4b16..fdff77e4e5572c5e04e8f4c2f748b1e8f0c60da5 100644 (file)
@@ -1,27 +1,27 @@
-<?php
-
-/**
- * @file languages/greek.php
- * @author Vangelis Haniotakis <haniotak at ucnet.uoc.gr>
- * @sa @link internalLang Internationalization @endlink
- * @ingroup internalLang
- */
-
-$this->_strings = array(
- CAS_STR_USING_SERVER 
- => '÷ñçóéìïðïéåßôáé ï åîõðçñåôçôÞò',
- CAS_STR_AUTHENTICATION_WANTED 
- => 'Áðáéôåßôáé ç ôáõôïðïßçóç CAS!',
- CAS_STR_LOGOUT 
- => 'Áðáéôåßôáé ç áðïóýíäåóç áðü CAS!',
- CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED 
- => 'Èá Ýðñåðå íá åß÷áôå áíáêáôåõèõíèåß óôïí åîõðçñåôçôÞ CAS. ÊÜíôå êëßê <a href="%s">åäþ</a> ãéá íá óõíå÷ßóåôå.',
- CAS_STR_AUTHENTICATION_FAILED 
- => 'Ç ôáõôïðïßçóç CAS áðÝôõ÷å!',
- CAS_STR_YOU_WERE_NOT_AUTHENTICATED 
- => '<p>Äåí ôáõôïðïéçèÞêáôå.</p><p>Ìðïñåßôå íá îáíáðñïóðáèÞóåôå, êÜíïíôáò êëßê <a href="%s">åäþ</a>.</p><p>Åáí ôï ðñüâëçìá åðéìåßíåé, åëÜôå óå åðáöÞ ìå ôïí <a href="mailto:%s">äéá÷åéñéóôÞ</a>.</p>',
- CAS_STR_SERVICE_UNAVAILABLE
- => 'Ç õðçñåóßá `<b>%s</b>\' äåí åßíáé äéáèÝóéìç (<b>%s</b>).'
-);
-
+<?php\r
+\r
+/**\r
+ * @file languages/greek.php\r
+ * @author Vangelis Haniotakis <haniotak at ucnet.uoc.gr>\r
+ * @sa @link internalLang Internationalization @endlink\r
+ * @ingroup internalLang\r
+ */\r
+\r
+$this->_strings = array(\r
+ CAS_STR_USING_SERVER \r
+ => '��������������� � ������������',\r
+ CAS_STR_AUTHENTICATION_WANTED \r
+ => '���������� � ����������� CAS!',\r
+ CAS_STR_LOGOUT \r
+ => '���������� � ���������� ��� CAS!',\r
+ CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED \r
+ => '�� ������ �� ������ �������������� ���� ����������� CAS. ����� ���� <a href="%s">���</a> ��� �� ����������.',\r
+ CAS_STR_AUTHENTICATION_FAILED \r
+ => '� ����������� CAS �������!',\r
+ CAS_STR_YOU_WERE_NOT_AUTHENTICATED \r
+ => '<p>��� ���������������.</p><p>�������� �� ����������������, �������� ���� <a href="%s">���</a>.</p><p>��� �� �������� ���������, ����� �� ����� �� ��� <a href="mailto:%s">�����������</a>.</p>',\r
+ CAS_STR_SERVICE_UNAVAILABLE\r
+ => '� �������� `<b>%s</b>\' ��� ����� ��������� (<b>%s</b>).'\r
+);\r
+\r
 ?>
\ No newline at end of file
index 333bb17b6a0ecb11334054e7dc6dd706961b09b8..76ebe77bcf5a34d4c0166f900b7acc0654237907 100644 (file)
@@ -11,17 +11,17 @@ $this->_strings = array(
  CAS_STR_USING_SERVER 
  => 'using server',
  CAS_STR_AUTHENTICATION_WANTED 
- => 'CAS¤Ë¤è¤ëǧ¾Ú¤ò¹Ô¤¤¤Þ¤¹',
+ => 'CAS�ˤ��ǧ�ڤ�Ԥ��ޤ�',
  CAS_STR_LOGOUT 
- => 'CAS¤«¤é¥í¥°¥¢¥¦¥È¤·¤Þ¤¹!',
+ => 'CAS����?�����Ȥ��ޤ�!',
  CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED 
- => 'CAS¥µ¡¼¥Ð¤Ë¹Ô¤¯É¬Íפ¬¤¢¤ê¤Þ¤¹¡£¼«Æ°Åª¤ËžÁ÷¤µ¤ì¤Ê¤¤¾ì¹ç¤Ï <a href="%s">¤³¤Á¤é</a> ¤ò¥¯¥ê¥Ã¥¯¤·¤Æ³¹Ô¤·¤Þ¤¹¡£',
+ => 'CAS�����Ф˹Ԥ�ɬ�פ�����ޤ�����ưŪ��ž������ʤ����� <a href="%s">������</a> �򥯥�å�����³�Ԥ��ޤ���',
  CAS_STR_AUTHENTICATION_FAILED 
- => 'CAS¤Ë¤è¤ëǧ¾Ú¤Ë¼ºÇÔ¤·¤Þ¤·¤¿',
+ => 'CAS�ˤ��ǧ�ڤ˼��Ԥ��ޤ���',
  CAS_STR_YOU_WERE_NOT_AUTHENTICATED 
- => '<p>ǧ¾Ú¤Ç¤­¤Þ¤»¤ó¤Ç¤·¤¿.</p><p>¤â¤¦°ìÅ٥ꥯ¥¨¥¹¥È¤òÁ÷¿®¤¹¤ë¾ì¹ç¤Ï<a href="%s">¤³¤Á¤é</a>¤ò¥¯¥ê¥Ã¥¯.</p><p>ÌäÂ꤬²ò·è¤·¤Ê¤¤¾ì¹ç¤Ï <a href="mailto:%s">¤³¤Î¥µ¥¤¥È¤Î´ÉÍý¼Ô</a>¤ËÌ䤤¹ç¤ï¤»¤Æ¤¯¤À¤µ¤¤.</p>',
+ => '<p>ǧ�ڤǤ��ޤ���Ǥ���.</p><p>�⤦���٥ꥯ�����Ȥ������������<a href="%s">������</a>�򥯥�å�.</p><p>���꤬��褷�ʤ����� <a href="mailto:%s">���Υ����Ȥδ����</a>���䤤��碌�Ƥ�������.</p>',
  CAS_STR_SERVICE_UNAVAILABLE
- => '¥µ¡¼¥Ó¥¹ `<b>%s</b>\' ¤ÏÍøÍѤǤ­¤Þ¤»¤ó (<b>%s</b>).'
+ => '�����ӥ� `<b>%s</b>\' �����ѤǤ��ޤ��� (<b>%s</b>).'
 );
 
 ?>
\ No newline at end of file
index 001cfe445cddfaa9afc78e5cb56431e937117400..2c6f8bb3b300ee066364725e19beea1f2e643520 100644 (file)
@@ -1,24 +1,24 @@
-<?php
-
-/**
- * @file languages/languages.php
- * Internationalization constants
- * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>
- * @sa @link internalLang Internationalization @endlink
- * @ingroup internalLang
- */
-
-//@{
-/**
- * a phpCAS string index
- */
-define("CAS_STR_USING_SERVER",                1);
-define("CAS_STR_AUTHENTICATION_WANTED",       2);
-define("CAS_STR_LOGOUT",                      3);
-define("CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED", 4);
-define("CAS_STR_AUTHENTICATION_FAILED",       5);
-define("CAS_STR_YOU_WERE_NOT_AUTHENTICATED",  6);
-define("CAS_STR_SERVICE_UNAVAILABLE",         7);
-//@}
-
+<?php\r
+\r
+/**\r
+ * @file languages/languages.php\r
+ * Internationalization constants\r
+ * @author Pascal Aubry <pascal.aubry at univ-rennes1.fr>\r
+ * @sa @link internalLang Internationalization @endlink\r
+ * @ingroup internalLang\r
+ */\r
+\r
+//@{\r
+/**\r
+ * a phpCAS string index\r
+ */\r
+define("CAS_STR_USING_SERVER",                1);\r
+define("CAS_STR_AUTHENTICATION_WANTED",       2);\r
+define("CAS_STR_LOGOUT",                      3);\r
+define("CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED", 4);\r
+define("CAS_STR_AUTHENTICATION_FAILED",       5);\r
+define("CAS_STR_YOU_WERE_NOT_AUTHENTICATED",  6);\r
+define("CAS_STR_SERVICE_UNAVAILABLE",         7);\r
+//@}\r
+\r
 ?>
\ No newline at end of file
index 04067ca03b644ae41c97ad2512632530448d3d65..3a8ffc25358bcdb0c363adb0546830bc6bbfb9a2 100644 (file)
@@ -1,27 +1,27 @@
-<?php
-
-/**
- * @file languages/spanish.php
- * @author Iván-Benjamín García Torà <ivaniclixx AT gmail DOT com>
- * @sa @link internalLang Internationalization @endlink
- * @ingroup internalLang
- */
-
-$this->_strings = array(
- CAS_STR_USING_SERVER 
- => 'usando servidor',
- CAS_STR_AUTHENTICATION_WANTED 
- => '¡Autentificación CAS necesaria!',
- CAS_STR_LOGOUT 
- => '¡Salida CAS necesaria!',
- CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED 
- => 'Ya debería haber sido redireccionado al servidor CAS. Haga click <a href="%s">aquí</a> para continuar.',
- CAS_STR_AUTHENTICATION_FAILED 
- => '¡Autentificación CAS fallida!',
- CAS_STR_YOU_WERE_NOT_AUTHENTICATED 
- => '<p>No estás autentificado.</p><p>Puedes volver a intentarlo haciendo click <a href="%s">aquí</a>.</p><p>Si el problema persiste debería contactar con el <a href="mailto:%s">administrador de este sitio</a>.</p>',
- CAS_STR_SERVICE_UNAVAILABLE
- => 'El servicio `<b>%s</b>\' no está disponible (<b>%s</b>).'
-);
-
-?>
+<?php\r
+\r
+/**\r
+ * @file languages/spanish.php\r
+ * @author Iván-Benjamín García Torà <ivaniclixx AT gmail DOT com>\r
+ * @sa @link internalLang Internationalization @endlink\r
+ * @ingroup internalLang\r
+ */\r
+\r
+$this->_strings = array(\r
+ CAS_STR_USING_SERVER \r
+ => 'usando servidor',\r
+ CAS_STR_AUTHENTICATION_WANTED \r
+ => '¡Autentificación CAS necesaria!',\r
+ CAS_STR_LOGOUT \r
+ => '¡Salida CAS necesaria!',\r
+ CAS_STR_SHOULD_HAVE_BEEN_REDIRECTED \r
+ => 'Ya debería haber sido redireccionado al servidor CAS. Haga click <a href="%s">aquí</a> para continuar.',\r
+ CAS_STR_AUTHENTICATION_FAILED \r
+ => '¡Autentificación CAS fallida!',\r
+ CAS_STR_YOU_WERE_NOT_AUTHENTICATED \r
+ => '<p>No estás autentificado.</p><p>Puedes volver a intentarlo haciendo click <a href="%s">aquí</a>.</p><p>Si el problema persiste debería contactar con el <a href="mailto:%s">administrador de este sitio</a>.</p>',\r
+ CAS_STR_SERVICE_UNAVAILABLE\r
+ => 'El servicio `<b>%s</b>\' no está disponible (<b>%s</b>).'\r
+);\r
+\r
+?>\r