Commit | Line | Data |
---|---|---|
f3ed775e DG |
1 | /* |
2 | * Copyright (C) 2011 - David Goulet <david.goulet@polymtl.ca> | |
3 | * | |
4 | * This program is free software; you can redistribute it and/or | |
5 | * modify it under the terms of the GNU General Public License | |
82a3637f DG |
6 | * as published by the Free Software Foundation; only version 2 |
7 | * of the License. | |
f3ed775e DG |
8 | * |
9 | * This program is distributed in the hope that it will be useful, | |
10 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
12 | * GNU General Public License for more details. | |
13 | * | |
14 | * You should have received a copy of the GNU General Public License | |
15 | * along with this program; if not, write to the Free Software | |
16 | * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | |
17 | */ | |
18 | ||
19 | #define _GNU_SOURCE | |
20 | #include <popt.h> | |
21 | #include <stdio.h> | |
22 | #include <stdlib.h> | |
23 | #include <string.h> | |
24 | #include <sys/stat.h> | |
25 | #include <sys/types.h> | |
26 | #include <unistd.h> | |
5a0de755 | 27 | #include <inttypes.h> |
8f0d098b | 28 | #include <ctype.h> |
f3ed775e | 29 | |
6e2d116c DG |
30 | #include "../cmd.h" |
31 | #include "../conf.h" | |
32 | #include "../utils.h" | |
f3ed775e DG |
33 | |
34 | static char *opt_event_list; | |
35 | static int opt_event_type; | |
6181537c | 36 | static int opt_kernel; |
5440dc42 | 37 | static char *opt_session_name; |
f3ed775e DG |
38 | static int opt_pid_all; |
39 | static int opt_userspace; | |
eeac7d46 | 40 | static char *opt_cmd_name; |
f3ed775e DG |
41 | static int opt_enable_all; |
42 | static pid_t opt_pid; | |
cf0e5467 | 43 | static char *opt_probe; |
8f0d098b MD |
44 | static char *opt_function; |
45 | static char *opt_function_entry_symbol; | |
f3ed775e DG |
46 | static char *opt_channel_name; |
47 | ||
48 | enum { | |
49 | OPT_HELP = 1, | |
f3ed775e | 50 | OPT_TRACEPOINT, |
cf0e5467 | 51 | OPT_PROBE, |
f3ed775e | 52 | OPT_FUNCTION, |
8f0d098b | 53 | OPT_FUNCTION_ENTRY, |
a54bd42d | 54 | OPT_SYSCALL, |
eeac7d46 | 55 | OPT_USERSPACE, |
13dce3b7 | 56 | OPT_TRACEPOINT_LOGLEVEL, |
f3ed775e DG |
57 | }; |
58 | ||
cd80958d DG |
59 | static struct lttng_handle *handle; |
60 | ||
f3ed775e DG |
61 | static struct poptOption long_options[] = { |
62 | /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */ | |
63 | {"help", 'h', POPT_ARG_NONE, 0, OPT_HELP, 0, 0}, | |
5440dc42 | 64 | {"session", 's', POPT_ARG_STRING, &opt_session_name, 0, 0, 0}, |
f3ed775e DG |
65 | {"all-events", 'a', POPT_ARG_VAL, &opt_enable_all, 1, 0, 0}, |
66 | {"channel", 'c', POPT_ARG_STRING, &opt_channel_name, 0, 0, 0}, | |
67 | {"kernel", 'k', POPT_ARG_VAL, &opt_kernel, 1, 0, 0}, | |
40e9d5d3 | 68 | {"userspace", 'u', POPT_ARG_STRING | POPT_ARGFLAG_OPTIONAL, &opt_cmd_name, OPT_USERSPACE, 0, 0}, |
f3ed775e DG |
69 | {"all", 0, POPT_ARG_VAL, &opt_pid_all, 1, 0, 0}, |
70 | {"pid", 'p', POPT_ARG_INT, &opt_pid, 0, 0, 0}, | |
71 | {"tracepoint", 0, POPT_ARG_NONE, 0, OPT_TRACEPOINT, 0, 0}, | |
7ebae521 | 72 | {"probe", 0, POPT_ARG_STRING, &opt_probe, OPT_PROBE, 0, 0}, |
40e9d5d3 | 73 | {"function", 0, POPT_ARG_STRING, &opt_function, OPT_FUNCTION, 0, 0}, |
b213d387 MD |
74 | #if 0 |
75 | /* | |
76 | * Currently removed from lttng kernel tracer. Removed from | |
77 | * lttng UI to discourage its use. | |
78 | */ | |
40e9d5d3 | 79 | {"function:entry", 0, POPT_ARG_STRING, &opt_function_entry_symbol, OPT_FUNCTION_ENTRY, 0, 0}, |
b213d387 | 80 | #endif |
7ebae521 | 81 | {"syscall", 0, POPT_ARG_NONE, 0, OPT_SYSCALL, 0, 0}, |
13dce3b7 | 82 | {"loglevel", 0, POPT_ARG_NONE, 0, OPT_TRACEPOINT_LOGLEVEL, 0, 0}, |
f3ed775e DG |
83 | {0, 0, 0, 0, 0, 0, 0} |
84 | }; | |
85 | ||
86 | /* | |
87 | * usage | |
88 | */ | |
89 | static void usage(FILE *ofp) | |
90 | { | |
91 | fprintf(ofp, "usage: lttng enable-event NAME[,NAME2,...] [options] [event_options]\n"); | |
92 | fprintf(ofp, "\n"); | |
93 | fprintf(ofp, " -h, --help Show this help\n"); | |
5440dc42 | 94 | fprintf(ofp, " -s, --session Apply on session name\n"); |
f3ed775e DG |
95 | fprintf(ofp, " -c, --channel Apply on this channel\n"); |
96 | fprintf(ofp, " -a, --all-events Enable all tracepoints\n"); | |
97 | fprintf(ofp, " -k, --kernel Apply for the kernel tracer\n"); | |
98 | fprintf(ofp, " -u, --userspace [CMD] Apply for the user-space tracer\n"); | |
99 | fprintf(ofp, " --all If -u, apply on all traceable apps\n"); | |
100 | fprintf(ofp, " -p, --pid PID If -u, apply on a specific PID\n"); | |
101 | fprintf(ofp, "\n"); | |
102 | fprintf(ofp, "Event options:\n"); | |
103 | fprintf(ofp, " --tracepoint Tracepoint event (default)\n"); | |
13dce3b7 | 104 | fprintf(ofp, " --loglevel Tracepoint loglevel\n"); |
8f0d098b | 105 | fprintf(ofp, " --probe [addr | symbol | symbol+offset]\n"); |
cf0e5467 MD |
106 | fprintf(ofp, " Dynamic probe.\n"); |
107 | fprintf(ofp, " Addr and offset can be octal (0NNN...),\n"); | |
108 | fprintf(ofp, " decimal (NNN...) or hexadecimal (0xNNN...)\n"); | |
8f0d098b MD |
109 | fprintf(ofp, " --function [addr | symbol | symbol+offset]\n"); |
110 | fprintf(ofp, " Dynamic function entry/return probe.\n"); | |
111 | fprintf(ofp, " Addr and offset can be octal (0NNN...),\n"); | |
112 | fprintf(ofp, " decimal (NNN...) or hexadecimal (0xNNN...)\n"); | |
b213d387 | 113 | #if 0 |
8f0d098b MD |
114 | fprintf(ofp, " --function:entry symbol\n"); |
115 | fprintf(ofp, " Function tracer event\n"); | |
b213d387 | 116 | #endif |
a54bd42d | 117 | fprintf(ofp, " --syscall System call event\n"); |
f3ed775e DG |
118 | fprintf(ofp, "\n"); |
119 | } | |
120 | ||
0d63dd19 | 121 | /* |
6181537c | 122 | * Parse probe options. |
0d63dd19 | 123 | */ |
cf0e5467 | 124 | static int parse_probe_opts(struct lttng_event *ev, char *opt) |
0d63dd19 DG |
125 | { |
126 | int ret; | |
8ff0bbd0 | 127 | char s_hex[19]; |
0d63dd19 DG |
128 | char name[LTTNG_SYMBOL_NAME_LEN]; |
129 | ||
130 | if (opt == NULL) { | |
131 | ret = -1; | |
8f0d098b | 132 | goto end; |
0d63dd19 DG |
133 | } |
134 | ||
135 | /* Check for symbol+offset */ | |
8ff0bbd0 | 136 | ret = sscanf(opt, "%[^'+']+%s", name, s_hex); |
0d63dd19 | 137 | if (ret == 2) { |
7d29a247 | 138 | strncpy(ev->attr.probe.symbol_name, name, LTTNG_SYMBOL_NAME_LEN); |
99497cd0 | 139 | ev->attr.probe.symbol_name[LTTNG_SYMBOL_NAME_LEN - 1] = '\0'; |
cf0e5467 | 140 | DBG("probe symbol %s", ev->attr.probe.symbol_name); |
8ff0bbd0 DG |
141 | if (strlen(s_hex) == 0) { |
142 | ERR("Invalid probe offset %s", s_hex); | |
0d63dd19 | 143 | ret = -1; |
8f0d098b | 144 | goto end; |
0d63dd19 | 145 | } |
8ff0bbd0 | 146 | ev->attr.probe.offset = strtoul(s_hex, NULL, 0); |
cf0e5467 | 147 | DBG("probe offset %" PRIu64, ev->attr.probe.offset); |
3000dc78 | 148 | ev->attr.probe.addr = 0; |
8f0d098b MD |
149 | goto end; |
150 | } | |
151 | ||
152 | /* Check for symbol */ | |
153 | if (isalpha(name[0])) { | |
154 | ret = sscanf(opt, "%s", name); | |
155 | if (ret == 1) { | |
156 | strncpy(ev->attr.probe.symbol_name, name, LTTNG_SYMBOL_NAME_LEN); | |
99497cd0 | 157 | ev->attr.probe.symbol_name[LTTNG_SYMBOL_NAME_LEN - 1] = '\0'; |
8f0d098b MD |
158 | DBG("probe symbol %s", ev->attr.probe.symbol_name); |
159 | ev->attr.probe.offset = 0; | |
160 | DBG("probe offset %" PRIu64, ev->attr.probe.offset); | |
161 | ev->attr.probe.addr = 0; | |
162 | goto end; | |
163 | } | |
0d63dd19 DG |
164 | } |
165 | ||
166 | /* Check for address */ | |
8ff0bbd0 | 167 | ret = sscanf(opt, "%s", s_hex); |
0d63dd19 | 168 | if (ret > 0) { |
8ff0bbd0 DG |
169 | if (strlen(s_hex) == 0) { |
170 | ERR("Invalid probe address %s", s_hex); | |
0d63dd19 | 171 | ret = -1; |
8f0d098b | 172 | goto end; |
0d63dd19 | 173 | } |
8ff0bbd0 | 174 | ev->attr.probe.addr = strtoul(s_hex, NULL, 0); |
cf0e5467 | 175 | DBG("probe addr %" PRIu64, ev->attr.probe.addr); |
3000dc78 DG |
176 | ev->attr.probe.offset = 0; |
177 | memset(ev->attr.probe.symbol_name, 0, LTTNG_SYMBOL_NAME_LEN); | |
8f0d098b | 178 | goto end; |
0d63dd19 DG |
179 | } |
180 | ||
181 | /* No match */ | |
182 | ret = -1; | |
183 | ||
8f0d098b | 184 | end: |
0d63dd19 DG |
185 | return ret; |
186 | } | |
187 | ||
f3ed775e | 188 | /* |
6181537c | 189 | * Enabling event using the lttng API. |
f3ed775e | 190 | */ |
cd80958d | 191 | static int enable_events(char *session_name) |
f3ed775e DG |
192 | { |
193 | int err, ret = CMD_SUCCESS; | |
b73d0b29 | 194 | char *event_name, *channel_name = NULL; |
f3ed775e | 195 | struct lttng_event ev; |
7d29a247 | 196 | struct lttng_domain dom; |
f3ed775e | 197 | |
f3ed775e DG |
198 | if (opt_channel_name == NULL) { |
199 | err = asprintf(&channel_name, DEFAULT_CHANNEL_NAME); | |
200 | if (err < 0) { | |
201 | ret = CMD_FATAL; | |
202 | goto error; | |
203 | } | |
204 | } else { | |
205 | channel_name = opt_channel_name; | |
206 | } | |
207 | ||
2bdd86d4 MD |
208 | if (opt_kernel && opt_userspace) { |
209 | MSG("Choose only one of --kernel or --userspace"); | |
210 | ret = CMD_FATAL; | |
211 | goto error; | |
212 | } | |
6181537c | 213 | |
7d29a247 DG |
214 | /* Create lttng domain */ |
215 | if (opt_kernel) { | |
216 | dom.type = LTTNG_DOMAIN_KERNEL; | |
6181537c DG |
217 | } else if (opt_pid != 0) { |
218 | dom.type = LTTNG_DOMAIN_UST_PID; | |
219 | dom.attr.pid = opt_pid; | |
220 | DBG("PID %d set to lttng handle", opt_pid); | |
221 | } else if (opt_userspace && opt_cmd_name == NULL) { | |
2bdd86d4 | 222 | dom.type = LTTNG_DOMAIN_UST; |
6181537c DG |
223 | } else if (opt_userspace && opt_cmd_name != NULL) { |
224 | dom.type = LTTNG_DOMAIN_UST_EXEC_NAME; | |
225 | strncpy(dom.attr.exec_name, opt_cmd_name, NAME_MAX); | |
226 | } else { | |
227 | ERR("Please specify a tracer (--kernel or --userspace)"); | |
228 | ret = CMD_NOT_IMPLEMENTED; | |
229 | goto error; | |
2bdd86d4 | 230 | } |
7d29a247 | 231 | |
cd80958d DG |
232 | handle = lttng_create_handle(session_name, &dom); |
233 | if (handle == NULL) { | |
234 | ret = -1; | |
235 | goto error; | |
236 | } | |
1aef21b6 | 237 | |
cd80958d | 238 | if (opt_enable_all) { |
8c9ae521 DG |
239 | /* Default setup for enable all */ |
240 | ev.name[0] = '\0'; | |
241 | ev.type = opt_event_type; | |
242 | ||
243 | ret = lttng_enable_event(handle, &ev, channel_name); | |
244 | if (ret < 0) { | |
245 | goto error; | |
246 | } | |
247 | ||
0133c199 MD |
248 | switch (opt_event_type) { |
249 | case LTTNG_EVENT_TRACEPOINT: | |
2bdd86d4 MD |
250 | MSG("All %s tracepoints are enabled in channel %s", |
251 | opt_kernel ? "kernel" : "UST", channel_name); | |
0133c199 | 252 | break; |
a54bd42d | 253 | case LTTNG_EVENT_SYSCALL: |
0133c199 | 254 | if (opt_kernel) { |
8c9ae521 DG |
255 | MSG("All kernel system calls are enabled in channel %s", |
256 | channel_name); | |
c93d9daf | 257 | } |
0133c199 | 258 | break; |
7a3d1328 | 259 | case LTTNG_EVENT_ALL: |
2bdd86d4 MD |
260 | MSG("All %s events are enabled in channel %s", |
261 | opt_kernel ? "kernel" : "UST", channel_name); | |
7a3d1328 | 262 | break; |
0133c199 | 263 | default: |
8c9ae521 | 264 | /* |
6181537c DG |
265 | * We should not be here since lttng_enable_event should have |
266 | * failed on the event type. | |
8c9ae521 | 267 | */ |
f3ed775e DG |
268 | goto error; |
269 | } | |
8c9ae521 | 270 | goto end; |
f3ed775e DG |
271 | } |
272 | ||
273 | /* Strip event list */ | |
274 | event_name = strtok(opt_event_list, ","); | |
275 | while (event_name != NULL) { | |
6181537c DG |
276 | /* Copy name and type of the event */ |
277 | strncpy(ev.name, event_name, LTTNG_SYMBOL_NAME_LEN); | |
278 | ev.name[LTTNG_SYMBOL_NAME_LEN - 1] = '\0'; | |
279 | ev.type = opt_event_type; | |
280 | ||
f3ed775e DG |
281 | /* Kernel tracer action */ |
282 | if (opt_kernel) { | |
283 | DBG("Enabling kernel event %s for channel %s", | |
284 | event_name, channel_name); | |
f3ed775e DG |
285 | |
286 | switch (opt_event_type) { | |
7a3d1328 MD |
287 | case LTTNG_EVENT_ALL: /* Default behavior is tracepoint */ |
288 | ev.type = LTTNG_EVENT_TRACEPOINT; | |
289 | /* Fall-through */ | |
e6ddca71 | 290 | case LTTNG_EVENT_TRACEPOINT: |
f3ed775e | 291 | break; |
7d29a247 | 292 | case LTTNG_EVENT_PROBE: |
cf0e5467 | 293 | ret = parse_probe_opts(&ev, opt_probe); |
0d63dd19 | 294 | if (ret < 0) { |
cf0e5467 | 295 | ERR("Unable to parse probe options"); |
0d63dd19 DG |
296 | ret = 0; |
297 | goto error; | |
298 | } | |
f3ed775e DG |
299 | break; |
300 | case LTTNG_EVENT_FUNCTION: | |
8f0d098b MD |
301 | ret = parse_probe_opts(&ev, opt_function); |
302 | if (ret < 0) { | |
303 | ERR("Unable to parse function probe options"); | |
304 | ret = 0; | |
305 | goto error; | |
306 | } | |
307 | break; | |
308 | case LTTNG_EVENT_FUNCTION_ENTRY: | |
6181537c DG |
309 | strncpy(ev.attr.ftrace.symbol_name, opt_function_entry_symbol, |
310 | LTTNG_SYMBOL_NAME_LEN); | |
99497cd0 | 311 | ev.attr.ftrace.symbol_name[LTTNG_SYMBOL_NAME_LEN - 1] = '\0'; |
f3ed775e | 312 | break; |
a54bd42d | 313 | case LTTNG_EVENT_SYSCALL: |
6181537c DG |
314 | MSG("per-syscall selection not supported yet. Use \"-a\" " |
315 | "for all syscalls."); | |
f3ed775e DG |
316 | default: |
317 | ret = CMD_NOT_IMPLEMENTED; | |
318 | goto error; | |
319 | } | |
f3ed775e | 320 | } else if (opt_userspace) { /* User-space tracer action */ |
2bdd86d4 | 321 | if (!opt_pid_all) { |
6181537c DG |
322 | MSG("Only supporting tracing all UST processes " |
323 | "(-u --all) for now."); | |
2bdd86d4 MD |
324 | ret = CMD_NOT_IMPLEMENTED; |
325 | goto error; | |
326 | } | |
6181537c DG |
327 | |
328 | DBG("Enabling UST event %s for channel %s", event_name, | |
329 | channel_name); | |
2bdd86d4 MD |
330 | |
331 | switch (opt_event_type) { | |
332 | case LTTNG_EVENT_ALL: /* Default behavior is tracepoint */ | |
2bdd86d4 MD |
333 | /* Fall-through */ |
334 | case LTTNG_EVENT_TRACEPOINT: | |
e4baff1e MD |
335 | /* Copy name and type of the event */ |
336 | ev.type = LTTNG_EVENT_TRACEPOINT; | |
337 | strncpy(ev.name, event_name, LTTNG_SYMBOL_NAME_LEN); | |
338 | ev.name[LTTNG_SYMBOL_NAME_LEN - 1] = '\0'; | |
2bdd86d4 | 339 | break; |
13dce3b7 | 340 | case LTTNG_EVENT_TRACEPOINT_LOGLEVEL: |
e4baff1e | 341 | /* Copy name and type of the event */ |
13dce3b7 | 342 | ev.type = LTTNG_EVENT_TRACEPOINT_LOGLEVEL; |
e4baff1e MD |
343 | strncpy(ev.name, event_name, LTTNG_SYMBOL_NAME_LEN); |
344 | ev.name[LTTNG_SYMBOL_NAME_LEN - 1] = '\0'; | |
13dce3b7 | 345 | break; |
2bdd86d4 MD |
346 | case LTTNG_EVENT_PROBE: |
347 | case LTTNG_EVENT_FUNCTION: | |
348 | case LTTNG_EVENT_FUNCTION_ENTRY: | |
349 | case LTTNG_EVENT_SYSCALL: | |
350 | default: | |
351 | ret = CMD_NOT_IMPLEMENTED; | |
352 | goto error; | |
353 | } | |
f3ed775e | 354 | } else { |
048e2159 | 355 | ERR("Please specify a tracer (--kernel or --userspace)"); |
f3ed775e DG |
356 | goto error; |
357 | } | |
358 | ||
6181537c DG |
359 | ret = lttng_enable_event(handle, &ev, channel_name); |
360 | if (ret == 0) { | |
361 | MSG("%s event %s created in channel %s", | |
362 | opt_kernel ? "kernel": "UST", event_name, channel_name); | |
363 | } | |
364 | ||
f3ed775e DG |
365 | /* Next event */ |
366 | event_name = strtok(NULL, ","); | |
367 | } | |
368 | ||
8c9ae521 | 369 | end: |
f3ed775e | 370 | error: |
b73d0b29 MD |
371 | if (opt_channel_name == NULL) { |
372 | free(channel_name); | |
373 | } | |
cd80958d DG |
374 | lttng_destroy_handle(handle); |
375 | ||
f3ed775e DG |
376 | return ret; |
377 | } | |
378 | ||
379 | /* | |
6181537c | 380 | * Add event to trace session |
f3ed775e DG |
381 | */ |
382 | int cmd_enable_events(int argc, const char **argv) | |
383 | { | |
384 | int opt, ret; | |
385 | static poptContext pc; | |
cd80958d | 386 | char *session_name = NULL; |
f3ed775e DG |
387 | |
388 | pc = poptGetContext(NULL, argc, argv, long_options, 0); | |
389 | poptReadDefaultConfig(pc, 0); | |
390 | ||
391 | /* Default event type */ | |
7a3d1328 | 392 | opt_event_type = LTTNG_EVENT_ALL; |
f3ed775e DG |
393 | |
394 | while ((opt = poptGetNextOpt(pc)) != -1) { | |
395 | switch (opt) { | |
396 | case OPT_HELP: | |
397 | usage(stderr); | |
398 | ret = CMD_SUCCESS; | |
399 | goto end; | |
f3ed775e | 400 | case OPT_TRACEPOINT: |
e6ddca71 | 401 | opt_event_type = LTTNG_EVENT_TRACEPOINT; |
f3ed775e | 402 | break; |
cf0e5467 | 403 | case OPT_PROBE: |
7d29a247 | 404 | opt_event_type = LTTNG_EVENT_PROBE; |
f3ed775e DG |
405 | break; |
406 | case OPT_FUNCTION: | |
407 | opt_event_type = LTTNG_EVENT_FUNCTION; | |
8f0d098b MD |
408 | break; |
409 | case OPT_FUNCTION_ENTRY: | |
410 | opt_event_type = LTTNG_EVENT_FUNCTION_ENTRY; | |
f3ed775e | 411 | break; |
a54bd42d MD |
412 | case OPT_SYSCALL: |
413 | opt_event_type = LTTNG_EVENT_SYSCALL; | |
0133c199 | 414 | break; |
eeac7d46 MD |
415 | case OPT_USERSPACE: |
416 | opt_userspace = 1; | |
eeac7d46 | 417 | break; |
13dce3b7 MD |
418 | case OPT_TRACEPOINT_LOGLEVEL: |
419 | opt_event_type = LTTNG_EVENT_TRACEPOINT_LOGLEVEL; | |
420 | break; | |
f3ed775e DG |
421 | default: |
422 | usage(stderr); | |
423 | ret = CMD_UNDEFINED; | |
424 | goto end; | |
425 | } | |
426 | } | |
427 | ||
428 | opt_event_list = (char*) poptGetArg(pc); | |
429 | if (opt_event_list == NULL && opt_enable_all == 0) { | |
430 | ERR("Missing event name(s).\n"); | |
431 | usage(stderr); | |
432 | ret = CMD_SUCCESS; | |
433 | goto end; | |
434 | } | |
435 | ||
cd80958d DG |
436 | if (!opt_session_name) { |
437 | session_name = get_session_name(); | |
438 | if (session_name == NULL) { | |
439 | ret = -1; | |
440 | goto end; | |
441 | } | |
442 | } else { | |
443 | session_name = opt_session_name; | |
444 | } | |
445 | ||
446 | ret = enable_events(session_name); | |
f3ed775e DG |
447 | |
448 | end: | |
cd80958d DG |
449 | if (opt_session_name == NULL) { |
450 | free(session_name); | |
451 | } | |
452 | ||
f3ed775e DG |
453 | return ret; |
454 | } |