From 21969b47d3e08f9b0b8e919b27b70b8801ef03a2 Mon Sep 17 00:00:00 2001
From: Benjamin Renard <brenard@easter-eggs.com>
Date: Fri, 30 Jul 2010 18:07:39 +0200
Subject: [PATCH] LSformRule_integer : Added integer form rule

---
 .../LSattribute/check_data/integer.docbook    | 25 +++++++++
 .../class/class.LSformRule_integer.php        | 55 +++++++++++++++++++
 2 files changed, 80 insertions(+)
 create mode 100644 doc/conf/LSattribute/check_data/integer.docbook
 create mode 100644 public_html/includes/class/class.LSformRule_integer.php

diff --git a/doc/conf/LSattribute/check_data/integer.docbook b/doc/conf/LSattribute/check_data/integer.docbook
new file mode 100644
index 00000000..8db46bb9
--- /dev/null
+++ b/doc/conf/LSattribute/check_data/integer.docbook
@@ -0,0 +1,25 @@
+<sect4 id="config-LSattribute-check-data-integer">
+  <title>integer</title>
+  <para>Cette règle vérifie que la valeur saisie est un entier. Les paramètres 
+  permettent de spécifier éventuellement si la valeur doit être positive ou négative.</para>
+  
+<variablelist>
+<title>Paramêtres de configuration</title>
+
+<varlistentry>
+  <term>positive</term>
+  <listitem>
+    <simpara>Booléen définissant si la valeur doit être positive.</simpara>
+  </listitem>
+</varlistentry>
+
+<varlistentry>
+  <term>negative</term>
+  <listitem>
+    <simpara>Booléen définissant si la valeur doit être negative.</simpara>
+  </listitem>
+</varlistentry>
+
+</variablelist>
+
+</sect4>
diff --git a/public_html/includes/class/class.LSformRule_integer.php b/public_html/includes/class/class.LSformRule_integer.php
new file mode 100644
index 00000000..1ce0ac3d
--- /dev/null
+++ b/public_html/includes/class/class.LSformRule_integer.php
@@ -0,0 +1,55 @@
+<?php
+/*******************************************************************************
+ * Copyright (C) 2007 Easter-eggs
+ * http://ldapsaisie.labs.libre-entreprise.org
+ *
+ * Author: See AUTHORS file in top-level directory.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License version 2
+ * as published by the Free Software Foundation.
+ *
+ * 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 General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+
+******************************************************************************/
+
+/**
+ * Validation rule for an integer value
+ *
+ * @author Benjamin Renard <brenard@easter-eggs.com>
+ */
+class LSformRule_integer extends LSformRule{
+  
+  /**
+   * Verification value.
+   *
+   * @param string $values The value
+   * @param array $options Validation options
+   * @param object $formElement The formElement object
+   *
+   * @return boolean true if the value is valided, false otherwise
+   */
+  function validate ($value,$options=array(),$formElement) {
+    if($options['params']['negative']) {
+      $regex = '/^-[0-9]*$/';
+    }
+    elseif($options['params']['positive']) {
+      $regex = '/^[0-9]*$/';
+    }
+    else {
+      $regex = '/^-?[0-9]*$/';
+    }
+    LSsession :: loadLSclass('LSformRule_regex');
+    return LSformRule_regex :: validate($value,$regex,$formElement);
+  }
+  
+}
+
+?>