Packages

string_width

2.1.0
3.4.3 3.4.2 3.4.1 3.4.0 3.3.1 3.3.0 3.2.1 3.2.0 3.1.4 3.1.3 3.1.2 3.1.1 3.1.0 3.0.1 3.0.0 2.1.3 2.1.2 2.1.1 2.1.0 2.0.4 2.0.3 2.0.2 2.0.1 2.0.0 1.0.0

Layout and measure the sizes of a strings printed in the terminal!

HexDocs

Current section

Files

Jump to
Readme
25 Versions
1 Dependency
Dependants
Files
Activity
string_width src string_width_ffi.erl
Raw

src/string_width_ffi.erl 

-module(string_width_ffi).

-export([ansi_re/0, scan_poslen/2, fold_codepoints/3, utf_codepoint_to_string/1]).

-on_load(load/0).



load() ->

    {ok, AnsiRe} = re:compile("[\x1B\x9B][[\\]()#;?]*(?:(?:(?:(?:;[-a-zA-Z\\d\\/#&.:=?%@~_]+)*|[a-zA-Z\\d]+(?:;[-a-zA-Z\\d\\/#&.:=?%@~_]*)*)?(?:\x07|\x1B\x5C|\x9C))|(?:(?:\\d{1,4}(?:;\\d{0,4})*)?[\\dA-PR-TZcf-nq-uy=><~]))", [multiline]),

    ok = persistent_term:put({?MODULE, ansi_re}, AnsiRe),

    ok.



ansi_re() ->

    persistent_term:get({?MODULE, ansi_re}).



scan_poslen(Re, Str) ->

    case re:run(Str, Re, [global]) of

        nomatch -> [];

        {match, Matches} -> [Match || [Match] <- Matches]

    end.



fold_codepoints(Binary, State, Fun) ->

    case Binary of

        <<Cp/utf8, Rest/binary>> -> fold_codepoints(Rest, Fun(State, Cp), Fun);

        _ -> State

    end.



utf_codepoint_to_string(Cp) ->

    <<Cp/utf8>>.