blob: 4459f46859e919c9e6fe10492ecee690b02395c9 [file] [log] [blame]
Emeric Brun3bd697e2010-01-04 15:23:48 +01001/*
2 * Stick tables management functions.
3 *
4 * Copyright 2009-2010 EXCELIANCE, Emeric Brun <ebrun@exceliance.fr>
Willy Tarreau08d5f982010-06-06 13:34:54 +02005 * Copyright (C) 2010 Willy Tarreau <w@1wt.eu>
Emeric Brun3bd697e2010-01-04 15:23:48 +01006 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License
9 * as published by the Free Software Foundation; either version
10 * 2 of the License, or (at your option) any later version.
11 *
12 */
13
14#include <string.h>
15
16#include <common/config.h>
17#include <common/memory.h>
18#include <common/mini-clist.h>
19#include <common/standard.h>
20#include <common/time.h>
21
22#include <ebmbtree.h>
23#include <ebsttree.h>
24
Willy Tarreaud9f316a2014-07-10 14:03:38 +020025#include <proto/arg.h>
Emeric Brun3bd697e2010-01-04 15:23:48 +010026#include <proto/proxy.h>
Willy Tarreaucd3b0942012-04-27 21:52:18 +020027#include <proto/sample.h>
Willy Tarreau87b09662015-04-03 00:22:06 +020028#include <proto/stream.h>
Willy Tarreau68129b92010-06-06 16:06:52 +020029#include <proto/stick_table.h>
Emeric Brun3bd697e2010-01-04 15:23:48 +010030#include <proto/task.h>
Emeric Brun32da3c42010-09-23 18:39:19 +020031#include <proto/peers.h>
32#include <types/global.h>
Emeric Brun3bd697e2010-01-04 15:23:48 +010033
Willy Tarreau12785782012-04-27 21:37:17 +020034/* structure used to return a table key built from a sample */
Willy Tarreau07115412012-10-29 21:56:59 +010035struct stktable_key *static_table_key;
Willy Tarreauf0b38bf2010-06-06 13:22:23 +020036
Emeric Brun3bd697e2010-01-04 15:23:48 +010037/*
Willy Tarreauaea940e2010-06-06 11:56:36 +020038 * Free an allocated sticky session <ts>, and decrease sticky sessions counter
39 * in table <t>.
Emeric Brun3bd697e2010-01-04 15:23:48 +010040 */
41void stksess_free(struct stktable *t, struct stksess *ts)
42{
43 t->current--;
Willy Tarreau393379c2010-06-06 12:11:37 +020044 pool_free2(t->pool, (void *)ts - t->data_size);
Emeric Brun3bd697e2010-01-04 15:23:48 +010045}
46
47/*
Willy Tarreauf6efda12010-08-03 20:34:06 +020048 * Kill an stksess (only if its ref_cnt is zero).
49 */
50void stksess_kill(struct stktable *t, struct stksess *ts)
51{
52 if (ts->ref_cnt)
53 return;
54
55 eb32_delete(&ts->exp);
Emeric Brun85e77c72010-09-23 18:16:52 +020056 eb32_delete(&ts->upd);
Willy Tarreauf6efda12010-08-03 20:34:06 +020057 ebmb_delete(&ts->key);
58 stksess_free(t, ts);
59}
60
61/*
Willy Tarreauaea940e2010-06-06 11:56:36 +020062 * Initialize or update the key in the sticky session <ts> present in table <t>
63 * from the value present in <key>.
Emeric Brun3bd697e2010-01-04 15:23:48 +010064 */
Willy Tarreau393379c2010-06-06 12:11:37 +020065void stksess_setkey(struct stktable *t, struct stksess *ts, struct stktable_key *key)
Emeric Brun3bd697e2010-01-04 15:23:48 +010066{
67 if (t->type != STKTABLE_TYPE_STRING)
Willy Tarreau86257dc2010-06-06 12:57:10 +020068 memcpy(ts->key.key, key->key, t->key_size);
Emeric Brun3bd697e2010-01-04 15:23:48 +010069 else {
Willy Tarreau86257dc2010-06-06 12:57:10 +020070 memcpy(ts->key.key, key->key, MIN(t->key_size - 1, key->key_len));
71 ts->key.key[MIN(t->key_size - 1, key->key_len)] = 0;
Emeric Brun3bd697e2010-01-04 15:23:48 +010072 }
73}
74
75
76/*
Willy Tarreau393379c2010-06-06 12:11:37 +020077 * Init sticky session <ts> of table <t>. The data parts are cleared and <ts>
78 * is returned.
Emeric Brun3bd697e2010-01-04 15:23:48 +010079 */
Willy Tarreau393379c2010-06-06 12:11:37 +020080static struct stksess *stksess_init(struct stktable *t, struct stksess * ts)
Emeric Brun3bd697e2010-01-04 15:23:48 +010081{
Willy Tarreau393379c2010-06-06 12:11:37 +020082 memset((void *)ts - t->data_size, 0, t->data_size);
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +020083 ts->ref_cnt = 0;
Willy Tarreau86257dc2010-06-06 12:57:10 +020084 ts->key.node.leaf_p = NULL;
85 ts->exp.node.leaf_p = NULL;
Emeric Brun85e77c72010-09-23 18:16:52 +020086 ts->upd.node.leaf_p = NULL;
Emeric Brun3bd697e2010-01-04 15:23:48 +010087 return ts;
88}
89
90/*
Willy Tarreauaea940e2010-06-06 11:56:36 +020091 * Trash oldest <to_batch> sticky sessions from table <t>
92 * Returns number of trashed sticky sessions.
Emeric Brun3bd697e2010-01-04 15:23:48 +010093 */
Willy Tarreau3a925c12013-09-04 17:54:01 +020094int stktable_trash_oldest(struct stktable *t, int to_batch)
Emeric Brun3bd697e2010-01-04 15:23:48 +010095{
96 struct stksess *ts;
97 struct eb32_node *eb;
98 int batched = 0;
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +020099 int looped = 0;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100100
101 eb = eb32_lookup_ge(&t->exps, now_ms - TIMER_LOOK_BACK);
102
103 while (batched < to_batch) {
104
105 if (unlikely(!eb)) {
106 /* we might have reached the end of the tree, typically because
107 * <now_ms> is in the first half and we're first scanning the last
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +0200108 * half. Let's loop back to the beginning of the tree now if we
109 * have not yet visited it.
Emeric Brun3bd697e2010-01-04 15:23:48 +0100110 */
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +0200111 if (looped)
112 break;
113 looped = 1;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100114 eb = eb32_first(&t->exps);
115 if (likely(!eb))
116 break;
117 }
118
119 /* timer looks expired, detach it from the queue */
Willy Tarreau86257dc2010-06-06 12:57:10 +0200120 ts = eb32_entry(eb, struct stksess, exp);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100121 eb = eb32_next(eb);
122
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +0200123 /* don't delete an entry which is currently referenced */
124 if (ts->ref_cnt)
125 continue;
126
Willy Tarreau86257dc2010-06-06 12:57:10 +0200127 eb32_delete(&ts->exp);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100128
Willy Tarreau86257dc2010-06-06 12:57:10 +0200129 if (ts->expire != ts->exp.key) {
Emeric Brun3bd697e2010-01-04 15:23:48 +0100130 if (!tick_isset(ts->expire))
131 continue;
132
Willy Tarreau86257dc2010-06-06 12:57:10 +0200133 ts->exp.key = ts->expire;
134 eb32_insert(&t->exps, &ts->exp);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100135
Willy Tarreau86257dc2010-06-06 12:57:10 +0200136 if (!eb || eb->key > ts->exp.key)
137 eb = &ts->exp;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100138
139 continue;
140 }
Emeric Brun3bd697e2010-01-04 15:23:48 +0100141
Willy Tarreauaea940e2010-06-06 11:56:36 +0200142 /* session expired, trash it */
Willy Tarreau86257dc2010-06-06 12:57:10 +0200143 ebmb_delete(&ts->key);
Emeric Brun85e77c72010-09-23 18:16:52 +0200144 eb32_delete(&ts->upd);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100145 stksess_free(t, ts);
146 batched++;
147 }
148
149 return batched;
150}
151
152/*
Willy Tarreauaea940e2010-06-06 11:56:36 +0200153 * Allocate and initialise a new sticky session.
154 * The new sticky session is returned or NULL in case of lack of memory.
155 * Sticky sessions should only be allocated this way, and must be freed using
Willy Tarreaua7b46b52013-04-11 16:55:37 +0200156 * stksess_free(). Table <t>'s sticky session counter is increased. If <key>
157 * is not NULL, it is assigned to the new session.
Emeric Brun3bd697e2010-01-04 15:23:48 +0100158 */
159struct stksess *stksess_new(struct stktable *t, struct stktable_key *key)
160{
161 struct stksess *ts;
162
163 if (unlikely(t->current == t->size)) {
164 if ( t->nopurge )
165 return NULL;
166
Emeric Brunfbce6d02010-09-23 18:10:00 +0200167 if (!stktable_trash_oldest(t, (t->size >> 8) + 1))
Emeric Brun3bd697e2010-01-04 15:23:48 +0100168 return NULL;
169 }
170
Willy Tarreau393379c2010-06-06 12:11:37 +0200171 ts = pool_alloc2(t->pool) + t->data_size;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100172 if (ts) {
173 t->current++;
Willy Tarreau393379c2010-06-06 12:11:37 +0200174 stksess_init(t, ts);
Willy Tarreaua7b46b52013-04-11 16:55:37 +0200175 if (key)
176 stksess_setkey(t, ts, key);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100177 }
178
179 return ts;
180}
181
182/*
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200183 * Looks in table <t> for a sticky session matching key <key>.
Willy Tarreauaea940e2010-06-06 11:56:36 +0200184 * Returns pointer on requested sticky session or NULL if none was found.
Emeric Brun3bd697e2010-01-04 15:23:48 +0100185 */
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200186struct stksess *stktable_lookup_key(struct stktable *t, struct stktable_key *key)
Emeric Brun3bd697e2010-01-04 15:23:48 +0100187{
188 struct ebmb_node *eb;
189
Emeric Brun3bd697e2010-01-04 15:23:48 +0100190 if (t->type == STKTABLE_TYPE_STRING)
Emeric Brun485479d2010-09-23 18:02:19 +0200191 eb = ebst_lookup_len(&t->keys, key->key, key->key_len+1 < t->key_size ? key->key_len : t->key_size-1);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100192 else
193 eb = ebmb_lookup(&t->keys, key->key, t->key_size);
194
195 if (unlikely(!eb)) {
196 /* no session found */
197 return NULL;
198 }
199
Willy Tarreau86257dc2010-06-06 12:57:10 +0200200 return ebmb_entry(eb, struct stksess, key);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100201}
202
Willy Tarreau1f7e9252010-06-20 12:27:21 +0200203/* Lookup and touch <key> in <table>, or create the entry if it does not exist.
204 * This is mainly used for situations where we want to refresh a key's usage so
205 * that it does not expire, and we want to have it created if it was not there.
206 * The stksess is returned, or NULL if it could not be created.
207 */
208struct stksess *stktable_update_key(struct stktable *table, struct stktable_key *key)
209{
210 struct stksess *ts;
211
212 ts = stktable_lookup_key(table, key);
213 if (likely(ts))
Emeric Brun85e77c72010-09-23 18:16:52 +0200214 return stktable_touch(table, ts, 1);
Willy Tarreau1f7e9252010-06-20 12:27:21 +0200215
216 /* entry does not exist, initialize a new one */
217 ts = stksess_new(table, key);
218 if (likely(ts))
Emeric Brun85e77c72010-09-23 18:16:52 +0200219 stktable_store(table, ts, 1);
Willy Tarreau1f7e9252010-06-20 12:27:21 +0200220 return ts;
221}
222
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200223/*
224 * Looks in table <t> for a sticky session with same key as <ts>.
225 * Returns pointer on requested sticky session or NULL if none was found.
Emeric Brun3bd697e2010-01-04 15:23:48 +0100226 */
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200227struct stksess *stktable_lookup(struct stktable *t, struct stksess *ts)
Emeric Brun3bd697e2010-01-04 15:23:48 +0100228{
Emeric Brun3bd697e2010-01-04 15:23:48 +0100229 struct ebmb_node *eb;
230
231 if (t->type == STKTABLE_TYPE_STRING)
Willy Tarreau86257dc2010-06-06 12:57:10 +0200232 eb = ebst_lookup(&(t->keys), (char *)ts->key.key);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100233 else
Willy Tarreau86257dc2010-06-06 12:57:10 +0200234 eb = ebmb_lookup(&(t->keys), ts->key.key, t->key_size);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100235
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200236 if (unlikely(!eb))
237 return NULL;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100238
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200239 return ebmb_entry(eb, struct stksess, key);
240}
Emeric Brun3bd697e2010-01-04 15:23:48 +0100241
Willy Tarreaucb183642010-06-06 17:58:34 +0200242/* Update the expiration timer for <ts> but do not touch its expiration node.
243 * The table's expiration timer is updated if set.
244 */
Emeric Brun85e77c72010-09-23 18:16:52 +0200245struct stksess *stktable_touch(struct stktable *t, struct stksess *ts, int local)
Willy Tarreaucb183642010-06-06 17:58:34 +0200246{
Emeric Brun85e77c72010-09-23 18:16:52 +0200247 struct eb32_node * eb;
Willy Tarreaucb183642010-06-06 17:58:34 +0200248 ts->expire = tick_add(now_ms, MS_TO_TICKS(t->expire));
249 if (t->expire) {
250 t->exp_task->expire = t->exp_next = tick_first(ts->expire, t->exp_next);
251 task_queue(t->exp_task);
252 }
Emeric Brun85e77c72010-09-23 18:16:52 +0200253
254 if (t->sync_task && local) {
255 ts->upd.key = ++t->update;
256 t->localupdate = t->update;
257 eb32_delete(&ts->upd);
258 eb = eb32_insert(&t->updates, &ts->upd);
259 if (eb != &ts->upd) {
260 eb32_delete(eb);
261 eb32_insert(&t->updates, &ts->upd);
262 }
263 task_wakeup(t->sync_task, TASK_WOKEN_MSG);
264 }
Willy Tarreaucb183642010-06-06 17:58:34 +0200265 return ts;
266}
267
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200268/* Insert new sticky session <ts> in the table. It is assumed that it does not
269 * yet exist (the caller must check this). The table's timeout is updated if it
270 * is set. <ts> is returned.
271 */
Emeric Brun85e77c72010-09-23 18:16:52 +0200272struct stksess *stktable_store(struct stktable *t, struct stksess *ts, int local)
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200273{
274 ebmb_insert(&t->keys, &ts->key, t->key_size);
Emeric Brun85e77c72010-09-23 18:16:52 +0200275 stktable_touch(t, ts, local);
Willy Tarreaucb183642010-06-06 17:58:34 +0200276 ts->exp.key = ts->expire;
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200277 eb32_insert(&t->exps, &ts->exp);
Willy Tarreauf16d2b82010-06-06 15:38:59 +0200278 return ts;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100279}
280
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +0200281/* Returns a valid or initialized stksess for the specified stktable_key in the
282 * specified table, or NULL if the key was NULL, or if no entry was found nor
283 * could be created. The entry's expiration is updated.
284 */
285struct stksess *stktable_get_entry(struct stktable *table, struct stktable_key *key)
286{
287 struct stksess *ts;
288
289 if (!key)
290 return NULL;
291
292 ts = stktable_lookup_key(table, key);
293 if (ts == NULL) {
294 /* entry does not exist, initialize a new one */
295 ts = stksess_new(table, key);
296 if (!ts)
297 return NULL;
Emeric Brun85e77c72010-09-23 18:16:52 +0200298 stktable_store(table, ts, 1);
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +0200299 }
300 else
Emeric Brun85e77c72010-09-23 18:16:52 +0200301 stktable_touch(table, ts, 1);
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +0200302 return ts;
303}
304
Emeric Brun3bd697e2010-01-04 15:23:48 +0100305/*
Willy Tarreauaea940e2010-06-06 11:56:36 +0200306 * Trash expired sticky sessions from table <t>. The next expiration date is
307 * returned.
Emeric Brun3bd697e2010-01-04 15:23:48 +0100308 */
309static int stktable_trash_expired(struct stktable *t)
310{
311 struct stksess *ts;
312 struct eb32_node *eb;
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +0200313 int looped = 0;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100314
315 eb = eb32_lookup_ge(&t->exps, now_ms - TIMER_LOOK_BACK);
316
317 while (1) {
318 if (unlikely(!eb)) {
319 /* we might have reached the end of the tree, typically because
320 * <now_ms> is in the first half and we're first scanning the last
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +0200321 * half. Let's loop back to the beginning of the tree now if we
322 * have not yet visited it.
Emeric Brun3bd697e2010-01-04 15:23:48 +0100323 */
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +0200324 if (looped)
325 break;
326 looped = 1;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100327 eb = eb32_first(&t->exps);
328 if (likely(!eb))
329 break;
330 }
331
332 if (likely(tick_is_lt(now_ms, eb->key))) {
333 /* timer not expired yet, revisit it later */
334 t->exp_next = eb->key;
335 return t->exp_next;
336 }
337
338 /* timer looks expired, detach it from the queue */
Willy Tarreau86257dc2010-06-06 12:57:10 +0200339 ts = eb32_entry(eb, struct stksess, exp);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100340 eb = eb32_next(eb);
341
Willy Tarreaue7f3d7a2010-06-14 14:53:07 +0200342 /* don't delete an entry which is currently referenced */
343 if (ts->ref_cnt)
344 continue;
345
Willy Tarreau86257dc2010-06-06 12:57:10 +0200346 eb32_delete(&ts->exp);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100347
348 if (!tick_is_expired(ts->expire, now_ms)) {
349 if (!tick_isset(ts->expire))
350 continue;
351
Willy Tarreau86257dc2010-06-06 12:57:10 +0200352 ts->exp.key = ts->expire;
353 eb32_insert(&t->exps, &ts->exp);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100354
Willy Tarreau86257dc2010-06-06 12:57:10 +0200355 if (!eb || eb->key > ts->exp.key)
356 eb = &ts->exp;
Emeric Brun3bd697e2010-01-04 15:23:48 +0100357 continue;
358 }
359
360 /* session expired, trash it */
Willy Tarreau86257dc2010-06-06 12:57:10 +0200361 ebmb_delete(&ts->key);
Emeric Brun85e77c72010-09-23 18:16:52 +0200362 eb32_delete(&ts->upd);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100363 stksess_free(t, ts);
364 }
365
366 /* We have found no task to expire in any tree */
367 t->exp_next = TICK_ETERNITY;
368 return t->exp_next;
369}
370
371/*
Willy Tarreauaea940e2010-06-06 11:56:36 +0200372 * Task processing function to trash expired sticky sessions. A pointer to the
373 * task itself is returned since it never dies.
Emeric Brun3bd697e2010-01-04 15:23:48 +0100374 */
Willy Tarreauaea940e2010-06-06 11:56:36 +0200375static struct task *process_table_expire(struct task *task)
Emeric Brun3bd697e2010-01-04 15:23:48 +0100376{
377 struct stktable *t = (struct stktable *)task->context;
378
379 task->expire = stktable_trash_expired(t);
380 return task;
381}
382
Willy Tarreauaea940e2010-06-06 11:56:36 +0200383/* Perform minimal stick table intializations, report 0 in case of error, 1 if OK. */
Emeric Brun3bd697e2010-01-04 15:23:48 +0100384int stktable_init(struct stktable *t)
385{
386 if (t->size) {
387 memset(&t->keys, 0, sizeof(t->keys));
388 memset(&t->exps, 0, sizeof(t->exps));
389
Willy Tarreau393379c2010-06-06 12:11:37 +0200390 t->pool = create_pool("sticktables", sizeof(struct stksess) + t->data_size + t->key_size, MEM_F_SHARED);
Emeric Brun3bd697e2010-01-04 15:23:48 +0100391
392 t->exp_next = TICK_ETERNITY;
393 if ( t->expire ) {
394 t->exp_task = task_new();
395 t->exp_task->process = process_table_expire;
396 t->exp_task->expire = TICK_ETERNITY;
397 t->exp_task->context = (void *)t;
398 }
Emeric Brun32da3c42010-09-23 18:39:19 +0200399 if (t->peers.p && t->peers.p->peers_fe) {
400 peers_register_table(t->peers.p, t);
401 }
402
Emeric Brun3bd697e2010-01-04 15:23:48 +0100403 return t->pool != NULL;
404 }
405 return 1;
406}
407
408/*
409 * Configuration keywords of known table types
410 */
Emeric Brun485479d2010-09-23 18:02:19 +0200411struct stktable_type stktable_types[STKTABLE_TYPES] = {{ "ip", 0, 4 },
David du Colombier4f92d322011-03-24 11:09:31 +0100412 { "ipv6", 0, 16 },
Emeric Brun3bd697e2010-01-04 15:23:48 +0100413 { "integer", 0, 4 },
Emeric Brun485479d2010-09-23 18:02:19 +0200414 { "string", STK_F_CUSTOM_KEYSIZE, 32 },
David du Colombier4f92d322011-03-24 11:09:31 +0100415 { "binary", STK_F_CUSTOM_KEYSIZE, 32 } };
Emeric Brun3bd697e2010-01-04 15:23:48 +0100416
417
418/*
419 * Parse table type configuration.
420 * Returns 0 on successful parsing, else 1.
421 * <myidx> is set at next configuration <args> index.
422 */
423int stktable_parse_type(char **args, int *myidx, unsigned long *type, size_t *key_size)
424{
425 for (*type = 0; *type < STKTABLE_TYPES; (*type)++) {
426 if (strcmp(args[*myidx], stktable_types[*type].kw) != 0)
427 continue;
428
429 *key_size = stktable_types[*type].default_size;
430 (*myidx)++;
431
Willy Tarreauaea940e2010-06-06 11:56:36 +0200432 if (stktable_types[*type].flags & STK_F_CUSTOM_KEYSIZE) {
Emeric Brun3bd697e2010-01-04 15:23:48 +0100433 if (strcmp("len", args[*myidx]) == 0) {
434 (*myidx)++;
435 *key_size = atol(args[*myidx]);
Emeric Brun485479d2010-09-23 18:02:19 +0200436 if (!*key_size)
Emeric Brun3bd697e2010-01-04 15:23:48 +0100437 break;
Emeric Brun485479d2010-09-23 18:02:19 +0200438 if (*type == STKTABLE_TYPE_STRING) {
439 /* null terminated string needs +1 for '\0'. */
440 (*key_size)++;
441 }
Emeric Brun3bd697e2010-01-04 15:23:48 +0100442 (*myidx)++;
443 }
444 }
445 return 0;
446 }
447 return 1;
448}
449
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200450/*****************************************************************/
Willy Tarreau12785782012-04-27 21:37:17 +0200451/* typed sample to typed table key functions */
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200452/*****************************************************************/
453
Willy Tarreau342acb42012-04-23 22:03:39 +0200454static void *k_int2int(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200455{
Willy Tarreau342acb42012-04-23 22:03:39 +0200456 return (void *)&smp->data.uint;
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200457}
458
Willy Tarreau342acb42012-04-23 22:03:39 +0200459static void *k_ip2ip(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200460{
Willy Tarreau803685f2013-12-02 23:17:27 +0100461 if (smp->type == SMP_T_IPV6) {
462 v6tov4(&kdata->ip, &smp->data.ipv6);
463 return (void *)&kdata->ip.s_addr;
464 }
465 else {
466 return (void *)&smp->data.ipv4.s_addr;
467 }
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200468}
469
Willy Tarreau342acb42012-04-23 22:03:39 +0200470static void *k_ip2ipv6(struct sample *smp, union stktable_key_data *kdata, size_t *len)
David du Colombier4f92d322011-03-24 11:09:31 +0100471{
Willy Tarreau803685f2013-12-02 23:17:27 +0100472 if (smp->type == SMP_T_IPV6) {
473 return (void *)&smp->data.ipv6.s6_addr;
474 }
475 else {
476 v4tov6(&kdata->ipv6, &smp->data.ipv4);
477 return (void *)&kdata->ipv6.s6_addr;
478 }
David du Colombier4f92d322011-03-24 11:09:31 +0100479}
David du Colombier4f92d322011-03-24 11:09:31 +0100480
Willy Tarreau342acb42012-04-23 22:03:39 +0200481static void *k_ip2int(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200482{
Willy Tarreau803685f2013-12-02 23:17:27 +0100483 if (smp->type == SMP_T_IPV6) {
484 if (!v6tov4(&kdata->ip, &smp->data.ipv6))
485 return NULL;
486 kdata->integer = ntohl(kdata->ip.s_addr);
487 }
488 else {
489 kdata->integer = ntohl(smp->data.ipv4.s_addr);
490 }
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200491 return (void *)&kdata->integer;
492}
493
Willy Tarreau342acb42012-04-23 22:03:39 +0200494static void *k_int2ip(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200495{
Willy Tarreau342acb42012-04-23 22:03:39 +0200496 kdata->ip.s_addr = htonl(smp->data.uint);
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200497 return (void *)&kdata->ip.s_addr;
498}
499
Willy Tarreau342acb42012-04-23 22:03:39 +0200500static void *k_str2str(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200501{
Willy Tarreau342acb42012-04-23 22:03:39 +0200502 *len = smp->data.str.len;
503 return (void *)smp->data.str.str;
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200504}
505
Willy Tarreau342acb42012-04-23 22:03:39 +0200506static void *k_ip2str(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200507{
Willy Tarreau803685f2013-12-02 23:17:27 +0100508 if (smp->type == SMP_T_IPV6) {
509 if (!inet_ntop(AF_INET6, &smp->data.ipv6, kdata->buf, *len))
510 return NULL;
511 }
512 else {
513 if (!inet_ntop(AF_INET, &smp->data.ipv4, kdata->buf, *len))
514 return NULL;
515 }
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200516
517 *len = strlen((const char *)kdata->buf);
518 return (void *)kdata->buf;
519}
520
Willy Tarreau9700e5c2014-07-15 21:03:26 +0200521static void *k_ip2bin(struct sample *smp, union stktable_key_data *kdata, size_t *len)
522{
523 if (smp->type == SMP_T_IPV4) {
524 if (*len > 4)
525 *len = 4;
526 memcpy(kdata->buf, &smp->data.ipv4, *len);
527 }
528 else if (smp->type == SMP_T_IPV6) {
529 if (*len > 16)
530 *len = 16;
531 memcpy(kdata->buf, &smp->data.ipv6, *len);
532 }
533 else
534 *len = 0;
535 return (void *)kdata->buf;
536}
537
Emeric Brun8ac33d92012-10-17 13:36:06 +0200538static void *k_bin2str(struct sample *smp, union stktable_key_data *kdata, size_t *len)
539{
540 unsigned char c;
541 int ptr = 0;
Willy Tarreauf22180f2012-12-09 11:08:14 +0100542 int max = *len;
543 int size = 0;
Emeric Brun8ac33d92012-10-17 13:36:06 +0200544
Willy Tarreauf22180f2012-12-09 11:08:14 +0100545 while (ptr < smp->data.str.len && size <= max - 2) {
Emeric Brun8ac33d92012-10-17 13:36:06 +0200546 c = smp->data.str.str[ptr++];
Willy Tarreauf22180f2012-12-09 11:08:14 +0100547 kdata->buf[size++] = hextab[(c >> 4) & 0xF];
548 kdata->buf[size++] = hextab[c & 0xF];
Emeric Brun8ac33d92012-10-17 13:36:06 +0200549 }
Willy Tarreauf22180f2012-12-09 11:08:14 +0100550 *len = size;
Emeric Brun8ac33d92012-10-17 13:36:06 +0200551 return (void *)kdata->buf;
552}
553
Willy Tarreau342acb42012-04-23 22:03:39 +0200554static void *k_int2str(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200555{
556 void *key;
557
Willy Tarreauf22180f2012-12-09 11:08:14 +0100558 key = (void *)ultoa_r(smp->data.uint, kdata->buf, *len);
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200559 if (!key)
560 return NULL;
561
562 *len = strlen((const char *)key);
563 return key;
564}
565
Willy Tarreau342acb42012-04-23 22:03:39 +0200566static void *k_str2ip(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200567{
Willy Tarreau342acb42012-04-23 22:03:39 +0200568 if (!buf2ip(smp->data.str.str, smp->data.str.len, &kdata->ip))
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200569 return NULL;
570
571 return (void *)&kdata->ip.s_addr;
572}
573
Willy Tarreau342acb42012-04-23 22:03:39 +0200574static void *k_str2ipv6(struct sample *smp, union stktable_key_data *kdata, size_t *len)
David du Colombier4f92d322011-03-24 11:09:31 +0100575{
Willy Tarreau342acb42012-04-23 22:03:39 +0200576 if (!inet_pton(AF_INET6, smp->data.str.str, &kdata->ipv6))
David du Colombier4f92d322011-03-24 11:09:31 +0100577 return NULL;
578
579 return (void *)&kdata->ipv6.s6_addr;
580}
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200581
Willy Tarreau342acb42012-04-23 22:03:39 +0200582static void *k_str2int(struct sample *smp, union stktable_key_data *kdata, size_t *len)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200583{
584 int i;
585
586 kdata->integer = 0;
Willy Tarreau342acb42012-04-23 22:03:39 +0200587 for (i = 0; i < smp->data.str.len; i++) {
588 uint32_t val = smp->data.str.str[i] - '0';
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200589
590 if (val > 9)
591 break;
592
593 kdata->integer = kdata->integer * 10 + val;
594 }
595 return (void *)&kdata->integer;
596}
597
598/*****************************************************************/
Willy Tarreau12785782012-04-27 21:37:17 +0200599/* typed sample to typed table key matrix: */
600/* sample_to_key[from sample type][to table key type] */
601/* NULL pointer used for impossible sample casts */
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200602/*****************************************************************/
603
Willy Tarreau12785782012-04-27 21:37:17 +0200604typedef void *(*sample_to_key_fct)(struct sample *smp, union stktable_key_data *kdata, size_t *len);
605static sample_to_key_fct sample_to_key[SMP_TYPES][STKTABLE_TYPES] = {
David du Colombier4f92d322011-03-24 11:09:31 +0100606/* table type: IP IPV6 INTEGER STRING BINARY */
Willy Tarreau422aa072012-04-20 20:49:27 +0200607/* patt. type: BOOL */ { NULL, NULL, k_int2int, k_int2str, NULL },
608/* UINT */ { k_int2ip, NULL, k_int2int, k_int2str, NULL },
609/* SINT */ { k_int2ip, NULL, k_int2int, k_int2str, NULL },
Thierry FOURNIERb805f712013-11-26 20:47:54 +0100610/* ADDR */ { k_ip2ip, k_ip2ipv6, k_ip2int, k_ip2str, NULL },
Willy Tarreau9700e5c2014-07-15 21:03:26 +0200611/* IPV4 */ { k_ip2ip, k_ip2ipv6, k_ip2int, k_ip2str, k_ip2bin },
612/* IPV6 */ { k_ip2ip, k_ip2ipv6, k_ip2int, k_ip2str, k_ip2bin },
Willy Tarreau422aa072012-04-20 20:49:27 +0200613/* STR */ { k_str2ip, k_str2ipv6, k_str2int, k_str2str, k_str2str },
Emeric Brun8ac33d92012-10-17 13:36:06 +0200614/* BIN */ { NULL, NULL, NULL, k_bin2str, k_str2str },
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200615};
616
617
Willy Tarreau8fed9032014-07-03 17:02:46 +0200618/* Prepares a stktable_key from a sample <smp> to search into table <t>.
619 * Returns NULL if the sample could not be converted (eg: no matching type),
620 * otherwise a pointer to the static stktable_key filled with what is needed
621 * for the lookup.
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200622 */
Willy Tarreau8fed9032014-07-03 17:02:46 +0200623struct stktable_key *smp_to_stkey(struct sample *smp, struct stktable *t)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200624{
Willy Tarreau12785782012-04-27 21:37:17 +0200625 if (!sample_to_key[smp->type][t->type])
Willy Tarreau12e50112012-04-25 17:21:49 +0200626 return NULL;
627
Willy Tarreau07115412012-10-29 21:56:59 +0100628 static_table_key->key_len = t->key_size;
629 static_table_key->key = sample_to_key[smp->type][t->type](smp, &static_table_key->data, &static_table_key->key_len);
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200630
Willy Tarreau07115412012-10-29 21:56:59 +0100631 if (!static_table_key->key)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200632 return NULL;
633
Willy Tarreau07115412012-10-29 21:56:59 +0100634 if (static_table_key->key_len == 0)
Willy Tarreau7fc1c6e2012-04-26 11:03:17 +0200635 return NULL;
636
Willy Tarreau07115412012-10-29 21:56:59 +0100637 if ((static_table_key->key_len < t->key_size) && (t->type != STKTABLE_TYPE_STRING)) {
Emeric Brun485479d2010-09-23 18:02:19 +0200638 /* need padding with null */
639
640 /* assume static_table_key.key_len is less than sizeof(static_table_key.data.buf)
641 cause t->key_size is necessary less than sizeof(static_table_key.data) */
642
Willy Tarreau07115412012-10-29 21:56:59 +0100643 if ((char *)static_table_key->key > (char *)&static_table_key->data &&
644 (char *)static_table_key->key < (char *)&static_table_key->data + global.tune.bufsize) {
Emeric Brun485479d2010-09-23 18:02:19 +0200645 /* key buffer is part of the static_table_key private data buffer, but is not aligned */
646
Willy Tarreau07115412012-10-29 21:56:59 +0100647 if (global.tune.bufsize - ((char *)static_table_key->key - (char *)&static_table_key->data) < t->key_size) {
648 /* if not remain enough place for padding , process a realign */
649 memmove(static_table_key->data.buf, static_table_key->key, static_table_key->key_len);
650 static_table_key->key = static_table_key->data.buf;
Emeric Brun485479d2010-09-23 18:02:19 +0200651 }
652 }
Willy Tarreau07115412012-10-29 21:56:59 +0100653 else if (static_table_key->key != static_table_key->data.buf) {
Emeric Brun485479d2010-09-23 18:02:19 +0200654 /* key definitly not part of the static_table_key private data buffer */
655
Willy Tarreau07115412012-10-29 21:56:59 +0100656 memcpy(static_table_key->data.buf, static_table_key->key, static_table_key->key_len);
657 static_table_key->key = static_table_key->data.buf;
Emeric Brun485479d2010-09-23 18:02:19 +0200658 }
659
Willy Tarreau07115412012-10-29 21:56:59 +0100660 memset(static_table_key->key + static_table_key->key_len, 0, t->key_size - static_table_key->key_len);
Emeric Brun485479d2010-09-23 18:02:19 +0200661 }
662
Willy Tarreau07115412012-10-29 21:56:59 +0100663 return static_table_key;
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200664}
665
666/*
Willy Tarreau8fed9032014-07-03 17:02:46 +0200667 * Process a fetch + format conversion as defined by the sample expression <expr>
668 * on request or response considering the <opt> parameter. Returns either NULL if
669 * no key could be extracted, or a pointer to the converted result stored in
670 * static_table_key in format <table_type>. If <smp> is not NULL, it will be reset
671 * and its flags will be initialized so that the caller gets a copy of the input
Willy Tarreau6bcb0a82014-07-30 08:56:35 +0200672 * sample, and knows why it was not accepted (eg: SMP_F_MAY_CHANGE is present
673 * without SMP_OPT_FINAL). The output will be usable like this :
674 *
675 * return MAY_CHANGE FINAL Meaning for the sample
676 * NULL 0 * Not present and will never be (eg: header)
677 * NULL 1 0 Not present or unstable, could change (eg: req_len)
678 * NULL 1 1 Not present, will not change anymore
679 * smp 0 * Present and will not change (eg: header)
680 * smp 1 0 not possible
681 * smp 1 1 Present, last known value (eg: request length)
Willy Tarreau8fed9032014-07-03 17:02:46 +0200682 */
Willy Tarreau192252e2015-04-04 01:47:55 +0200683struct stktable_key *stktable_fetch_key(struct stktable *t, struct proxy *px, struct session *sess, struct stream *strm,
Willy Tarreau8fed9032014-07-03 17:02:46 +0200684 unsigned int opt, struct sample_expr *expr, struct sample *smp)
685{
686 if (smp)
687 memset(smp, 0, sizeof(*smp));
688
Willy Tarreau192252e2015-04-04 01:47:55 +0200689 smp = sample_process(px, sess, strm, opt, expr, smp);
Willy Tarreau8fed9032014-07-03 17:02:46 +0200690 if (!smp)
691 return NULL;
692
693 if ((smp->flags & SMP_F_MAY_CHANGE) && !(opt & SMP_OPT_FINAL))
694 return NULL; /* we can only use stable samples */
695
696 return smp_to_stkey(smp, t);
697}
698
699/*
Willy Tarreau12785782012-04-27 21:37:17 +0200700 * Returns 1 if sample expression <expr> result can be converted to table key of
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200701 * type <table_type>, otherwise zero. Used in configuration check.
702 */
Willy Tarreau12785782012-04-27 21:37:17 +0200703int stktable_compatible_sample(struct sample_expr *expr, unsigned long table_type)
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200704{
Thierry FOURNIERf73eb8f2013-11-27 15:30:55 +0100705 int out_type;
706
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200707 if (table_type >= STKTABLE_TYPES)
708 return 0;
709
Thierry FOURNIERf73eb8f2013-11-27 15:30:55 +0100710 out_type = smp_expr_output_type(expr);
711 if (!sample_to_key[out_type][table_type])
712 return 0;
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200713
Willy Tarreauf0b38bf2010-06-06 13:22:23 +0200714 return 1;
715}
Emeric Brun3bd697e2010-01-04 15:23:48 +0100716
Willy Tarreauedee1d62014-07-15 16:44:27 +0200717/* Extra data types processing : after the last one, some room may remain
718 * before STKTABLE_DATA_TYPES that may be used to register extra data types
719 * at run time.
720 */
Willy Tarreau08d5f982010-06-06 13:34:54 +0200721struct stktable_data_type stktable_data_types[STKTABLE_DATA_TYPES] = {
Willy Tarreau3b9c6e02010-07-18 08:04:30 +0200722 [STKTABLE_DT_SERVER_ID] = { .name = "server_id", .std_type = STD_T_SINT },
723 [STKTABLE_DT_GPC0] = { .name = "gpc0", .std_type = STD_T_UINT },
Willy Tarreauba2ffd12013-05-29 15:54:14 +0200724 [STKTABLE_DT_GPC0_RATE] = { .name = "gpc0_rate", .std_type = STD_T_FRQP, .arg_type = ARG_T_DELAY },
Willy Tarreau3b9c6e02010-07-18 08:04:30 +0200725 [STKTABLE_DT_CONN_CNT] = { .name = "conn_cnt", .std_type = STD_T_UINT },
726 [STKTABLE_DT_CONN_RATE] = { .name = "conn_rate", .std_type = STD_T_FRQP, .arg_type = ARG_T_DELAY },
727 [STKTABLE_DT_CONN_CUR] = { .name = "conn_cur", .std_type = STD_T_UINT },
728 [STKTABLE_DT_SESS_CNT] = { .name = "sess_cnt", .std_type = STD_T_UINT },
729 [STKTABLE_DT_SESS_RATE] = { .name = "sess_rate", .std_type = STD_T_FRQP, .arg_type = ARG_T_DELAY },
730 [STKTABLE_DT_HTTP_REQ_CNT] = { .name = "http_req_cnt", .std_type = STD_T_UINT },
731 [STKTABLE_DT_HTTP_REQ_RATE] = { .name = "http_req_rate", .std_type = STD_T_FRQP, .arg_type = ARG_T_DELAY },
732 [STKTABLE_DT_HTTP_ERR_CNT] = { .name = "http_err_cnt", .std_type = STD_T_UINT },
733 [STKTABLE_DT_HTTP_ERR_RATE] = { .name = "http_err_rate", .std_type = STD_T_FRQP, .arg_type = ARG_T_DELAY },
734 [STKTABLE_DT_BYTES_IN_CNT] = { .name = "bytes_in_cnt", .std_type = STD_T_ULL },
735 [STKTABLE_DT_BYTES_IN_RATE] = { .name = "bytes_in_rate", .std_type = STD_T_FRQP, .arg_type = ARG_T_DELAY },
736 [STKTABLE_DT_BYTES_OUT_CNT] = { .name = "bytes_out_cnt", .std_type = STD_T_ULL },
737 [STKTABLE_DT_BYTES_OUT_RATE]= { .name = "bytes_out_rate", .std_type = STD_T_FRQP, .arg_type = ARG_T_DELAY },
Willy Tarreau08d5f982010-06-06 13:34:54 +0200738};
739
Willy Tarreauedee1d62014-07-15 16:44:27 +0200740/* Registers stick-table extra data type with index <idx>, name <name>, type
741 * <std_type> and arg type <arg_type>. If the index is negative, the next free
742 * index is automatically allocated. The allocated index is returned, or -1 if
743 * no free index was found or <name> was already registered. The <name> is used
744 * directly as a pointer, so if it's not stable, the caller must allocate it.
745 */
746int stktable_register_data_store(int idx, const char *name, int std_type, int arg_type)
747{
748 if (idx < 0) {
749 for (idx = 0; idx < STKTABLE_DATA_TYPES; idx++) {
750 if (!stktable_data_types[idx].name)
751 break;
752
753 if (strcmp(stktable_data_types[idx].name, name) == 0)
754 return -1;
755 }
756 }
757
758 if (idx >= STKTABLE_DATA_TYPES)
759 return -1;
760
761 if (stktable_data_types[idx].name != NULL)
762 return -1;
763
764 stktable_data_types[idx].name = name;
765 stktable_data_types[idx].std_type = std_type;
766 stktable_data_types[idx].arg_type = arg_type;
767 return idx;
768}
769
Willy Tarreau08d5f982010-06-06 13:34:54 +0200770/*
771 * Returns the data type number for the stktable_data_type whose name is <name>,
772 * or <0 if not found.
773 */
774int stktable_get_data_type(char *name)
775{
776 int type;
777
778 for (type = 0; type < STKTABLE_DATA_TYPES; type++) {
Willy Tarreauedee1d62014-07-15 16:44:27 +0200779 if (!stktable_data_types[type].name)
780 continue;
Willy Tarreau08d5f982010-06-06 13:34:54 +0200781 if (strcmp(name, stktable_data_types[type].name) == 0)
782 return type;
783 }
784 return -1;
785}
786
Willy Tarreau4a0347a2010-06-18 17:26:50 +0200787/* Returns pointer to proxy containing table <name> or NULL if not found */
788struct proxy *find_stktable(const char *name)
789{
790 struct proxy *px;
Willy Tarreau991610d2014-03-15 08:03:57 +0100791 struct ebpt_node *node;
792
793 for (node = ebis_lookup(&proxy_by_name, name); node; node = ebpt_next(node)) {
794 px = container_of(node, struct proxy, conf.by_name);
795
796 if (strcmp(px->id, name) != 0)
797 break;
Willy Tarreau4a0347a2010-06-18 17:26:50 +0200798
Willy Tarreau991610d2014-03-15 08:03:57 +0100799 if (px->table.size)
Willy Tarreau4a0347a2010-06-18 17:26:50 +0200800 return px;
801 }
802 return NULL;
803}
Willy Tarreaud9f316a2014-07-10 14:03:38 +0200804
805/* Casts sample <smp> to the type of the table specified in arg(0), and looks
806 * it up into this table. Returns true if found, false otherwise. The input
807 * type is STR so that input samples are converted to string (since all types
808 * can be converted to strings), then the function casts the string again into
809 * the table's type. This is a double conversion, but in the future we might
810 * support automatic input types to perform the cast on the fly.
811 */
Willy Tarreau87b09662015-04-03 00:22:06 +0200812static int sample_conv_in_table(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +0100813 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +0200814{
815 struct stktable *t;
816 struct stktable_key *key;
817 struct stksess *ts;
818
819 t = &arg_p[0].data.prx->table;
820
821 key = smp_to_stkey(smp, t);
822 if (!key)
823 return 0;
824
825 ts = stktable_lookup_key(t, key);
826
827 smp->type = SMP_T_BOOL;
828 smp->data.uint = !!ts;
829 smp->flags = SMP_F_VOL_TEST;
830 return 1;
831}
832
833/* Casts sample <smp> to the type of the table specified in arg(0), and looks
834 * it up into this table. Returns the data rate received from clients in bytes/s
835 * if the key is present in the table, otherwise zero, so that comparisons can
836 * be easily performed. If the inspected parameter is not stored in the table,
837 * <not found> is returned.
838 */
Willy Tarreau87b09662015-04-03 00:22:06 +0200839static int sample_conv_table_bytes_in_rate(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +0100840 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +0200841{
842 struct stktable *t;
843 struct stktable_key *key;
844 struct stksess *ts;
845 void *ptr;
846
847 t = &arg_p[0].data.prx->table;
848
849 key = smp_to_stkey(smp, t);
850 if (!key)
851 return 0;
852
853 smp->flags = SMP_F_VOL_TEST;
854 smp->type = SMP_T_UINT;
855 smp->data.uint = 0;
856
857 ts = stktable_lookup_key(t, key);
858 if (!ts) /* key not present */
859 return 1;
860
861 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_BYTES_IN_RATE);
862 if (!ptr)
863 return 0; /* parameter not stored */
864
865 smp->data.uint = read_freq_ctr_period(&stktable_data_cast(ptr, bytes_in_rate),
866 t->data_arg[STKTABLE_DT_BYTES_IN_RATE].u);
867 return 1;
868}
869
870/* Casts sample <smp> to the type of the table specified in arg(0), and looks
871 * it up into this table. Returns the cumulated number of connections for the key
872 * if the key is present in the table, otherwise zero, so that comparisons can
873 * be easily performed. If the inspected parameter is not stored in the table,
874 * <not found> is returned.
875 */
Willy Tarreau87b09662015-04-03 00:22:06 +0200876static int sample_conv_table_conn_cnt(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +0100877 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +0200878{
879 struct stktable *t;
880 struct stktable_key *key;
881 struct stksess *ts;
882 void *ptr;
883
884 t = &arg_p[0].data.prx->table;
885
886 key = smp_to_stkey(smp, t);
887 if (!key)
888 return 0;
889
890 smp->flags = SMP_F_VOL_TEST;
891 smp->type = SMP_T_UINT;
892 smp->data.uint = 0;
893
894 ts = stktable_lookup_key(t, key);
895 if (!ts) /* key not present */
896 return 1;
897
898 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_CONN_CNT);
899 if (!ptr)
900 return 0; /* parameter not stored */
901
902 smp->data.uint = stktable_data_cast(ptr, conn_cnt);
903 return 1;
904}
905
906/* Casts sample <smp> to the type of the table specified in arg(0), and looks
907 * it up into this table. Returns the number of concurrent connections for the
908 * key if the key is present in the table, otherwise zero, so that comparisons
909 * can be easily performed. If the inspected parameter is not stored in the
910 * table, <not found> is returned.
911 */
Willy Tarreau87b09662015-04-03 00:22:06 +0200912static int sample_conv_table_conn_cur(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +0100913 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +0200914{
915 struct stktable *t;
916 struct stktable_key *key;
917 struct stksess *ts;
918 void *ptr;
919
920 t = &arg_p[0].data.prx->table;
921
922 key = smp_to_stkey(smp, t);
923 if (!key)
924 return 0;
925
926 smp->flags = SMP_F_VOL_TEST;
927 smp->type = SMP_T_UINT;
928 smp->data.uint = 0;
929
930 ts = stktable_lookup_key(t, key);
931 if (!ts) /* key not present */
932 return 1;
933
934 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_CONN_CUR);
935 if (!ptr)
936 return 0; /* parameter not stored */
937
938 smp->data.uint = stktable_data_cast(ptr, conn_cur);
939 return 1;
940}
941
942/* Casts sample <smp> to the type of the table specified in arg(0), and looks
943 * it up into this table. Returns the rate of incoming connections from the key
944 * if the key is present in the table, otherwise zero, so that comparisons can
945 * be easily performed. If the inspected parameter is not stored in the table,
946 * <not found> is returned.
947 */
Willy Tarreau87b09662015-04-03 00:22:06 +0200948static int sample_conv_table_conn_rate(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +0100949 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +0200950{
951 struct stktable *t;
952 struct stktable_key *key;
953 struct stksess *ts;
954 void *ptr;
955
956 t = &arg_p[0].data.prx->table;
957
958 key = smp_to_stkey(smp, t);
959 if (!key)
960 return 0;
961
962 smp->flags = SMP_F_VOL_TEST;
963 smp->type = SMP_T_UINT;
964 smp->data.uint = 0;
965
966 ts = stktable_lookup_key(t, key);
967 if (!ts) /* key not present */
968 return 1;
969
970 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_CONN_RATE);
971 if (!ptr)
972 return 0; /* parameter not stored */
973
974 smp->data.uint = read_freq_ctr_period(&stktable_data_cast(ptr, conn_rate),
975 t->data_arg[STKTABLE_DT_CONN_RATE].u);
976 return 1;
977}
978
979/* Casts sample <smp> to the type of the table specified in arg(0), and looks
980 * it up into this table. Returns the data rate sent to clients in bytes/s
981 * if the key is present in the table, otherwise zero, so that comparisons can
982 * be easily performed. If the inspected parameter is not stored in the table,
983 * <not found> is returned.
984 */
Willy Tarreau87b09662015-04-03 00:22:06 +0200985static int sample_conv_table_bytes_out_rate(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +0100986 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +0200987{
988 struct stktable *t;
989 struct stktable_key *key;
990 struct stksess *ts;
991 void *ptr;
992
993 t = &arg_p[0].data.prx->table;
994
995 key = smp_to_stkey(smp, t);
996 if (!key)
997 return 0;
998
999 smp->flags = SMP_F_VOL_TEST;
1000 smp->type = SMP_T_UINT;
1001 smp->data.uint = 0;
1002
1003 ts = stktable_lookup_key(t, key);
1004 if (!ts) /* key not present */
1005 return 1;
1006
1007 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_BYTES_OUT_RATE);
1008 if (!ptr)
1009 return 0; /* parameter not stored */
1010
1011 smp->data.uint = read_freq_ctr_period(&stktable_data_cast(ptr, bytes_out_rate),
1012 t->data_arg[STKTABLE_DT_BYTES_OUT_RATE].u);
1013 return 1;
1014}
1015
1016/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1017 * it up into this table. Returns the value of the GPC0 counter for the key
1018 * if the key is present in the table, otherwise zero, so that comparisons can
1019 * be easily performed. If the inspected parameter is not stored in the table,
1020 * <not found> is returned.
1021 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001022static int sample_conv_table_gpc0(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001023 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001024{
1025 struct stktable *t;
1026 struct stktable_key *key;
1027 struct stksess *ts;
1028 void *ptr;
1029
1030 t = &arg_p[0].data.prx->table;
1031
1032 key = smp_to_stkey(smp, t);
1033 if (!key)
1034 return 0;
1035
1036 smp->flags = SMP_F_VOL_TEST;
1037 smp->type = SMP_T_UINT;
1038 smp->data.uint = 0;
1039
1040 ts = stktable_lookup_key(t, key);
1041 if (!ts) /* key not present */
1042 return 1;
1043
1044 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_GPC0);
1045 if (!ptr)
1046 return 0; /* parameter not stored */
1047
1048 smp->data.uint = stktable_data_cast(ptr, gpc0);
1049 return 1;
1050}
1051
1052/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1053 * it up into this table. Returns the event rate of the GPC0 counter for the key
1054 * if the key is present in the table, otherwise zero, so that comparisons can
1055 * be easily performed. If the inspected parameter is not stored in the table,
1056 * <not found> is returned.
1057 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001058static int sample_conv_table_gpc0_rate(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001059 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001060{
1061 struct stktable *t;
1062 struct stktable_key *key;
1063 struct stksess *ts;
1064 void *ptr;
1065
1066 t = &arg_p[0].data.prx->table;
1067
1068 key = smp_to_stkey(smp, t);
1069 if (!key)
1070 return 0;
1071
1072 smp->flags = SMP_F_VOL_TEST;
1073 smp->type = SMP_T_UINT;
1074 smp->data.uint = 0;
1075
1076 ts = stktable_lookup_key(t, key);
1077 if (!ts) /* key not present */
1078 return 1;
1079
1080 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_GPC0_RATE);
1081 if (!ptr)
1082 return 0; /* parameter not stored */
1083
1084 smp->data.uint = read_freq_ctr_period(&stktable_data_cast(ptr, gpc0_rate),
1085 t->data_arg[STKTABLE_DT_GPC0_RATE].u);
1086 return 1;
1087}
1088
1089/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1090 * it up into this table. Returns the cumulated number of HTTP request errors
1091 * for the key if the key is present in the table, otherwise zero, so that
1092 * comparisons can be easily performed. If the inspected parameter is not stored
1093 * in the table, <not found> is returned.
1094 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001095static int sample_conv_table_http_err_cnt(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001096 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001097{
1098 struct stktable *t;
1099 struct stktable_key *key;
1100 struct stksess *ts;
1101 void *ptr;
1102
1103 t = &arg_p[0].data.prx->table;
1104
1105 key = smp_to_stkey(smp, t);
1106 if (!key)
1107 return 0;
1108
1109 smp->flags = SMP_F_VOL_TEST;
1110 smp->type = SMP_T_UINT;
1111 smp->data.uint = 0;
1112
1113 ts = stktable_lookup_key(t, key);
1114 if (!ts) /* key not present */
1115 return 1;
1116
1117 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_HTTP_ERR_CNT);
1118 if (!ptr)
1119 return 0; /* parameter not stored */
1120
1121 smp->data.uint = stktable_data_cast(ptr, http_err_cnt);
1122 return 1;
1123}
1124
1125/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1126 * it up into this table. Returns the HTTP request error rate the key
1127 * if the key is present in the table, otherwise zero, so that comparisons can
1128 * be easily performed. If the inspected parameter is not stored in the table,
1129 * <not found> is returned.
1130 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001131static int sample_conv_table_http_err_rate(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001132 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001133{
1134 struct stktable *t;
1135 struct stktable_key *key;
1136 struct stksess *ts;
1137 void *ptr;
1138
1139 t = &arg_p[0].data.prx->table;
1140
1141 key = smp_to_stkey(smp, t);
1142 if (!key)
1143 return 0;
1144
1145 smp->flags = SMP_F_VOL_TEST;
1146 smp->type = SMP_T_UINT;
1147 smp->data.uint = 0;
1148
1149 ts = stktable_lookup_key(t, key);
1150 if (!ts) /* key not present */
1151 return 1;
1152
1153 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_HTTP_ERR_RATE);
1154 if (!ptr)
1155 return 0; /* parameter not stored */
1156
1157 smp->data.uint = read_freq_ctr_period(&stktable_data_cast(ptr, http_err_rate),
1158 t->data_arg[STKTABLE_DT_HTTP_ERR_RATE].u);
1159 return 1;
1160}
1161
1162/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1163 * it up into this table. Returns the cumulated number of HTTP request for the
1164 * key if the key is present in the table, otherwise zero, so that comparisons
1165 * can be easily performed. If the inspected parameter is not stored in the
1166 * table, <not found> is returned.
1167 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001168static int sample_conv_table_http_req_cnt(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001169 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001170{
1171 struct stktable *t;
1172 struct stktable_key *key;
1173 struct stksess *ts;
1174 void *ptr;
1175
1176 t = &arg_p[0].data.prx->table;
1177
1178 key = smp_to_stkey(smp, t);
1179 if (!key)
1180 return 0;
1181
1182 smp->flags = SMP_F_VOL_TEST;
1183 smp->type = SMP_T_UINT;
1184 smp->data.uint = 0;
1185
1186 ts = stktable_lookup_key(t, key);
1187 if (!ts) /* key not present */
1188 return 1;
1189
1190 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_HTTP_REQ_CNT);
1191 if (!ptr)
1192 return 0; /* parameter not stored */
1193
1194 smp->data.uint = stktable_data_cast(ptr, http_req_cnt);
1195 return 1;
1196}
1197
1198/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1199 * it up into this table. Returns the HTTP request rate the key if the key is
1200 * present in the table, otherwise zero, so that comparisons can be easily
1201 * performed. If the inspected parameter is not stored in the table, <not found>
1202 * is returned.
1203 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001204static int sample_conv_table_http_req_rate(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001205 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001206{
1207 struct stktable *t;
1208 struct stktable_key *key;
1209 struct stksess *ts;
1210 void *ptr;
1211
1212 t = &arg_p[0].data.prx->table;
1213
1214 key = smp_to_stkey(smp, t);
1215 if (!key)
1216 return 0;
1217
1218 smp->flags = SMP_F_VOL_TEST;
1219 smp->type = SMP_T_UINT;
1220 smp->data.uint = 0;
1221
1222 ts = stktable_lookup_key(t, key);
1223 if (!ts) /* key not present */
1224 return 1;
1225
1226 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_HTTP_REQ_RATE);
1227 if (!ptr)
1228 return 0; /* parameter not stored */
1229
1230 smp->data.uint = read_freq_ctr_period(&stktable_data_cast(ptr, http_req_rate),
1231 t->data_arg[STKTABLE_DT_HTTP_REQ_RATE].u);
1232 return 1;
1233}
1234
1235/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1236 * it up into this table. Returns the volume of datareceived from clients in kbytes
1237 * if the key is present in the table, otherwise zero, so that comparisons can
1238 * be easily performed. If the inspected parameter is not stored in the table,
1239 * <not found> is returned.
1240 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001241static int sample_conv_table_kbytes_in(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001242 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001243{
1244 struct stktable *t;
1245 struct stktable_key *key;
1246 struct stksess *ts;
1247 void *ptr;
1248
1249 t = &arg_p[0].data.prx->table;
1250
1251 key = smp_to_stkey(smp, t);
1252 if (!key)
1253 return 0;
1254
1255 smp->flags = SMP_F_VOL_TEST;
1256 smp->type = SMP_T_UINT;
1257 smp->data.uint = 0;
1258
1259 ts = stktable_lookup_key(t, key);
1260 if (!ts) /* key not present */
1261 return 1;
1262
1263 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_BYTES_IN_CNT);
1264 if (!ptr)
1265 return 0; /* parameter not stored */
1266
1267 smp->data.uint = stktable_data_cast(ptr, bytes_in_cnt) >> 10;
1268 return 1;
1269}
1270
1271/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1272 * it up into this table. Returns the volume of data sent to clients in kbytes
1273 * if the key is present in the table, otherwise zero, so that comparisons can
1274 * be easily performed. If the inspected parameter is not stored in the table,
1275 * <not found> is returned.
1276 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001277static int sample_conv_table_kbytes_out(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001278 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001279{
1280 struct stktable *t;
1281 struct stktable_key *key;
1282 struct stksess *ts;
1283 void *ptr;
1284
1285 t = &arg_p[0].data.prx->table;
1286
1287 key = smp_to_stkey(smp, t);
1288 if (!key)
1289 return 0;
1290
1291 smp->flags = SMP_F_VOL_TEST;
1292 smp->type = SMP_T_UINT;
1293 smp->data.uint = 0;
1294
1295 ts = stktable_lookup_key(t, key);
1296 if (!ts) /* key not present */
1297 return 1;
1298
1299 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_BYTES_OUT_CNT);
1300 if (!ptr)
1301 return 0; /* parameter not stored */
1302
1303 smp->data.uint = stktable_data_cast(ptr, bytes_out_cnt) >> 10;
1304 return 1;
1305}
1306
1307/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1308 * it up into this table. Returns the server ID associated with the key if the
1309 * key is present in the table, otherwise zero, so that comparisons can be
1310 * easily performed. If the inspected parameter is not stored in the table,
1311 * <not found> is returned.
1312 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001313static int sample_conv_table_server_id(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001314 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001315{
1316 struct stktable *t;
1317 struct stktable_key *key;
1318 struct stksess *ts;
1319 void *ptr;
1320
1321 t = &arg_p[0].data.prx->table;
1322
1323 key = smp_to_stkey(smp, t);
1324 if (!key)
1325 return 0;
1326
1327 smp->flags = SMP_F_VOL_TEST;
1328 smp->type = SMP_T_UINT;
1329 smp->data.uint = 0;
1330
1331 ts = stktable_lookup_key(t, key);
1332 if (!ts) /* key not present */
1333 return 1;
1334
1335 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_SERVER_ID);
1336 if (!ptr)
1337 return 0; /* parameter not stored */
1338
1339 smp->data.uint = stktable_data_cast(ptr, server_id);
1340 return 1;
1341}
1342
1343/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1344 * it up into this table. Returns the cumulated number of sessions for the
1345 * key if the key is present in the table, otherwise zero, so that comparisons
1346 * can be easily performed. If the inspected parameter is not stored in the
1347 * table, <not found> is returned.
1348 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001349static int sample_conv_table_sess_cnt(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001350 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001351{
1352 struct stktable *t;
1353 struct stktable_key *key;
1354 struct stksess *ts;
1355 void *ptr;
1356
1357 t = &arg_p[0].data.prx->table;
1358
1359 key = smp_to_stkey(smp, t);
1360 if (!key)
1361 return 0;
1362
1363 smp->flags = SMP_F_VOL_TEST;
1364 smp->type = SMP_T_UINT;
1365 smp->data.uint = 0;
1366
1367 ts = stktable_lookup_key(t, key);
1368 if (!ts) /* key not present */
1369 return 1;
1370
1371 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_SESS_CNT);
1372 if (!ptr)
1373 return 0; /* parameter not stored */
1374
1375 smp->data.uint = stktable_data_cast(ptr, sess_cnt);
1376 return 1;
1377}
1378
1379/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1380 * it up into this table. Returns the session rate the key if the key is
1381 * present in the table, otherwise zero, so that comparisons can be easily
1382 * performed. If the inspected parameter is not stored in the table, <not found>
1383 * is returned.
1384 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001385static int sample_conv_table_sess_rate(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001386 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001387{
1388 struct stktable *t;
1389 struct stktable_key *key;
1390 struct stksess *ts;
1391 void *ptr;
1392
1393 t = &arg_p[0].data.prx->table;
1394
1395 key = smp_to_stkey(smp, t);
1396 if (!key)
1397 return 0;
1398
1399 smp->flags = SMP_F_VOL_TEST;
1400 smp->type = SMP_T_UINT;
1401 smp->data.uint = 0;
1402
1403 ts = stktable_lookup_key(t, key);
1404 if (!ts) /* key not present */
1405 return 1;
1406
1407 ptr = stktable_data_ptr(t, ts, STKTABLE_DT_SESS_RATE);
1408 if (!ptr)
1409 return 0; /* parameter not stored */
1410
1411 smp->data.uint = read_freq_ctr_period(&stktable_data_cast(ptr, sess_rate),
1412 t->data_arg[STKTABLE_DT_SESS_RATE].u);
1413 return 1;
1414}
1415
1416/* Casts sample <smp> to the type of the table specified in arg(0), and looks
1417 * it up into this table. Returns the amount of concurrent connections tracking
1418 * the same key if the key is present in the table, otherwise zero, so that
1419 * comparisons can be easily performed. If the inspected parameter is not
1420 * stored in the table, <not found> is returned.
1421 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001422static int sample_conv_table_trackers(struct stream *stream, const struct arg *arg_p,
Thierry FOURNIER68a556e2015-02-23 15:11:11 +01001423 struct sample *smp, void *private)
Willy Tarreaud9f316a2014-07-10 14:03:38 +02001424{
1425 struct stktable *t;
1426 struct stktable_key *key;
1427 struct stksess *ts;
1428
1429 t = &arg_p[0].data.prx->table;
1430
1431 key = smp_to_stkey(smp, t);
1432 if (!key)
1433 return 0;
1434
1435 smp->flags = SMP_F_VOL_TEST;
1436 smp->type = SMP_T_UINT;
1437 smp->data.uint = 0;
1438
1439 ts = stktable_lookup_key(t, key);
1440 if (ts)
1441 smp->data.uint = ts->ref_cnt;
1442
1443 return 1;
1444}
1445
1446
1447/* Note: must not be declared <const> as its list will be overwritten */
1448static struct sample_conv_kw_list sample_conv_kws = {ILH, {
1449 { "in_table", sample_conv_in_table, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_BOOL },
1450 { "table_bytes_in_rate", sample_conv_table_bytes_in_rate, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1451 { "table_bytes_out_rate", sample_conv_table_bytes_out_rate, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1452 { "table_conn_cnt", sample_conv_table_conn_cnt, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1453 { "table_conn_cur", sample_conv_table_conn_cur, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1454 { "table_conn_rate", sample_conv_table_conn_rate, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1455 { "table_gpc0", sample_conv_table_gpc0, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1456 { "table_gpc0_rate", sample_conv_table_gpc0_rate, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1457 { "table_http_err_cnt", sample_conv_table_http_err_cnt, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1458 { "table_http_err_rate", sample_conv_table_http_err_rate, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1459 { "table_http_req_cnt", sample_conv_table_http_req_cnt, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1460 { "table_http_req_rate", sample_conv_table_http_req_rate, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1461 { "table_kbytes_in", sample_conv_table_kbytes_in, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1462 { "table_kbytes_out", sample_conv_table_kbytes_out, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1463 { "table_server_id", sample_conv_table_server_id, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1464 { "table_sess_cnt", sample_conv_table_sess_cnt, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1465 { "table_sess_rate", sample_conv_table_sess_rate, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1466 { "table_trackers", sample_conv_table_trackers, ARG1(1,TAB), NULL, SMP_T_STR, SMP_T_UINT },
1467 { /* END */ },
1468}};
1469
1470__attribute__((constructor))
1471static void __stick_table_init(void)
1472{
1473 /* register sample fetch and format conversion keywords */
1474 sample_register_convs(&sample_conv_kws);
1475}