diff options
Diffstat (limited to 'src/xmlrpc_util.erl')
| -rw-r--r-- | src/xmlrpc_util.erl | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/src/xmlrpc_util.erl b/src/xmlrpc_util.erl new file mode 100644 index 000000000..d46c5c07b --- /dev/null +++ b/src/xmlrpc_util.erl @@ -0,0 +1,37 @@ +%% Copyright (C) 2003 Joakim Grebenö <jocke@gleipnir.com>. +%% All rights reserved. +%% +%% Redistribution and use in source and binary forms, with or without +%% modification, are permitted provided that the following conditions +%% are met: +%% +%% 1. Redistributions of source code must retain the above copyright +%% notice, this list of conditions and the following disclaimer. +%% 2. Redistributions in binary form must reproduce the above +%% copyright notice, this list of conditions and the following +%% disclaimer in the documentation and/or other materials provided +%% with the distribution. +%% +%% THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS +%% OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED +%% WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE +%% ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY +%% DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL +%% DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE +%% GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS +%% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, +%% WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING +%% NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS +%% SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + +-module(xmlrpc_util). +-author('jocke@gleipnir.com'). +-export([is_string/1, is_iso8601_date/1, is_base64/1]). + +is_string([C|Rest]) when C >= 0, C =< 255 -> is_string(Rest); +is_string([]) -> yes; +is_string(_) -> no. + +is_iso8601_date(_) -> yes. % FIXME + +is_base64(_) -> yes. % FIXME |