Current section
Files
Jump to
Current section
Files
src/mcp_ffi.erl
-module(mcp_ffi).
-export([read_line/0, input_schema_to_json/1]).
-spec read_line() -> {ok, unicode:unicode_binary()} | {error, eof | no_data}.
read_line() ->
case io:get_line("") of
eof ->
{error, eof};
{error, _} ->
{error, no_data};
Data when is_binary(Data) ->
{ok, string:trim(Data, trailing, "\r\n")};
Data when is_list(Data) ->
{ok,
string:trim(
unicode:characters_to_binary(Data), trailing, "\r\n")}
end.
input_schema_to_json(Schema) ->
json:encode(Schema).