Packages

katana

0.2.21
1.0.0 0.4.0 0.3.1 0.3.0 0.2.22 0.2.21 0.2.20 0.2.19 0.2.18 0.2.17

Erlang grab bag of useful functions. It should have been called swiss army knife but katanas are deadlier

HexDocs

Current section

Files

Jump to
Readme
10 Versions
2 Dependencies
Dependants
Files
Activity
katana src ktn_json.erl
Raw

src/ktn_json.erl 

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%% ktn_json: functions useful for processing & creating JSON

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

-module(ktn_json).



-export(

  [ json_date/1

  , json_datetime/1

  ]).



%% @doc Converts a date record into a binary representation of its data.

-spec json_date(ktn_date:date()) -> binary().

json_date({date, {Yi, Mi, Di}}) ->

  Y = integer_to_list(Yi),

  M = integer_to_list(Mi),

  D = integer_to_list(Di),

  iolist_to_binary([Y, "-", M, "-", D, "T00:00:00.000000Z"]).



%% @doc Converts a datetime record into a binary representation of its data.

-spec json_datetime(ktn_date:datetime()) -> binary().

json_datetime({datetime, {{Yi, Mi, Di}, {Hi, Ni, Si}}}) ->

  Y = integer_to_list(Yi),

  M = integer_to_list(Mi),

  D = integer_to_list(Di),

  H = integer_to_list(Hi),

  N = integer_to_list(Ni),

  S = integer_to_list(Si),

  iolist_to_binary([Y, "-", M, "-", D, "T", H, ":", N, ":", S, ".000000Z"]).