You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
104 lines
3.4 KiB
104 lines
3.4 KiB
%% Copyright (c) 2011 Basho Technologies, Inc. All Rights Reserved.
|
|
%%
|
|
%% This file is provided to you under the Apache License,
|
|
%% Version 2.0 (the "License"); you may not use this file
|
|
%% except in compliance with the License. You may obtain
|
|
%% a copy of the License at
|
|
%%
|
|
%% http://www.apache.org/licenses/LICENSE-2.0
|
|
%%
|
|
%% Unless required by applicable law or agreed to in writing,
|
|
%% software distributed under the License is distributed on an
|
|
%% "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
|
|
%% KIND, either express or implied. See the License for the
|
|
%% specific language governing permissions and limitations
|
|
%% under the License.
|
|
|
|
-module(lager_util).
|
|
|
|
-include_lib("kernel/include/file.hrl").
|
|
|
|
-export([levels/0, level_to_num/1, num_to_level/1, open_logfile/2,
|
|
ensure_logfile/4, format_time/0, format_time/1]).
|
|
|
|
levels() ->
|
|
[debug, info, notice, warning, error, critical, alert, emergency].
|
|
|
|
level_to_num(debug) -> 0;
|
|
level_to_num(info) -> 1;
|
|
level_to_num(notice) -> 2;
|
|
level_to_num(warning) -> 3;
|
|
level_to_num(error) -> 4;
|
|
level_to_num(critical) -> 5;
|
|
level_to_num(alert) -> 6;
|
|
level_to_num(emergency) -> 7.
|
|
|
|
num_to_level(0) -> debug;
|
|
num_to_level(1) -> info;
|
|
num_to_level(2) -> notice;
|
|
num_to_level(3) -> warning;
|
|
num_to_level(4) -> error;
|
|
num_to_level(5) -> critical;
|
|
num_to_level(6) -> alert;
|
|
num_to_level(7) -> emergency.
|
|
|
|
open_logfile(Name, Buffer) ->
|
|
case filelib:ensure_dir(Name) of
|
|
ok ->
|
|
Options = [append, raw] ++
|
|
if Buffer == true -> [delayed_write];
|
|
true -> []
|
|
end,
|
|
case file:open(Name, Options) of
|
|
{ok, FD} ->
|
|
case file:read_file_info(Name) of
|
|
{ok, FInfo} ->
|
|
Inode = FInfo#file_info.inode,
|
|
{ok, {FD, Inode}};
|
|
X -> X
|
|
end;
|
|
Y -> Y
|
|
end;
|
|
Z -> Z
|
|
end.
|
|
|
|
ensure_logfile(Name, FD, Inode, Buffer) ->
|
|
case file:read_file_info(Name) of
|
|
{ok, FInfo} ->
|
|
Inode2 = FInfo#file_info.inode,
|
|
case Inode == Inode2 of
|
|
true ->
|
|
{ok, {FD, Inode}};
|
|
false ->
|
|
%% delayed write can cause file:close not to do a close
|
|
file:close(FD),
|
|
file:close(FD),
|
|
case open_logfile(Name, Buffer) of
|
|
{ok, {FD2, Inode3}} ->
|
|
%% inode changed, file was probably moved and
|
|
%% recreated
|
|
{ok, {FD2, Inode3}};
|
|
Error ->
|
|
Error
|
|
end
|
|
end;
|
|
_ ->
|
|
%% delayed write can cause file:close not to do a close
|
|
file:close(FD),
|
|
file:close(FD),
|
|
case open_logfile(Name, Buffer) of
|
|
{ok, {FD2, Inode3}} ->
|
|
%% file was removed
|
|
{ok, {FD2, Inode3}};
|
|
Error ->
|
|
Error
|
|
end
|
|
end.
|
|
|
|
format_time() ->
|
|
format_time(lager_stdlib:maybe_utc(erlang:localtime())).
|
|
|
|
format_time({utc, {{Y, M, D}, {H, Mi, S}}}) ->
|
|
io_lib:format("~b-~2..0b-~2..0b ~2..0b:~2..0b:~2..0b UTC", [Y, M, D, H, Mi, S]);
|
|
format_time({{Y, M, D}, {H, Mi, S}}) ->
|
|
io_lib:format("~b-~2..0b-~2..0b ~2..0b:~2..0b:~2..0b", [Y, M, D, H, Mi, S]).
|