mirrors/EWF
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Made cURL wrapper library works on Linux.

Browse Source 
git-svn-id: https://svn.origo.ethz.ch/eiffelstudio/trunk/Src/library/cURL@70943 8089f293-4706-0410-a29e-feb5c42a2edf
This commit is contained in:
larryl
2007-10-30 11:22:26 +00:00
parent 2d99813b5d
commit 09a1c2d34a
3 changed files with 66 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
curl_easy_externals.e
View File

@@ -149,8 +149,14 @@ feature {NONE} -- Implementation
not_void: Result /= Void
end
module_name: STRING is "libcurl.dll"
module_name: STRING is
-- Module name.
local
l_utility: CURL_UTILITY
once
create l_utility
Result := l_utility.module_name
end
setopt_void_star (a_curl_handle: POINTER; a_opt: INTEGER; a_data:POINTER) is
-- Declared as curl_easy_setopt().
@@ -218,10 +224,10 @@ feature {NONE} -- C externals
alias
"[
{
(FUNCTION_CAST(void, (CURL *, CURLoption, CURLoption)) $a_api)
(FUNCTION_CAST(void, (CURL *, CURLoption, ...)) $a_api)
((CURL *) $a_curl_handle,
(CURLoption)$a_opt,
(CURLoption)$a_data);
$a_data);
}
]"
end
@@ -238,10 +244,10 @@ feature {NONE} -- C externals
alias
"[
{
(FUNCTION_CAST(void, (CURL *, CURLoption, CURLoption)) $a_api)
(FUNCTION_CAST(void, (CURL *, CURLoption, ...)) $a_api)
((CURL *) $a_curl_handle,
(CURLoption)$a_opt,
(CURLoption)$a_data);
$a_data);
}
]"
end
@@ -256,10 +262,10 @@ feature {NONE} -- C externals
alias
"[
{
(FUNCTION_CAST(void, (CURL *, CURLoption, CURLoption)) $a_setopt_api)
(FUNCTION_CAST(void, (CURL *, CURLoption, ...)) $a_setopt_api)
((CURL *) $a_curl_handle,
(CURLoption)CURLOPT_WRITEFUNCTION,
(CURLoption)WriteMemoryCallback);
WriteMemoryCallback);
}
]"
end
@@ -274,15 +280,15 @@ feature {NONE} -- C externals
alias
"[
{
(FUNCTION_CAST(void, (CURL *, CURLoption, CURLoption)) $a_setopt_api)
(FUNCTION_CAST(void, (CURL *, CURLoption, ...)) $a_setopt_api)
((CURL *) $a_curl_handle,
(CURLoption)CURLOPT_DEBUGFUNCTION,
(CURLoption)curl_trace);
curl_trace);
(FUNCTION_CAST(void, (CURL *, CURLoption, CURLoption)) $a_setopt_api)
(FUNCTION_CAST(void, (CURL *, CURLoption, ...)) $a_setopt_api)
((CURL *) $a_curl_handle,
(CURLoption)CURLOPT_VERBOSE,
(CURLoption)TRUE);
TRUE);
}
]"
end

8
curl_externals.e
View File

@@ -85,8 +85,14 @@ feature {NONE} -- Implementation
not_void: Result /= Void
end
module_name: STRING is "libcurl.dll"
module_name: STRING is
-- Module name.
local
l_utility: CURL_UTILITY
once
create l_utility
Result := l_utility.module_name
end
internal_formadd_string_string (a_form: TYPED_POINTER [POINTER]; a_last_pointer: TYPED_POINTER [POINTER]; a_arg_1: INTEGER; a_arg_1_value: STRING_GENERAL; a_arg_2: INTEGER; a_arg_2_value: STRING_GENERAL; a_arg_3: INTEGER) is
-- Declared as curl_formadd ().

42
curl_utility.e Normal file
View File

@@ -0,0 +1,42 @@
indexing
description: "[
Utilities for Eiffel cURL wrapper library.
]"
status: "See notice at end of class."
legal: "See notice at end of class."
date: "$Date$"
revision: "$Revision$"
class
CURL_UTILITY
feature -- Query
module_name: STRING is
-- Module name.
local
l_platform: PLATFORM
once
create l_platform
if l_platform.is_windows then
Result := "libcurl.dll"
else
Result := "libcurl.so"
end
ensure
not_void: Result /= Void
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