X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_common.erl;fp=modules%2Ferl%2Feuphorik_common.erl;h=e516322f87fb07931c19287f4d626067cbbb457e;hp=3806df35b8607cd373e5d4aed8ea8f866291f4d0;hb=81393a74d648e4830dc8c7c562fa203f50a105f6;hpb=828daf607fdce322ea17c1786dff84f712aa1632 diff --git a/modules/erl/euphorik_common.erl b/modules/erl/euphorik_common.erl index 3806df3..e516322 100644 --- a/modules/erl/euphorik_common.erl +++ b/modules/erl/euphorik_common.erl @@ -15,8 +15,8 @@ % % You should have received a copy of the GNU General Public License % along with Euphorik. If not, see . -% -% Module avec plein de bordel utile à l'intérieur. +% +% Module with some useful stuffs. % @author G.Burri @@ -40,7 +40,7 @@ ceiling(X) -> Pos when Pos > 0 -> T + 1; _ -> T end. - + % Retourne la difference entre deux timestamp (erlang:now()) en miliseconde delta_date_ms(D1, D2) -> @@ -50,14 +50,14 @@ delta_date_ms(D1, D2) -> % Retourne la différence entre deux timestamp (erlang:now) en minutes delta_date_minute(D1, D2) -> trunc(delta_date_ms(D1, D2) / 1000 / 60). - + serialize_ip(undefined) -> ""; serialize_ip(IP) -> lists:flatten(io_lib:format("~w.~w.~w.~w", tuple_to_list(IP))). - - + + unserialize_ip(IP) -> case io_lib:fread("~d.~d.~d.~d", IP) of {ok, [A, B, C, D], []} -> {A, B, C, D};