<html><head>
<link rel="stylesheet" href="style.css" type="text/css">
<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type">
<link rel="Start" href="index.html">
<link title="Index of types" rel=Appendix href="index_types.html">
<link title="Index of exceptions" rel=Appendix href="index_exceptions.html">
<link title="Index of values" rel=Appendix href="index_values.html">
<link title="Index of class attributes" rel=Appendix href="index_attributes.html">
<link title="Index of class methods" rel=Appendix href="index_methods.html">
<link title="Index of classes" rel=Appendix href="index_classes.html">
<link title="Index of class types" rel=Appendix href="index_class_types.html">
<link title="Index of modules" rel=Appendix href="index_modules.html">
<link title="Index of module types" rel=Appendix href="index_module_types.html">
<link title="Uq_gtk" rel="Chapter" href="Uq_gtk.html">
<link title="Equeue" rel="Chapter" href="Equeue.html">
<link title="Unixqueue" rel="Chapter" href="Unixqueue.html">
<link title="Uq_engines" rel="Chapter" href="Uq_engines.html">
<link title="Uq_socks5" rel="Chapter" href="Uq_socks5.html">
<link title="Unixqueue_mt" rel="Chapter" href="Unixqueue_mt.html">
<link title="Equeue_intro" rel="Chapter" href="Equeue_intro.html">
<link title="Uq_ssl" rel="Chapter" href="Uq_ssl.html">
<link title="Uq_tcl" rel="Chapter" href="Uq_tcl.html">
<link title="Netcgi_common" rel="Chapter" href="Netcgi_common.html">
<link title="Netcgi" rel="Chapter" href="Netcgi.html">
<link title="Netcgi_ajp" rel="Chapter" href="Netcgi_ajp.html">
<link title="Netcgi_scgi" rel="Chapter" href="Netcgi_scgi.html">
<link title="Netcgi_cgi" rel="Chapter" href="Netcgi_cgi.html">
<link title="Netcgi_fcgi" rel="Chapter" href="Netcgi_fcgi.html">
<link title="Netcgi_dbi" rel="Chapter" href="Netcgi_dbi.html">
<link title="Netcgi1_compat" rel="Chapter" href="Netcgi1_compat.html">
<link title="Netcgi_test" rel="Chapter" href="Netcgi_test.html">
<link title="Netcgi_porting" rel="Chapter" href="Netcgi_porting.html">
<link title="Netcgi_plex" rel="Chapter" href="Netcgi_plex.html">
<link title="Http_client" rel="Chapter" href="Http_client.html">
<link title="Telnet_client" rel="Chapter" href="Telnet_client.html">
<link title="Ftp_data_endpoint" rel="Chapter" href="Ftp_data_endpoint.html">
<link title="Ftp_client" rel="Chapter" href="Ftp_client.html">
<link title="Nethttpd_types" rel="Chapter" href="Nethttpd_types.html">
<link title="Nethttpd_kernel" rel="Chapter" href="Nethttpd_kernel.html">
<link title="Nethttpd_reactor" rel="Chapter" href="Nethttpd_reactor.html">
<link title="Nethttpd_engine" rel="Chapter" href="Nethttpd_engine.html">
<link title="Nethttpd_services" rel="Chapter" href="Nethttpd_services.html">
<link title="Nethttpd_plex" rel="Chapter" href="Nethttpd_plex.html">
<link title="Nethttpd_intro" rel="Chapter" href="Nethttpd_intro.html">
<link title="Netplex_types" rel="Chapter" href="Netplex_types.html">
<link title="Netplex_mp" rel="Chapter" href="Netplex_mp.html">
<link title="Netplex_mt" rel="Chapter" href="Netplex_mt.html">
<link title="Netplex_log" rel="Chapter" href="Netplex_log.html">
<link title="Netplex_controller" rel="Chapter" href="Netplex_controller.html">
<link title="Netplex_container" rel="Chapter" href="Netplex_container.html">
<link title="Netplex_sockserv" rel="Chapter" href="Netplex_sockserv.html">
<link title="Netplex_workload" rel="Chapter" href="Netplex_workload.html">
<link title="Netplex_main" rel="Chapter" href="Netplex_main.html">
<link title="Netplex_config" rel="Chapter" href="Netplex_config.html">
<link title="Netplex_kit" rel="Chapter" href="Netplex_kit.html">
<link title="Rpc_netplex" rel="Chapter" href="Rpc_netplex.html">
<link title="Netplex_cenv" rel="Chapter" href="Netplex_cenv.html">
<link title="Netplex_intro" rel="Chapter" href="Netplex_intro.html">
<link title="Netshm" rel="Chapter" href="Netshm.html">
<link title="Netshm_data" rel="Chapter" href="Netshm_data.html">
<link title="Netshm_hashtbl" rel="Chapter" href="Netshm_hashtbl.html">
<link title="Netshm_array" rel="Chapter" href="Netshm_array.html">
<link title="Netshm_intro" rel="Chapter" href="Netshm_intro.html">
<link title="Netconversion" rel="Chapter" href="Netconversion.html">
<link title="Netchannels" rel="Chapter" href="Netchannels.html">
<link title="Netstream" rel="Chapter" href="Netstream.html">
<link title="Mimestring" rel="Chapter" href="Mimestring.html">
<link title="Netmime" rel="Chapter" href="Netmime.html">
<link title="Netsendmail" rel="Chapter" href="Netsendmail.html">
<link title="Neturl" rel="Chapter" href="Neturl.html">
<link title="Netaddress" rel="Chapter" href="Netaddress.html">
<link title="Netbuffer" rel="Chapter" href="Netbuffer.html">
<link title="Netdate" rel="Chapter" href="Netdate.html">
<link title="Netencoding" rel="Chapter" href="Netencoding.html">
<link title="Netulex" rel="Chapter" href="Netulex.html">
<link title="Netaccel" rel="Chapter" href="Netaccel.html">
<link title="Netaccel_link" rel="Chapter" href="Netaccel_link.html">
<link title="Nethtml" rel="Chapter" href="Nethtml.html">
<link title="Netstring_str" rel="Chapter" href="Netstring_str.html">
<link title="Netstring_pcre" rel="Chapter" href="Netstring_pcre.html">
<link title="Netstring_mt" rel="Chapter" href="Netstring_mt.html">
<link title="Netmappings" rel="Chapter" href="Netmappings.html">
<link title="Netaux" rel="Chapter" href="Netaux.html">
<link title="Nethttp" rel="Chapter" href="Nethttp.html">
<link title="Netchannels_tut" rel="Chapter" href="Netchannels_tut.html">
<link title="Netmime_tut" rel="Chapter" href="Netmime_tut.html">
<link title="Netsendmail_tut" rel="Chapter" href="Netsendmail_tut.html">
<link title="Netulex_tut" rel="Chapter" href="Netulex_tut.html">
<link title="Neturl_tut" rel="Chapter" href="Neturl_tut.html">
<link title="Netsys" rel="Chapter" href="Netsys.html">
<link title="Netpop" rel="Chapter" href="Netpop.html">
<link title="Rpc_auth_dh" rel="Chapter" href="Rpc_auth_dh.html">
<link title="Rpc_key_service" rel="Chapter" href="Rpc_key_service.html">
<link title="Rpc_time" rel="Chapter" href="Rpc_time.html">
<link title="Rpc_auth_local" rel="Chapter" href="Rpc_auth_local.html">
<link title="Rtypes" rel="Chapter" href="Rtypes.html">
<link title="Xdr" rel="Chapter" href="Xdr.html">
<link title="Rpc" rel="Chapter" href="Rpc.html">
<link title="Rpc_program" rel="Chapter" href="Rpc_program.html">
<link title="Rpc_portmapper_aux" rel="Chapter" href="Rpc_portmapper_aux.html">
<link title="Rpc_packer" rel="Chapter" href="Rpc_packer.html">
<link title="Rpc_transport" rel="Chapter" href="Rpc_transport.html">
<link title="Rpc_client" rel="Chapter" href="Rpc_client.html">
<link title="Rpc_simple_client" rel="Chapter" href="Rpc_simple_client.html">
<link title="Rpc_portmapper_clnt" rel="Chapter" href="Rpc_portmapper_clnt.html">
<link title="Rpc_portmapper" rel="Chapter" href="Rpc_portmapper.html">
<link title="Rpc_server" rel="Chapter" href="Rpc_server.html">
<link title="Rpc_auth_sys" rel="Chapter" href="Rpc_auth_sys.html">
<link title="Rpc_intro" rel="Chapter" href="Rpc_intro.html">
<link title="Rpc_mapping_ref" rel="Chapter" href="Rpc_mapping_ref.html">
<link title="Rpc_ssl" rel="Chapter" href="Rpc_ssl.html">
<link title="Rpc_xti_client" rel="Chapter" href="Rpc_xti_client.html">
<link title="Shell_sys" rel="Chapter" href="Shell_sys.html">
<link title="Shell" rel="Chapter" href="Shell.html">
<link title="Shell_uq" rel="Chapter" href="Shell_uq.html">
<link title="Shell_mt" rel="Chapter" href="Shell_mt.html">
<link title="Shell_intro" rel="Chapter" href="Shell_intro.html">
<link title="Netsmtp" rel="Chapter" href="Netsmtp.html"><title>Ocamlnet 2 Reference Manual : Ftp_client</title>
</head>
<body>
<code class="code"><span class="keyword">sig</span><br>
<span class="keyword">exception</span> <span class="constructor">FTP_error</span> <span class="keyword">of</span> exn<br>
<span class="keyword">exception</span> <span class="constructor">FTP_protocol_violation</span> <span class="keyword">of</span> string<br>
<span class="keyword">type</span> cmd_state =<br>
[ <span class="keywordsign">`</span><span class="constructor">Init</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Pass_acct_seq</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Perm_failure</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Preliminary</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Proto_error</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Rename_seq</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Restart_seq</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Success</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Temp_failure</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">User_acct_seq</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">User_pass_seq</span> ]<br>
<span class="keyword">type</span> port =<br>
[ <span class="keywordsign">`</span><span class="constructor">Active</span> <span class="keyword">of</span> string * int * <span class="constructor">Unix</span>.file_descr<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Passive</span> <span class="keyword">of</span> string * int<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Unspecified</span> ]<br>
<span class="keyword">type</span> form_code = [ <span class="keywordsign">`</span><span class="constructor">ASA</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Non_print</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Telnet</span> ]<br>
<span class="keyword">type</span> representation =<br>
[ <span class="keywordsign">`</span><span class="constructor">ASCII</span> <span class="keyword">of</span> <span class="constructor">Ftp_client</span>.form_code option<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">EBCDIC</span> <span class="keyword">of</span> <span class="constructor">Ftp_client</span>.form_code option<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Image</span> ]<br>
<span class="keyword">type</span> structure = [ <span class="keywordsign">`</span><span class="constructor">File_structure</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Record_structure</span> ]<br>
<span class="keyword">type</span> transmission_mode = [ <span class="keywordsign">`</span><span class="constructor">Block_mode</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Stream_mode</span> ]<br>
<span class="keyword">type</span> ftp_state = {<br>
cmd_state : <span class="constructor">Ftp_client</span>.cmd_state;<br>
ftp_connected : bool;<br>
ftp_data_conn : bool;<br>
ftp_user : string option;<br>
ftp_password : string option;<br>
ftp_account : string option;<br>
ftp_logged_in : bool;<br>
ftp_port : <span class="constructor">Ftp_client</span>.port;<br>
ftp_repr : <span class="constructor">Ftp_client</span>.representation;<br>
ftp_structure : <span class="constructor">Ftp_client</span>.structure;<br>
ftp_trans : <span class="constructor">Ftp_client</span>.transmission_mode;<br>
ftp_dir : string list;<br>
ftp_features : (string * string option) list option;<br>
ftp_options : (string * string option) list;<br>
}<br>
<span class="keyword">type</span> cmd =<br>
[ <span class="keywordsign">`</span><span class="constructor">ACCT</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">ALLO</span> <span class="keyword">of</span> int * int option<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">APPE</span> <span class="keyword">of</span><br>
string * (<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_sender)<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">CDUP</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">CWD</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Connect</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">DELE</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Dummy</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">FEAT</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">HELP</span> <span class="keyword">of</span> string option<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">LIST</span> <span class="keyword">of</span><br>
string option *<br>
(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_receiver)<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">MDTM</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">MKD</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">MODE</span> <span class="keyword">of</span> <span class="constructor">Ftp_client</span>.transmission_mode<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">NLST</span> <span class="keyword">of</span><br>
string option *<br>
(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_receiver)<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">NOOP</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">OPTS</span> <span class="keyword">of</span> string * string option<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">PASS</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">PASV</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">PORT</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">PWD</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">QUIT</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">REIN</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">REST</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">RETR</span> <span class="keyword">of</span><br>
string * (<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_receiver)<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">RMD</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">RNFR</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">RNTO</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">SITE</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">SMNT</span> <span class="keyword">of</span> string<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">STAT</span> <span class="keyword">of</span> string option<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">STOR</span> <span class="keyword">of</span><br>
string * (<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_sender)<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">STOU</span> <span class="keyword">of</span> unit <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_sender<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">STRU</span> <span class="keyword">of</span> <span class="constructor">Ftp_client</span>.structure<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">SYST</span><br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">TYPE</span> <span class="keyword">of</span> <span class="constructor">Ftp_client</span>.representation<br>
<span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">USER</span> <span class="keyword">of</span> string ]<br>
<span class="keyword">type</span> reply = int * string<br>
<span class="keyword">class</span> ftp_client_pi :<br>
?event_system:<span class="constructor">Unixqueue</span>.event_system <span class="keywordsign">-></span><br>
?onempty:(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
?onclose:(unit <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
?onerrorstate:(exn <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
?onusererror:(exn <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
<span class="constructor">Unix</span>.file_descr <span class="keywordsign">-></span><br>
<span class="keyword">object</span><br>
<span class="keyword">method</span> abort : unit <span class="keywordsign">-></span> unit<br>
<span class="keyword">method</span> add_cmd :<br>
?onreply:(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.reply <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
<span class="constructor">Ftp_client</span>.cmd <span class="keywordsign">-></span> unit<br>
<span class="keyword">method</span> event_system : <span class="constructor">Unixqueue</span>.event_system<br>
<span class="keyword">method</span> ftp_state : <span class="constructor">Ftp_client</span>.ftp_state<br>
<span class="keyword">method</span> is_empty : bool<br>
<span class="keyword">method</span> run : unit <span class="keywordsign">-></span> unit<br>
<span class="keyword">method</span> send_abort : unit <span class="keywordsign">-></span> unit<br>
<span class="keyword">method</span> state : unit <span class="constructor">Uq_engines</span>.engine_state<br>
<span class="keyword">end</span><br>
<span class="keyword">module</span> <span class="constructor">Action</span> :<br>
<span class="keyword">sig</span><br>
<span class="keyword">type</span> plan<br>
<span class="keyword">type</span> action = <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.plan <span class="keywordsign">-></span> unit<br>
<span class="keyword">val</span> ftp_state : <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.plan <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.ftp_state<br>
<span class="keyword">val</span> execute :<br>
onreply:(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.reply <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
onerror:(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.reply <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
<span class="constructor">Ftp_client</span>.ftp_client_pi <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action <span class="keywordsign">-></span> unit<br>
<span class="keyword">val</span> empty : <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">val</span> command : <span class="constructor">Ftp_client</span>.cmd <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">val</span> dyn_command : (unit <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.cmd) <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">val</span> seq2 :<br>
<span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action <span class="keywordsign">-></span><br>
<span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">val</span> full_seq2 :<br>
<span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action <span class="keywordsign">-></span><br>
(<span class="constructor">Ftp_client</span>.reply <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action) <span class="keywordsign">-></span><br>
<span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">val</span> seq : <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action list <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">val</span> expect :<br>
<span class="constructor">Ftp_client</span>.cmd_state <span class="keywordsign">-></span><br>
<span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">val</span> seq2_case :<br>
<span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action <span class="keywordsign">-></span><br>
(<span class="constructor">Ftp_client</span>.cmd_state * <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action) list <span class="keywordsign">-></span><br>
<span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">end</span><br>
<span class="keyword">class</span> <span class="keyword">type</span> ftp_method =<br>
<span class="keyword">object</span><br>
<span class="keyword">method</span> connect : (string * int) option<br>
<span class="keyword">method</span> execute : <span class="constructor">Ftp_client</span>.<span class="constructor">Action</span>.action<br>
<span class="keyword">end</span><br>
<span class="keyword">exception</span> <span class="constructor">FTP_method_temp_failure</span> <span class="keyword">of</span> int * string<br>
<span class="keyword">exception</span> <span class="constructor">FTP_method_perm_failure</span> <span class="keyword">of</span> int * string<br>
<span class="keyword">exception</span> <span class="constructor">FTP_method_unexpected_reply</span> <span class="keyword">of</span> int * string<br>
<span class="keyword">class</span> connect_method : host:string <span class="keywordsign">-></span> ?port:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> login_method :<br>
user:string <span class="keywordsign">-></span><br>
get_password:(unit <span class="keywordsign">-></span> string) <span class="keywordsign">-></span><br>
get_account:(unit <span class="keywordsign">-></span> string) <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> walk_method :<br>
[ <span class="keywordsign">`</span><span class="constructor">Dir</span> <span class="keyword">of</span> string <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">File</span> <span class="keyword">of</span> string <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Stay</span> ] <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">type</span> filename = [ <span class="keywordsign">`</span><span class="constructor">NVFS</span> <span class="keyword">of</span> string <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Verbatim</span> <span class="keyword">of</span> string ]<br>
<span class="keyword">class</span> get_method :<br>
file:<span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span><br>
representation:<span class="constructor">Ftp_client</span>.representation <span class="keywordsign">-></span><br>
store:(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_receiver) <span class="keywordsign">-></span><br>
unit <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> invoke_method :<br>
command:<span class="constructor">Ftp_client</span>.cmd <span class="keywordsign">-></span><br>
process_result:(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> int * string <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
unit <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> set_structure_method : <span class="constructor">Ftp_client</span>.structure <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> set_mode_method : <span class="constructor">Ftp_client</span>.transmission_mode <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> rename_method :<br>
file_from:<span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span><br>
file_to:<span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> mkdir_method : <span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> rmdir_method : <span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> delete_method : <span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> list_method :<br>
dir:<span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span><br>
representation:<span class="constructor">Ftp_client</span>.representation <span class="keywordsign">-></span><br>
store:(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_receiver) <span class="keywordsign">-></span><br>
unit <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> nlst_method :<br>
dir:<span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span><br>
representation:<span class="constructor">Ftp_client</span>.representation <span class="keywordsign">-></span><br>
store:(<span class="constructor">Ftp_client</span>.ftp_state <span class="keywordsign">-></span> <span class="constructor">Ftp_data_endpoint</span>.local_receiver) <span class="keywordsign">-></span><br>
unit <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> mdtm_method :<br>
file:<span class="constructor">Ftp_client</span>.filename <span class="keywordsign">-></span><br>
process_result:(float <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> ftp_method<br>
<span class="keyword">class</span> ftp_client :<br>
?event_system:<span class="constructor">Unixqueue</span>.event_system <span class="keywordsign">-></span><br>
?onempty:(unit <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
unit <span class="keywordsign">-></span><br>
<span class="keyword">object</span><br>
<span class="keyword">method</span> abort : unit <span class="keywordsign">-></span> unit<br>
<span class="keyword">method</span> add :<br>
?onsuccess:(unit <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br>
?onerror:(exn <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span> <span class="constructor">Ftp_client</span>.ftp_method <span class="keywordsign">-></span> unit<br>
<span class="keyword">method</span> event_system : <span class="constructor">Unixqueue</span>.event_system<br>
<span class="keyword">method</span> request_notification : (unit <span class="keywordsign">-></span> bool) <span class="keywordsign">-></span> unit<br>
<span class="keyword">method</span> run : unit <span class="keywordsign">-></span> unit<br>
<span class="keyword">method</span> state : unit <span class="constructor">Uq_engines</span>.engine_state<br>
<span class="keyword">end</span><br>
<span class="keyword">end</span></code></body></html>
