Improved cURL wrapper library. We can write functions from curl_easy_setopt in pure Eiffel now. Before we have to implement the functions in C.

git-svn-id: https://svn.origo.ethz.ch/eiffelstudio/trunk/Src/library/cURL@71081 8089f293-4706-0410-a29e-feb5c42a2edf

curl_info_type.e

@@ -0,0 +1,62 @@
+indexing
+	description: "[
+						cURL library info type constants.
+																			]"
+	status: "See notice at end of class."
+	legal: "See notice at end of class."
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	CURL_INFO_TYPE
+
+feature -- Enumeration
+
+	curlinfo_text: INTEGER is 0
+			-- Declared as CURLINFO_TEXT
+
+	curlinfo_header_in: INTEGER is 1
+			-- Declared as CURLINFO_HEADER_IN
+
+	curlinfo_header_out: INTEGER is 2
+			-- Declared as CURLINFO_HEADER_OUT
+
+	curlinfo_data_in: INTEGER is 3
+			-- Declared as CURLINFO_DATA_IN
+
+	curlinfo_data_out: INTEGER is 4
+			-- Declared as CURLINFO_DATA_OUT
+
+	curlinfo_ssl_data_in: INTEGER is 5
+	 		-- Declared as CURLINFO_SSL_DATA_IN
+
+	curlinfo_ssl_data_out: INTEGER is 6
+			-- Declared as CURLINFO_SSL_DATA_OUT
+
+feature -- Contract support
+
+	is_valid (a_type: INTEGER): BOOLEAN is
+			-- If `a_type' valid?
+		do
+			Result := 	a_type = curlinfo_data_in or
+						a_type = curlinfo_data_out or
+						a_type = curlinfo_header_in or
+						a_type = curlinfo_header_out or
+						a_type = curlinfo_ssl_data_in or
+						a_type = curlinfo_ssl_data_out or
+						a_type = curlinfo_text
+		end
+
+indexing
+	library:   "cURL: Library of reusable components for Eiffel."
+	copyright: "Copyright (c) 1984-2006, Eiffel Software and others"
+	license:   "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
+	source: "[
+			Eiffel Software
+			356 Storke Road, Goleta, CA 93117 USA
+			Telephone 805-685-1006, Fax 805-685-6869
+			Website http://www.eiffel.com
+			Customer support http://support.eiffel.com
+		]"
+
+end