log4cl
文件大小: unknow
源码售价: 5 个金币 积分规则     积分充值
资源说明:Common Lisp logging framework, modeled after Log4J
# Introduction

**NOTE** - Because of some mishap with QuickLisp, June 2013 QuickLisp distribution
pulled the **master** branch of Log4CL instead of **stable** branch as intended.

Very few incompatibilities been reported, and it makes no sense to downgrade
version that been already available in QuickLisp, therefore QuickLisp will
continue to pull the **master** branch from now on.

The major difference of Log4CL 1.1.x version from 1.0.x is the Emacs/Slime integration
module, called **Log4Slime**. This document is written with assumption that you will
have Log4Slime loaded and enabled in Emacs.

## Installation

Log4CL is available from QuickLisp. To load it use `(ql:quickload :log4cl)`
command from REPL. Log4Slime is available in QuickLisp since June 2013.

## Enabling Log4Slime

```cl
(ql:quickload :log4slime)
(log4slime:install)
```

You should get a message like this:

```
Wrote ~/quicklisp/log4slime-setup.el

Add the following two statements to your ~/.emacs file
------------------------------------------------------
(load "~/quicklisp/log4slime-setup.el")
(global-log4slime-mode 1)
------------------------------------------------------
```

Follow the above instructions. The most likely point of failure here
may be `log4slime.el` trying to poke the Lisp side to see if log4slime
is loaded, and that for some reason it fails.

If it fails, there should be a message in `*Messages*` buffer, that looks
like this: `Unable to load log4slime lisp support: `

In case you did get the above message and you think you fixed the
cause, you can make log4slime try again, by turning `M-x
global-log4slime-mode` off/on a few times

You can verify if log4slime is enabled, by looking for the Log4CL menu
on top menubar in REPL and Lisp mode buffers, or by submitting a log
statement from REPL and seeing output colorized.



# Hello world

```cl
(progn
  (log:info "I just ate a ~5f, feeling tired" pi) 
  (when (log:debug)
    (dotimes (sheep 3)
      (log:debug sheep "zzz")))
  (log:warn "doh fell asleep for" (random 10) "minutes"))
```

Should produce the following output
![nil](./images/screenshot-12.png)

You can notice several things right away.

-   You can intermix strings and expressions, and expressions will be
    printed as their un-evaluated form as well as the their value;
    using a constant `FORMAT` control string as first argument
    automatically switches to `FORMAT` mode.

-   Log statements without arguments, turn into conditional expression
    that tells you if logging is enabled or not

