|
|
@ -43,12 +43,14 @@ |
|
|
|
-define(LOGMSG(Sink, Severity, PidOrMd, Msg), |
|
|
|
case ?LgShouldLog(Sink, Severity) of |
|
|
|
true -> |
|
|
|
case is_pid(PidOrMd) of |
|
|
|
true -> |
|
|
|
if |
|
|
|
is_pid(PidOrMd) -> |
|
|
|
eLog:doLogImpl(Severity, PidOrMd, 'Undef', 'Undef', 'Undef', 0, [], Msg, [], 0, Sink, safe); |
|
|
|
_ -> |
|
|
|
is_list(PidOrMd) -> |
|
|
|
{_, LogPid} = lists:keyfind(pid, 1, PidOrMd), |
|
|
|
eLog:doLogImpl(Severity, LogPid, 'Undef', 'Undef', 'Undef', 0, lists:keydelete(pid, 1, PidOrMd), Msg, [], 0, Sink, safe) |
|
|
|
eLog:doLogImpl(Severity, LogPid, 'Undef', 'Undef', 'Undef', 0, lists:keydelete(pid, 1, PidOrMd), Msg, [], 0, Sink, safe); |
|
|
|
true -> |
|
|
|
eLog:doLogImpl(Severity, list_to_pid("<0.0.0>"), 'Undef', 'Undef', 'Undef', 0, [], Msg, [{tag, PidOrMd}], 0, Sink, safe) |
|
|
|
end, |
|
|
|
logged; |
|
|
|
_ -> no_log |
|
|
@ -59,12 +61,14 @@ |
|
|
|
-define(LOGFMT(Sink, Severity, PidOrMd, Fmt, Args), |
|
|
|
case ?LgShouldLog(Sink, Severity) of |
|
|
|
true -> |
|
|
|
case is_pid(PidOrMd) of |
|
|
|
true -> |
|
|
|
if |
|
|
|
is_pid(PidOrMd) -> |
|
|
|
eLog:doLogImpl(Severity, PidOrMd, 'Undef', 'Undef', 'Undef', 0, [], Fmt, Args, 0, Sink, safe); |
|
|
|
_ -> |
|
|
|
is_list(PidOrMd) -> |
|
|
|
{_, LogPid} = lists:keyfind(pid, 1, PidOrMd), |
|
|
|
eLog:doLogImpl(Severity, LogPid, 'Undef', 'Undef', 'Undef', 0, lists:keydelete(pid, 1, PidOrMd), Fmt, Args, 0, Sink, safe) |
|
|
|
eLog:doLogImpl(Severity, LogPid, 'Undef', 'Undef', 'Undef', 0, lists:keydelete(pid, 1, PidOrMd), Fmt, Args, 0, Sink, safe); |
|
|
|
true -> |
|
|
|
eLog:doLogImpl(Severity, list_to_pid("<0.0.0>"), 'Undef', 'Undef', 'Undef', 0, [{tag, PidOrMd}], Fmt, Args, 0, Sink, safe) |
|
|
|
end, |
|
|
|
logged; |
|
|
|
_ -> no_log |
|
|
|