Copyright | (c) Dong Han 2017-2018 |
---|---|
License | BSD |
Maintainer | winterland1989@gmail.com |
Stability | experimental |
Portability | non-portable |
Safe Haskell | None |
Language | Haskell2010 |
Simple, high performance logger. The design choice of this logger is biased towards simplicity instead of generlization:
- All log functions live in
IO
. - By default this logger is connected to stderr, use
setDefaultLogger
to customize. When logging each thread will build log
Builder
s into a smallBytes
with line buffer instead of leaving allBuilder
s to the flushing thread:- Logger won't keep heap data for too long simply because they're referenced by log's
Builder
. - Each logging thread only need perform a CAS to prepend log
Bytes
into a list, which reduces contention. - Each log call is atomic, Logging order is preserved under concurrent settings.
- Logger won't keep heap data for too long simply because they're referenced by log's
Flushing is automatic and throttled for debug
, info
, warning
to boost
performance, but a fatal
and critical
log will always flush logger's buffer.
This could lead to a problem that if main thread exits too early logs may missed,
to add a flushing when program exits, use withDefaultLogger
like:
import Z.IO.Logger main :: IO () main = withDefaultLogger $ do .... debug "..." -- So that this log won't be missed ...
Synopsis
- data Logger = Logger {
- loggerPushBuilder :: Builder () -> IO ()
- flushLogger :: IO ()
- flushLoggerThrottled :: IO ()
- loggerTSCache :: IO (Builder ())
- loggerFmt :: LogFormatter
- loggerLevel :: !Level
- data LoggerConfig = LoggerConfig {}
- defaultLoggerConfig :: LoggerConfig
- setDefaultLogger :: Logger -> IO ()
- getDefaultLogger :: IO Logger
- flushDefaultLogger :: IO ()
- withDefaultLogger :: IO () -> IO ()
- newLogger :: LoggerConfig -> MVar BufferedOutput -> IO Logger
- newColoredLogger :: LoggerConfig -> IO Logger
- debug :: HasCallStack => Builder () -> IO ()
- info :: HasCallStack => Builder () -> IO ()
- warning :: HasCallStack => Builder () -> IO ()
- fatal :: HasCallStack => Builder () -> IO ()
- critical :: HasCallStack => Builder () -> IO ()
- otherLevel :: HasCallStack => Level -> Bool -> Builder () -> IO ()
- debugTo :: HasCallStack => Logger -> Builder () -> IO ()
- infoTo :: HasCallStack => Logger -> Builder () -> IO ()
- warningTo :: HasCallStack => Logger -> Builder () -> IO ()
- fatalTo :: HasCallStack => Logger -> Builder () -> IO ()
- otherLevelTo :: HasCallStack => Logger -> Level -> Bool -> Builder () -> IO ()
- defaultTSCache :: IO (Builder ())
- defaultFmtCallStack :: CallStack -> Builder ()
- defaultLevelFmt :: Level -> Builder ()
- type LogFormatter = Builder () -> Level -> Builder () -> CallStack -> Builder ()
- defaultFmt :: LogFormatter
- coloredFmt :: LogFormatter
- pushLogIORef :: IORef [Bytes] -> Int -> Builder () -> IO ()
- flushLogIORef :: HasCallStack => MVar BufferedOutput -> IORef [Bytes] -> IO ()
- type Level = Int
- pattern DEBUG :: Level
- pattern INFO :: Level
- pattern WARNING :: Level
- pattern FATAL :: Level
- pattern CRITICAL :: Level
- pattern NOTSET :: Level
A simple Logger type
Extensible logger type.
Logger | |
|
data LoggerConfig Source #
Logger config type used in this module.
LoggerConfig | |
|
defaultLoggerConfig :: LoggerConfig Source #
A default logger config with
- 0.1s minimal flush interval
- line buffer size 240 bytes
- show everything by default
setDefaultLogger :: Logger -> IO () Source #
Change the global logger.
getDefaultLogger :: IO Logger Source #
Get the global logger.
flushDefaultLogger :: IO () Source #
Manually flush global logger.
withDefaultLogger :: IO () -> IO () Source #
Flush global logger when program exits.
newLogger :: LoggerConfig -> MVar BufferedOutput -> IO Logger Source #
Make a new simple logger.
newColoredLogger :: LoggerConfig -> IO Logger Source #
Make a new colored logger(connected to stderr).
This logger will output colorized log if stderr is connected to TTY.
logging functions
:: HasCallStack | |
=> Level | log level |
-> Bool | flush immediately? |
-> Builder () | log content |
-> IO () |
logging functions with specific logger
Helpers to write new logger
defaultTSCache :: IO (Builder ()) Source #
A default timestamp cache with format %Y-%m-%dT%H:%M:%S%Z
(iso8061DateFormat
).
The timestamp will updated in 0.1s granularity to ensure a seconds level precision.
defaultFmtCallStack :: CallStack -> Builder () Source #
Default stack formatter which fetch the logging source and location.
defaultLevelFmt :: Level -> Builder () Source #
type LogFormatter Source #
defaultFmt :: LogFormatter Source #
A default log formatter
[DEBUG][2020-10-09T07:44:14UTC][interactive:7:1]This a debug message\n
:: IORef [Bytes] | logs stored in a list, new log will be CASed into it. |
-> Int | buffer size to build each log |
-> Builder () | formatted log |
-> IO () |
Use pushLogIORef
and pushLogIORef
to implement a simple IORef
based concurrent logger.
logsRef <- newIORef [] let push = pushLogIORef logsRef lineBufSize flush = flushLogIORef stderrBuf logsRef throttledFlush <- throttleTrailing_ flushInterval flush .. return $ Logger push flush throttledFlush ...
flushLogIORef :: HasCallStack => MVar BufferedOutput -> IORef [Bytes] -> IO () Source #
Constants
Level
Logging Levels
We following the Python logging levels, for details, see: https://docs.python.org/3/howto/logging.html#logging-levels
Level | Numeric value |
CRITICAL | 50 |
FATAL | 40 |
WARNING | 30 |
INFO | 20 |
DEBUG | 10 |
NOTSET | 0 |