`sig
exception Malformed_URL
val extract_url_scheme : string -> string
type url_syntax_option =
Url_part_not_recognized
| Url_part_allowed
| Url_part_required
type url_syntax = {
url_enable_scheme : Neturl.url_syntax_option;
url_enable_user : Neturl.url_syntax_option;
url_enable_user_param : Neturl.url_syntax_option;
url_enable_password : Neturl.url_syntax_option;
url_enable_host : Neturl.url_syntax_option;
url_enable_port : Neturl.url_syntax_option;
url_enable_path : Neturl.url_syntax_option;
url_enable_param : Neturl.url_syntax_option;
url_enable_query : Neturl.url_syntax_option;
url_enable_fragment : Neturl.url_syntax_option;
url_enable_other : Neturl.url_syntax_option;
url_accepts_8bits : bool;
url_is_valid : Neturl.url -> bool;
url_enable_relative : bool;
}
and url
val url_syntax_is_valid : Neturl.url_syntax -> bool
val partial_url_syntax : Neturl.url_syntax -> Neturl.url_syntax
val null_url_syntax : Neturl.url_syntax
val ip_url_syntax : Neturl.url_syntax
val common_url_syntax : (string, Neturl.url_syntax) Stdlib.Hashtbl.t
val null_url : Neturl.url
val make_url :
?encoded:bool ->
?scheme:string ->
?user:string ->
?user_param:string list ->
?password:string ->
?host:string ->
?addr:Unix.inet_addr ->
?port:int ->
?socksymbol:Netsockaddr.socksymbol ->
?path:string list ->
?param:string list ->
?query:string ->
?fragment:string -> ?other:string -> Neturl.url_syntax -> Neturl.url
val modify_url :
?syntax:Neturl.url_syntax ->
?encoded:bool ->
?scheme:string ->
?user:string ->
?user_param:string list ->
?password:string ->
?host:string ->
?addr:Unix.inet_addr ->
?port:int ->
?socksymbol:Netsockaddr.socksymbol ->
?path:string list ->
?param:string list ->
?query:string ->
?fragment:string -> ?other:string -> Neturl.url -> Neturl.url
val remove_from_url :
?scheme:bool ->
?user:bool ->
?user_param:bool ->
?password:bool ->
?host:bool ->
?port:bool ->
?path:bool ->
?param:bool ->
?query:bool -> ?fragment:bool -> ?other:bool -> Neturl.url -> Neturl.url
val default_url :
?encoded:bool ->
?scheme:string ->
?user:string ->
?user_param:string list ->
?password:string ->
?host:string ->
?port:int ->
?path:string list ->
?param:string list ->
?query:string ->
?fragment:string -> ?other:string -> Neturl.url -> Neturl.url
val undefault_url :
?scheme:string ->
?user:string ->
?user_param:string list ->
?password:string ->
?host:string ->
?port:int ->
?path:string list ->
?param:string list ->
?query:string ->
?fragment:string -> ?other:string -> Neturl.url -> Neturl.url
val url_syntax_of_url : Neturl.url -> Neturl.url_syntax
val url_of_string : Neturl.url_syntax -> string -> Neturl.url
val string_of_url : Neturl.url -> string
val parse_url :
?schemes:(string, Neturl.url_syntax) Stdlib.Hashtbl.t ->
?base_syntax:Neturl.url_syntax ->
?accept_8bits:bool -> ?enable_fragment:bool -> string -> Neturl.url
val fixup_url_string : ?escape_hash:bool -> string -> string
val url_provides :
?scheme:bool ->
?user:bool ->
?user_param:bool ->
?password:bool ->
?host:bool ->
?port:bool ->
?path:bool ->
?param:bool ->
?query:bool -> ?fragment:bool -> ?other:bool -> Neturl.url -> bool
val url_scheme : Neturl.url -> string
val url_user : ?encoded:bool -> Neturl.url -> string
val url_user_param : ?encoded:bool -> Neturl.url -> string list
val url_password : ?encoded:bool -> Neturl.url -> string
val url_host : Neturl.url -> string
val url_port : Neturl.url -> int
val url_path : ?encoded:bool -> Neturl.url -> string list
val url_param : ?encoded:bool -> Neturl.url -> string list
val url_query : ?encoded:bool -> Neturl.url -> string
val url_fragment : ?encoded:bool -> Neturl.url -> string
val url_other : ?encoded:bool -> Neturl.url -> string
val url_addr : Neturl.url -> Unix.inet_addr
val url_socksymbol : Neturl.url -> int -> Netsockaddr.socksymbol
val split_path : string -> string list
val join_path : string list -> string
val norm_path : string list -> string list
val apply_relative_url : Neturl.url -> Neturl.url -> Neturl.url
val ensure_absolute_url : ?base:Neturl.url -> Neturl.url -> Neturl.url
val file_url_of_local_path :
?getcwd:(unit -> string) -> string -> Neturl.url
val local_path_of_file_url : Neturl.url -> string
val print_url : Neturl.url -> unit
val ldap_url_syntax : Neturl.url_syntax
end`