Fonctions étendues

When writing rules and headers, you can use Perl expressions that will be evaluated in a jail, to prevent bad code execution.

C'est disponible pour :

• les règles d'activation des modules du menu
• les données à rejouer dans les formulaires
• Macros
• les règles d'utilisation des bases de données des fournisseur d'identité
• etc...

Dans cette cage, on peut accéder aux éléments suivants :

• Core Perl subroutines (split, pop, map, etc.)
• Fonctions personnalisées
• Fonction encode_base64
• Environment variables, in some cases (through %ENV)
• Informations about current request
• Extended functions:
  • date
  • checkLogonHours
  • checkDate
  • basic
  • unicode2iso
  • iso2unicode
  • groupMatch

The following data about the current request are available through functions :

• hostname
• remote_ip: the client IP address
• uri: URL path
• uri_with_args: URL path with query string
• unparsed_uri: URL path, before URL decoding
• args: the query string
• method: the request method (GET, POST etc.)
• header_in(“Your-Request-Header”): any request header

Returns the date, in format YYYYMMDDHHMMSS, local time by default, GMT by calling

date(1)

Cette fonction examine le jour et l'heure de la requête courante et la compare aux jours et heures autorisés. Elle retourne 1 si c'est bon, 0 sinon. All e By default, the allowed days and hours is an hexadecimal value, representing each hour of the week. Un jour a 24 heures et une semaine 7 jours, donc la valeur contient 168 bits, convertie en 42 caractères hexadécimaux. Dimanche est le premier jour.

Par exemple, pour un accès total excepté le week-end:

000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000

Paramètres de la fonction :

• logon_hours : chaîne représentant les heures autorisées (GMT)
• syntax (optionnel) : hexadecimal (défaut) ou octetstring
• time_correction (optionnel) : heures à ajouter ou soustraire
• default_access (optionnel) : resultat à retourner si logon_hours est vide

Exemple d'usage simple :

checkLogonHours($ssoLogonHours)

Si une valeur binaire est utilisée (Active Directory) :

All e
checkLogonHours($ssoLogonHours, 'octetstring')

On peut aussi configurer jetlag (si tous les utilisateurs utilisent le même fuseau):

checkLogonHours($ssoLogonHours, '', '+2')

Si plusieurs fuseaux sont utilisés, le jetlag doit être introduit dans le compte dans la valeur ssoLogonHours, ou utiliser le paramètre $_timezone. Ce paramètre est géré par le portail et utilise javascript pour obtenir le fuseau de l'utilisateur connecté. Ça doit marcher avec tous les navigateurs :

checkLogonHours($ssoLogonHours, '', $_timezone)

Il est possible de modifier le comportement par défaut pour les utilisateurs ne disposant pas d'une valeur ssoLogonHours. Sinon, par défaut, les utilisateurs sans créneau horaire de connexion sont rejetés. On peut autoriser ces utilisateurs au lieu de les rejeter :

checkLogonHours($ssoLogonHours, '', '', '1')

Cette fonction examine la date de la requête en cours et la compare avec une date de début et de fin. Elle retourne 1 si c'est bon, 0 sinon.

The date format is the LDAP date syntax, for example for the 1st March 2009:

20090301000000Z

Paramètres de la fonction :

• start : date de début (GMT)
• end: date de fin (GMT)
• default_access (optionnel) : resultat à retourner si start et end sont vides

Exemple d'usage simple :

checkDate($ssoStartDate, $ssoEndDate)

This function builds the Authorization HTTP header used in HTTP Basic authentication scheme. It will force conversion from UTF-8 to ISO-8859-1 of user and password data.

Paramètres de la fonction :

• user
• password

Exemple d'usage simple :

basic($uid,$_password)

This function convert a string from UTF-8 to ISO-8859-1.

Paramètres de la fonction :

• chaîne

Exemple d'usage simple :

unicode2iso($nom)

This function convert a string from ISO-8859-1 to UTF-8.

Paramètres de la fonction :

• chaîne

Exemple d'usage simple :

iso2unicode($name)

this function allows to parse the $hGroups variable to check if a value is present inside a group attribute.

Function parameter:

• groups: $hGroups variable
• attribute: Name of group attribute
• value: Value to check

Exemple d'usage simple :

groupMatch($hGroups, 'description', 'Service 1')