-   The log output contains some headers in addition to the raw log
    message, such as the [log level](#level) that message was submitted with,
    the time of the message as well as what looks like the name of the
    current package, and (If you have Log4Slime loaded and turned on),
    these headers use different faces from actual log message.

## Changing the log level

You can change the [log level](#level) with by doing
`(log:config :debug)` from `REPL`. Alternatively, with
Log4Slime enabled in `REPL` buffer, you can right-click on the
**cl-user** part and change the log level from a popup menu.

![nil](./images/screenshot-15.png)

There is a slight difference between doing it using above two
methods, with `log:config` command, the level is changed for the
`ROOT` [category](#category), but right clicking on the package
name, changes the [log level](#level) only for that package.

To change the `ROOT` [category](#category) from Emacs, you can use Log4CL
dropdown submenu, or Emacs command `log4slime-level-selection` which
is bound to `C-c C-g` by default.

After pressing `C-c C-g` which invokes the `log4slime-level-selection` command
you get the following window.

![nil](./images/screenshot-11.png)

Pressing "p" to select the package category shows effective log level
and allows you to change like so

![nil](./images/screenshot-10.png)

This concludes the very basic introduction, if you were confused by
what various terms such as "[category](#category)" mean, click on the hyperlink
to read more about Log4CL concepts.

Or you can skip the theory and just continue to learn by example.



# Automatic category naming

Try putting the from the previous section into a `DEFUN` instead of a
`PROGN` form like so:

```cl
(defun hello ()
  (log:info "I just ate a ~5f, feeling tired" pi) 
  (when (log:debug)
    (dotimes (sheep 3)
      (log:debug sheep "zzz")))
  (log:warn "doh fell asleep for" (random 10) "minutes"))
```

If you run it now, the output under both **SBCL** and **CCL** should
look like this.

![nil](./images/screenshot-16.png)

Right click on the blue function name, allows you to change the log
level for that specific function.

That is because Log4CL logging macros, automatically determine the
[category](#category) for logging, based on the context where log statement
appears. In above example the function was defined in the package
CL-USER and function name was HELLO, so the target category of any
logging inside the function, was automatically `CL-USER.HELLO`

It starts with the package, then function. You can try
putting one of the log statements inside of a `LABELS` or `FLET`
forms, to see what happens.

Also note the farthest to the right in the logging [category](#category)
name, the more specific. The level for "hello" overrides that for
"cl-user", which in turn overrides that of the root category.

## Naming in source files

For the next few examples, it is recommended that you load the
examples come together with Log4CL, by doing `(ql:quickload :log4cl-examples)`

It should produce the following output:

![nil](./images/screenshot-17.png)

One thing you should notice, is that source file where function is
defined now appears as part of the log message too. Go to the source
of "greetings". Before you try to use Slime's famous `M-.` shortcut, try
clicking on blue "greetings" word with a left mouse button.

If everything went better then expected, it should land you at the first
log statement of the `(defun greetings ())`. Cool eh?

## Naming in CLOS methods

Quickly browse through `naming-examples.lisp`. There are a few methods defined,
including `:after/:around` methods, as well as some with `EQL` specializers. 

Run a few of them from REPL, like so:

![nil](./images/screenshot-18.png)

Log statements inside of methods, are using the [category](#category) name of the 
generic function, extended with qualifier, and all non-T specializers.

Try going to the source of the above methods by clicking on them. It should land
in the right method, without showing Slime's XREF window.

Note how by changing the level of the `foobar` you control all the
methods, but can override them based on their specializers. Try
setting `:after` category to different levels, to control all
the `:after` methods together.

In addition to playing with methods, try `(setf (test.package.one:greetings) "Hey")` too.

## Context sensitivity

As you browse through source, and are inside of one of the methods, 
check out the Log4CL dropdown menu. Note that "Defun" submenu changes
for each method.

![nil](./images/screenshot-19.png)

## Keyboard level selection

Also try `C-c C-g` shortcut in the same place. You can configure it
not to show the selection window at all, by customizing the
`log4slime-level-selection-single-key` Emacs variable.

After pressing `C-c C-g` while inside of the method
![nil](./images/screenshot-20.png)

You can change keys for the selecting various levels by doing `M-x
   customize-group RET log4slime RET`

Note that keyboard selection ignores the Control key so `C-c C-g p
   u` is same as `C-c C-g C-p C-u`

## Resetting the mess

If you had forgotten which levels you set for what, and just want
to see which levels are set where.

You can display current logging configuration by doing
`(log:config`) without any arguments, it willdisplay a tree

![nil](./images/screenshot-23.png)

If you have had set a lot of custom levels, and now need to get rid
of them, "Reset Children" menu item will nukes the log level from
everything underneath the parent. Doing "Reset Children" on the
ROOT category, gets rid of every other log level that was set
anywhere. Keyboard equivalent is `C-c C-g r`

![nil](./images/screenshot-22.png)

## Logging configurations

After setting the log levels of a few methods, try doing `(log:save :foo)` 
then messing around.. You can restore the named configuration with 
`(log:restore :foo)`. Configurations are saved in a file in the
home directory, so they survive image restarts

See the [Finding needle in a haystack](#needle) section.

# The magic of (LOG:CONFIG)

Section To be written, for now simply see [docstring for LOG:CONFIG](http://github.com/7max/log4cl/blob/master/src/configurator.lisp)

Read the docstring and play with options, below are a few examples:

![nil](./images/screenshot-25.png)

# Pattern Layout

Section to be written, for now see docstring for
[docstring for PATTERN-LAYOUT](http://github.com/7max/log4cl/blob/master/src/pattern-layout.lisp)

# Common Practices

Some common recipes.

## Log levels for production

Generally log levels `INFO` and below, are used in normal
operations of software, while levels higher then `INFO` are used
by programmers.

-   `FATAL` is used for un-recoverable errors, that
    require restart of an application or major component, the `FATAL`
    messages are to inform the user that something had died in a 
    way that should not normally happen.

-   `ERROR` is for serious but generally recoverable errors, that occur
    doing a normal operation of software. File not found, or such.

-   `WARN` is for "suspicious" things, or to inform the user that
    some automatic corrective action had failed. Maximum number of retries reached
    or such.

-   `INFO` is for informing on major steps that software is performing, and
    is usually thought of the maximum log level used in normal operations, its
    "Say what you are doing but don't flood" type of messages.

By default Log4CL is configured with root category having `INFO`
log level.



## Log levels for development

`DEBUG` is for for informing about detailed steps taken by operations
and printing intermediate values. 

`TRACE` is for very detailed debugging, like printing variables inside
loops and such.

`DEBU1..DEBU9` log levels are numerically around the `TRACE` and can be used
if you need more granularity. One possibility is that `(log:expr)` macro, can
be configured via `LOG:PACKAGE-OPTIONS` mechanism, to use different
log level then `DEBUG` and can set to use one of the extra levels.


`OFF` log level is very important counter-part for `DEBUG` and
`TRACE`.  Its used for "narrowing things down in reverse", which is
described in the next section



## Finding needle in a haystack

Programmers often need to concentrate on a specific area of their
software.  With traditional non-hierarchical logging system,
having a lot of debug sprinkled around the code, flood the
programmers with a lot of information they don't need, and makes
it hard to find the messages relevant to the problem being
debugged.

Because Log4CL is hierarchical, its easy to narrow down the
logging, to focus on exactly the right area, by using the
following process.

1.  Turn `DEBUG` on for the root category, or entire package and
    then run your code through the functionality that you are
    focusing on. REPL will fill with a lot of debugging output.

2.  Right-click on each message that is not related to a problem,
    and turn the corresponding category `OFF`. You can how go wide
    or narrow, turn off entire packages or source files, or by
    individual methods, functions or local functions. If you went
    too far, use **Reset children** command on the parent category.
    
    If you use CLOS, use the category hierarchy to your advantage,
    if for example you think problem relates to before or after
    method, you can can control logging for all :AFTER methods of
    generic function by clicking :after category in 
    `( :after  ...)`

3.  Once you narrowed down the logging to your liking, you can
    quickly save that configuration of log levels with
    `(LOG:SAVE)`, and later (may be in a different image, or even
    different machine) restore it with `(LOG:RESTORE)`, and you can
    give these saved configuration names, such as
    `(LOG:SAVE :bug-123)`

# Glossary

Very small glossary of Log4CL concepts



## Loggers and categories

Loggers are named singleton objects that form a hierarchy, and are
sources of log messages, or more correctly entry points where log
message enter the logging system.  Each call to a logging macro like
`(log:debug ...)` operates on a specific logger object 
(See also [naming](#naming) section).

Logger's unique name is called "logger's category", or "category
name". Loggers form a hierarchy, based on their category names,
where child loggers have their category name prefixed by that of the
parent, followed by a dot. So if we have loggers **A**, **A.B**, **A.B.C**
and **A.B.D** then logger **A** is parent of **A.B**, which has two
children **A.B.C** and **A.B.D** - as shown on below diagram.  (Note:
ROOT logger category name is empty string)

```
ROOT---A---A.B---A.B.C
             |
             \---A.B.D
```

Because loggers are singletons, logger category name is usually shortened to just
*CATEGORY* and is used inter-changeably with the word *LOGGER*; the convention
is that thing is "a logger" when talking about actual Lisp object, and
"category" otherwise.

Each logger can have a [log level](#level) threshold, or if its
does not have one, it inherits one from its parent. To ensure that
for any logger, an effective log level can be determined, the ROOT
logger always have a level.

Loggers will only pass through messages, if logger's threshold level
is equal or greater verbosity, then log message. For example if in
above example logger A is configured with *info* log level, then
`(log:warn ...)` and `(log:info)` messages will be passed through,
but `(log:debug)` messages would not.



## Appenders

Appenders process log messages by writing them to files, or
displaying them on the screen. Appenders attach to a specific
logger, and each logger can have many appenders attached.

When a log message passes through a logger that has appenders, they
are all called in turn to do appender specific processing, be it
writing log message to a file, or a terminal. After all of logger's
appenders had processed the message, its passed on to the parent
logger.

So log messages inheritance flows in reverse order from the log
level one, tricking up from child loggers towards root, with below
exception.

Each logger has a property called *additivity*, which is `T` by
default, which controls the above process. When additivity is
`NIL`, logger is called non-additive and any messages that reach
it, will not be passed to the parents.

Usually only root logger, or non non-additive loggers will have any
appenders attached to them.



## Layouts

When appender decide they want to process the log message, they format
the log message by means of a layout. Layout is a separate object, that attaches
to each appender, and is responsible for the textual formatting of the message.

So while appender provides and manages any serialization for the
stream to write to, the layout is actually formatting the log
message into that stream.

Log4CL provides two layouts, SIMPLE-LAYOUT which is well, simple,
and a very configurable PATTERN-LAYOUT, which specifies the formatting
of log messages by mean of printf/format like control string.

Easiest way to use the pattern layout, is by using [LOG:CONFIG](http://github.com/7max/log4cl/blob/master/src/configurator.lisp)
command to select between several predefined formats.

Or you can look for list of all supported format documentation for
the [PATTERN-LAYOUT](http://github.com/7max/log4cl/blob/master/src/pattern-layout.lisp) class. Please note that if you are
drafting your own format, that Log4SLime fontification relies on
regular expressions and the log messages being in a certain
order. If your layout is not a minor modification of an built-in
one, the Log4Slime fontification may stop working.  You can of
course adjust the regular expressions used by Log4Slime to match
your own custom layout to compensate.



## Log Levels

In Log4CL log levels are numeric constants, in order of increased
verbosity: 

-   Turn off logging `0=OFF`

-   Standard log levels `1=FATAL`, `2=ERROR`, `3=WARN`, `4=INFO`, `5=DEBUG`

-   Extra debug levels `6..9` named `DEBU1` through `DEBU4`

-   Standard log level `10=TRACE`

-   Extra debug level `11..15` named `DEBU5` through `DEBU9`



## Effective log level

Effective log level of the logger **X** is determined as follows.

1.  If logger has level threshold set, then this level is the effective log level.

2.  If logger is not first child of a parent, whose category is same as the package 
    name logger was instantiated from, the effective log level of **X** is the effective
    log level of its parent logger.

3.  If logger is first child of a parent **P** named same as package,
    and there exists a sibling logger **S**, with the last part of
    category name equal to that of a source file logger **X** was
    instantiated from, and **S** has a level threshold set, that level
    is effective level of logger **X**

4.  Otherwise effective level of logger **X** is effective level of its parent.

ROOT logger always has a level threshold set, so above steps always
result in a valid log level.

Effective log level is returned by the function `(log4cl:effective-log-level LOGGER)` 

# FAQ

## I don't see log messages from other threads.

The `*TERMINAL-IO*` value bound in the other threads is probably different and points  
to other place (likely `*inferior-lisp*` buffer under Slime)

1.  `(log:config :sane2)` will copy messages from other threads to `REPL`
    while continuing output to thread specific `*TERMINAL-IO*` (`REPL`
    thread will still only log to `REPL`)

2.  `(log:config :sane :this-console)` will redirect all logging to current console
    regardless of thread local values of `*TERMINAL-IO*`

## Why Log4CL starts its own thread, and how I get rid of it

Its a flusher thread to flush the appenders, it increases
performance greatly when there is a lot of logging.oe

You can stop it by calling `(log4cl:stop-hierarchy-watcher-thread)`

On SBCL Log4CL uses `*EXIT-HOOKS*` and `*SAVE-HOOKS*` to
automatically flush all appenders on exit, so that last second of
logging is not lost, and to terminate the watcher thread when
saving image, which can't be done with multiple threads running.

## I'd like just the log messages, and not all the extra stuff

Use pattern layout with just %m%n format (message + newline)

## How do I log into a file

`(log:config :daily "file.txt")` which will be backed up each day to
`file.txt.YYYYMMDD`

### I want both log file and backup log file to have YYYYMMDD prefix or roll once per week

`(log:config :daily "file.txt.%Y%m%d")` file will roll when %Y%m%d expansion
changes.

### What about just one plain file, without rolling

`(log:config :daily "file.txt" :backup nil)`

本源码包内暂不包含可直接显示的源代码文件,请下载源码包。