git-svn-id: https://svn.origo.ethz.ch/eiffelstudio/trunk/Src/library/cURL@71170 8089f293-4706-0410-a29e-feb5c42a2edf
88 lines
1.6 KiB
Plaintext
88 lines
1.6 KiB
Plaintext
indexing
|
|
description: "[
|
|
cURL form.
|
|
For more informaton see:
|
|
http://curl.haxx.se/libcurl/c/curl_formadd.html
|
|
]"
|
|
status: "See notice at end of class."
|
|
legal: "See notice at end of class."
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class
|
|
CURL_FORM
|
|
|
|
inherit
|
|
DISPOSABLE
|
|
|
|
create
|
|
make,
|
|
share_with_pointer
|
|
|
|
feature {NONE} -- Initialization
|
|
|
|
make is
|
|
-- Creation method.
|
|
do
|
|
end
|
|
|
|
share_with_pointer (a_pointer: POINTER) is
|
|
-- Creation method.
|
|
-- `item' share with `a_pointer'.
|
|
require
|
|
exists: a_pointer /= default_pointer
|
|
do
|
|
item := a_pointer
|
|
ensure
|
|
set: item = a_pointer
|
|
end
|
|
|
|
feature -- Query
|
|
|
|
item: POINTER
|
|
-- C pointer of Current.
|
|
|
|
is_exists: BOOLEAN
|
|
-- If C pointer exists?
|
|
do
|
|
Result := item /= default_pointer
|
|
end
|
|
|
|
feature -- Command
|
|
|
|
dispose is
|
|
-- Free memory if possible.
|
|
local
|
|
l_curl: CURL_EXTERNALS
|
|
do
|
|
if item /= default_pointer then
|
|
create l_curl
|
|
l_curl.formfree (item)
|
|
item := default_pointer
|
|
end
|
|
end
|
|
|
|
feature {CURL_EXTERNALS} -- Internal command
|
|
|
|
set_item (a_item: POINTER) is
|
|
-- Set `item' with `a_item'
|
|
do
|
|
item := a_item
|
|
ensure
|
|
set: item = a_item
|
|
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
|