Merge branch 'widget' of github.com:souvarin/EWF into widget

library/server/wsf_html/webcontrol/validators/wsf_decimal_validator.e

@@ -0,0 +1,24 @@
+note
+	description: "Summary description for {WSF_DECIMAL_VALIDATOR}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_DECIMAL_VALIDATOR
+
+inherit
+
+	WSF_REGEXP_VALIDATOR
+
+create
+	make_decimal_validator
+
+feature {NONE}
+
+	make_decimal_validator (e: STRING)
+		do
+			make_regexp_validator ("[0-9]+(\\.[0-9]*)?|\\.[0-9]+", e)
+		end
+
+end

library/server/wsf_html/webcontrol/validators/wsf_email_validator.e

@@ -0,0 +1,24 @@
+note
+	description: "Summary description for {WSF_EMAIL_VALIDATOR}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_EMAIL_VALIDATOR
+
+inherit
+
+	WSF_REGEXP_VALIDATOR
+
+create
+	make_email_validator
+
+feature
+
+	make_email_validator (e: STRING)
+		do
+			make_regexp_validator ("^[a-zA-Z0-9._%%+-]+@[a-zA-Z0-9.-]+\\.[a-zA-Z]{2,6}$", e)
+		end
+
+end

library/server/wsf_html/webcontrol/validators/wsf_phone_number_validator.e

@@ -6,16 +6,19 @@ note
 
 class
 	WSF_PHONE_NUMBER_VALIDATOR
+
 inherit
-	WSF_VALIDATOR[STRING]
+
+	WSF_REGEXP_VALIDATOR
+
 create
-	make
+	make_with_message
 
-feature -- Implementation
+feature {NONE}
 
-	validate(input:STRING):BOOLEAN
-	do
-
-	end
+	make_with_message (e: STRING)
+		do
+			make_regexp_validator ("", e)
+		end
 
 end

library/server/wsf_html/webcontrol/validators/wsf_regexp_validator.e

@@ -0,0 +1,40 @@
+note
+	description: "Summary description for {WSF_REGEXP_VALIDATOR}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_REGEXP_VALIDATOR
+
+inherit
+
+	WSF_VALIDATOR [STRING]
+
+create
+	make_regexp_validator
+
+feature {NONE}
+
+	make_regexp_validator (r, e: STRING)
+		do
+			make(e)
+			regexp_string := r
+			create regexp
+			regexp.compile (r)
+		end
+
+feature -- Implementation
+
+	validate (input: STRING): BOOLEAN
+		do
+			Result := regexp.matches (input)
+		end
+
+feature
+
+	regexp_string: STRING
+
+	regexp: REGULAR_EXPRESSION
+
+end