Procházet zdrojové kódy

ft: 代码修改

master
SisMaker před 3 roky
rodič
revize
3d1b53805e
4 změnil soubory, kde provedl 33 přidání a 22 odebrání
  1. +1
    -1
      c_src/tracer/rebar.config
  2. +7
    -6
      src/fileHer/tpFileReader.erl
  3. +4
    -2
      src/tracer/tpTracerFile.erl
  4. +21
    -13
      src/tracer/tpTracerNif.erl

+ 1
- 1
c_src/tracer/rebar.config Zobrazit soubor

@ -1,5 +1,5 @@
{port_specs, [
{"../../priv/lg_tracer.so", ["*.c"]}
{"../../priv/tpTracerNif.so", ["*.c"]}
]}.

+ 7
- 6
src/fileHer/tpFileReader.erl Zobrazit soubor

@ -1,11 +1,12 @@
-module(tpFileReader).
-export([fold/3]).
-export([foreach/2]).
-export([open/1]).
-export([read_event/1]).
-export([close/1]).
-export([
fold/3
, foreach/2
, open/1
, read_event/1
, close/1
]).
-record(state, {
io_device :: file:io_device(),

+ 4
- 2
src/tracer/tpTracerFile.erl Zobrazit soubor

@ -1,7 +1,9 @@
-module(tpTracerFile).
-export([start_link/2]).
-export([init/3]).
-export([
start_link/2
, init/3
]).
%% sys callbacks
-export([

+ 21
- 13
src/tracer/tpTracerNif.erl Zobrazit soubor

@ -1,21 +1,29 @@
-module(tpTracerNif).
%-behavior(erl_tracer).
-export([enabled/3]).
-export([enabled_call/3]).
-export([enabled_procs/3]).
-export([enabled_running_procs/3]).
-export([enabled_send/3]).
-export([trace/5]).
-export([
enabled/3
, enabled_call/3
, enabled_procs/3
, enabled_running_procs/3
, enabled_send/3
, trace/5
]).
-on_load(on_load/0).
on_load() ->
case code:priv_dir(looking_glass) of
{error, _} ->
{error, {load_failed, "Could not determine the looking_glass priv/ directory."}};
Path ->
erlang:load_nif(filename:join(Path, atom_to_list(?MODULE)), 0)
end.
SoName =
case code:priv_dir(?MODULE) of
{error, _} ->
case code:which(?MODULE) of
Filename when is_list(Filename) ->
filename:join([filename:dirname(Filename), "../priv", "tpTracerNif"]);
_ ->
filename:join("../priv", "tpTracerNif")
end;
Dir ->
filename:join(Dir, "tpTracerNif")
end,
erlang:load_nif(SoName, 0).
enabled(_, _, _) ->
erlang:nif_error({not_loaded, ?MODULE}).

Načítá se…
Zrušit
Uložit