blob: dd041d903a86fdbeb3777b196b82f8ed2835e950 [file] [log] [blame]
Willy Tarreaubaaee002006-06-26 02:48:02 +02001/*
2 * General logging functions.
3 *
Willy Tarreaub7f694f2008-06-22 17:18:02 +02004 * Copyright 2000-2008 Willy Tarreau <w@1wt.eu>
Willy Tarreaubaaee002006-06-26 02:48:02 +02005 *
6 * This program is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU General Public License
8 * as published by the Free Software Foundation; either version
9 * 2 of the License, or (at your option) any later version.
10 *
11 */
12
Willy Tarreau8a3f52f2012-12-20 21:23:42 +010013#include <ctype.h>
Willy Tarreauc8f24f82007-11-30 18:38:35 +010014#include <fcntl.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020015#include <stdarg.h>
16#include <stdio.h>
17#include <stdlib.h>
18#include <string.h>
19#include <syslog.h>
20#include <time.h>
21#include <unistd.h>
Robert Tsai81ae1952007-12-05 10:47:29 +010022#include <errno.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020023
24#include <sys/time.h>
Willy Tarreau077edcb2016-08-10 18:30:56 +020025#include <sys/uio.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020026
Willy Tarreaue3ba5f02006-06-29 18:54:54 +020027#include <common/config.h>
Willy Tarreaud6d06902009-08-19 11:22:33 +020028#include <common/compat.h>
Willy Tarreau0108d902018-11-25 19:14:37 +010029#include <common/initcall.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020030#include <common/standard.h>
Willy Tarreaufb278672006-10-15 15:38:50 +020031#include <common/time.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020032
Christopher Fauletc1b730a2017-10-24 12:00:51 +020033#include <types/cli.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020034#include <types/global.h>
William Lallemand723b73a2012-02-08 16:37:49 +010035#include <types/log.h>
Willy Tarreauec6c5df2008-07-15 00:22:45 +020036
Christopher Fauletc1b730a2017-10-24 12:00:51 +020037#include <proto/applet.h>
38#include <proto/cli.h>
William Lallemand5f232402012-04-05 18:02:55 +020039#include <proto/frontend.h>
Willy Tarreauec6c5df2008-07-15 00:22:45 +020040#include <proto/log.h>
Willy Tarreauc8368452012-12-21 00:09:23 +010041#include <proto/sample.h>
Willy Tarreauc125cef2019-05-10 09:58:43 +020042#include <proto/ssl_sock.h>
Willy Tarreaufb0afa72015-04-03 14:46:27 +020043#include <proto/stream.h>
Willy Tarreau827aee92011-03-10 16:55:02 +010044#include <proto/stream_interface.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020045
Dragan Dosen43885c72015-10-01 13:18:13 +020046struct log_fmt {
47 char *name;
48 struct {
Willy Tarreau83061a82018-07-13 11:56:34 +020049 struct buffer sep1; /* first pid separator */
50 struct buffer sep2; /* second pid separator */
Dragan Dosen43885c72015-10-01 13:18:13 +020051 } pid;
52};
53
54static const struct log_fmt log_formats[LOG_FORMATS] = {
55 [LOG_FORMAT_RFC3164] = {
56 .name = "rfc3164",
57 .pid = {
Willy Tarreau843b7cb2018-07-13 10:54:26 +020058 .sep1 = { .area = "[", .data = 1 },
59 .sep2 = { .area = "]: ", .data = 3 }
Dragan Dosen43885c72015-10-01 13:18:13 +020060 }
61 },
62 [LOG_FORMAT_RFC5424] = {
63 .name = "rfc5424",
64 .pid = {
Willy Tarreau843b7cb2018-07-13 10:54:26 +020065 .sep1 = { .area = " ", .data = 1 },
66 .sep2 = { .area = " - ", .data = 3 }
Dragan Dosen43885c72015-10-01 13:18:13 +020067 }
Willy Tarreaue8746a02018-11-12 08:45:00 +010068 },
69 [LOG_FORMAT_SHORT] = {
70 .name = "short",
71 .pid = {
72 .sep1 = { .area = "", .data = 0 },
73 .sep2 = { .area = " ", .data = 1 },
74 }
75 },
Willy Tarreauc1b06452018-11-12 11:57:56 +010076 [LOG_FORMAT_RAW] = {
77 .name = "raw",
78 .pid = {
79 .sep1 = { .area = "", .data = 0 },
80 .sep2 = { .area = "", .data = 0 },
81 }
82 },
Dragan Dosen1322d092015-09-22 16:05:32 +020083};
84
Dragan Dosen835b9212016-02-12 13:23:03 +010085/*
86 * This map is used with all the FD_* macros to check whether a particular bit
Willy Tarreau1bfd6022019-06-07 11:10:07 +020087 * is set or not. Each bit represents an ACSII code. ha_bit_set() sets those
88 * bytes which should be escaped. When ha_bit_test() returns non-zero, it means
89 * that the byte should be escaped. Be careful to always pass bytes from 0 to
90 * 255 exclusively to the macros.
Dragan Dosen835b9212016-02-12 13:23:03 +010091 */
Willy Tarreau1bfd6022019-06-07 11:10:07 +020092long rfc5424_escape_map[(256/8) / sizeof(long)];
93long hdr_encode_map[(256/8) / sizeof(long)];
94long url_encode_map[(256/8) / sizeof(long)];
95long http_encode_map[(256/8) / sizeof(long)];
Dragan Dosen835b9212016-02-12 13:23:03 +010096
Dragan Dosen835b9212016-02-12 13:23:03 +010097
Willy Tarreaubaaee002006-06-26 02:48:02 +020098const char *log_facilities[NB_LOG_FACILITIES] = {
99 "kern", "user", "mail", "daemon",
100 "auth", "syslog", "lpr", "news",
101 "uucp", "cron", "auth2", "ftp",
102 "ntp", "audit", "alert", "cron2",
103 "local0", "local1", "local2", "local3",
104 "local4", "local5", "local6", "local7"
105};
106
Willy Tarreaubaaee002006-06-26 02:48:02 +0200107const char *log_levels[NB_LOG_LEVELS] = {
108 "emerg", "alert", "crit", "err",
109 "warning", "notice", "info", "debug"
110};
111
Willy Tarreau570f2212013-06-10 16:42:09 +0200112const char sess_term_cond[16] = "-LcCsSPRIDKUIIII"; /* normal, Local, CliTo, CliErr, SrvTo, SrvErr, PxErr, Resource, Internal, Down, Killed, Up, -- */
Willy Tarreaub8750a82006-09-03 09:56:00 +0200113const char sess_fin_state[8] = "-RCHDLQT"; /* cliRequest, srvConnect, srvHeader, Data, Last, Queue, Tarpit */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200114
William Lallemand723b73a2012-02-08 16:37:49 +0100115
116/* log_format */
117struct logformat_type {
118 char *name;
119 int type;
William Lallemandbddd4fd2012-02-27 11:23:10 +0100120 int mode;
William Lallemand5e19a282012-04-02 16:22:10 +0200121 int lw; /* logwait bitsfield */
William Lallemandb7ff6a32012-03-02 14:35:21 +0100122 int (*config_callback)(struct logformat_node *node, struct proxy *curproxy);
Willy Tarreau2beef582012-12-20 17:22:52 +0100123 const char *replace_by; /* new option to use instead of old one */
William Lallemand723b73a2012-02-08 16:37:49 +0100124};
125
William Lallemandb7ff6a32012-03-02 14:35:21 +0100126int prepare_addrsource(struct logformat_node *node, struct proxy *curproxy);
127
William Lallemand723b73a2012-02-08 16:37:49 +0100128/* log_format variable names */
129static const struct logformat_type logformat_keywords[] = {
William Lallemand5e19a282012-04-02 16:22:10 +0200130 { "o", LOG_FMT_GLOBAL, PR_MODE_TCP, 0, NULL }, /* global option */
Willy Tarreau2beef582012-12-20 17:22:52 +0100131
132 /* please keep these lines sorted ! */
133 { "B", LOG_FMT_BYTES, PR_MODE_TCP, LW_BYTES, NULL }, /* bytes from server to client */
134 { "CC", LOG_FMT_CCLIENT, PR_MODE_HTTP, LW_REQHDR, NULL }, /* client cookie */
135 { "CS", LOG_FMT_CSERVER, PR_MODE_HTTP, LW_RSPHDR, NULL }, /* server cookie */
136 { "H", LOG_FMT_HOSTNAME, PR_MODE_TCP, LW_INIT, NULL }, /* Hostname */
137 { "ID", LOG_FMT_UNIQUEID, PR_MODE_HTTP, LW_BYTES, NULL }, /* Unique ID */
Willy Tarreau4bf99632014-06-13 12:21:40 +0200138 { "ST", LOG_FMT_STATUS, PR_MODE_TCP, LW_RESP, NULL }, /* status code */
William Lallemand5e19a282012-04-02 16:22:10 +0200139 { "T", LOG_FMT_DATEGMT, PR_MODE_TCP, LW_INIT, NULL }, /* date GMT */
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +0200140 { "Ta", LOG_FMT_Ta, PR_MODE_HTTP, LW_BYTES, NULL }, /* Time active (tr to end) */
Willy Tarreau2beef582012-12-20 17:22:52 +0100141 { "Tc", LOG_FMT_TC, PR_MODE_TCP, LW_BYTES, NULL }, /* Tc */
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +0200142 { "Th", LOG_FMT_Th, PR_MODE_TCP, LW_BYTES, NULL }, /* Time handshake */
143 { "Ti", LOG_FMT_Ti, PR_MODE_HTTP, LW_BYTES, NULL }, /* Time idle */
144 { "Tl", LOG_FMT_DATELOCAL, PR_MODE_TCP, LW_INIT, NULL }, /* date local timezone */
145 { "Tq", LOG_FMT_TQ, PR_MODE_HTTP, LW_BYTES, NULL }, /* Tq=Th+Ti+TR */
146 { "Tr", LOG_FMT_Tr, PR_MODE_HTTP, LW_BYTES, NULL }, /* Tr */
147 { "TR", LOG_FMT_TR, PR_MODE_HTTP, LW_BYTES, NULL }, /* Time to receive a valid request */
Willy Tarreau27b639d2016-05-17 17:55:27 +0200148 { "Td", LOG_FMT_TD, PR_MODE_TCP, LW_BYTES, NULL }, /* Td = Tt - (Tq + Tw + Tc + Tr) */
Willy Tarreau2beef582012-12-20 17:22:52 +0100149 { "Ts", LOG_FMT_TS, PR_MODE_TCP, LW_INIT, NULL }, /* timestamp GMT */
William Lallemand5e19a282012-04-02 16:22:10 +0200150 { "Tt", LOG_FMT_TT, PR_MODE_TCP, LW_BYTES, NULL }, /* Tt */
Willy Tarreau2beef582012-12-20 17:22:52 +0100151 { "Tw", LOG_FMT_TW, PR_MODE_TCP, LW_BYTES, NULL }, /* Tw */
152 { "U", LOG_FMT_BYTES_UP, PR_MODE_TCP, LW_BYTES, NULL }, /* bytes from client to server */
William Lallemand5e19a282012-04-02 16:22:10 +0200153 { "ac", LOG_FMT_ACTCONN, PR_MODE_TCP, LW_BYTES, NULL }, /* actconn */
Willy Tarreau2beef582012-12-20 17:22:52 +0100154 { "b", LOG_FMT_BACKEND, PR_MODE_TCP, LW_INIT, NULL }, /* backend */
William Lallemand5e19a282012-04-02 16:22:10 +0200155 { "bc", LOG_FMT_BECONN, PR_MODE_TCP, LW_BYTES, NULL }, /* beconn */
Willy Tarreau2beef582012-12-20 17:22:52 +0100156 { "bi", LOG_FMT_BACKENDIP, PR_MODE_TCP, LW_BCKIP, prepare_addrsource }, /* backend source ip */
157 { "bp", LOG_FMT_BACKENDPORT, PR_MODE_TCP, LW_BCKIP, prepare_addrsource }, /* backend source port */
William Lallemand5e19a282012-04-02 16:22:10 +0200158 { "bq", LOG_FMT_BCKQUEUE, PR_MODE_TCP, LW_BYTES, NULL }, /* backend_queue */
Willy Tarreaud02286d2017-06-23 11:23:43 +0200159 { "ci", LOG_FMT_CLIENTIP, PR_MODE_TCP, LW_CLIP | LW_XPRT, NULL }, /* client ip */
160 { "cp", LOG_FMT_CLIENTPORT, PR_MODE_TCP, LW_CLIP | LW_XPRT, NULL }, /* client port */
Willy Tarreau2beef582012-12-20 17:22:52 +0100161 { "f", LOG_FMT_FRONTEND, PR_MODE_TCP, LW_INIT, NULL }, /* frontend */
162 { "fc", LOG_FMT_FECONN, PR_MODE_TCP, LW_BYTES, NULL }, /* feconn */
Willy Tarreaud02286d2017-06-23 11:23:43 +0200163 { "fi", LOG_FMT_FRONTENDIP, PR_MODE_TCP, LW_FRTIP | LW_XPRT, NULL }, /* frontend ip */
164 { "fp", LOG_FMT_FRONTENDPORT, PR_MODE_TCP, LW_FRTIP | LW_XPRT, NULL }, /* frontend port */
Willy Tarreau2beef582012-12-20 17:22:52 +0100165 { "ft", LOG_FMT_FRONTEND_XPRT, PR_MODE_TCP, LW_INIT, NULL }, /* frontend with transport mode */
Willy Tarreaud9ed3d22014-06-13 12:23:06 +0200166 { "hr", LOG_FMT_HDRREQUEST, PR_MODE_TCP, LW_REQHDR, NULL }, /* header request */
167 { "hrl", LOG_FMT_HDRREQUESTLIST, PR_MODE_TCP, LW_REQHDR, NULL }, /* header request list */
168 { "hs", LOG_FMT_HDRRESPONS, PR_MODE_TCP, LW_RSPHDR, NULL }, /* header response */
169 { "hsl", LOG_FMT_HDRRESPONSLIST, PR_MODE_TCP, LW_RSPHDR, NULL }, /* header response list */
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +0000170 { "HM", LOG_FMT_HTTP_METHOD, PR_MODE_HTTP, LW_REQ, NULL }, /* HTTP method */
171 { "HP", LOG_FMT_HTTP_PATH, PR_MODE_HTTP, LW_REQ, NULL }, /* HTTP path */
Andrew Hayworthe63ac872015-07-31 16:14:16 +0000172 { "HQ", LOG_FMT_HTTP_QUERY, PR_MODE_HTTP, LW_REQ, NULL }, /* HTTP query */
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +0000173 { "HU", LOG_FMT_HTTP_URI, PR_MODE_HTTP, LW_REQ, NULL }, /* HTTP full URI */
174 { "HV", LOG_FMT_HTTP_VERSION, PR_MODE_HTTP, LW_REQ, NULL }, /* HTTP version */
Willy Tarreau7346acb2014-08-28 15:03:15 +0200175 { "lc", LOG_FMT_LOGCNT, PR_MODE_TCP, LW_INIT, NULL }, /* log counter */
Willy Tarreau2beef582012-12-20 17:22:52 +0100176 { "ms", LOG_FMT_MS, PR_MODE_TCP, LW_INIT, NULL }, /* accept date millisecond */
William Lallemand5e19a282012-04-02 16:22:10 +0200177 { "pid", LOG_FMT_PID, PR_MODE_TCP, LW_INIT, NULL }, /* log pid */
Willy Tarreau2beef582012-12-20 17:22:52 +0100178 { "r", LOG_FMT_REQ, PR_MODE_HTTP, LW_REQ, NULL }, /* request */
179 { "rc", LOG_FMT_RETRIES, PR_MODE_TCP, LW_BYTES, NULL }, /* retries */
Willy Tarreau1f0da242014-01-25 11:01:50 +0100180 { "rt", LOG_FMT_COUNTER, PR_MODE_TCP, LW_REQ, NULL }, /* request counter (HTTP or TCP session) */
Willy Tarreau2beef582012-12-20 17:22:52 +0100181 { "s", LOG_FMT_SERVER, PR_MODE_TCP, LW_SVID, NULL }, /* server */
182 { "sc", LOG_FMT_SRVCONN, PR_MODE_TCP, LW_BYTES, NULL }, /* srv_conn */
183 { "si", LOG_FMT_SERVERIP, PR_MODE_TCP, LW_SVIP, NULL }, /* server destination ip */
184 { "sp", LOG_FMT_SERVERPORT, PR_MODE_TCP, LW_SVIP, NULL }, /* server destination port */
185 { "sq", LOG_FMT_SRVQUEUE, PR_MODE_TCP, LW_BYTES, NULL }, /* srv_queue */
Willy Tarreauffc3fcd2012-10-12 20:17:54 +0200186 { "sslc", LOG_FMT_SSL_CIPHER, PR_MODE_TCP, LW_XPRT, NULL }, /* client-side SSL ciphers */
187 { "sslv", LOG_FMT_SSL_VERSION, PR_MODE_TCP, LW_XPRT, NULL }, /* client-side SSL protocol version */
Willy Tarreau2beef582012-12-20 17:22:52 +0100188 { "t", LOG_FMT_DATE, PR_MODE_TCP, LW_INIT, NULL }, /* date */
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +0200189 { "tr", LOG_FMT_tr, PR_MODE_HTTP, LW_INIT, NULL }, /* date of start of request */
190 { "trg",LOG_FMT_trg, PR_MODE_HTTP, LW_INIT, NULL }, /* date of start of request, GMT */
191 { "trl",LOG_FMT_trl, PR_MODE_HTTP, LW_INIT, NULL }, /* date of start of request, local */
Willy Tarreau2beef582012-12-20 17:22:52 +0100192 { "ts", LOG_FMT_TERMSTATE, PR_MODE_TCP, LW_BYTES, NULL },/* termination state */
193 { "tsc", LOG_FMT_TERMSTATE_CK, PR_MODE_TCP, LW_INIT, NULL },/* termination state */
194
195 /* The following tags are deprecated and will be removed soon */
196 { "Bi", LOG_FMT_BACKENDIP, PR_MODE_TCP, LW_BCKIP, prepare_addrsource, "bi" }, /* backend source ip */
197 { "Bp", LOG_FMT_BACKENDPORT, PR_MODE_TCP, LW_BCKIP, prepare_addrsource, "bp" }, /* backend source port */
Willy Tarreaud02286d2017-06-23 11:23:43 +0200198 { "Ci", LOG_FMT_CLIENTIP, PR_MODE_TCP, LW_CLIP | LW_XPRT, NULL, "ci" }, /* client ip */
199 { "Cp", LOG_FMT_CLIENTPORT, PR_MODE_TCP, LW_CLIP | LW_XPRT, NULL, "cp" }, /* client port */
200 { "Fi", LOG_FMT_FRONTENDIP, PR_MODE_TCP, LW_FRTIP | LW_XPRT, NULL, "fi" }, /* frontend ip */
201 { "Fp", LOG_FMT_FRONTENDPORT, PR_MODE_TCP, LW_FRTIP | LW_XPRT, NULL, "fp" }, /* frontend port */
Willy Tarreau2beef582012-12-20 17:22:52 +0100202 { "Si", LOG_FMT_SERVERIP, PR_MODE_TCP, LW_SVIP, NULL, "si" }, /* server destination ip */
203 { "Sp", LOG_FMT_SERVERPORT, PR_MODE_TCP, LW_SVIP, NULL, "sp" }, /* server destination port */
204 { "cc", LOG_FMT_CCLIENT, PR_MODE_HTTP, LW_REQHDR, NULL, "CC" }, /* client cookie */
205 { "cs", LOG_FMT_CSERVER, PR_MODE_HTTP, LW_RSPHDR, NULL, "CS" }, /* server cookie */
206 { "st", LOG_FMT_STATUS, PR_MODE_HTTP, LW_RESP, NULL, "ST" }, /* status code */
William Lallemand5e19a282012-04-02 16:22:10 +0200207 { 0, 0, 0, 0, NULL }
William Lallemand723b73a2012-02-08 16:37:49 +0100208};
209
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +0200210char default_http_log_format[] = "%ci:%cp [%tr] %ft %b/%s %TR/%Tw/%Tc/%Tr/%Ta %ST %B %CC %CS %tsc %ac/%fc/%bc/%sc/%rc %sq/%bq %hr %hs %{+Q}r"; // default format
211char clf_http_log_format[] = "%{+Q}o %{-Q}ci - - [%trg] %r %ST %B \"\" \"\" %cp %ms %ft %b %s %TR %Tw %Tc %Tr %Ta %tsc %ac %fc %bc %sc %rc %sq %bq %CC %CS %hrl %hsl";
Willy Tarreau2beef582012-12-20 17:22:52 +0100212char default_tcp_log_format[] = "%ci:%cp [%t] %ft %b/%s %Tw/%Tc/%Tt %B %ts %ac/%fc/%bc/%sc/%rc %sq/%bq";
William Lallemand723b73a2012-02-08 16:37:49 +0100213char *log_format = NULL;
214
Dragan Dosen0b85ece2015-09-25 19:17:44 +0200215/* Default string used for structured-data part in RFC5424 formatted
216 * syslog messages.
217 */
218char default_rfc5424_sd_log_format[] = "- ";
Dragan Dosen1322d092015-09-22 16:05:32 +0200219
Willy Tarreau13ef7732018-11-12 07:25:28 +0100220/* total number of dropped logs */
221unsigned int dropped_logs = 0;
222
Dragan Dosen1322d092015-09-22 16:05:32 +0200223/* This is a global syslog header, common to all outgoing messages in
224 * RFC3164 format. It begins with time-based part and is updated by
225 * update_log_hdr().
Dragan Dosen59cee972015-09-19 22:09:02 +0200226 */
Christopher Fauletf8188c62017-06-02 16:20:16 +0200227THREAD_LOCAL char *logheader = NULL;
Willy Tarreau55e2f5a2019-05-05 10:11:39 +0200228THREAD_LOCAL char *logheader_end = NULL;
Dragan Dosen59cee972015-09-19 22:09:02 +0200229
Dragan Dosen1322d092015-09-22 16:05:32 +0200230/* This is a global syslog header for messages in RFC5424 format. It is
231 * updated by update_log_hdr_rfc5424().
232 */
Christopher Fauletf8188c62017-06-02 16:20:16 +0200233THREAD_LOCAL char *logheader_rfc5424 = NULL;
Willy Tarreau55e2f5a2019-05-05 10:11:39 +0200234THREAD_LOCAL char *logheader_rfc5424_end = NULL;
Dragan Dosen1322d092015-09-22 16:05:32 +0200235
Dragan Dosen59cee972015-09-19 22:09:02 +0200236/* This is a global syslog message buffer, common to all outgoing
237 * messages. It contains only the data part.
Willy Tarreaub1a2faf2012-03-19 16:51:53 +0100238 */
Christopher Fauletf8188c62017-06-02 16:20:16 +0200239THREAD_LOCAL char *logline = NULL;
Willy Tarreaub1a2faf2012-03-19 16:51:53 +0100240
Dragan Dosen0b85ece2015-09-25 19:17:44 +0200241/* A global syslog message buffer, common to all RFC5424 syslog messages.
242 * Currently, it is used for generating the structured-data part.
243 */
Christopher Fauletf8188c62017-06-02 16:20:16 +0200244THREAD_LOCAL char *logline_rfc5424 = NULL;
Dragan Dosen0b85ece2015-09-25 19:17:44 +0200245
Christopher Fauletd4696382017-10-24 11:44:05 +0200246/* A global buffer used to store all startup alerts/warnings. It will then be
247 * retrieve on the CLI. */
Willy Tarreaua6483992018-12-15 16:55:36 +0100248static char *startup_logs = NULL;
Christopher Fauletd4696382017-10-24 11:44:05 +0200249
William Lallemand723b73a2012-02-08 16:37:49 +0100250struct logformat_var_args {
251 char *name;
252 int mask;
253};
254
255struct logformat_var_args var_args_list[] = {
256// global
257 { "M", LOG_OPT_MANDATORY },
258 { "Q", LOG_OPT_QUOTE },
William Lallemand5f232402012-04-05 18:02:55 +0200259 { "X", LOG_OPT_HEXA },
Dragan Dosen835b9212016-02-12 13:23:03 +0100260 { "E", LOG_OPT_ESC },
William Lallemand723b73a2012-02-08 16:37:49 +0100261 { 0, 0 }
262};
263
Willy Tarreaub1f3af22013-04-12 18:30:32 +0200264/* return the name of the directive used in the current proxy for which we're
265 * currently parsing a header, when it is known.
266 */
267static inline const char *fmt_directive(const struct proxy *curproxy)
268{
Willy Tarreaubf0addb2013-12-02 12:24:54 +0100269 switch (curproxy->conf.args.ctx) {
Willy Tarreau53e1a6d2015-07-09 11:20:00 +0200270 case ARGC_ACL:
271 return "acl";
272 case ARGC_STK:
273 return "stick";
274 case ARGC_TRK:
275 return "track-sc";
276 case ARGC_LOG:
277 return "log-format";
Dragan Dosen0b85ece2015-09-25 19:17:44 +0200278 case ARGC_LOGSD:
279 return "log-format-sd";
Willy Tarreaubf0addb2013-12-02 12:24:54 +0100280 case ARGC_HRQ:
Thierry FOURNIER1c0054f2013-11-20 15:09:52 +0100281 return "http-request";
Willy Tarreaubf0addb2013-12-02 12:24:54 +0100282 case ARGC_HRS:
Thierry FOURNIER1c0054f2013-11-20 15:09:52 +0100283 return "http-response";
Willy Tarreau53e1a6d2015-07-09 11:20:00 +0200284 case ARGC_UIF:
285 return "unique-id-format";
Thierry FOURNIERd18cd0f2013-11-29 12:15:45 +0100286 case ARGC_RDR:
Willy Tarreau53e1a6d2015-07-09 11:20:00 +0200287 return "redirect";
288 case ARGC_CAP:
289 return "capture";
Willy Tarreau28d976d2015-07-09 11:39:33 +0200290 case ARGC_SRV:
291 return "server";
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200292 case ARGC_SPOE:
293 return "spoe-message";
Thierry FOURNIER / OZON.IO4ed1c952016-11-24 23:57:54 +0100294 case ARGC_UBK:
295 return "use_backend";
Willy Tarreaubf0addb2013-12-02 12:24:54 +0100296 default:
Willy Tarreau53e1a6d2015-07-09 11:20:00 +0200297 return "undefined(please report this bug)"; /* must never happen */
Willy Tarreaubf0addb2013-12-02 12:24:54 +0100298 }
Willy Tarreaub1f3af22013-04-12 18:30:32 +0200299}
300
William Lallemand723b73a2012-02-08 16:37:49 +0100301/*
William Lallemandb7ff6a32012-03-02 14:35:21 +0100302 * callback used to configure addr source retrieval
303 */
304int prepare_addrsource(struct logformat_node *node, struct proxy *curproxy)
305{
306 curproxy->options2 |= PR_O2_SRC_ADDR;
307
308 return 0;
309}
310
311
312/*
Thierry FOURNIER / OZON.IObca46f02016-11-22 23:13:04 +0100313 * Parse args in a logformat_var. Returns 0 in error
314 * case, otherwise, it returns 1.
William Lallemand723b73a2012-02-08 16:37:49 +0100315 */
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100316int parse_logformat_var_args(char *args, struct logformat_node *node, char **err)
William Lallemand723b73a2012-02-08 16:37:49 +0100317{
318 int i = 0;
319 int end = 0;
320 int flags = 0; // 1 = + 2 = -
321 char *sp = NULL; // start pointer
322
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100323 if (args == NULL) {
324 memprintf(err, "internal error: parse_logformat_var_args() expects non null 'args'");
Thierry FOURNIER / OZON.IObca46f02016-11-22 23:13:04 +0100325 return 0;
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100326 }
William Lallemand723b73a2012-02-08 16:37:49 +0100327
328 while (1) {
329 if (*args == '\0')
330 end = 1;
331
332 if (*args == '+') {
333 // add flag
334 sp = args + 1;
335 flags = 1;
336 }
337 if (*args == '-') {
338 // delete flag
339 sp = args + 1;
340 flags = 2;
341 }
342
343 if (*args == '\0' || *args == ',') {
344 *args = '\0';
Willy Tarreau254d44c2012-12-20 18:19:26 +0100345 for (i = 0; sp && var_args_list[i].name; i++) {
William Lallemand723b73a2012-02-08 16:37:49 +0100346 if (strcmp(sp, var_args_list[i].name) == 0) {
347 if (flags == 1) {
348 node->options |= var_args_list[i].mask;
349 break;
350 } else if (flags == 2) {
351 node->options &= ~var_args_list[i].mask;
352 break;
353 }
354 }
355 }
356 sp = NULL;
357 if (end)
358 break;
359 }
Willy Tarreau254d44c2012-12-20 18:19:26 +0100360 args++;
William Lallemand723b73a2012-02-08 16:37:49 +0100361 }
Thierry FOURNIER / OZON.IObca46f02016-11-22 23:13:04 +0100362 return 1;
William Lallemand723b73a2012-02-08 16:37:49 +0100363}
364
365/*
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100366 * Parse a variable '%varname' or '%{args}varname' in log-format. The caller
367 * must pass the args part in the <arg> pointer with its length in <arg_len>,
368 * and varname with its length in <var> and <var_len> respectively. <arg> is
369 * ignored when arg_len is 0. Neither <var> nor <var_len> may be null.
Thierry FOURNIER / OZON.IOeca4d952016-11-22 22:06:04 +0100370 * Returns false in error case and err is filled, otherwise returns true.
William Lallemand723b73a2012-02-08 16:37:49 +0100371 */
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100372int parse_logformat_var(char *arg, int arg_len, char *var, int var_len, struct proxy *curproxy, struct list *list_format, int *defoptions, char **err)
William Lallemand723b73a2012-02-08 16:37:49 +0100373{
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100374 int j;
Dragan Dosen61302da2019-04-30 00:40:02 +0200375 struct logformat_node *node = NULL;
William Lallemand723b73a2012-02-08 16:37:49 +0100376
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100377 for (j = 0; logformat_keywords[j].name; j++) { // search a log type
378 if (strlen(logformat_keywords[j].name) == var_len &&
379 strncmp(var, logformat_keywords[j].name, var_len) == 0) {
380 if (logformat_keywords[j].mode != PR_MODE_HTTP || curproxy->mode == PR_MODE_HTTP) {
Vincent Bernat02779b62016-04-03 13:48:43 +0200381 node = calloc(1, sizeof(*node));
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100382 if (!node) {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100383 memprintf(err, "out of memory error");
Dragan Dosen61302da2019-04-30 00:40:02 +0200384 goto error_free;
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100385 }
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100386 node->type = logformat_keywords[j].type;
387 node->options = *defoptions;
388 if (arg_len) {
389 node->arg = my_strndup(arg, arg_len);
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100390 if (!parse_logformat_var_args(node->arg, node, err))
Dragan Dosen61302da2019-04-30 00:40:02 +0200391 goto error_free;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100392 }
393 if (node->type == LOG_FMT_GLOBAL) {
394 *defoptions = node->options;
395 free(node->arg);
396 free(node);
397 } else {
398 if (logformat_keywords[j].config_callback &&
399 logformat_keywords[j].config_callback(node, curproxy) != 0) {
Dragan Dosen61302da2019-04-30 00:40:02 +0200400 goto error_free;
William Lallemand723b73a2012-02-08 16:37:49 +0100401 }
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100402 curproxy->to_log |= logformat_keywords[j].lw;
403 LIST_ADDQ(list_format, &node->list);
William Lallemand723b73a2012-02-08 16:37:49 +0100404 }
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100405 if (logformat_keywords[j].replace_by)
Christopher Faulet767a84b2017-11-24 16:50:31 +0100406 ha_warning("parsing [%s:%d] : deprecated variable '%s' in '%s', please replace it with '%s'.\n",
407 curproxy->conf.args.file, curproxy->conf.args.line,
408 logformat_keywords[j].name, fmt_directive(curproxy), logformat_keywords[j].replace_by);
Thierry FOURNIER / OZON.IOeca4d952016-11-22 22:06:04 +0100409 return 1;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100410 } else {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100411 memprintf(err, "format variable '%s' is reserved for HTTP mode",
412 logformat_keywords[j].name);
Dragan Dosen61302da2019-04-30 00:40:02 +0200413 goto error_free;
William Lallemand723b73a2012-02-08 16:37:49 +0100414 }
William Lallemand723b73a2012-02-08 16:37:49 +0100415 }
416 }
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100417
418 j = var[var_len];
419 var[var_len] = 0;
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100420 memprintf(err, "no such format variable '%s'. If you wanted to emit the '%%' character verbatim, you need to use '%%%%'", var);
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100421 var[var_len] = j;
Dragan Dosen61302da2019-04-30 00:40:02 +0200422
423 error_free:
424 if (node) {
425 free(node->arg);
426 free(node);
427 }
Thierry FOURNIER / OZON.IOeca4d952016-11-22 22:06:04 +0100428 return 0;
William Lallemand723b73a2012-02-08 16:37:49 +0100429}
430
431/*
432 * push to the logformat linked list
433 *
434 * start: start pointer
435 * end: end text pointer
436 * type: string type
William Lallemand1d705562012-03-12 12:46:41 +0100437 * list_format: destination list
William Lallemand723b73a2012-02-08 16:37:49 +0100438 *
439 * LOG_TEXT: copy chars from start to end excluding end.
440 *
441*/
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100442int add_to_logformat_list(char *start, char *end, int type, struct list *list_format, char **err)
William Lallemand723b73a2012-02-08 16:37:49 +0100443{
444 char *str;
445
Willy Tarreaua3571662012-12-20 21:59:12 +0100446 if (type == LF_TEXT) { /* type text */
Vincent Bernat02779b62016-04-03 13:48:43 +0200447 struct logformat_node *node = calloc(1, sizeof(*node));
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100448 if (!node) {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100449 memprintf(err, "out of memory error");
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100450 return 0;
451 }
Vincent Bernat02779b62016-04-03 13:48:43 +0200452 str = calloc(1, end - start + 1);
William Lallemand723b73a2012-02-08 16:37:49 +0100453 strncpy(str, start, end - start);
William Lallemand723b73a2012-02-08 16:37:49 +0100454 str[end - start] = '\0';
455 node->arg = str;
William Lallemand1d705562012-03-12 12:46:41 +0100456 node->type = LOG_FMT_TEXT; // type string
457 LIST_ADDQ(list_format, &node->list);
Willy Tarreaua3571662012-12-20 21:59:12 +0100458 } else if (type == LF_SEPARATOR) {
Vincent Bernat02779b62016-04-03 13:48:43 +0200459 struct logformat_node *node = calloc(1, sizeof(*node));
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100460 if (!node) {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100461 memprintf(err, "out of memory error");
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100462 return 0;
463 }
William Lallemand1d705562012-03-12 12:46:41 +0100464 node->type = LOG_FMT_SEPARATOR;
465 LIST_ADDQ(list_format, &node->list);
William Lallemand723b73a2012-02-08 16:37:49 +0100466 }
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100467 return 1;
William Lallemand723b73a2012-02-08 16:37:49 +0100468}
469
470/*
Willy Tarreauc8368452012-12-21 00:09:23 +0100471 * Parse the sample fetch expression <text> and add a node to <list_format> upon
472 * success. At the moment, sample converters are not yet supported but fetch arguments
Willy Tarreaua4312fa2013-04-02 16:34:32 +0200473 * should work. The curpx->conf.args.ctx must be set by the caller.
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100474 *
475 * In error case, the function returns 0, otherwise it returns 1.
Willy Tarreauc8368452012-12-21 00:09:23 +0100476 */
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100477int add_sample_to_logformat_list(char *text, char *arg, int arg_len, struct proxy *curpx, struct list *list_format, int options, int cap, char **err)
Willy Tarreauc8368452012-12-21 00:09:23 +0100478{
479 char *cmd[2];
Dragan Dosen61302da2019-04-30 00:40:02 +0200480 struct sample_expr *expr = NULL;
481 struct logformat_node *node = NULL;
Willy Tarreauc8368452012-12-21 00:09:23 +0100482 int cmd_arg;
483
484 cmd[0] = text;
485 cmd[1] = "";
486 cmd_arg = 0;
487
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100488 expr = sample_parse_expr(cmd, &cmd_arg, curpx->conf.args.file, curpx->conf.args.line, err, &curpx->conf.args);
Willy Tarreauc8368452012-12-21 00:09:23 +0100489 if (!expr) {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100490 memprintf(err, "failed to parse sample expression <%s> : %s", text, *err);
Dragan Dosen61302da2019-04-30 00:40:02 +0200491 goto error_free;
Willy Tarreauc8368452012-12-21 00:09:23 +0100492 }
493
Vincent Bernat02779b62016-04-03 13:48:43 +0200494 node = calloc(1, sizeof(*node));
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100495 if (!node) {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100496 memprintf(err, "out of memory error");
Dragan Dosen61302da2019-04-30 00:40:02 +0200497 goto error_free;
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100498 }
Willy Tarreauc8368452012-12-21 00:09:23 +0100499 node->type = LOG_FMT_EXPR;
500 node->expr = expr;
501 node->options = options;
502
503 if (arg_len) {
504 node->arg = my_strndup(arg, arg_len);
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100505 if (!parse_logformat_var_args(node->arg, node, err))
Dragan Dosen61302da2019-04-30 00:40:02 +0200506 goto error_free;
Willy Tarreauc8368452012-12-21 00:09:23 +0100507 }
Willy Tarreau434c57c2013-01-08 01:10:24 +0100508 if (expr->fetch->val & cap & SMP_VAL_REQUEST)
Willy Tarreauc8368452012-12-21 00:09:23 +0100509 node->options |= LOG_OPT_REQ_CAP; /* fetch method is request-compatible */
510
Willy Tarreau434c57c2013-01-08 01:10:24 +0100511 if (expr->fetch->val & cap & SMP_VAL_RESPONSE)
Willy Tarreauc8368452012-12-21 00:09:23 +0100512 node->options |= LOG_OPT_RES_CAP; /* fetch method is response-compatible */
513
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100514 if (!(expr->fetch->val & cap)) {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100515 memprintf(err, "sample fetch <%s> may not be reliably used here because it needs '%s' which is not available here",
516 text, sample_src_names(expr->fetch->use));
Dragan Dosen61302da2019-04-30 00:40:02 +0200517 goto error_free;
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100518 }
Willy Tarreau434c57c2013-01-08 01:10:24 +0100519
Willy Tarreauc8368452012-12-21 00:09:23 +0100520 /* check if we need to allocate an hdr_idx struct for HTTP parsing */
521 /* Note, we may also need to set curpx->to_log with certain fetches */
Willy Tarreau25320b22013-03-24 07:22:08 +0100522 curpx->http_needed |= !!(expr->fetch->use & SMP_USE_HTTP_ANY);
Willy Tarreauc8368452012-12-21 00:09:23 +0100523
William Lallemand65ad6e12014-01-31 15:08:02 +0100524 /* FIXME: temporary workaround for missing LW_XPRT and LW_REQ flags
525 * needed with some sample fetches (eg: ssl*). We always set it for
526 * now on, but this will leave with sample capabilities soon.
Willy Tarreau1f31c732013-01-10 16:22:27 +0100527 */
528 curpx->to_log |= LW_XPRT;
William Lallemand65ad6e12014-01-31 15:08:02 +0100529 curpx->to_log |= LW_REQ;
Willy Tarreauc8368452012-12-21 00:09:23 +0100530 LIST_ADDQ(list_format, &node->list);
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100531 return 1;
Dragan Dosen61302da2019-04-30 00:40:02 +0200532
533 error_free:
534 release_sample_expr(expr);
535 if (node) {
536 free(node->arg);
537 free(node);
538 }
539 return 0;
Willy Tarreauc8368452012-12-21 00:09:23 +0100540}
541
542/*
William Lallemand723b73a2012-02-08 16:37:49 +0100543 * Parse the log_format string and fill a linked list.
544 * Variable name are preceded by % and composed by characters [a-zA-Z0-9]* : %varname
Willy Tarreaua4312fa2013-04-02 16:34:32 +0200545 * You can set arguments using { } : %{many arguments}varname.
546 * The curproxy->conf.args.ctx must be set by the caller.
William Lallemand1d705562012-03-12 12:46:41 +0100547 *
548 * str: the string to parse
549 * curproxy: the proxy affected
550 * list_format: the destination list
Willy Tarreau6cbbdbf2013-02-05 18:52:25 +0100551 * options: LOG_OPT_* to force on every node
Willy Tarreau434c57c2013-01-08 01:10:24 +0100552 * cap: all SMP_VAL_* flags supported by the consumer
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100553 *
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100554 * The function returns 1 in success case, otherwise, it returns 0 and err is filled.
William Lallemand723b73a2012-02-08 16:37:49 +0100555 */
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100556int parse_logformat_string(const char *fmt, struct proxy *curproxy, struct list *list_format, int options, int cap, char **err)
William Lallemand723b73a2012-02-08 16:37:49 +0100557{
Willy Tarreaub83bc1e2012-12-24 12:36:33 +0100558 char *sp, *str, *backfmt; /* start pointer for text parts */
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100559 char *arg = NULL; /* start pointer for args */
560 char *var = NULL; /* start pointer for vars */
561 int arg_len = 0;
562 int var_len = 0;
563 int cformat; /* current token format */
564 int pformat; /* previous token format */
William Lallemand723b73a2012-02-08 16:37:49 +0100565 struct logformat_node *tmplf, *back;
566
Willy Tarreaub83bc1e2012-12-24 12:36:33 +0100567 sp = str = backfmt = strdup(fmt);
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100568 if (!str) {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100569 memprintf(err, "out of memory error");
Thierry FOURNIER / OZON.IO9cbfef22016-11-22 23:24:10 +0100570 return 0;
571 }
William Lallemand1dc00ef2012-08-09 16:41:35 +0200572 curproxy->to_log |= LW_INIT;
William Lallemand5e19a282012-04-02 16:22:10 +0200573
William Lallemand723b73a2012-02-08 16:37:49 +0100574 /* flush the list first. */
William Lallemand1d705562012-03-12 12:46:41 +0100575 list_for_each_entry_safe(tmplf, back, list_format, list) {
William Lallemand723b73a2012-02-08 16:37:49 +0100576 LIST_DEL(&tmplf->list);
Dragan Dosen61302da2019-04-30 00:40:02 +0200577 release_sample_expr(tmplf->expr);
578 free(tmplf->arg);
William Lallemand723b73a2012-02-08 16:37:49 +0100579 free(tmplf);
580 }
581
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100582 for (cformat = LF_INIT; cformat != LF_END; str++) {
William Lallemand723b73a2012-02-08 16:37:49 +0100583 pformat = cformat;
584
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100585 if (!*str)
586 cformat = LF_END; // preset it to save all states from doing this
William Lallemand723b73a2012-02-08 16:37:49 +0100587
Joseph Herlant85b40592018-11-15 12:10:04 -0800588 /* The principle of the two-step state machine below is to first detect a change, and
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100589 * second have all common paths processed at one place. The common paths are the ones
590 * encountered in text areas (LF_INIT, LF_TEXT, LF_SEPARATOR) and at the end (LF_END).
591 * We use the common LF_INIT state to dispatch to the different final states.
592 */
593 switch (pformat) {
594 case LF_STARTVAR: // text immediately following a '%'
Willy Tarreauc8368452012-12-21 00:09:23 +0100595 arg = NULL; var = NULL;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100596 arg_len = var_len = 0;
597 if (*str == '{') { // optional argument
598 cformat = LF_STARG;
599 arg = str + 1;
William Lallemand723b73a2012-02-08 16:37:49 +0100600 }
Willy Tarreauc8368452012-12-21 00:09:23 +0100601 else if (*str == '[') {
602 cformat = LF_STEXPR;
603 var = str + 1; // store expr in variable name
604 }
Willy Tarreau0f28f822013-12-16 01:38:33 +0100605 else if (isalpha((unsigned char)*str)) { // variable name
William Lallemand723b73a2012-02-08 16:37:49 +0100606 cformat = LF_VAR;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100607 var = str;
William Lallemand723b73a2012-02-08 16:37:49 +0100608 }
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100609 else if (*str == '%')
610 cformat = LF_TEXT; // convert this character to a litteral (useful for '%')
Willy Tarreau0f28f822013-12-16 01:38:33 +0100611 else if (isdigit((unsigned char)*str) || *str == ' ' || *str == '\t') {
Willy Tarreau06d97f92013-12-02 17:45:48 +0100612 /* single '%' followed by blank or digit, send them both */
613 cformat = LF_TEXT;
614 pformat = LF_TEXT; /* finally we include the previous char as well */
615 sp = str - 1; /* send both the '%' and the current char */
Jim Freemana2278c82017-04-15 08:01:59 -0600616 memprintf(err, "unexpected variable name near '%c' at position %d line : '%s'. Maybe you want to write a single '%%', use the syntax '%%%%'",
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100617 *str, (int)(str - backfmt), fmt);
Willy Tarreau1a9f27f2019-12-11 12:05:39 +0100618 goto fail;
Willy Tarreau06d97f92013-12-02 17:45:48 +0100619
620 }
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100621 else
622 cformat = LF_INIT; // handle other cases of litterals
623 break;
624
625 case LF_STARG: // text immediately following '%{'
626 if (*str == '}') { // end of arg
William Lallemand723b73a2012-02-08 16:37:49 +0100627 cformat = LF_EDARG;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100628 arg_len = str - arg;
629 *str = 0; // used for reporting errors
William Lallemand723b73a2012-02-08 16:37:49 +0100630 }
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100631 break;
632
633 case LF_EDARG: // text immediately following '%{arg}'
Willy Tarreauc8368452012-12-21 00:09:23 +0100634 if (*str == '[') {
635 cformat = LF_STEXPR;
636 var = str + 1; // store expr in variable name
637 break;
638 }
Willy Tarreau0f28f822013-12-16 01:38:33 +0100639 else if (isalnum((unsigned char)*str)) { // variable name
William Lallemand723b73a2012-02-08 16:37:49 +0100640 cformat = LF_VAR;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100641 var = str;
642 break;
643 }
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100644 memprintf(err, "parse argument modifier without variable name near '%%{%s}'", arg);
Willy Tarreau1a9f27f2019-12-11 12:05:39 +0100645 goto fail;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100646
Willy Tarreauc8368452012-12-21 00:09:23 +0100647 case LF_STEXPR: // text immediately following '%['
648 if (*str == ']') { // end of arg
649 cformat = LF_EDEXPR;
650 var_len = str - var;
651 *str = 0; // needed for parsing the expression
652 }
653 break;
654
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100655 case LF_VAR: // text part of a variable name
656 var_len = str - var;
Willy Tarreau0f28f822013-12-16 01:38:33 +0100657 if (!isalnum((unsigned char)*str))
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100658 cformat = LF_INIT; // not variable name anymore
659 break;
660
Willy Tarreauc8368452012-12-21 00:09:23 +0100661 default: // LF_INIT, LF_TEXT, LF_SEPARATOR, LF_END, LF_EDEXPR
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100662 cformat = LF_INIT;
663 }
664
665 if (cformat == LF_INIT) { /* resynchronize state to text/sep/startvar */
666 switch (*str) {
667 case '%': cformat = LF_STARTVAR; break;
668 case ' ': cformat = LF_SEPARATOR; break;
669 case 0 : cformat = LF_END; break;
670 default : cformat = LF_TEXT; break;
William Lallemand723b73a2012-02-08 16:37:49 +0100671 }
672 }
673
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100674 if (cformat != pformat || pformat == LF_SEPARATOR) {
675 switch (pformat) {
676 case LF_VAR:
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100677 if (!parse_logformat_var(arg, arg_len, var, var_len, curproxy, list_format, &options, err))
Willy Tarreau1a9f27f2019-12-11 12:05:39 +0100678 goto fail;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100679 break;
Willy Tarreauc8368452012-12-21 00:09:23 +0100680 case LF_STEXPR:
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100681 if (!add_sample_to_logformat_list(var, arg, arg_len, curproxy, list_format, options, cap, err))
Willy Tarreau1a9f27f2019-12-11 12:05:39 +0100682 goto fail;
Willy Tarreauc8368452012-12-21 00:09:23 +0100683 break;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100684 case LF_TEXT:
685 case LF_SEPARATOR:
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100686 if (!add_to_logformat_list(sp, str, pformat, list_format, err))
Willy Tarreau1a9f27f2019-12-11 12:05:39 +0100687 goto fail;
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100688 break;
689 }
690 sp = str; /* new start of text at every state switch and at every separator */
William Lallemand723b73a2012-02-08 16:37:49 +0100691 }
692 }
Willy Tarreau8a3f52f2012-12-20 21:23:42 +0100693
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100694 if (pformat == LF_STARTVAR || pformat == LF_STARG || pformat == LF_STEXPR) {
Thierry FOURNIER / OZON.IO8a4e4422016-11-23 00:41:28 +0100695 memprintf(err, "truncated line after '%s'", var ? var : arg ? arg : "%");
Willy Tarreau1a9f27f2019-12-11 12:05:39 +0100696 goto fail;
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100697 }
Willy Tarreaub83bc1e2012-12-24 12:36:33 +0100698 free(backfmt);
Thierry FOURNIER / OZON.IOa2c38d72016-11-22 23:11:21 +0100699
700 return 1;
Willy Tarreau1a9f27f2019-12-11 12:05:39 +0100701 fail:
702 free(backfmt);
703 return 0;
William Lallemand723b73a2012-02-08 16:37:49 +0100704}
705
Christopher Faulet4b0b79d2018-03-26 15:54:32 +0200706/*
Frédéric Lécailled95ea282019-04-24 16:14:33 +0200707 * Parse the first range of indexes from a string made of a list of comma seperated
708 * ranges of indexes. Note that an index may be considered as a particular range
709 * with a high limit to the low limit.
710 */
711int get_logsrv_smp_range(unsigned int *low, unsigned int *high, char **arg, char **err)
712{
713 char *end, *p;
714
715 *low = *high = 0;
716
717 p = *arg;
718 end = strchr(p, ',');
719 if (!end)
720 end = p + strlen(p);
721
722 *high = *low = read_uint((const char **)&p, end);
723 if (!*low || (p != end && *p != '-'))
724 goto err;
725
726 if (p == end)
727 goto done;
728
729 p++;
730 *high = read_uint((const char **)&p, end);
731 if (!*high || *high <= *low || p != end)
732 goto err;
733
734 done:
735 if (*end == ',')
736 end++;
737 *arg = end;
738 return 1;
739
740 err:
741 memprintf(err, "wrong sample range '%s'", *arg);
742 return 0;
743}
744
745/*
746 * Returns 1 if the range defined by <low> and <high> overlaps
747 * one of them in <rgs> array of ranges with <sz> the size of this
748 * array, 0 if not.
749 */
750int smp_log_ranges_overlap(struct smp_log_range *rgs, size_t sz,
751 unsigned int low, unsigned int high, char **err)
752{
753 size_t i;
754
755 for (i = 0; i < sz; i++) {
756 if ((low >= rgs[i].low && low <= rgs[i].high) ||
757 (high >= rgs[i].low && high <= rgs[i].high)) {
758 memprintf(err, "ranges are overlapping");
759 return 1;
760 }
761 }
762
763 return 0;
764}
765
766int smp_log_range_cmp(const void *a, const void *b)
767{
768 const struct smp_log_range *rg_a = a;
769 const struct smp_log_range *rg_b = b;
770
771 if (rg_a->high < rg_b->low)
772 return -1;
773 else if (rg_a->low > rg_b->high)
774 return 1;
775
776 return 0;
777}
778
779/*
Christopher Faulet4b0b79d2018-03-26 15:54:32 +0200780 * Parse "log" keyword and update <logsrvs> list accordingly.
781 *
782 * When <do_del> is set, it means the "no log" line was parsed, so all log
783 * servers in <logsrvs> are released.
784 *
785 * Otherwise, we try to parse the "log" line. First of all, when the list is not
786 * the global one, we look for the parameter "global". If we find it,
787 * global.logsrvs is copied. Else we parse each arguments.
788 *
789 * The function returns 1 in success case, otherwise, it returns 0 and err is
790 * filled.
791 */
792int parse_logsrv(char **args, struct list *logsrvs, int do_del, char **err)
793{
794 struct sockaddr_storage *sk;
795 struct logsrv *logsrv = NULL;
796 int port1, port2;
797 int cur_arg;
798
799 /*
800 * "no log": delete previous herited or defined syslog
801 * servers.
802 */
803 if (do_del) {
804 struct logsrv *back;
805
806 if (*(args[1]) != 0) {
807 memprintf(err, "'no log' does not expect arguments");
808 goto error;
809 }
810
811 list_for_each_entry_safe(logsrv, back, logsrvs, list) {
812 LIST_DEL(&logsrv->list);
813 free(logsrv);
814 }
815 return 1;
816 }
817
818 /*
819 * "log global": copy global.logrsvs linked list to the end of logsrvs
820 * list. But first, we check (logsrvs != global.logsrvs).
821 */
822 if (*(args[1]) && *(args[2]) == 0 && !strcmp(args[1], "global")) {
823 if (logsrvs == &global.logsrvs) {
824 memprintf(err, "'global' is not supported for a global syslog server");
825 goto error;
826 }
827 list_for_each_entry(logsrv, &global.logsrvs, list) {
Christopher Faulet28ac0992018-03-26 16:09:19 +0200828 struct logsrv *node;
829
830 list_for_each_entry(node, logsrvs, list) {
831 if (node->ref == logsrv)
832 goto skip_logsrv;
833 }
834
835 node = malloc(sizeof(*node));
Christopher Faulet4b0b79d2018-03-26 15:54:32 +0200836 memcpy(node, logsrv, sizeof(struct logsrv));
Christopher Faulet28ac0992018-03-26 16:09:19 +0200837 node->ref = logsrv;
Christopher Faulet4b0b79d2018-03-26 15:54:32 +0200838 LIST_INIT(&node->list);
839 LIST_ADDQ(logsrvs, &node->list);
Christopher Faulet28ac0992018-03-26 16:09:19 +0200840
841 skip_logsrv:
842 continue;
Christopher Faulet4b0b79d2018-03-26 15:54:32 +0200843 }
844 return 1;
845 }
846
847 /*
848 * "log <address> ...: parse a syslog server line
849 */
850 if (*(args[1]) == 0 || *(args[2]) == 0) {
851 memprintf(err, "expects <address> and <facility> %s as arguments",
852 ((logsrvs == &global.logsrvs) ? "" : "or global"));
853 goto error;
854 }
855
Willy Tarreau5a32ecc2018-11-12 07:34:59 +0100856 /* take care of "stdout" and "stderr" as regular aliases for fd@1 / fd@2 */
857 if (strcmp(args[1], "stdout") == 0)
858 args[1] = "fd@1";
859 else if (strcmp(args[1], "stderr") == 0)
860 args[1] = "fd@2";
861
Christopher Faulet4b0b79d2018-03-26 15:54:32 +0200862 logsrv = calloc(1, sizeof(*logsrv));
863 if (!logsrv) {
864 memprintf(err, "out of memory");
865 goto error;
866 }
867
868 /* skip address for now, it will be parsed at the end */
869 cur_arg = 2;
870
871 /* just after the address, a length may be specified */
872 logsrv->maxlen = MAX_SYSLOG_LEN;
873 if (strcmp(args[cur_arg], "len") == 0) {
874 int len = atoi(args[cur_arg+1]);
875 if (len < 80 || len > 65535) {
876 memprintf(err, "invalid log length '%s', must be between 80 and 65535",
877 args[cur_arg+1]);
878 goto error;
879 }
880 logsrv->maxlen = len;
881 cur_arg += 2;
882 }
883 if (logsrv->maxlen > global.max_syslog_len)
884 global.max_syslog_len = logsrv->maxlen;
885
886 /* after the length, a format may be specified */
887 if (strcmp(args[cur_arg], "format") == 0) {
888 logsrv->format = get_log_format(args[cur_arg+1]);
889 if (logsrv->format < 0) {
890 memprintf(err, "unknown log format '%s'", args[cur_arg+1]);
891 goto error;
892 }
893 cur_arg += 2;
894 }
895
Frédéric Lécailled95ea282019-04-24 16:14:33 +0200896 if (strcmp(args[cur_arg], "sample") == 0) {
897 unsigned low, high;
898 char *p, *beg, *end, *smp_sz_str;
899 struct smp_log_range *smp_rgs = NULL;
900 size_t smp_rgs_sz = 0, smp_sz = 0, new_smp_sz;
901
902 p = args[cur_arg+1];
903 smp_sz_str = strchr(p, ':');
904 if (!smp_sz_str) {
905 memprintf(err, "Missing sample size");
906 goto error;
907 }
908
909 *smp_sz_str++ = '\0';
910
911 end = p + strlen(p);
912
913 while (p != end) {
914 if (!get_logsrv_smp_range(&low, &high, &p, err))
915 goto error;
916
917 if (smp_rgs && smp_log_ranges_overlap(smp_rgs, smp_rgs_sz, low, high, err))
918 goto error;
919
920 smp_rgs = my_realloc2(smp_rgs, (smp_rgs_sz + 1) * sizeof *smp_rgs);
921 if (!smp_rgs) {
922 memprintf(err, "out of memory error");
923 goto error;
924 }
925
926 smp_rgs[smp_rgs_sz].low = low;
927 smp_rgs[smp_rgs_sz].high = high;
928 smp_rgs[smp_rgs_sz].sz = high - low + 1;
929 smp_rgs[smp_rgs_sz].curr_idx = 0;
930 if (smp_rgs[smp_rgs_sz].high > smp_sz)
931 smp_sz = smp_rgs[smp_rgs_sz].high;
932 smp_rgs_sz++;
933 }
934
Tim Duesterhusf52039f2019-06-23 22:10:10 +0200935 if (smp_rgs == NULL) {
936 memprintf(err, "no sampling ranges given");
937 goto error;
938 }
939
Frédéric Lécailled95ea282019-04-24 16:14:33 +0200940 beg = smp_sz_str;
941 end = beg + strlen(beg);
942 new_smp_sz = read_uint((const char **)&beg, end);
943 if (!new_smp_sz || beg != end) {
944 memprintf(err, "wrong sample size '%s' for sample range '%s'",
945 smp_sz_str, args[cur_arg+1]);
946 goto error;
947 }
948
949 if (new_smp_sz < smp_sz) {
950 memprintf(err, "sample size %zu should be greater or equal to "
951 "%zu the maximum of the high ranges limits",
952 new_smp_sz, smp_sz);
953 goto error;
954 }
955 smp_sz = new_smp_sz;
956
957 /* Let's order <smp_rgs> array. */
958 qsort(smp_rgs, smp_rgs_sz, sizeof(struct smp_log_range), smp_log_range_cmp);
959
960 logsrv->lb.smp_rgs = smp_rgs;
961 logsrv->lb.smp_rgs_sz = smp_rgs_sz;
962 logsrv->lb.smp_sz = smp_sz;
963
964 cur_arg += 2;
965 }
Frédéric Lécailled803e472019-04-25 07:42:09 +0200966 HA_SPIN_INIT(&logsrv->lock);
Christopher Faulet4b0b79d2018-03-26 15:54:32 +0200967 /* parse the facility */
968 logsrv->facility = get_log_facility(args[cur_arg]);
969 if (logsrv->facility < 0) {
970 memprintf(err, "unknown log facility '%s'", args[cur_arg]);
971 goto error;
972 }
973 cur_arg++;
974
975 /* parse the max syslog level (default: debug) */
976 logsrv->level = 7;
977 if (*(args[cur_arg])) {
978 logsrv->level = get_log_level(args[cur_arg]);
979 if (logsrv->level < 0) {
980 memprintf(err, "unknown optional log level '%s'", args[cur_arg]);
981 goto error;
982 }
983 cur_arg++;
984 }
985
986 /* parse the limit syslog level (default: emerg) */
987 logsrv->minlvl = 0;
988 if (*(args[cur_arg])) {
989 logsrv->minlvl = get_log_level(args[cur_arg]);
990 if (logsrv->minlvl < 0) {
991 memprintf(err, "unknown optional minimum log level '%s'", args[cur_arg]);
992 goto error;
993 }
994 cur_arg++;
995 }
996
997 /* Too many args */
998 if (*(args[cur_arg])) {
999 memprintf(err, "cannot handle unexpected argument '%s'", args[cur_arg]);
1000 goto error;
1001 }
1002
1003 /* now, back to the address */
1004 sk = str2sa_range(args[1], NULL, &port1, &port2, err, NULL, NULL, 1);
1005 if (!sk)
1006 goto error;
1007 logsrv->addr = *sk;
1008
1009 if (sk->ss_family == AF_INET || sk->ss_family == AF_INET6) {
1010 if (port1 != port2) {
1011 memprintf(err, "port ranges and offsets are not allowed in '%s'", args[1]);
1012 goto error;
1013 }
1014 logsrv->addr = *sk;
1015 if (!port1)
1016 set_host_port(&logsrv->addr, SYSLOG_PORT);
1017 }
1018 LIST_ADDQ(logsrvs, &logsrv->list);
1019 return 1;
1020
1021 error:
1022 free(logsrv);
1023 return 0;
1024}
1025
1026
Christopher Fauletd4696382017-10-24 11:44:05 +02001027/* Generic function to display messages prefixed by a label */
1028static void print_message(const char *label, const char *fmt, va_list argp)
1029{
1030 struct tm tm;
1031 char *head, *msg;
1032
1033 head = msg = NULL;
1034
1035 get_localtime(date.tv_sec, &tm);
1036 memprintf(&head, "[%s] %03d/%02d%02d%02d (%d) : ",
1037 label, tm.tm_yday, tm.tm_hour, tm.tm_min, tm.tm_sec, (int)getpid());
1038 memvprintf(&msg, fmt, argp);
1039
Willy Tarreaud83e71c2019-11-15 16:00:12 +01001040 if (global.mode & MODE_STARTING &&
1041 (!startup_logs || strlen(startup_logs) + strlen(head) + strlen(msg) < global.tune.bufsize))
Christopher Fauletd4696382017-10-24 11:44:05 +02001042 memprintf(&startup_logs, "%s%s%s", (startup_logs ? startup_logs : ""), head, msg);
1043
1044 fprintf(stderr, "%s%s", head, msg);
1045 fflush(stderr);
1046
1047 free(head);
1048 free(msg);
1049}
1050
Willy Tarreaubaaee002006-06-26 02:48:02 +02001051/*
1052 * Displays the message on stderr with the date and pid. Overrides the quiet
1053 * mode during startup.
1054 */
Christopher Faulet767a84b2017-11-24 16:50:31 +01001055void ha_alert(const char *fmt, ...)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001056{
1057 va_list argp;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001058
1059 if (!(global.mode & MODE_QUIET) || (global.mode & (MODE_VERBOSE | MODE_STARTING))) {
1060 va_start(argp, fmt);
Christopher Fauletd4696382017-10-24 11:44:05 +02001061 print_message("ALERT", fmt, argp);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001062 va_end(argp);
1063 }
1064}
1065
1066
1067/*
1068 * Displays the message on stderr with the date and pid.
1069 */
Christopher Faulet767a84b2017-11-24 16:50:31 +01001070void ha_warning(const char *fmt, ...)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001071{
1072 va_list argp;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001073
1074 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
1075 va_start(argp, fmt);
Christopher Fauletd4696382017-10-24 11:44:05 +02001076 print_message("WARNING", fmt, argp);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001077 va_end(argp);
1078 }
1079}
1080
1081/*
William Lallemand9c56a222018-11-21 18:04:52 +01001082 * Displays the message on stderr with the date and pid.
1083 */
1084void ha_notice(const char *fmt, ...)
1085{
1086 va_list argp;
1087
1088 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
1089 va_start(argp, fmt);
1090 print_message("NOTICE", fmt, argp);
1091 va_end(argp);
1092 }
1093}
1094
1095/*
Willy Tarreaubaaee002006-06-26 02:48:02 +02001096 * Displays the message on <out> only if quiet mode is not set.
1097 */
Willy Tarreaub17916e2006-10-15 15:17:57 +02001098void qfprintf(FILE *out, const char *fmt, ...)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001099{
1100 va_list argp;
1101
1102 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
1103 va_start(argp, fmt);
1104 vfprintf(out, fmt, argp);
1105 fflush(out);
1106 va_end(argp);
1107 }
1108}
1109
1110/*
Dragan Dosen1322d092015-09-22 16:05:32 +02001111 * returns log format for <fmt> or -1 if not found.
1112 */
1113int get_log_format(const char *fmt)
1114{
1115 int format;
1116
1117 format = LOG_FORMATS - 1;
Dragan Dosen43885c72015-10-01 13:18:13 +02001118 while (format >= 0 && strcmp(log_formats[format].name, fmt))
Dragan Dosen1322d092015-09-22 16:05:32 +02001119 format--;
1120
1121 return format;
1122}
1123
1124/*
Willy Tarreaubaaee002006-06-26 02:48:02 +02001125 * returns log level for <lev> or -1 if not found.
1126 */
1127int get_log_level(const char *lev)
1128{
1129 int level;
1130
1131 level = NB_LOG_LEVELS - 1;
1132 while (level >= 0 && strcmp(log_levels[level], lev))
1133 level--;
1134
1135 return level;
1136}
1137
Willy Tarreaubaaee002006-06-26 02:48:02 +02001138/*
1139 * returns log facility for <fac> or -1 if not found.
1140 */
1141int get_log_facility(const char *fac)
1142{
1143 int facility;
1144
1145 facility = NB_LOG_FACILITIES - 1;
1146 while (facility >= 0 && strcmp(log_facilities[facility], fac))
1147 facility--;
William Lallemand2a4a44f2012-02-06 16:00:33 +01001148
Willy Tarreaubaaee002006-06-26 02:48:02 +02001149 return facility;
1150}
1151
William Lallemanda1cc3812012-02-08 16:38:44 +01001152/*
Dragan Dosen835b9212016-02-12 13:23:03 +01001153 * Encode the string.
1154 *
1155 * When using the +E log format option, it will try to escape '"\]'
1156 * characters with '\' as prefix. The same prefix should not be used as
1157 * <escape>.
1158 */
1159static char *lf_encode_string(char *start, char *stop,
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001160 const char escape, const long *map,
Dragan Dosen835b9212016-02-12 13:23:03 +01001161 const char *string,
1162 struct logformat_node *node)
1163{
1164 if (node->options & LOG_OPT_ESC) {
1165 if (start < stop) {
1166 stop--; /* reserve one byte for the final '\0' */
1167 while (start < stop && *string != '\0') {
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001168 if (!ha_bit_test((unsigned char)(*string), map)) {
1169 if (!ha_bit_test((unsigned char)(*string), rfc5424_escape_map))
Dragan Dosen835b9212016-02-12 13:23:03 +01001170 *start++ = *string;
1171 else {
1172 if (start + 2 >= stop)
1173 break;
1174 *start++ = '\\';
1175 *start++ = *string;
1176 }
1177 }
1178 else {
1179 if (start + 3 >= stop)
1180 break;
1181 *start++ = escape;
1182 *start++ = hextab[(*string >> 4) & 15];
1183 *start++ = hextab[*string & 15];
1184 }
1185 string++;
1186 }
1187 *start = '\0';
1188 }
1189 }
1190 else {
1191 return encode_string(start, stop, escape, map, string);
1192 }
1193
1194 return start;
1195}
1196
1197/*
1198 * Encode the chunk.
1199 *
1200 * When using the +E log format option, it will try to escape '"\]'
1201 * characters with '\' as prefix. The same prefix should not be used as
1202 * <escape>.
1203 */
1204static char *lf_encode_chunk(char *start, char *stop,
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001205 const char escape, const long *map,
Willy Tarreau83061a82018-07-13 11:56:34 +02001206 const struct buffer *chunk,
Dragan Dosen835b9212016-02-12 13:23:03 +01001207 struct logformat_node *node)
1208{
1209 char *str, *end;
1210
1211 if (node->options & LOG_OPT_ESC) {
1212 if (start < stop) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001213 str = chunk->area;
1214 end = chunk->area + chunk->data;
Dragan Dosen835b9212016-02-12 13:23:03 +01001215
1216 stop--; /* reserve one byte for the final '\0' */
1217 while (start < stop && str < end) {
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001218 if (!ha_bit_test((unsigned char)(*str), map)) {
1219 if (!ha_bit_test((unsigned char)(*str), rfc5424_escape_map))
Dragan Dosen835b9212016-02-12 13:23:03 +01001220 *start++ = *str;
1221 else {
1222 if (start + 2 >= stop)
1223 break;
1224 *start++ = '\\';
1225 *start++ = *str;
1226 }
1227 }
1228 else {
1229 if (start + 3 >= stop)
1230 break;
1231 *start++ = escape;
1232 *start++ = hextab[(*str >> 4) & 15];
1233 *start++ = hextab[*str & 15];
1234 }
1235 str++;
1236 }
1237 *start = '\0';
1238 }
1239 }
1240 else {
1241 return encode_chunk(start, stop, escape, map, chunk);
1242 }
1243
1244 return start;
1245}
1246
1247/*
William Lallemanda1cc3812012-02-08 16:38:44 +01001248 * Write a string in the log string
Dragan Dosen835b9212016-02-12 13:23:03 +01001249 * Take cares of quote and escape options
William Lallemanda1cc3812012-02-08 16:38:44 +01001250 *
Joseph Herlant85b40592018-11-15 12:10:04 -08001251 * Return the address of the \0 character, or NULL on error
William Lallemanda1cc3812012-02-08 16:38:44 +01001252 */
Willy Tarreau26ffa852018-09-05 15:23:10 +02001253char *lf_text_len(char *dst, const char *src, size_t len, size_t size, const struct logformat_node *node)
William Lallemanda1cc3812012-02-08 16:38:44 +01001254{
Willy Tarreau2b0108a2012-12-21 19:23:44 +01001255 if (size < 2)
1256 return NULL;
William Lallemanda1cc3812012-02-08 16:38:44 +01001257
Willy Tarreau2b0108a2012-12-21 19:23:44 +01001258 if (node->options & LOG_OPT_QUOTE) {
1259 *(dst++) = '"';
1260 size--;
William Lallemandbddd4fd2012-02-27 11:23:10 +01001261 }
Willy Tarreau2b0108a2012-12-21 19:23:44 +01001262
Willy Tarreau6cbbdbf2013-02-05 18:52:25 +01001263 if (src && len) {
Dragan Dosendb1b6f92016-07-25 11:35:02 +02001264 if (++len > size)
1265 len = size;
Dragan Dosen835b9212016-02-12 13:23:03 +01001266 if (node->options & LOG_OPT_ESC) {
Dragan Dosen835b9212016-02-12 13:23:03 +01001267 char *ret;
1268
Dragan Dosendb1b6f92016-07-25 11:35:02 +02001269 ret = escape_string(dst, dst + len, '\\', rfc5424_escape_map, src);
Dragan Dosen835b9212016-02-12 13:23:03 +01001270 if (ret == NULL || *ret != '\0')
1271 return NULL;
1272 len = ret - dst;
1273 }
1274 else {
Dragan Dosen835b9212016-02-12 13:23:03 +01001275 len = strlcpy2(dst, src, len);
1276 }
Willy Tarreau2b0108a2012-12-21 19:23:44 +01001277
1278 size -= len;
1279 dst += len;
1280 }
Willy Tarreau6cbbdbf2013-02-05 18:52:25 +01001281 else if ((node->options & (LOG_OPT_QUOTE|LOG_OPT_MANDATORY)) == LOG_OPT_MANDATORY) {
1282 if (size < 2)
1283 return NULL;
1284 *(dst++) = '-';
1285 }
Willy Tarreau2b0108a2012-12-21 19:23:44 +01001286
1287 if (node->options & LOG_OPT_QUOTE) {
1288 if (size < 2)
1289 return NULL;
1290 *(dst++) = '"';
1291 }
1292
1293 *dst = '\0';
William Lallemandbddd4fd2012-02-27 11:23:10 +01001294 return dst;
William Lallemanda1cc3812012-02-08 16:38:44 +01001295}
1296
Willy Tarreau26ffa852018-09-05 15:23:10 +02001297static inline char *lf_text(char *dst, const char *src, size_t size, const struct logformat_node *node)
Willy Tarreau2b0108a2012-12-21 19:23:44 +01001298{
1299 return lf_text_len(dst, src, size, size, node);
1300}
1301
William Lallemand5f232402012-04-05 18:02:55 +02001302/*
Joseph Herlant85b40592018-11-15 12:10:04 -08001303 * Write a IP address to the log string
William Lallemand5f232402012-04-05 18:02:55 +02001304 * +X option write in hexadecimal notation, most signifant byte on the left
1305 */
Willy Tarreau26ffa852018-09-05 15:23:10 +02001306char *lf_ip(char *dst, const struct sockaddr *sockaddr, size_t size, const struct logformat_node *node)
William Lallemand5f232402012-04-05 18:02:55 +02001307{
1308 char *ret = dst;
1309 int iret;
1310 char pn[INET6_ADDRSTRLEN];
1311
1312 if (node->options & LOG_OPT_HEXA) {
Radek Zajic594c4562019-03-22 10:21:54 +00001313 unsigned char *addr = NULL;
1314 switch (sockaddr->sa_family) {
1315 case AF_INET:
1316 addr = (unsigned char *)&((struct sockaddr_in *)sockaddr)->sin_addr.s_addr;
1317 iret = snprintf(dst, size, "%02X%02X%02X%02X", addr[0], addr[1], addr[2], addr[3]);
1318 break;
1319 case AF_INET6:
1320 addr = (unsigned char *)&((struct sockaddr_in6 *)sockaddr)->sin6_addr.s6_addr;
1321 iret = snprintf(dst, size, "%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X",
1322 addr[0], addr[1], addr[2], addr[3], addr[4], addr[5], addr[6], addr[7],
1323 addr[8], addr[9], addr[10], addr[11], addr[12], addr[13], addr[14], addr[15]);
1324 break;
1325 default:
1326 return NULL;
1327 }
William Lallemand5f232402012-04-05 18:02:55 +02001328 if (iret < 0 || iret > size)
1329 return NULL;
1330 ret += iret;
1331 } else {
1332 addr_to_str((struct sockaddr_storage *)sockaddr, pn, sizeof(pn));
1333 ret = lf_text(dst, pn, size, node);
1334 if (ret == NULL)
1335 return NULL;
1336 }
1337 return ret;
1338}
1339
1340/*
1341 * Write a port to the log
1342 * +X option write in hexadecimal notation, most signifant byte on the left
1343 */
Willy Tarreau26ffa852018-09-05 15:23:10 +02001344char *lf_port(char *dst, const struct sockaddr *sockaddr, size_t size, const struct logformat_node *node)
William Lallemand5f232402012-04-05 18:02:55 +02001345{
1346 char *ret = dst;
1347 int iret;
1348
1349 if (node->options & LOG_OPT_HEXA) {
1350 const unsigned char *port = (const unsigned char *)&((struct sockaddr_in *)sockaddr)->sin_port;
1351 iret = snprintf(dst, size, "%02X%02X", port[0], port[1]);
1352 if (iret < 0 || iret > size)
1353 return NULL;
1354 ret += iret;
1355 } else {
1356 ret = ltoa_o(get_host_port((struct sockaddr_storage *)sockaddr), dst, size);
1357 if (ret == NULL)
1358 return NULL;
1359 }
1360 return ret;
1361}
1362
Dragan Dosen1322d092015-09-22 16:05:32 +02001363/* Re-generate time-based part of the syslog header in RFC3164 format at
1364 * the beginning of logheader once a second and return the pointer to the
1365 * first character after it.
Willy Tarreaub1a2faf2012-03-19 16:51:53 +01001366 */
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001367static char *update_log_hdr(const time_t time)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001368{
Christopher Fauletf8188c62017-06-02 16:20:16 +02001369 static THREAD_LOCAL long tvsec;
Willy Tarreau83061a82018-07-13 11:56:34 +02001370 static THREAD_LOCAL struct buffer host = { };
Christopher Fauletf8188c62017-06-02 16:20:16 +02001371 static THREAD_LOCAL int sep = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001372
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001373 if (unlikely(time != tvsec || logheader_end == NULL)) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001374 /* this string is rebuild only once a second */
Willy Tarreaufe944602007-10-25 10:34:16 +02001375 struct tm tm;
Willy Tarreaub1a2faf2012-03-19 16:51:53 +01001376 int hdr_len;
Willy Tarreaufe944602007-10-25 10:34:16 +02001377
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001378 tvsec = time;
Willy Tarreaufe944602007-10-25 10:34:16 +02001379 get_localtime(tvsec, &tm);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001380
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001381 if (unlikely(global.log_send_hostname != host.area)) {
1382 host.area = global.log_send_hostname;
1383 host.data = host.area ? strlen(host.area) : 0;
1384 sep = host.data ? 1 : 0;
Dragan Dosen43885c72015-10-01 13:18:13 +02001385 }
1386
Dragan Dosen59cee972015-09-19 22:09:02 +02001387 hdr_len = snprintf(logheader, global.max_syslog_len,
Dragan Dosen43885c72015-10-01 13:18:13 +02001388 "<<<<>%s %2d %02d:%02d:%02d %.*s%*s",
Willy Tarreaufe944602007-10-25 10:34:16 +02001389 monthname[tm.tm_mon],
Dragan Dosen43885c72015-10-01 13:18:13 +02001390 tm.tm_mday, tm.tm_hour, tm.tm_min, tm.tm_sec,
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001391 (int)host.data, host.area, sep, "");
Willy Tarreaubaaee002006-06-26 02:48:02 +02001392 /* WARNING: depending upon implementations, snprintf may return
1393 * either -1 or the number of bytes that would be needed to store
1394 * the total message. In both cases, we must adjust it.
1395 */
Willy Tarreau18324f52014-06-27 18:10:07 +02001396 if (hdr_len < 0 || hdr_len > global.max_syslog_len)
1397 hdr_len = global.max_syslog_len;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001398
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001399 logheader_end = logheader + hdr_len;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001400 }
1401
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001402 logheader_end[0] = 0; // ensure we get rid of any previous attempt
Willy Tarreau094af4e2015-01-07 15:03:42 +01001403
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001404 return logheader_end;
William Lallemand2a4a44f2012-02-06 16:00:33 +01001405}
1406
Dragan Dosen1322d092015-09-22 16:05:32 +02001407/* Re-generate time-based part of the syslog header in RFC5424 format at
1408 * the beginning of logheader_rfc5424 once a second and return the pointer
1409 * to the first character after it.
1410 */
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001411static char *update_log_hdr_rfc5424(const time_t time)
Dragan Dosen1322d092015-09-22 16:05:32 +02001412{
Christopher Fauletf8188c62017-06-02 16:20:16 +02001413 static THREAD_LOCAL long tvsec;
Benoit GARNIERb413c2a2016-03-27 11:08:03 +02001414 const char *gmt_offset;
Dragan Dosen1322d092015-09-22 16:05:32 +02001415
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001416 if (unlikely(time != tvsec || logheader_rfc5424_end == NULL)) {
Dragan Dosen1322d092015-09-22 16:05:32 +02001417 /* this string is rebuild only once a second */
1418 struct tm tm;
1419 int hdr_len;
1420
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001421 tvsec = time;
Dragan Dosen1322d092015-09-22 16:05:32 +02001422 get_localtime(tvsec, &tm);
Benoit GARNIERe2e5bde2016-03-27 03:04:16 +02001423 gmt_offset = get_gmt_offset(time, &tm);
Dragan Dosen1322d092015-09-22 16:05:32 +02001424
1425 hdr_len = snprintf(logheader_rfc5424, global.max_syslog_len,
Dragan Dosen17def462015-10-09 21:31:43 +02001426 "<<<<>1 %4d-%02d-%02dT%02d:%02d:%02d%.3s:%.2s %s ",
Dragan Dosen1322d092015-09-22 16:05:32 +02001427 tm.tm_year+1900, tm.tm_mon+1, tm.tm_mday,
Dragan Dosen17def462015-10-09 21:31:43 +02001428 tm.tm_hour, tm.tm_min, tm.tm_sec,
Benoit GARNIERb413c2a2016-03-27 11:08:03 +02001429 gmt_offset, gmt_offset+3,
Dragan Dosen43885c72015-10-01 13:18:13 +02001430 global.log_send_hostname ? global.log_send_hostname : hostname);
Dragan Dosen1322d092015-09-22 16:05:32 +02001431 /* WARNING: depending upon implementations, snprintf may return
1432 * either -1 or the number of bytes that would be needed to store
1433 * the total message. In both cases, we must adjust it.
1434 */
1435 if (hdr_len < 0 || hdr_len > global.max_syslog_len)
1436 hdr_len = global.max_syslog_len;
1437
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001438 logheader_rfc5424_end = logheader_rfc5424 + hdr_len;
Dragan Dosen1322d092015-09-22 16:05:32 +02001439 }
1440
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001441 logheader_rfc5424_end[0] = 0; // ensure we get rid of any previous attempt
Dragan Dosen1322d092015-09-22 16:05:32 +02001442
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001443 return logheader_rfc5424_end;
Dragan Dosen1322d092015-09-22 16:05:32 +02001444}
1445
William Lallemand2a4a44f2012-02-06 16:00:33 +01001446/*
Dragan Dosen59cee972015-09-19 22:09:02 +02001447 * This function sends the syslog message using a printf format string. It
1448 * expects an LF-terminated message.
William Lallemand2a4a44f2012-02-06 16:00:33 +01001449 */
1450void send_log(struct proxy *p, int level, const char *format, ...)
1451{
1452 va_list argp;
Willy Tarreaub1a2faf2012-03-19 16:51:53 +01001453 int data_len;
William Lallemand2a4a44f2012-02-06 16:00:33 +01001454
Willy Tarreau8c97ab52015-01-15 16:29:53 +01001455 if (level < 0 || format == NULL || logline == NULL)
William Lallemand2a4a44f2012-02-06 16:00:33 +01001456 return;
1457
William Lallemand2a4a44f2012-02-06 16:00:33 +01001458 va_start(argp, format);
Dragan Dosen59cee972015-09-19 22:09:02 +02001459 data_len = vsnprintf(logline, global.max_syslog_len, format, argp);
Willy Tarreau18324f52014-06-27 18:10:07 +02001460 if (data_len < 0 || data_len > global.max_syslog_len)
1461 data_len = global.max_syslog_len;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001462 va_end(argp);
William Lallemand2a4a44f2012-02-06 16:00:33 +01001463
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001464 __send_log(p, level, logline, data_len, default_rfc5424_sd_log_format, 2);
William Lallemand2a4a44f2012-02-06 16:00:33 +01001465}
1466
1467/*
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001468 * This function sends a syslog message to <logsrv>.
1469 * <pid_str> is the string to be used for the PID of the caller, <pid_size> is length.
1470 * Same thing for <sd> and <sd_size> which are used for the structured-data part
1471 * in RFC5424 formatted syslog messages, and <tag_str> and <tag_size> the syslog tag.
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001472 * It overrides the last byte of the message vector with an LF character.
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001473 * Does not return any error,
William Lallemand2a4a44f2012-02-06 16:00:33 +01001474 */
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001475static inline void __do_send_log(struct logsrv *logsrv, int nblogger, char *pid_str, size_t pid_size,
1476 int level, char *message, size_t size, char *sd, size_t sd_size,
1477 char *tag_str, size_t tag_size)
William Lallemand2a4a44f2012-02-06 16:00:33 +01001478{
Christopher Fauletf8188c62017-06-02 16:20:16 +02001479 static THREAD_LOCAL struct iovec iovec[NB_MSG_IOVEC_ELEMENTS] = { };
1480 static THREAD_LOCAL struct msghdr msghdr = {
1481 //.msg_iov = iovec,
Dragan Dosen609ac2a2015-09-16 18:25:42 +02001482 .msg_iovlen = NB_MSG_IOVEC_ELEMENTS
1483 };
Christopher Fauletf8188c62017-06-02 16:20:16 +02001484 static THREAD_LOCAL int logfdunix = -1; /* syslog to AF_UNIX socket */
1485 static THREAD_LOCAL int logfdinet = -1; /* syslog to AF_INET socket */
1486 static THREAD_LOCAL char *dataptr = NULL;
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001487 time_t time = date.tv_sec;
Dragan Dosen1322d092015-09-22 16:05:32 +02001488 char *hdr, *hdr_ptr;
Dragan Dosen59cee972015-09-19 22:09:02 +02001489 size_t hdr_size;
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001490 int fac_level;
1491 int *plogfd;
1492 char *pid_sep1 = "", *pid_sep2 = "";
1493 char logheader_short[3];
1494 int sent;
1495 int maxlen;
1496 int hdr_max = 0;
1497 int tag_max = 0;
1498 int pid_sep1_max = 0;
Frédéric Lécaille90a10ae2019-05-14 10:57:58 +02001499 int pid_max = 0;
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001500 int pid_sep2_max = 0;
1501 int sd_max = 0;
1502 int max = 0;
Christopher Fauletf8188c62017-06-02 16:20:16 +02001503
1504 msghdr.msg_iov = iovec;
William Lallemand2a4a44f2012-02-06 16:00:33 +01001505
1506 dataptr = message;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001507
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001508 if (logsrv->addr.ss_family == AF_UNSPEC) {
1509 /* the socket's address is a file descriptor */
1510 plogfd = (int *)&((struct sockaddr_in *)&logsrv->addr)->sin_addr.s_addr;
1511 if (unlikely(!((struct sockaddr_in *)&logsrv->addr)->sin_port)) {
1512 /* FD not yet initialized to non-blocking mode.
1513 * DON'T DO IT ON A TERMINAL!
1514 */
1515 if (!isatty(*plogfd))
1516 fcntl(*plogfd, F_SETFL, O_NONBLOCK);
1517 ((struct sockaddr_in *)&logsrv->addr)->sin_port = 1;
Dragan Dosen43885c72015-10-01 13:18:13 +02001518 }
Robert Tsai81ae1952007-12-05 10:47:29 +01001519 }
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001520 else if (logsrv->addr.ss_family == AF_UNIX)
1521 plogfd = &logfdunix;
1522 else
1523 plogfd = &logfdinet;
Robert Tsai81ae1952007-12-05 10:47:29 +01001524
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001525 if (unlikely(*plogfd < 0)) {
1526 /* socket not successfully initialized yet */
1527 if ((*plogfd = socket(logsrv->addr.ss_family, SOCK_DGRAM,
1528 (logsrv->addr.ss_family == AF_UNIX) ? 0 : IPPROTO_UDP)) < 0) {
1529 static char once;
William Lallemand0f99e342011-10-12 17:50:54 +02001530
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001531 if (!once) {
1532 once = 1; /* note: no need for atomic ops here */
1533 ha_alert("socket() failed in logger #%d: %s (errno=%d)\n",
1534 nblogger, strerror(errno), errno);
1535 }
1536 return;
1537 } else {
1538 /* we don't want to receive anything on this socket */
1539 setsockopt(*plogfd, SOL_SOCKET, SO_RCVBUF, &zero, sizeof(zero));
1540 /* does nothing under Linux, maybe needed for others */
1541 shutdown(*plogfd, SHUT_RD);
1542 fcntl(*plogfd, F_SETFD, fcntl(*plogfd, F_GETFD, FD_CLOEXEC) | FD_CLOEXEC);
1543 }
Dragan Dosen43885c72015-10-01 13:18:13 +02001544 }
1545
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001546 switch (logsrv->format) {
1547 case LOG_FORMAT_RFC3164:
1548 hdr = logheader;
1549 hdr_ptr = update_log_hdr(time);
1550 break;
Willy Tarreauc7c7be22014-06-23 18:07:15 +02001551
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001552 case LOG_FORMAT_RFC5424:
1553 hdr = logheader_rfc5424;
1554 hdr_ptr = update_log_hdr_rfc5424(time);
1555 sd_max = sd_size; /* the SD part allowed only in RFC5424 */
1556 break;
William Lallemandbddd4fd2012-02-27 11:23:10 +01001557
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001558 case LOG_FORMAT_SHORT:
1559 /* all fields are known, skip the header generation */
1560 hdr = logheader_short;
1561 hdr[0] = '<';
1562 hdr[1] = '0' + MAX(level, logsrv->minlvl);
1563 hdr[2] = '>';
1564 hdr_ptr = hdr;
1565 hdr_max = 3;
1566 maxlen = logsrv->maxlen - hdr_max;
1567 max = MIN(size, maxlen) - 1;
1568 goto send;
Willy Tarreau204e3f12018-12-15 15:48:48 +01001569
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001570 case LOG_FORMAT_RAW:
1571 /* all fields are known, skip the header generation */
1572 hdr_ptr = hdr = "";
1573 hdr_max = 0;
1574 maxlen = logsrv->maxlen;
1575 max = MIN(size, maxlen) - 1;
1576 goto send;
Willy Tarreauc98aebc2018-03-20 11:17:29 +01001577
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001578 default:
1579 return; /* must never happen */
1580 }
Willy Tarreauc7c7be22014-06-23 18:07:15 +02001581
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001582 hdr_size = hdr_ptr - hdr;
Dragan Dosen1322d092015-09-22 16:05:32 +02001583
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001584 /* For each target, we may have a different facility.
1585 * We can also have a different log level for each message.
1586 * This induces variations in the message header length.
1587 * Since we don't want to recompute it each time, nor copy it every
1588 * time, we only change the facility in the pre-computed header,
1589 * and we change the pointer to the header accordingly.
1590 */
1591 fac_level = (logsrv->facility << 3) + MAX(level, logsrv->minlvl);
1592 hdr_ptr = hdr + 3; /* last digit of the log level */
1593 do {
1594 *hdr_ptr = '0' + fac_level % 10;
1595 fac_level /= 10;
1596 hdr_ptr--;
1597 } while (fac_level && hdr_ptr > hdr);
1598 *hdr_ptr = '<';
Dragan Dosen1322d092015-09-22 16:05:32 +02001599
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001600 hdr_max = hdr_size - (hdr_ptr - hdr);
Willy Tarreaue8746a02018-11-12 08:45:00 +01001601
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001602 /* time-based header */
1603 if (unlikely(hdr_size >= logsrv->maxlen)) {
1604 hdr_max = MIN(hdr_max, logsrv->maxlen) - 1;
1605 sd_max = 0;
1606 goto send;
1607 }
Willy Tarreauc1b06452018-11-12 11:57:56 +01001608
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001609 maxlen = logsrv->maxlen - hdr_max;
Dragan Dosen1322d092015-09-22 16:05:32 +02001610
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001611 /* tag */
Frédéric Lécaille90a10ae2019-05-14 10:57:58 +02001612 tag_max = tag_size;
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001613 if (unlikely(tag_max >= maxlen)) {
1614 tag_max = maxlen - 1;
1615 sd_max = 0;
1616 goto send;
1617 }
Dragan Dosen1322d092015-09-22 16:05:32 +02001618
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001619 maxlen -= tag_max;
William Lallemand2a4a44f2012-02-06 16:00:33 +01001620
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001621 /* first pid separator */
1622 pid_sep1_max = log_formats[logsrv->format].pid.sep1.data;
1623 if (unlikely(pid_sep1_max >= maxlen)) {
1624 pid_sep1_max = maxlen - 1;
1625 sd_max = 0;
1626 goto send;
1627 }
Dragan Dosen59cee972015-09-19 22:09:02 +02001628
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001629 pid_sep1 = log_formats[logsrv->format].pid.sep1.area;
1630 maxlen -= pid_sep1_max;
Dragan Dosen59cee972015-09-19 22:09:02 +02001631
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001632 /* pid */
Frédéric Lécaille90a10ae2019-05-14 10:57:58 +02001633 pid_max = pid_size;
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001634 if (unlikely(pid_size >= maxlen)) {
1635 pid_size = maxlen - 1;
1636 sd_max = 0;
1637 goto send;
1638 }
Dragan Dosen68d2e3a2015-09-19 22:35:44 +02001639
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001640 maxlen -= pid_size;
Dragan Dosen43885c72015-10-01 13:18:13 +02001641
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001642 /* second pid separator */
1643 pid_sep2_max = log_formats[logsrv->format].pid.sep2.data;
1644 if (unlikely(pid_sep2_max >= maxlen)) {
1645 pid_sep2_max = maxlen - 1;
1646 sd_max = 0;
1647 goto send;
1648 }
Dragan Dosen43885c72015-10-01 13:18:13 +02001649
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001650 pid_sep2 = log_formats[logsrv->format].pid.sep2.area;
1651 maxlen -= pid_sep2_max;
Dragan Dosen68d2e3a2015-09-19 22:35:44 +02001652
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001653 /* structured-data */
1654 if (sd_max >= maxlen) {
1655 sd_max = maxlen - 1;
1656 goto send;
1657 }
Dragan Dosen59cee972015-09-19 22:09:02 +02001658
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001659 max = MIN(size, maxlen - sd_max) - 1;
1660send:
1661 iovec[0].iov_base = hdr_ptr;
1662 iovec[0].iov_len = hdr_max;
1663 iovec[1].iov_base = tag_str;
Frédéric Lécaille90a10ae2019-05-14 10:57:58 +02001664 iovec[1].iov_len = tag_max;
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001665 iovec[2].iov_base = pid_sep1;
1666 iovec[2].iov_len = pid_sep1_max;
1667 iovec[3].iov_base = pid_str;
Frédéric Lécaille90a10ae2019-05-14 10:57:58 +02001668 iovec[3].iov_len = pid_max;
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001669 iovec[4].iov_base = pid_sep2;
1670 iovec[4].iov_len = pid_sep2_max;
1671 iovec[5].iov_base = sd;
1672 iovec[5].iov_len = sd_max;
1673 iovec[6].iov_base = dataptr;
1674 iovec[6].iov_len = max;
1675 iovec[7].iov_base = "\n"; /* insert a \n at the end of the message */
1676 iovec[7].iov_len = 1;
Dragan Dosen43885c72015-10-01 13:18:13 +02001677
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001678 if (logsrv->addr.ss_family == AF_UNSPEC) {
Willy Tarreau487b38e2019-07-26 15:10:39 +02001679 /* the target is a direct file descriptor. While writev() guarantees
1680 * to write everything, it doesn't guarantee that it will not be
1681 * interrupted while doing so. This occasionally results in interleaved
1682 * messages when the output is a tty, hence the lock. There's no real
1683 * performance concern here for such type of output.
1684 */
1685 HA_SPIN_LOCK(LOGSRV_LOCK, &logsrv->lock);
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001686 sent = writev(*plogfd, iovec, 8);
Willy Tarreau487b38e2019-07-26 15:10:39 +02001687 HA_SPIN_UNLOCK(LOGSRV_LOCK, &logsrv->lock);
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001688 }
1689 else {
1690 msghdr.msg_name = (struct sockaddr *)&logsrv->addr;
1691 msghdr.msg_namelen = get_addr_len(&logsrv->addr);
Dragan Dosen43885c72015-10-01 13:18:13 +02001692
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001693 sent = sendmsg(*plogfd, &msghdr, MSG_DONTWAIT | MSG_NOSIGNAL);
1694 }
Dragan Dosen43885c72015-10-01 13:18:13 +02001695
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001696 if (sent < 0) {
1697 static char once;
Dragan Dosen43885c72015-10-01 13:18:13 +02001698
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001699 if (errno == EAGAIN)
1700 _HA_ATOMIC_ADD(&dropped_logs, 1);
1701 else if (!once) {
1702 once = 1; /* note: no need for atomic ops here */
1703 ha_alert("sendmsg()/writev() failed in logger #%d: %s (errno=%d)\n",
1704 nblogger, strerror(errno), errno);
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001705 }
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001706 }
1707}
Dragan Dosen59cee972015-09-19 22:09:02 +02001708
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001709/*
1710 * This function sends a syslog message.
1711 * It doesn't care about errors nor does it report them.
1712 * The arguments <sd> and <sd_size> are used for the structured-data part
1713 * in RFC5424 formatted syslog messages.
1714 */
1715void __send_log(struct proxy *p, int level, char *message, size_t size, char *sd, size_t sd_size)
1716{
1717 struct list *logsrvs = NULL;
1718 struct logsrv *logsrv;
1719 int nblogger;
1720 static THREAD_LOCAL int curr_pid;
1721 static THREAD_LOCAL char pidstr[100];
1722 static THREAD_LOCAL struct buffer pid;
1723 struct buffer *tag = &global.log_tag;
Dragan Dosen609ac2a2015-09-16 18:25:42 +02001724
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001725 if (p == NULL) {
1726 if (!LIST_ISEMPTY(&global.logsrvs)) {
1727 logsrvs = &global.logsrvs;
Willy Tarreau5a32ecc2018-11-12 07:34:59 +01001728 }
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001729 } else {
1730 if (!LIST_ISEMPTY(&p->logsrvs)) {
1731 logsrvs = &p->logsrvs;
Willy Tarreau5a32ecc2018-11-12 07:34:59 +01001732 }
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001733 if (p->log_tag.area) {
1734 tag = &p->log_tag;
1735 }
1736 }
Willy Tarreau18324f52014-06-27 18:10:07 +02001737
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001738 if (!logsrvs)
1739 return;
Willy Tarreauc98aebc2018-03-20 11:17:29 +01001740
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001741 if (unlikely(curr_pid != getpid())) {
1742 curr_pid = getpid();
1743 ltoa_o(curr_pid, pidstr, sizeof(pidstr));
1744 chunk_initstr(&pid, pidstr);
1745 }
1746
1747 /* Send log messages to syslog server. */
1748 nblogger = 0;
1749 list_for_each_entry(logsrv, logsrvs, list) {
Frédéric Lécailled803e472019-04-25 07:42:09 +02001750 static THREAD_LOCAL int in_range = 1;
1751
Frédéric Lécaille0bad8402019-04-10 08:22:17 +02001752 /* we can filter the level of the messages that are sent to each logger */
1753 if (level > logsrv->level)
1754 continue;
1755
Frédéric Lécailled803e472019-04-25 07:42:09 +02001756 if (logsrv->lb.smp_rgs) {
1757 struct smp_log_range *curr_rg;
1758
1759 HA_SPIN_LOCK(LOGSRV_LOCK, &logsrv->lock);
1760 curr_rg = &logsrv->lb.smp_rgs[logsrv->lb.curr_rg];
1761 in_range = in_smp_log_range(curr_rg, logsrv->lb.curr_idx);
1762 if (in_range) {
1763 /* Let's consume this range. */
1764 curr_rg->curr_idx = (curr_rg->curr_idx + 1) % curr_rg->sz;
1765 if (!curr_rg->curr_idx) {
1766 /* If consumed, let's select the next range. */
1767 logsrv->lb.curr_rg = (logsrv->lb.curr_rg + 1) % logsrv->lb.smp_rgs_sz;
1768 }
1769 }
1770 logsrv->lb.curr_idx = (logsrv->lb.curr_idx + 1) % logsrv->lb.smp_sz;
1771 HA_SPIN_UNLOCK(LOGSRV_LOCK, &logsrv->lock);
1772 }
1773 if (in_range)
1774 __do_send_log(logsrv, ++nblogger, pid.area, pid.data, level,
1775 message, size, sd, sd_size, tag->area, tag->data);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001776 }
1777}
1778
1779
Willy Tarreauc89ccb62012-04-05 21:18:22 +02001780const char sess_cookie[8] = "NIDVEOU7"; /* No cookie, Invalid cookie, cookie for a Down server, Valid cookie, Expired cookie, Old cookie, Unused, unknown */
William Lallemandbddd4fd2012-02-27 11:23:10 +01001781const char sess_set_cookie[8] = "NPDIRU67"; /* No set-cookie, Set-cookie found and left unchanged (passive),
1782 Set-cookie Deleted, Set-Cookie Inserted, Set-cookie Rewritten,
1783 Set-cookie Updated, unknown, unknown */
1784
William Lallemand1d705562012-03-12 12:46:41 +01001785/*
1786 * try to write a character if there is enough space, or goto out
1787 */
William Lallemandbddd4fd2012-02-27 11:23:10 +01001788#define LOGCHAR(x) do { \
William Lallemand1d705562012-03-12 12:46:41 +01001789 if (tmplog < dst + maxsize - 1) { \
William Lallemandbddd4fd2012-02-27 11:23:10 +01001790 *(tmplog++) = (x); \
1791 } else { \
1792 goto out; \
1793 } \
1794 } while(0)
1795
Dragan Dosen835b9212016-02-12 13:23:03 +01001796
Willy Tarreaub6b3df32018-11-26 16:31:20 +01001797/* Initializes some log data at boot */
1798static void init_log()
Dragan Dosen835b9212016-02-12 13:23:03 +01001799{
1800 char *tmp;
Willy Tarreaue10cd482018-09-10 18:16:53 +02001801 int i;
Dragan Dosen835b9212016-02-12 13:23:03 +01001802
1803 /* Initialize the escape map for the RFC5424 structured-data : '"\]'
1804 * inside PARAM-VALUE should be escaped with '\' as prefix.
1805 * See https://tools.ietf.org/html/rfc5424#section-6.3.3 for more
1806 * details.
1807 */
1808 memset(rfc5424_escape_map, 0, sizeof(rfc5424_escape_map));
1809
1810 tmp = "\"\\]";
1811 while (*tmp) {
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001812 ha_bit_set(*tmp, rfc5424_escape_map);
Dragan Dosen835b9212016-02-12 13:23:03 +01001813 tmp++;
1814 }
Willy Tarreaue10cd482018-09-10 18:16:53 +02001815
1816 /* initialize the log header encoding map : '{|}"#' should be encoded with
1817 * '#' as prefix, as well as non-printable characters ( <32 or >= 127 ).
1818 * URL encoding only requires '"', '#' to be encoded as well as non-
1819 * printable characters above.
1820 */
1821 memset(hdr_encode_map, 0, sizeof(hdr_encode_map));
1822 memset(url_encode_map, 0, sizeof(url_encode_map));
1823 for (i = 0; i < 32; i++) {
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001824 ha_bit_set(i, hdr_encode_map);
1825 ha_bit_set(i, url_encode_map);
Willy Tarreaue10cd482018-09-10 18:16:53 +02001826 }
1827 for (i = 127; i < 256; i++) {
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001828 ha_bit_set(i, hdr_encode_map);
1829 ha_bit_set(i, url_encode_map);
Willy Tarreaue10cd482018-09-10 18:16:53 +02001830 }
1831
1832 tmp = "\"#{|}";
1833 while (*tmp) {
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001834 ha_bit_set(*tmp, hdr_encode_map);
Willy Tarreaue10cd482018-09-10 18:16:53 +02001835 tmp++;
1836 }
1837
1838 tmp = "\"#";
1839 while (*tmp) {
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001840 ha_bit_set(*tmp, url_encode_map);
Willy Tarreaue10cd482018-09-10 18:16:53 +02001841 tmp++;
1842 }
1843
1844 /* initialize the http header encoding map. The draft httpbis define the
1845 * header content as:
1846 *
1847 * HTTP-message = start-line
1848 * *( header-field CRLF )
1849 * CRLF
1850 * [ message-body ]
1851 * header-field = field-name ":" OWS field-value OWS
1852 * field-value = *( field-content / obs-fold )
1853 * field-content = field-vchar [ 1*( SP / HTAB ) field-vchar ]
1854 * obs-fold = CRLF 1*( SP / HTAB )
1855 * field-vchar = VCHAR / obs-text
1856 * VCHAR = %x21-7E
1857 * obs-text = %x80-FF
1858 *
1859 * All the chars are encoded except "VCHAR", "obs-text", SP and HTAB.
1860 * The encoded chars are form 0x00 to 0x08, 0x0a to 0x1f and 0x7f. The
Joseph Herlant85b40592018-11-15 12:10:04 -08001861 * "obs-fold" is voluntarily forgotten because haproxy remove this.
Willy Tarreaue10cd482018-09-10 18:16:53 +02001862 */
1863 memset(http_encode_map, 0, sizeof(http_encode_map));
1864 for (i = 0x00; i <= 0x08; i++)
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001865 ha_bit_set(i, http_encode_map);
Willy Tarreaue10cd482018-09-10 18:16:53 +02001866 for (i = 0x0a; i <= 0x1f; i++)
Willy Tarreau1bfd6022019-06-07 11:10:07 +02001867 ha_bit_set(i, http_encode_map);
1868 ha_bit_set(0x7f, http_encode_map);
Dragan Dosen835b9212016-02-12 13:23:03 +01001869}
William Lallemand1d705562012-03-12 12:46:41 +01001870
Willy Tarreaub6b3df32018-11-26 16:31:20 +01001871INITCALL0(STG_PREPARE, init_log);
1872
Christopher Faulet0132d062017-07-26 15:33:35 +02001873/* Initialize log buffers used for syslog messages */
1874int init_log_buffers()
1875{
1876 logheader = my_realloc2(logheader, global.max_syslog_len + 1);
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001877 logheader_end = NULL;
Christopher Faulet0132d062017-07-26 15:33:35 +02001878 logheader_rfc5424 = my_realloc2(logheader_rfc5424, global.max_syslog_len + 1);
Willy Tarreau55e2f5a2019-05-05 10:11:39 +02001879 logheader_rfc5424_end = NULL;
Christopher Faulet0132d062017-07-26 15:33:35 +02001880 logline = my_realloc2(logline, global.max_syslog_len + 1);
1881 logline_rfc5424 = my_realloc2(logline_rfc5424, global.max_syslog_len + 1);
1882 if (!logheader || !logline_rfc5424 || !logline || !logline_rfc5424)
1883 return 0;
1884 return 1;
1885}
1886
1887/* Deinitialize log buffers used for syslog messages */
1888void deinit_log_buffers()
1889{
Olivier Houchard7c497112019-03-07 14:19:24 +01001890 void *tmp_startup_logs;
1891
Christopher Faulet0132d062017-07-26 15:33:35 +02001892 free(logheader);
1893 free(logheader_rfc5424);
1894 free(logline);
1895 free(logline_rfc5424);
Olivier Houchardd2ee3e72019-03-08 18:53:21 +01001896 tmp_startup_logs = _HA_ATOMIC_XCHG(&startup_logs, NULL);
Olivier Houchard7c497112019-03-07 14:19:24 +01001897 free(tmp_startup_logs);
1898
Christopher Faulet0132d062017-07-26 15:33:35 +02001899 logheader = NULL;
1900 logheader_rfc5424 = NULL;
1901 logline = NULL;
1902 logline_rfc5424 = NULL;
Christopher Fauletd4696382017-10-24 11:44:05 +02001903 startup_logs = NULL;
Christopher Faulet0132d062017-07-26 15:33:35 +02001904}
1905
Willy Tarreaudf974472012-12-28 02:44:01 +01001906/* Builds a log line in <dst> based on <list_format>, and stops before reaching
1907 * <maxsize> characters. Returns the size of the output string in characters,
1908 * not counting the trailing zero which is always added if the resulting size
Willy Tarreau09bb27c2018-09-05 16:55:15 +02001909 * is not zero. It requires a valid session and optionally a stream. If the
1910 * stream is NULL, default values will be assumed for the stream part.
Willy Tarreaudf974472012-12-28 02:44:01 +01001911 */
Willy Tarreau43c538e2018-09-05 14:58:15 +02001912int sess_build_logline(struct session *sess, struct stream *s, char *dst, size_t maxsize, struct list *list_format)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001913{
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02001914 struct proxy *fe = sess->fe;
Willy Tarreau09bb27c2018-09-05 16:55:15 +02001915 struct proxy *be;
1916 struct http_txn *txn;
1917 const struct strm_logs *logs;
1918 const struct connection *be_conn;
1919 unsigned int s_flags;
1920 unsigned int uniq_id;
Willy Tarreau83061a82018-07-13 11:56:34 +02001921 struct buffer chunk;
William Lallemandbddd4fd2012-02-27 11:23:10 +01001922 char *uri;
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00001923 char *spc;
Andrew Hayworthe63ac872015-07-31 16:14:16 +00001924 char *qmark;
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00001925 char *end;
Willy Tarreaufe944602007-10-25 10:34:16 +02001926 struct tm tm;
William Lallemandbddd4fd2012-02-27 11:23:10 +01001927 int t_request;
1928 int hdr;
1929 int last_isspace = 1;
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00001930 int nspaces = 0;
Willy Tarreaub1a2faf2012-03-19 16:51:53 +01001931 char *tmplog;
William Lallemand1d705562012-03-12 12:46:41 +01001932 char *ret;
1933 int iret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01001934 struct logformat_node *tmp;
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02001935 struct timeval tv;
Willy Tarreau09bb27c2018-09-05 16:55:15 +02001936 struct strm_logs tmp_strm_log;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001937
William Lallemandbddd4fd2012-02-27 11:23:10 +01001938 /* FIXME: let's limit ourselves to frontend logging for now. */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001939
Willy Tarreau09bb27c2018-09-05 16:55:15 +02001940 if (likely(s)) {
1941 be = s->be;
1942 txn = s->txn;
1943 be_conn = cs_conn(objt_cs(s->si[1].end));
1944 s_flags = s->flags;
1945 uniq_id = s->uniq_id;
1946 logs = &s->logs;
1947 } else {
1948 /* we have no stream so we first need to initialize a few
1949 * things that are needed later. We do increment the request
1950 * ID so that it's uniquely assigned to this request just as
1951 * if the request had reached the point of being processed.
1952 * A request error is reported as it's the only element we have
1953 * here and which justifies emitting such a log.
1954 */
1955 be = fe;
1956 txn = NULL;
1957 be_conn = NULL;
1958 s_flags = SF_ERR_PRXCOND | SF_FINST_R;
Olivier Houchardd2ee3e72019-03-08 18:53:21 +01001959 uniq_id = _HA_ATOMIC_XADD(&global.req_count, 1);
Willy Tarreau09bb27c2018-09-05 16:55:15 +02001960
1961 /* prepare a valid log structure */
1962 tmp_strm_log.tv_accept = sess->tv_accept;
1963 tmp_strm_log.accept_date = sess->accept_date;
1964 tmp_strm_log.t_handshake = sess->t_handshake;
1965 tmp_strm_log.t_idle = tv_ms_elapsed(&sess->tv_accept, &now) - sess->t_handshake;
1966 tv_zero(&tmp_strm_log.tv_request);
1967 tmp_strm_log.t_queue = -1;
1968 tmp_strm_log.t_connect = -1;
1969 tmp_strm_log.t_data = -1;
1970 tmp_strm_log.t_close = tv_ms_elapsed(&sess->tv_accept, &now);
1971 tmp_strm_log.bytes_in = 0;
1972 tmp_strm_log.bytes_out = 0;
1973 tmp_strm_log.prx_queue_pos = 0;
1974 tmp_strm_log.srv_queue_pos = 0;
1975
1976 logs = &tmp_strm_log;
1977 }
1978
William Lallemandbddd4fd2012-02-27 11:23:10 +01001979 t_request = -1;
Willy Tarreau372ac5a2018-09-05 15:16:23 +02001980 if (tv_isge(&logs->tv_request, &logs->tv_accept))
1981 t_request = tv_ms_elapsed(&logs->tv_accept, &logs->tv_request);
William Lallemandbddd4fd2012-02-27 11:23:10 +01001982
William Lallemand1d705562012-03-12 12:46:41 +01001983 tmplog = dst;
Willy Tarreauc9bd0cc2009-05-10 11:57:02 +02001984
William Lallemandbddd4fd2012-02-27 11:23:10 +01001985 /* fill logbuffer */
William Lallemand1d705562012-03-12 12:46:41 +01001986 if (LIST_ISEMPTY(list_format))
1987 return 0;
William Lallemandbddd4fd2012-02-27 11:23:10 +01001988
William Lallemand1d705562012-03-12 12:46:41 +01001989 list_for_each_entry(tmp, list_format, list) {
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001990 struct connection *conn;
Willy Tarreau4f653562012-10-12 19:48:16 +02001991 const char *src = NULL;
Willy Tarreauc8368452012-12-21 00:09:23 +01001992 struct sample *key;
Willy Tarreau83061a82018-07-13 11:56:34 +02001993 const struct buffer empty = { };
William Lallemandbddd4fd2012-02-27 11:23:10 +01001994
Willy Tarreauc8368452012-12-21 00:09:23 +01001995 switch (tmp->type) {
William Lallemand1d705562012-03-12 12:46:41 +01001996 case LOG_FMT_SEPARATOR:
William Lallemandbddd4fd2012-02-27 11:23:10 +01001997 if (!last_isspace) {
1998 LOGCHAR(' ');
1999 last_isspace = 1;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002000 }
2001 break;
2002
William Lallemand1d705562012-03-12 12:46:41 +01002003 case LOG_FMT_TEXT: // text
William Lallemandbddd4fd2012-02-27 11:23:10 +01002004 src = tmp->arg;
William Lallemand5f232402012-04-05 18:02:55 +02002005 iret = strlcpy2(tmplog, src, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002006 if (iret == 0)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002007 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002008 tmplog += iret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002009 last_isspace = 0;
2010 break;
2011
Willy Tarreauc8368452012-12-21 00:09:23 +01002012 case LOG_FMT_EXPR: // sample expression, may be request or response
2013 key = NULL;
Olivier Houchardf90db442018-12-15 14:00:06 +01002014 if (tmp->options & LOG_OPT_REQ_CAP && s)
Adis Nezirovic79beb242015-07-06 15:41:02 +02002015 key = sample_fetch_as_type(be, sess, s, SMP_OPT_DIR_REQ|SMP_OPT_FINAL, tmp->expr, SMP_T_STR);
Olivier Houchardf90db442018-12-15 14:00:06 +01002016 if (!key && (tmp->options & LOG_OPT_RES_CAP) && s)
Adis Nezirovic79beb242015-07-06 15:41:02 +02002017 key = sample_fetch_as_type(be, sess, s, SMP_OPT_DIR_RES|SMP_OPT_FINAL, tmp->expr, SMP_T_STR);
Thierry FOURNIERd048d8b2014-03-13 16:46:18 +01002018 if (tmp->options & LOG_OPT_HTTP)
Dragan Dosen835b9212016-02-12 13:23:03 +01002019 ret = lf_encode_chunk(tmplog, dst + maxsize,
2020 '%', http_encode_map, key ? &key->data.u.str : &empty, tmp);
Thierry FOURNIERd048d8b2014-03-13 16:46:18 +01002021 else
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002022 ret = lf_text_len(tmplog,
2023 key ? key->data.u.str.area : NULL,
2024 key ? key->data.u.str.data : 0,
2025 dst + maxsize - tmplog,
2026 tmp);
Willy Tarreauc8368452012-12-21 00:09:23 +01002027 if (ret == 0)
2028 goto out;
2029 tmplog = ret;
2030 last_isspace = 0;
2031 break;
2032
Willy Tarreau2beef582012-12-20 17:22:52 +01002033 case LOG_FMT_CLIENTIP: // %ci
Willy Tarreau9ad7bd42015-04-03 19:19:59 +02002034 conn = objt_conn(sess->origin);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002035 if (conn)
2036 ret = lf_ip(tmplog, (struct sockaddr *)&conn->addr.from, dst + maxsize - tmplog, tmp);
2037 else
2038 ret = lf_text_len(tmplog, NULL, 0, dst + maxsize - tmplog, tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002039 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002040 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002041 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002042 last_isspace = 0;
2043 break;
2044
Willy Tarreau2beef582012-12-20 17:22:52 +01002045 case LOG_FMT_CLIENTPORT: // %cp
Willy Tarreau9ad7bd42015-04-03 19:19:59 +02002046 conn = objt_conn(sess->origin);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002047 if (conn) {
2048 if (conn->addr.from.ss_family == AF_UNIX) {
Willy Tarreaufb0afa72015-04-03 14:46:27 +02002049 ret = ltoa_o(sess->listener->luid, tmplog, dst + maxsize - tmplog);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002050 } else {
2051 ret = lf_port(tmplog, (struct sockaddr *)&conn->addr.from,
2052 dst + maxsize - tmplog, tmp);
2053 }
William Lallemand5f232402012-04-05 18:02:55 +02002054 }
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002055 else
2056 ret = lf_text_len(tmplog, NULL, 0, dst + maxsize - tmplog, tmp);
2057
William Lallemand5f232402012-04-05 18:02:55 +02002058 if (ret == NULL)
2059 goto out;
2060 tmplog = ret;
2061 last_isspace = 0;
2062 break;
2063
Willy Tarreau2beef582012-12-20 17:22:52 +01002064 case LOG_FMT_FRONTENDIP: // %fi
Willy Tarreau9ad7bd42015-04-03 19:19:59 +02002065 conn = objt_conn(sess->origin);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002066 if (conn) {
2067 conn_get_to_addr(conn);
2068 ret = lf_ip(tmplog, (struct sockaddr *)&conn->addr.to, dst + maxsize - tmplog, tmp);
2069 }
2070 else
2071 ret = lf_text_len(tmplog, NULL, 0, dst + maxsize - tmplog, tmp);
2072
William Lallemand1d705562012-03-12 12:46:41 +01002073 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002074 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002075 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002076 last_isspace = 0;
2077 break;
2078
Willy Tarreau2beef582012-12-20 17:22:52 +01002079 case LOG_FMT_FRONTENDPORT: // %fp
Willy Tarreau9ad7bd42015-04-03 19:19:59 +02002080 conn = objt_conn(sess->origin);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002081 if (conn) {
2082 conn_get_to_addr(conn);
2083 if (conn->addr.to.ss_family == AF_UNIX)
Willy Tarreaufb0afa72015-04-03 14:46:27 +02002084 ret = ltoa_o(sess->listener->luid, tmplog, dst + maxsize - tmplog);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002085 else
2086 ret = lf_port(tmplog, (struct sockaddr *)&conn->addr.to, dst + maxsize - tmplog, tmp);
William Lallemand5f232402012-04-05 18:02:55 +02002087 }
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002088 else
2089 ret = lf_text_len(tmplog, NULL, 0, dst + maxsize - tmplog, tmp);
2090
William Lallemand5f232402012-04-05 18:02:55 +02002091 if (ret == NULL)
2092 goto out;
2093 tmplog = ret;
2094 last_isspace = 0;
2095 break;
2096
Willy Tarreau2beef582012-12-20 17:22:52 +01002097 case LOG_FMT_BACKENDIP: // %bi
Willy Tarreau2393c5b2018-09-05 15:24:56 +02002098 if (be_conn)
2099 ret = lf_ip(tmplog, (const struct sockaddr *)&be_conn->addr.from, dst + maxsize - tmplog, tmp);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002100 else
2101 ret = lf_text_len(tmplog, NULL, 0, dst + maxsize - tmplog, tmp);
2102
William Lallemand1d705562012-03-12 12:46:41 +01002103 if (ret == NULL)
William Lallemandb7ff6a32012-03-02 14:35:21 +01002104 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002105 tmplog = ret;
William Lallemandb7ff6a32012-03-02 14:35:21 +01002106 last_isspace = 0;
2107 break;
2108
Willy Tarreau2beef582012-12-20 17:22:52 +01002109 case LOG_FMT_BACKENDPORT: // %bp
Willy Tarreau2393c5b2018-09-05 15:24:56 +02002110 if (be_conn)
2111 ret = lf_port(tmplog, (struct sockaddr *)&be_conn->addr.from, dst + maxsize - tmplog, tmp);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002112 else
2113 ret = lf_text_len(tmplog, NULL, 0, dst + maxsize - tmplog, tmp);
2114
William Lallemand5f232402012-04-05 18:02:55 +02002115 if (ret == NULL)
2116 goto out;
2117 tmplog = ret;
2118 last_isspace = 0;
2119 break;
2120
Willy Tarreau2beef582012-12-20 17:22:52 +01002121 case LOG_FMT_SERVERIP: // %si
Willy Tarreau2393c5b2018-09-05 15:24:56 +02002122 if (be_conn)
2123 ret = lf_ip(tmplog, (struct sockaddr *)&be_conn->addr.to, dst + maxsize - tmplog, tmp);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002124 else
2125 ret = lf_text_len(tmplog, NULL, 0, dst + maxsize - tmplog, tmp);
2126
William Lallemand5f232402012-04-05 18:02:55 +02002127 if (ret == NULL)
2128 goto out;
2129 tmplog = ret;
2130 last_isspace = 0;
2131 break;
2132
Willy Tarreau2beef582012-12-20 17:22:52 +01002133 case LOG_FMT_SERVERPORT: // %sp
Willy Tarreau2393c5b2018-09-05 15:24:56 +02002134 if (be_conn)
2135 ret = lf_port(tmplog, (struct sockaddr *)&be_conn->addr.to, dst + maxsize - tmplog, tmp);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002136 else
2137 ret = lf_text_len(tmplog, NULL, 0, dst + maxsize - tmplog, tmp);
2138
William Lallemand1d705562012-03-12 12:46:41 +01002139 if (ret == NULL)
William Lallemandb7ff6a32012-03-02 14:35:21 +01002140 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002141 tmplog = ret;
William Lallemandb7ff6a32012-03-02 14:35:21 +01002142 last_isspace = 0;
2143 break;
2144
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002145 case LOG_FMT_DATE: // %t = accept date
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002146 get_localtime(logs->accept_date.tv_sec, &tm);
2147 ret = date2str_log(tmplog, &tm, &logs->accept_date, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002148 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002149 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002150 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002151 last_isspace = 0;
2152 break;
2153
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002154 case LOG_FMT_tr: // %tr = start of request date
2155 /* Note that the timers are valid if we get here */
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002156 tv_ms_add(&tv, &logs->accept_date, logs->t_idle >= 0 ? logs->t_idle + logs->t_handshake : 0);
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002157 get_localtime(tv.tv_sec, &tm);
2158 ret = date2str_log(tmplog, &tm, &tv, dst + maxsize - tmplog);
2159 if (ret == NULL)
2160 goto out;
2161 tmplog = ret;
2162 last_isspace = 0;
2163 break;
2164
2165 case LOG_FMT_DATEGMT: // %T = accept date, GMT
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002166 get_gmtime(logs->accept_date.tv_sec, &tm);
William Lallemand5f232402012-04-05 18:02:55 +02002167 ret = gmt2str_log(tmplog, &tm, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002168 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002169 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002170 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002171 last_isspace = 0;
2172 break;
2173
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002174 case LOG_FMT_trg: // %trg = start of request date, GMT
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002175 tv_ms_add(&tv, &logs->accept_date, logs->t_idle >= 0 ? logs->t_idle + logs->t_handshake : 0);
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002176 get_gmtime(tv.tv_sec, &tm);
2177 ret = gmt2str_log(tmplog, &tm, dst + maxsize - tmplog);
2178 if (ret == NULL)
2179 goto out;
2180 tmplog = ret;
2181 last_isspace = 0;
2182 break;
2183
2184 case LOG_FMT_DATELOCAL: // %Tl = accept date, local
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002185 get_localtime(logs->accept_date.tv_sec, &tm);
2186 ret = localdate2str_log(tmplog, logs->accept_date.tv_sec, &tm, dst + maxsize - tmplog);
Yuxans Yao4e25b012012-10-19 10:36:09 +08002187 if (ret == NULL)
2188 goto out;
2189 tmplog = ret;
2190 last_isspace = 0;
2191 break;
2192
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002193 case LOG_FMT_trl: // %trl = start of request date, local
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002194 tv_ms_add(&tv, &logs->accept_date, logs->t_idle >= 0 ? logs->t_idle + logs->t_handshake : 0);
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002195 get_localtime(tv.tv_sec, &tm);
2196 ret = localdate2str_log(tmplog, tv.tv_sec, &tm, dst + maxsize - tmplog);
2197 if (ret == NULL)
2198 goto out;
2199 tmplog = ret;
2200 last_isspace = 0;
2201 break;
2202
William Lallemand5f232402012-04-05 18:02:55 +02002203 case LOG_FMT_TS: // %Ts
William Lallemand5f232402012-04-05 18:02:55 +02002204 if (tmp->options & LOG_OPT_HEXA) {
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002205 iret = snprintf(tmplog, dst + maxsize - tmplog, "%04X", (unsigned int)logs->accept_date.tv_sec);
William Lallemand5f232402012-04-05 18:02:55 +02002206 if (iret < 0 || iret > dst + maxsize - tmplog)
2207 goto out;
2208 last_isspace = 0;
2209 tmplog += iret;
2210 } else {
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002211 ret = ltoa_o(logs->accept_date.tv_sec, tmplog, dst + maxsize - tmplog);
William Lallemand5f232402012-04-05 18:02:55 +02002212 if (ret == NULL)
2213 goto out;
2214 tmplog = ret;
2215 last_isspace = 0;
2216 }
2217 break;
2218
William Lallemand1d705562012-03-12 12:46:41 +01002219 case LOG_FMT_MS: // %ms
William Lallemand5f232402012-04-05 18:02:55 +02002220 if (tmp->options & LOG_OPT_HEXA) {
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002221 iret = snprintf(tmplog, dst + maxsize - tmplog, "%02X",(unsigned int)logs->accept_date.tv_usec/1000);
William Lallemand5f232402012-04-05 18:02:55 +02002222 if (iret < 0 || iret > dst + maxsize - tmplog)
2223 goto out;
2224 last_isspace = 0;
2225 tmplog += iret;
2226 } else {
2227 if ((dst + maxsize - tmplog) < 4)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002228 goto out;
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002229 ret = utoa_pad((unsigned int)logs->accept_date.tv_usec/1000,
Willy Tarreau9e60cd82013-01-24 01:18:16 +01002230 tmplog, 4);
2231 if (ret == NULL)
William Lallemand51b5dca2012-03-26 17:52:55 +02002232 goto out;
Willy Tarreau9e60cd82013-01-24 01:18:16 +01002233 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002234 last_isspace = 0;
William Lallemand5f232402012-04-05 18:02:55 +02002235 }
2236 break;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002237
William Lallemand1d705562012-03-12 12:46:41 +01002238 case LOG_FMT_FRONTEND: // %f
William Lallemandbddd4fd2012-02-27 11:23:10 +01002239 src = fe->id;
William Lallemand5f232402012-04-05 18:02:55 +02002240 ret = lf_text(tmplog, src, dst + maxsize - tmplog, tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002241 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002242 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002243 tmplog = ret;
William Lallemand51b5dca2012-03-26 17:52:55 +02002244 last_isspace = 0;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002245 break;
2246
Willy Tarreau773d65f2012-10-12 14:56:11 +02002247 case LOG_FMT_FRONTEND_XPRT: // %ft
2248 src = fe->id;
2249 if (tmp->options & LOG_OPT_QUOTE)
2250 LOGCHAR('"');
2251 iret = strlcpy2(tmplog, src, dst + maxsize - tmplog);
2252 if (iret == 0)
2253 goto out;
2254 tmplog += iret;
Willy Tarreaua261e9b2016-12-22 20:44:00 +01002255 if (sess->listener->bind_conf->xprt == xprt_get(XPRT_SSL))
Willy Tarreau773d65f2012-10-12 14:56:11 +02002256 LOGCHAR('~');
Willy Tarreau773d65f2012-10-12 14:56:11 +02002257 if (tmp->options & LOG_OPT_QUOTE)
2258 LOGCHAR('"');
2259 last_isspace = 0;
2260 break;
Willy Tarreauffc3fcd2012-10-12 20:17:54 +02002261#ifdef USE_OPENSSL
2262 case LOG_FMT_SSL_CIPHER: // %sslc
2263 src = NULL;
Willy Tarreau9ad7bd42015-04-03 19:19:59 +02002264 conn = objt_conn(sess->origin);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002265 if (conn) {
Emmanuel Hocdet01da5712017-10-13 16:59:49 +02002266 src = ssl_sock_get_cipher_name(conn);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002267 }
Willy Tarreauffc3fcd2012-10-12 20:17:54 +02002268 ret = lf_text(tmplog, src, dst + maxsize - tmplog, tmp);
2269 if (ret == NULL)
2270 goto out;
2271 tmplog = ret;
2272 last_isspace = 0;
2273 break;
Willy Tarreau773d65f2012-10-12 14:56:11 +02002274
Willy Tarreauffc3fcd2012-10-12 20:17:54 +02002275 case LOG_FMT_SSL_VERSION: // %sslv
2276 src = NULL;
Willy Tarreau9ad7bd42015-04-03 19:19:59 +02002277 conn = objt_conn(sess->origin);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002278 if (conn) {
Emmanuel Hocdet01da5712017-10-13 16:59:49 +02002279 src = ssl_sock_get_proto_version(conn);
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002280 }
Willy Tarreauffc3fcd2012-10-12 20:17:54 +02002281 ret = lf_text(tmplog, src, dst + maxsize - tmplog, tmp);
2282 if (ret == NULL)
2283 goto out;
2284 tmplog = ret;
2285 last_isspace = 0;
2286 break;
2287#endif
William Lallemand1d705562012-03-12 12:46:41 +01002288 case LOG_FMT_BACKEND: // %b
William Lallemandbddd4fd2012-02-27 11:23:10 +01002289 src = be->id;
William Lallemand5f232402012-04-05 18:02:55 +02002290 ret = lf_text(tmplog, src, dst + maxsize - tmplog, tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002291 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002292 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002293 tmplog = ret;
William Lallemand51b5dca2012-03-26 17:52:55 +02002294 last_isspace = 0;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002295 break;
2296
William Lallemand1d705562012-03-12 12:46:41 +01002297 case LOG_FMT_SERVER: // %s
Willy Tarreaue1809df2018-09-05 15:30:16 +02002298 switch (obj_type(s ? s->target : NULL)) {
Willy Tarreaud79a3b22012-12-28 09:40:16 +01002299 case OBJ_TYPE_SERVER:
Willy Tarreau1aaf3242018-09-20 11:13:58 +02002300 src = __objt_server(s->target)->id;
Willy Tarreaud79a3b22012-12-28 09:40:16 +01002301 break;
2302 case OBJ_TYPE_APPLET:
Willy Tarreau1aaf3242018-09-20 11:13:58 +02002303 src = __objt_applet(s->target)->name;
Willy Tarreaud79a3b22012-12-28 09:40:16 +01002304 break;
2305 default:
2306 src = "<NOSRV>";
2307 break;
2308 }
William Lallemand5f232402012-04-05 18:02:55 +02002309 ret = lf_text(tmplog, src, dst + maxsize - tmplog, tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002310 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002311 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002312 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002313 last_isspace = 0;
2314 break;
2315
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002316 case LOG_FMT_Th: // %Th = handshake time
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002317 ret = ltoa_o(logs->t_handshake, tmplog, dst + maxsize - tmplog);
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002318 if (ret == NULL)
2319 goto out;
2320 tmplog = ret;
2321 last_isspace = 0;
2322 break;
2323
2324 case LOG_FMT_Ti: // %Ti = HTTP idle time
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002325 ret = ltoa_o(logs->t_idle, tmplog, dst + maxsize - tmplog);
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002326 if (ret == NULL)
2327 goto out;
2328 tmplog = ret;
2329 last_isspace = 0;
2330 break;
2331
2332 case LOG_FMT_TR: // %TR = HTTP request time
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002333 ret = ltoa_o((t_request >= 0) ? t_request - logs->t_idle - logs->t_handshake : -1,
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002334 tmplog, dst + maxsize - tmplog);
2335 if (ret == NULL)
2336 goto out;
2337 tmplog = ret;
2338 last_isspace = 0;
2339 break;
2340
2341 case LOG_FMT_TQ: // %Tq = Th + Ti + TR
William Lallemand5f232402012-04-05 18:02:55 +02002342 ret = ltoa_o(t_request, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002343 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002344 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002345 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002346 last_isspace = 0;
2347 break;
2348
William Lallemand1d705562012-03-12 12:46:41 +01002349 case LOG_FMT_TW: // %Tw
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002350 ret = ltoa_o((logs->t_queue >= 0) ? logs->t_queue - t_request : -1,
William Lallemand5f232402012-04-05 18:02:55 +02002351 tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002352 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002353 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002354 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002355 last_isspace = 0;
2356 break;
2357
William Lallemand1d705562012-03-12 12:46:41 +01002358 case LOG_FMT_TC: // %Tc
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002359 ret = ltoa_o((logs->t_connect >= 0) ? logs->t_connect - logs->t_queue : -1,
William Lallemand5f232402012-04-05 18:02:55 +02002360 tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002361 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002362 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002363 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002364 last_isspace = 0;
2365 break;
2366
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002367 case LOG_FMT_Tr: // %Tr
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002368 ret = ltoa_o((logs->t_data >= 0) ? logs->t_data - logs->t_connect : -1,
William Lallemand5f232402012-04-05 18:02:55 +02002369 tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002370 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002371 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002372 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002373 last_isspace = 0;
2374 break;
2375
Willy Tarreau27b639d2016-05-17 17:55:27 +02002376 case LOG_FMT_TD: // %Td
Willy Tarreaua21c0e62018-09-05 15:07:15 +02002377 if (be->mode == PR_MODE_HTTP)
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002378 ret = ltoa_o((logs->t_data >= 0) ? logs->t_close - logs->t_data : -1,
Willy Tarreau27b639d2016-05-17 17:55:27 +02002379 tmplog, dst + maxsize - tmplog);
2380 else
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002381 ret = ltoa_o((logs->t_connect >= 0) ? logs->t_close - logs->t_connect : -1,
Willy Tarreau27b639d2016-05-17 17:55:27 +02002382 tmplog, dst + maxsize - tmplog);
2383 if (ret == NULL)
2384 goto out;
2385 tmplog = ret;
2386 last_isspace = 0;
2387 break;
2388
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002389 case LOG_FMT_Ta: // %Ta = active time = Tt - Th - Ti
2390 if (!(fe->to_log & LW_BYTES))
2391 LOGCHAR('+');
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002392 ret = ltoa_o(logs->t_close - (logs->t_idle >= 0 ? logs->t_idle + logs->t_handshake : 0),
Thierry FOURNIER / OZON.IO4cac3592016-07-28 17:19:45 +02002393 tmplog, dst + maxsize - tmplog);
2394 if (ret == NULL)
2395 goto out;
2396 tmplog = ret;
2397 last_isspace = 0;
2398 break;
2399
2400 case LOG_FMT_TT: // %Tt = total time
Willy Tarreaud79a3b22012-12-28 09:40:16 +01002401 if (!(fe->to_log & LW_BYTES))
William Lallemand1d705562012-03-12 12:46:41 +01002402 LOGCHAR('+');
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002403 ret = ltoa_o(logs->t_close, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002404 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002405 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002406 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002407 last_isspace = 0;
2408 break;
2409
Willy Tarreau2beef582012-12-20 17:22:52 +01002410 case LOG_FMT_STATUS: // %ST
Willy Tarreau57bc8912016-04-25 17:09:40 +02002411 ret = ltoa_o(txn ? txn->status : 0, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002412 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002413 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002414 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002415 last_isspace = 0;
2416 break;
2417
William Lallemand1d705562012-03-12 12:46:41 +01002418 case LOG_FMT_BYTES: // %B
Willy Tarreaud79a3b22012-12-28 09:40:16 +01002419 if (!(fe->to_log & LW_BYTES))
William Lallemand1d705562012-03-12 12:46:41 +01002420 LOGCHAR('+');
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002421 ret = lltoa(logs->bytes_out, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002422 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002423 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002424 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002425 last_isspace = 0;
2426 break;
2427
Willy Tarreauc5259fd2012-12-20 15:38:04 +01002428 case LOG_FMT_BYTES_UP: // %U
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002429 ret = lltoa(logs->bytes_in, tmplog, dst + maxsize - tmplog);
Willy Tarreauc5259fd2012-12-20 15:38:04 +01002430 if (ret == NULL)
2431 goto out;
2432 tmplog = ret;
2433 last_isspace = 0;
2434 break;
2435
Willy Tarreau2beef582012-12-20 17:22:52 +01002436 case LOG_FMT_CCLIENT: // %CC
Willy Tarreau57bc8912016-04-25 17:09:40 +02002437 src = txn ? txn->cli_cookie : NULL;
William Lallemand5f232402012-04-05 18:02:55 +02002438 ret = lf_text(tmplog, src, dst + maxsize - tmplog, tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002439 if (ret == NULL)
William Lallemand51b5dca2012-03-26 17:52:55 +02002440 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002441 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002442 last_isspace = 0;
2443 break;
2444
Willy Tarreau2beef582012-12-20 17:22:52 +01002445 case LOG_FMT_CSERVER: // %CS
Willy Tarreau57bc8912016-04-25 17:09:40 +02002446 src = txn ? txn->srv_cookie : NULL;
William Lallemand5f232402012-04-05 18:02:55 +02002447 ret = lf_text(tmplog, src, dst + maxsize - tmplog, tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002448 if (ret == NULL)
William Lallemand51b5dca2012-03-26 17:52:55 +02002449 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002450 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002451 last_isspace = 0;
2452 break;
2453
William Lallemand1d705562012-03-12 12:46:41 +01002454 case LOG_FMT_TERMSTATE: // %ts
Willy Tarreaub8bc5252018-09-05 15:51:28 +02002455 LOGCHAR(sess_term_cond[(s_flags & SF_ERR_MASK) >> SF_ERR_SHIFT]);
2456 LOGCHAR(sess_fin_state[(s_flags & SF_FINST_MASK) >> SF_FINST_SHIFT]);
Willy Tarreau6580c062012-03-12 15:09:42 +01002457 *tmplog = '\0';
2458 last_isspace = 0;
2459 break;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002460
William Lallemand1d705562012-03-12 12:46:41 +01002461 case LOG_FMT_TERMSTATE_CK: // %tsc, same as TS with cookie state (for mode HTTP)
Willy Tarreaub8bc5252018-09-05 15:51:28 +02002462 LOGCHAR(sess_term_cond[(s_flags & SF_ERR_MASK) >> SF_ERR_SHIFT]);
2463 LOGCHAR(sess_fin_state[(s_flags & SF_FINST_MASK) >> SF_FINST_SHIFT]);
Willy Tarreau57bc8912016-04-25 17:09:40 +02002464 LOGCHAR((txn && (be->ck_opts & PR_CK_ANY)) ? sess_cookie[(txn->flags & TX_CK_MASK) >> TX_CK_SHIFT] : '-');
2465 LOGCHAR((txn && (be->ck_opts & PR_CK_ANY)) ? sess_set_cookie[(txn->flags & TX_SCK_MASK) >> TX_SCK_SHIFT] : '-');
William Lallemandbddd4fd2012-02-27 11:23:10 +01002466 last_isspace = 0;
2467 break;
2468
William Lallemand1d705562012-03-12 12:46:41 +01002469 case LOG_FMT_ACTCONN: // %ac
William Lallemand5f232402012-04-05 18:02:55 +02002470 ret = ltoa_o(actconn, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002471 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002472 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002473 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002474 last_isspace = 0;
2475 break;
2476
William Lallemand1d705562012-03-12 12:46:41 +01002477 case LOG_FMT_FECONN: // %fc
William Lallemand5f232402012-04-05 18:02:55 +02002478 ret = ltoa_o(fe->feconn, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002479 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002480 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002481 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002482 last_isspace = 0;
2483 break;
2484
William Lallemand1d705562012-03-12 12:46:41 +01002485 case LOG_FMT_BECONN: // %bc
William Lallemand5f232402012-04-05 18:02:55 +02002486 ret = ltoa_o(be->beconn, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002487 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002488 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002489 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002490 last_isspace = 0;
2491 break;
2492
William Lallemand1d705562012-03-12 12:46:41 +01002493 case LOG_FMT_SRVCONN: // %sc
Willy Tarreaue1809df2018-09-05 15:30:16 +02002494 ret = ultoa_o(objt_server(s ? s->target : NULL) ?
Willy Tarreau3fdb3662012-11-12 00:42:33 +01002495 objt_server(s->target)->cur_sess :
William Lallemand5f232402012-04-05 18:02:55 +02002496 0, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002497 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002498 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002499 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002500 last_isspace = 0;
2501 break;
2502
William Lallemand1d705562012-03-12 12:46:41 +01002503 case LOG_FMT_RETRIES: // %rq
Willy Tarreaub8bc5252018-09-05 15:51:28 +02002504 if (s_flags & SF_REDISP)
William Lallemand1d705562012-03-12 12:46:41 +01002505 LOGCHAR('+');
Willy Tarreauabd71a52018-09-04 19:21:44 +02002506 ret = ltoa_o((s && s->si[1].conn_retries > 0) ?
Willy Tarreau350f4872014-11-28 14:42:25 +01002507 (be->conn_retries - s->si[1].conn_retries) :
William Lallemand5f232402012-04-05 18:02:55 +02002508 be->conn_retries, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002509 if (ret == NULL)
William Lallemand51b5dca2012-03-26 17:52:55 +02002510 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002511 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002512 last_isspace = 0;
2513 break;
2514
William Lallemand1d705562012-03-12 12:46:41 +01002515 case LOG_FMT_SRVQUEUE: // %sq
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002516 ret = ltoa_o(logs->srv_queue_pos, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002517 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002518 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002519 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002520 last_isspace = 0;
2521 break;
2522
William Lallemand1d705562012-03-12 12:46:41 +01002523 case LOG_FMT_BCKQUEUE: // %bq
Willy Tarreau372ac5a2018-09-05 15:16:23 +02002524 ret = ltoa_o(logs->prx_queue_pos, tmplog, dst + maxsize - tmplog);
William Lallemand1d705562012-03-12 12:46:41 +01002525 if (ret == NULL)
William Lallemandbddd4fd2012-02-27 11:23:10 +01002526 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002527 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002528 last_isspace = 0;
2529 break;
2530
William Lallemand1d705562012-03-12 12:46:41 +01002531 case LOG_FMT_HDRREQUEST: // %hr
William Lallemandbddd4fd2012-02-27 11:23:10 +01002532 /* request header */
Willy Tarreaud4f91662018-09-05 15:28:07 +02002533 if (fe->nb_req_cap && s && s->req_cap) {
William Lallemandbddd4fd2012-02-27 11:23:10 +01002534 if (tmp->options & LOG_OPT_QUOTE)
2535 LOGCHAR('"');
2536 LOGCHAR('{');
2537 for (hdr = 0; hdr < fe->nb_req_cap; hdr++) {
2538 if (hdr)
2539 LOGCHAR('|');
Willy Tarreaucb7dd012015-04-03 22:16:32 +02002540 if (s->req_cap[hdr] != NULL) {
Dragan Dosen835b9212016-02-12 13:23:03 +01002541 ret = lf_encode_string(tmplog, dst + maxsize,
2542 '#', hdr_encode_map, s->req_cap[hdr], tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002543 if (ret == NULL || *ret != '\0')
William Lallemand51b5dca2012-03-26 17:52:55 +02002544 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002545 tmplog = ret;
William Lallemand51b5dca2012-03-26 17:52:55 +02002546 }
William Lallemandbddd4fd2012-02-27 11:23:10 +01002547 }
2548 LOGCHAR('}');
William Lallemand51b5dca2012-03-26 17:52:55 +02002549 if (tmp->options & LOG_OPT_QUOTE)
2550 LOGCHAR('"');
William Lallemandbddd4fd2012-02-27 11:23:10 +01002551 last_isspace = 0;
2552 }
William Lallemandbddd4fd2012-02-27 11:23:10 +01002553 break;
2554
William Lallemand1d705562012-03-12 12:46:41 +01002555 case LOG_FMT_HDRREQUESTLIST: // %hrl
William Lallemandbddd4fd2012-02-27 11:23:10 +01002556 /* request header list */
Willy Tarreaud4f91662018-09-05 15:28:07 +02002557 if (fe->nb_req_cap && s && s->req_cap) {
William Lallemandbddd4fd2012-02-27 11:23:10 +01002558 for (hdr = 0; hdr < fe->nb_req_cap; hdr++) {
2559 if (hdr > 0)
2560 LOGCHAR(' ');
2561 if (tmp->options & LOG_OPT_QUOTE)
2562 LOGCHAR('"');
Willy Tarreaucb7dd012015-04-03 22:16:32 +02002563 if (s->req_cap[hdr] != NULL) {
Dragan Dosen835b9212016-02-12 13:23:03 +01002564 ret = lf_encode_string(tmplog, dst + maxsize,
2565 '#', hdr_encode_map, s->req_cap[hdr], tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002566 if (ret == NULL || *ret != '\0')
William Lallemand51b5dca2012-03-26 17:52:55 +02002567 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002568 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002569 } else if (!(tmp->options & LOG_OPT_QUOTE))
2570 LOGCHAR('-');
2571 if (tmp->options & LOG_OPT_QUOTE)
2572 LOGCHAR('"');
William Lallemandbddd4fd2012-02-27 11:23:10 +01002573 last_isspace = 0;
2574 }
2575 }
2576 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +02002577
William Lallemand1d705562012-03-12 12:46:41 +01002578
2579 case LOG_FMT_HDRRESPONS: // %hs
William Lallemandbddd4fd2012-02-27 11:23:10 +01002580 /* response header */
Willy Tarreaud4f91662018-09-05 15:28:07 +02002581 if (fe->nb_rsp_cap && s && s->res_cap) {
William Lallemandbddd4fd2012-02-27 11:23:10 +01002582 if (tmp->options & LOG_OPT_QUOTE)
2583 LOGCHAR('"');
2584 LOGCHAR('{');
2585 for (hdr = 0; hdr < fe->nb_rsp_cap; hdr++) {
2586 if (hdr)
2587 LOGCHAR('|');
Willy Tarreaucb7dd012015-04-03 22:16:32 +02002588 if (s->res_cap[hdr] != NULL) {
Dragan Dosen835b9212016-02-12 13:23:03 +01002589 ret = lf_encode_string(tmplog, dst + maxsize,
2590 '#', hdr_encode_map, s->res_cap[hdr], tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002591 if (ret == NULL || *ret != '\0')
William Lallemand51b5dca2012-03-26 17:52:55 +02002592 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002593 tmplog = ret;
William Lallemand51b5dca2012-03-26 17:52:55 +02002594 }
William Lallemandbddd4fd2012-02-27 11:23:10 +01002595 }
2596 LOGCHAR('}');
2597 last_isspace = 0;
2598 if (tmp->options & LOG_OPT_QUOTE)
2599 LOGCHAR('"');
2600 }
William Lallemandbddd4fd2012-02-27 11:23:10 +01002601 break;
2602
William Lallemand1d705562012-03-12 12:46:41 +01002603 case LOG_FMT_HDRRESPONSLIST: // %hsl
William Lallemandbddd4fd2012-02-27 11:23:10 +01002604 /* response header list */
Willy Tarreaud4f91662018-09-05 15:28:07 +02002605 if (fe->nb_rsp_cap && s && s->res_cap) {
William Lallemandbddd4fd2012-02-27 11:23:10 +01002606 for (hdr = 0; hdr < fe->nb_rsp_cap; hdr++) {
2607 if (hdr > 0)
2608 LOGCHAR(' ');
2609 if (tmp->options & LOG_OPT_QUOTE)
2610 LOGCHAR('"');
Willy Tarreaucb7dd012015-04-03 22:16:32 +02002611 if (s->res_cap[hdr] != NULL) {
Dragan Dosen835b9212016-02-12 13:23:03 +01002612 ret = lf_encode_string(tmplog, dst + maxsize,
2613 '#', hdr_encode_map, s->res_cap[hdr], tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002614 if (ret == NULL || *ret != '\0')
William Lallemand51b5dca2012-03-26 17:52:55 +02002615 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002616 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002617 } else if (!(tmp->options & LOG_OPT_QUOTE))
2618 LOGCHAR('-');
2619 if (tmp->options & LOG_OPT_QUOTE)
2620 LOGCHAR('"');
William Lallemandbddd4fd2012-02-27 11:23:10 +01002621 last_isspace = 0;
2622 }
2623 }
2624 break;
2625
William Lallemand1d705562012-03-12 12:46:41 +01002626 case LOG_FMT_REQ: // %r
William Lallemandbddd4fd2012-02-27 11:23:10 +01002627 /* Request */
2628 if (tmp->options & LOG_OPT_QUOTE)
2629 LOGCHAR('"');
Willy Tarreau57bc8912016-04-25 17:09:40 +02002630 uri = txn && txn->uri ? txn->uri : "<BADREQ>";
Dragan Dosen835b9212016-02-12 13:23:03 +01002631 ret = lf_encode_string(tmplog, dst + maxsize,
2632 '#', url_encode_map, uri, tmp);
William Lallemand1d705562012-03-12 12:46:41 +01002633 if (ret == NULL || *ret != '\0')
William Lallemand51b5dca2012-03-26 17:52:55 +02002634 goto out;
William Lallemand1d705562012-03-12 12:46:41 +01002635 tmplog = ret;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002636 if (tmp->options & LOG_OPT_QUOTE)
2637 LOGCHAR('"');
William Lallemandbddd4fd2012-02-27 11:23:10 +01002638 last_isspace = 0;
2639 break;
William Lallemand5f232402012-04-05 18:02:55 +02002640
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002641 case LOG_FMT_HTTP_PATH: // %HP
Willy Tarreau57bc8912016-04-25 17:09:40 +02002642 uri = txn && txn->uri ? txn->uri : "<BADREQ>";
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002643
Willy Tarreaub7636d12015-06-17 19:58:02 +02002644 if (tmp->options & LOG_OPT_QUOTE)
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002645 LOGCHAR('"');
2646
2647 end = uri + strlen(uri);
2648 // look for the first whitespace character
2649 while (uri < end && !HTTP_IS_SPHT(*uri))
2650 uri++;
2651
2652 // keep advancing past multiple spaces
2653 while (uri < end && HTTP_IS_SPHT(*uri)) {
2654 uri++; nspaces++;
2655 }
2656
2657 // look for first space or question mark after url
2658 spc = uri;
2659 while (spc < end && *spc != '?' && !HTTP_IS_SPHT(*spc))
2660 spc++;
2661
Nenad Merdanovic54e439f2016-04-26 01:39:02 +02002662 if (!txn || !txn->uri || nspaces == 0) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002663 chunk.area = "<BADREQ>";
2664 chunk.data = strlen("<BADREQ>");
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002665 } else {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002666 chunk.area = uri;
2667 chunk.data = spc - uri;
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002668 }
2669
Dragan Dosen835b9212016-02-12 13:23:03 +01002670 ret = lf_encode_chunk(tmplog, dst + maxsize, '#', url_encode_map, &chunk, tmp);
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002671 if (ret == NULL || *ret != '\0')
2672 goto out;
2673
2674 tmplog = ret;
Willy Tarreaub7636d12015-06-17 19:58:02 +02002675 if (tmp->options & LOG_OPT_QUOTE)
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002676 LOGCHAR('"');
2677
2678 last_isspace = 0;
2679 break;
2680
Andrew Hayworthe63ac872015-07-31 16:14:16 +00002681 case LOG_FMT_HTTP_QUERY: // %HQ
2682 if (tmp->options & LOG_OPT_QUOTE)
2683 LOGCHAR('"');
2684
Willy Tarreau57bc8912016-04-25 17:09:40 +02002685 if (!txn || !txn->uri) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002686 chunk.area = "<BADREQ>";
2687 chunk.data = strlen("<BADREQ>");
Andrew Hayworthe63ac872015-07-31 16:14:16 +00002688 } else {
2689 uri = txn->uri;
2690 end = uri + strlen(uri);
2691 // look for the first question mark
2692 while (uri < end && *uri != '?')
2693 uri++;
2694
2695 qmark = uri;
2696 // look for first space or question mark after url
2697 while (uri < end && !HTTP_IS_SPHT(*uri))
2698 uri++;
2699
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002700 chunk.area = qmark;
2701 chunk.data = uri - qmark;
Andrew Hayworthe63ac872015-07-31 16:14:16 +00002702 }
2703
Dragan Dosen835b9212016-02-12 13:23:03 +01002704 ret = lf_encode_chunk(tmplog, dst + maxsize, '#', url_encode_map, &chunk, tmp);
Andrew Hayworthe63ac872015-07-31 16:14:16 +00002705 if (ret == NULL || *ret != '\0')
2706 goto out;
2707
2708 tmplog = ret;
2709 if (tmp->options & LOG_OPT_QUOTE)
2710 LOGCHAR('"');
2711
2712 last_isspace = 0;
2713 break;
2714
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002715 case LOG_FMT_HTTP_URI: // %HU
Willy Tarreau57bc8912016-04-25 17:09:40 +02002716 uri = txn && txn->uri ? txn->uri : "<BADREQ>";
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002717
Willy Tarreaub7636d12015-06-17 19:58:02 +02002718 if (tmp->options & LOG_OPT_QUOTE)
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002719 LOGCHAR('"');
2720
2721 end = uri + strlen(uri);
2722 // look for the first whitespace character
2723 while (uri < end && !HTTP_IS_SPHT(*uri))
2724 uri++;
2725
2726 // keep advancing past multiple spaces
2727 while (uri < end && HTTP_IS_SPHT(*uri)) {
2728 uri++; nspaces++;
2729 }
2730
2731 // look for first space after url
2732 spc = uri;
2733 while (spc < end && !HTTP_IS_SPHT(*spc))
2734 spc++;
2735
Willy Tarreau57bc8912016-04-25 17:09:40 +02002736 if (!txn || !txn->uri || nspaces == 0) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002737 chunk.area = "<BADREQ>";
2738 chunk.data = strlen("<BADREQ>");
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002739 } else {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002740 chunk.area = uri;
2741 chunk.data = spc - uri;
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002742 }
2743
Dragan Dosen835b9212016-02-12 13:23:03 +01002744 ret = lf_encode_chunk(tmplog, dst + maxsize, '#', url_encode_map, &chunk, tmp);
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002745 if (ret == NULL || *ret != '\0')
2746 goto out;
2747
2748 tmplog = ret;
Willy Tarreaub7636d12015-06-17 19:58:02 +02002749 if (tmp->options & LOG_OPT_QUOTE)
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002750 LOGCHAR('"');
2751
2752 last_isspace = 0;
2753 break;
2754
2755 case LOG_FMT_HTTP_METHOD: // %HM
Willy Tarreau57bc8912016-04-25 17:09:40 +02002756 uri = txn && txn->uri ? txn->uri : "<BADREQ>";
Willy Tarreaub7636d12015-06-17 19:58:02 +02002757 if (tmp->options & LOG_OPT_QUOTE)
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002758 LOGCHAR('"');
2759
2760 end = uri + strlen(uri);
2761 // look for the first whitespace character
2762 spc = uri;
2763 while (spc < end && !HTTP_IS_SPHT(*spc))
2764 spc++;
2765
2766 if (spc == end) { // odd case, we have txn->uri, but we only got a verb
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002767 chunk.area = "<BADREQ>";
2768 chunk.data = strlen("<BADREQ>");
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002769 } else {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002770 chunk.area = uri;
2771 chunk.data = spc - uri;
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002772 }
2773
Dragan Dosen835b9212016-02-12 13:23:03 +01002774 ret = lf_encode_chunk(tmplog, dst + maxsize, '#', url_encode_map, &chunk, tmp);
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002775 if (ret == NULL || *ret != '\0')
2776 goto out;
2777
2778 tmplog = ret;
Willy Tarreaub7636d12015-06-17 19:58:02 +02002779 if (tmp->options & LOG_OPT_QUOTE)
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002780 LOGCHAR('"');
2781
2782 last_isspace = 0;
2783 break;
2784
2785 case LOG_FMT_HTTP_VERSION: // %HV
Willy Tarreau57bc8912016-04-25 17:09:40 +02002786 uri = txn && txn->uri ? txn->uri : "<BADREQ>";
Willy Tarreaub7636d12015-06-17 19:58:02 +02002787 if (tmp->options & LOG_OPT_QUOTE)
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002788 LOGCHAR('"');
2789
2790 end = uri + strlen(uri);
2791 // look for the first whitespace character
2792 while (uri < end && !HTTP_IS_SPHT(*uri))
2793 uri++;
2794
2795 // keep advancing past multiple spaces
2796 while (uri < end && HTTP_IS_SPHT(*uri)) {
2797 uri++; nspaces++;
2798 }
2799
2800 // look for the next whitespace character
2801 while (uri < end && !HTTP_IS_SPHT(*uri))
2802 uri++;
2803
2804 // keep advancing past multiple spaces
2805 while (uri < end && HTTP_IS_SPHT(*uri))
2806 uri++;
2807
Willy Tarreau57bc8912016-04-25 17:09:40 +02002808 if (!txn || !txn->uri || nspaces == 0) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002809 chunk.area = "<BADREQ>";
2810 chunk.data = strlen("<BADREQ>");
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002811 } else if (uri == end) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002812 chunk.area = "HTTP/0.9";
2813 chunk.data = strlen("HTTP/0.9");
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002814 } else {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02002815 chunk.area = uri;
2816 chunk.data = end - uri;
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002817 }
2818
Dragan Dosen835b9212016-02-12 13:23:03 +01002819 ret = lf_encode_chunk(tmplog, dst + maxsize, '#', url_encode_map, &chunk, tmp);
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002820 if (ret == NULL || *ret != '\0')
2821 goto out;
2822
2823 tmplog = ret;
Willy Tarreaub7636d12015-06-17 19:58:02 +02002824 if (tmp->options & LOG_OPT_QUOTE)
Andrew Hayworth0ebc55f2015-04-27 21:37:03 +00002825 LOGCHAR('"');
2826
2827 last_isspace = 0;
2828 break;
2829
William Lallemand5f232402012-04-05 18:02:55 +02002830 case LOG_FMT_COUNTER: // %rt
2831 if (tmp->options & LOG_OPT_HEXA) {
Willy Tarreau5cacab62018-09-05 15:52:59 +02002832 iret = snprintf(tmplog, dst + maxsize - tmplog, "%04X", uniq_id);
William Lallemand5f232402012-04-05 18:02:55 +02002833 if (iret < 0 || iret > dst + maxsize - tmplog)
2834 goto out;
2835 last_isspace = 0;
2836 tmplog += iret;
2837 } else {
Willy Tarreau5cacab62018-09-05 15:52:59 +02002838 ret = ltoa_o(uniq_id, tmplog, dst + maxsize - tmplog);
William Lallemand5f232402012-04-05 18:02:55 +02002839 if (ret == NULL)
2840 goto out;
2841 tmplog = ret;
2842 last_isspace = 0;
2843 }
2844 break;
2845
Willy Tarreau7346acb2014-08-28 15:03:15 +02002846 case LOG_FMT_LOGCNT: // %lc
2847 if (tmp->options & LOG_OPT_HEXA) {
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02002848 iret = snprintf(tmplog, dst + maxsize - tmplog, "%04X", fe->log_count);
Willy Tarreau7346acb2014-08-28 15:03:15 +02002849 if (iret < 0 || iret > dst + maxsize - tmplog)
2850 goto out;
2851 last_isspace = 0;
2852 tmplog += iret;
2853 } else {
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02002854 ret = ultoa_o(fe->log_count, tmplog, dst + maxsize - tmplog);
Willy Tarreau7346acb2014-08-28 15:03:15 +02002855 if (ret == NULL)
2856 goto out;
2857 tmplog = ret;
2858 last_isspace = 0;
2859 }
2860 break;
2861
William Lallemand5f232402012-04-05 18:02:55 +02002862 case LOG_FMT_HOSTNAME: // %H
2863 src = hostname;
2864 ret = lf_text(tmplog, src, dst + maxsize - tmplog, tmp);
2865 if (ret == NULL)
2866 goto out;
2867 tmplog = ret;
2868 last_isspace = 0;
2869 break;
2870
2871 case LOG_FMT_PID: // %pid
2872 if (tmp->options & LOG_OPT_HEXA) {
2873 iret = snprintf(tmplog, dst + maxsize - tmplog, "%04X", pid);
2874 if (iret < 0 || iret > dst + maxsize - tmplog)
2875 goto out;
2876 last_isspace = 0;
2877 tmplog += iret;
2878 } else {
2879 ret = ltoa_o(pid, tmplog, dst + maxsize - tmplog);
2880 if (ret == NULL)
2881 goto out;
2882 tmplog = ret;
2883 last_isspace = 0;
2884 }
2885 break;
William Lallemanda73203e2012-03-12 12:48:57 +01002886
2887 case LOG_FMT_UNIQUEID: // %ID
William Lallemand5b7ea3a2013-08-28 15:44:19 +02002888 ret = NULL;
Willy Tarreau02fdf4f2018-09-05 15:49:01 +02002889 src = s ? s->unique_id : NULL;
Thierry FOURNIER1be69102014-04-15 01:38:48 +02002890 ret = lf_text(tmplog, src, maxsize - (tmplog - dst), tmp);
William Lallemanda73203e2012-03-12 12:48:57 +01002891 if (ret == NULL)
2892 goto out;
2893 tmplog = ret;
2894 last_isspace = 0;
2895 break;
2896
William Lallemandbddd4fd2012-02-27 11:23:10 +01002897 }
2898 }
2899
2900out:
William Lallemand1d705562012-03-12 12:46:41 +01002901 /* *tmplog is a unused character */
2902 *tmplog = '\0';
Willy Tarreaudf974472012-12-28 02:44:01 +01002903 return tmplog - dst;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002904
Willy Tarreaubaaee002006-06-26 02:48:02 +02002905}
2906
William Lallemand1d705562012-03-12 12:46:41 +01002907/*
Willy Tarreau87b09662015-04-03 00:22:06 +02002908 * send a log for the stream when we have enough info about it.
William Lallemand1d705562012-03-12 12:46:41 +01002909 * Will not log if the frontend has no log defined.
2910 */
Willy Tarreau87b09662015-04-03 00:22:06 +02002911void strm_log(struct stream *s)
William Lallemand1d705562012-03-12 12:46:41 +01002912{
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02002913 struct session *sess = s->sess;
William Lallemand1d705562012-03-12 12:46:41 +01002914 int size, err, level;
Dragan Dosen0b85ece2015-09-25 19:17:44 +02002915 int sd_size = 0;
William Lallemand1d705562012-03-12 12:46:41 +01002916
2917 /* if we don't want to log normal traffic, return now */
Willy Tarreaue7dff022015-04-03 01:14:29 +02002918 err = (s->flags & SF_REDISP) ||
2919 ((s->flags & SF_ERR_MASK) > SF_ERR_LOCAL) ||
2920 (((s->flags & SF_ERR_MASK) == SF_ERR_NONE) &&
Willy Tarreau350f4872014-11-28 14:42:25 +01002921 (s->si[1].conn_retries != s->be->conn_retries)) ||
Willy Tarreaueee5b512015-04-03 23:46:31 +02002922 ((sess->fe->mode == PR_MODE_HTTP) && s->txn && s->txn->status >= 500);
Willy Tarreaubaaee002006-06-26 02:48:02 +02002923
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02002924 if (!err && (sess->fe->options2 & PR_O2_NOLOGNORM))
William Lallemand1d705562012-03-12 12:46:41 +01002925 return;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002926
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02002927 if (LIST_ISEMPTY(&sess->fe->logsrvs))
William Lallemand1d705562012-03-12 12:46:41 +01002928 return;
William Lallemandbddd4fd2012-02-27 11:23:10 +01002929
Willy Tarreauabcd5142013-06-11 17:18:02 +02002930 if (s->logs.level) { /* loglevel was overridden */
2931 if (s->logs.level == -1) {
2932 s->logs.logwait = 0; /* logs disabled */
2933 return;
2934 }
2935 level = s->logs.level - 1;
2936 }
2937 else {
2938 level = LOG_INFO;
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02002939 if (err && (sess->fe->options2 & PR_O2_LOGERRORS))
Willy Tarreauabcd5142013-06-11 17:18:02 +02002940 level = LOG_ERR;
2941 }
William Lallemand1d705562012-03-12 12:46:41 +01002942
William Lallemand5b7ea3a2013-08-28 15:44:19 +02002943 /* if unique-id was not generated */
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02002944 if (!s->unique_id && !LIST_ISEMPTY(&sess->fe->format_unique_id)) {
Willy Tarreaubafbe012017-11-24 17:34:44 +01002945 if ((s->unique_id = pool_alloc(pool_head_uniqueid)) != NULL)
Willy Tarreaue36cbcb2015-04-03 15:40:56 +02002946 build_logline(s, s->unique_id, UNIQUEID_LEN, &sess->fe->format_unique_id);
William Lallemand5b7ea3a2013-08-28 15:44:19 +02002947 }
2948
Dragan Dosen0b85ece2015-09-25 19:17:44 +02002949 if (!LIST_ISEMPTY(&sess->fe->logformat_sd)) {
2950 sd_size = build_logline(s, logline_rfc5424, global.max_syslog_len,
2951 &sess->fe->logformat_sd);
2952 }
2953
Dragan Dosen59cee972015-09-19 22:09:02 +02002954 size = build_logline(s, logline, global.max_syslog_len, &sess->fe->logformat);
William Lallemand1d705562012-03-12 12:46:41 +01002955 if (size > 0) {
Olivier Houchardd2ee3e72019-03-08 18:53:21 +01002956 _HA_ATOMIC_ADD(&sess->fe->log_count, 1);
Dragan Dosen0b85ece2015-09-25 19:17:44 +02002957 __send_log(sess->fe, level, logline, size + 1, logline_rfc5424, sd_size);
William Lallemand1d705562012-03-12 12:46:41 +01002958 s->logs.logwait = 0;
2959 }
2960}
William Lallemandbddd4fd2012-02-27 11:23:10 +01002961
Willy Tarreau53839352018-09-05 19:51:10 +02002962/*
2963 * send a minimalist log for the session. Will not log if the frontend has no
2964 * log defined. It is assumed that this is only used to report anomalies that
2965 * cannot lead to the creation of a regular stream. Because of this the log
2966 * level is LOG_INFO or LOG_ERR depending on the "log-separate-error" setting
2967 * in the frontend. The caller must simply know that it should not call this
Willy Tarreau9fa267d2018-10-05 10:22:27 +02002968 * function to report unimportant events. It is safe to call this function with
2969 * sess==NULL (will not do anything).
Willy Tarreau53839352018-09-05 19:51:10 +02002970 */
2971void sess_log(struct session *sess)
2972{
2973 int size, level;
2974 int sd_size = 0;
2975
Willy Tarreau9fa267d2018-10-05 10:22:27 +02002976 if (!sess)
2977 return;
2978
Willy Tarreau53839352018-09-05 19:51:10 +02002979 if (LIST_ISEMPTY(&sess->fe->logsrvs))
2980 return;
2981
2982 level = LOG_INFO;
2983 if (sess->fe->options2 & PR_O2_LOGERRORS)
2984 level = LOG_ERR;
2985
2986 if (!LIST_ISEMPTY(&sess->fe->logformat_sd)) {
2987 sd_size = sess_build_logline(sess, NULL,
2988 logline_rfc5424, global.max_syslog_len,
2989 &sess->fe->logformat_sd);
2990 }
2991
2992 size = sess_build_logline(sess, NULL, logline, global.max_syslog_len, &sess->fe->logformat);
2993 if (size > 0) {
Olivier Houchardd2ee3e72019-03-08 18:53:21 +01002994 _HA_ATOMIC_ADD(&sess->fe->log_count, 1);
Willy Tarreau53839352018-09-05 19:51:10 +02002995 __send_log(sess->fe, level, logline, size + 1, logline_rfc5424, sd_size);
2996 }
2997}
2998
Christopher Fauletc1b730a2017-10-24 12:00:51 +02002999static int cli_io_handler_show_startup_logs(struct appctx *appctx)
3000{
3001 struct stream_interface *si = appctx->owner;
3002 const char *msg = (startup_logs ? startup_logs : "No startup alerts/warnings.\n");
3003
3004 if (ci_putstr(si_ic(si), msg) == -1) {
Willy Tarreaudb398432018-11-15 11:08:52 +01003005 si_rx_room_blk(si);
Christopher Fauletc1b730a2017-10-24 12:00:51 +02003006 return 0;
3007 }
3008 return 1;
3009}
3010
3011/* register cli keywords */
3012static struct cli_kw_list cli_kws = {{ },{
3013 { { "show", "startup-logs", NULL },
3014 "show startup-logs : report logs emitted during HAProxy startup",
3015 NULL, cli_io_handler_show_startup_logs },
3016 {{},}
3017}};
3018
Willy Tarreau0108d902018-11-25 19:14:37 +01003019INITCALL1(STG_REGISTER, cli_register_kw, &cli_kws);
3020
Willy Tarreau082b6282019-05-22 14:42:12 +02003021REGISTER_PER_THREAD_ALLOC(init_log_buffers);
3022REGISTER_PER_THREAD_FREE(deinit_log_buffers);
Willy Tarreau172f5ce2018-11-26 11:21:50 +01003023
Willy Tarreaubaaee002006-06-26 02:48:02 +02003024/*
3025 * Local variables:
3026 * c-indent-level: 8
3027 * c-basic-offset: 8
3028 * End:
3029 */