]> git.ipfire.org Git - thirdparty/util-linux.git/blob - sys-utils/lsns.c
Merge branch 'port-osx' of https://github.com/rudimeier/util-linux
[thirdparty/util-linux.git] / sys-utils / lsns.c
1 /*
2 * lsns(8) - list system namespaces
3 *
4 * Copyright (C) 2015 Karel Zak <kzak@redhat.com>
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it would be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software Foundation,
18 * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20 #include <stdio.h>
21 #include <string.h>
22 #include <getopt.h>
23 #include <stdlib.h>
24 #include <assert.h>
25 #include <dirent.h>
26 #include <unistd.h>
27 #include <sys/stat.h>
28 #include <sys/types.h>
29 #include <wchar.h>
30 #include <libsmartcols.h>
31
32 #include "pathnames.h"
33 #include "nls.h"
34 #include "xalloc.h"
35 #include "c.h"
36 #include "list.h"
37 #include "closestream.h"
38 #include "optutils.h"
39 #include "procutils.h"
40 #include "strutils.h"
41 #include "namespace.h"
42 #include "path.h"
43 #include "idcache.h"
44
45 #include "debug.h"
46
47 UL_DEBUG_DEFINE_MASK(lsns);
48 UL_DEBUG_DEFINE_MASKNAMES(lsns) = UL_DEBUG_EMPTY_MASKNAMES;
49
50 #define LSNS_DEBUG_INIT (1 << 1)
51 #define LSNS_DEBUG_PROC (1 << 2)
52 #define LSNS_DEBUG_NS (1 << 3)
53 #define LSNS_DEBUG_ALL 0xFFFF
54
55 #define DBG(m, x) __UL_DBG(lsns, LSNS_DEBUG_, m, x)
56 #define ON_DBG(m, x) __UL_DBG_CALL(lsns, LSNS_DEBUG_, m, x)
57
58 struct idcache *uid_cache = NULL;
59
60 /* column IDs */
61 enum {
62 COL_NS = 0,
63 COL_TYPE,
64 COL_PATH,
65 COL_NPROCS,
66 COL_PID,
67 COL_PPID,
68 COL_COMMAND,
69 COL_UID,
70 COL_USER
71 };
72
73 /* column names */
74 struct colinfo {
75 const char *name; /* header */
76 double whint; /* width hint (N < 1 is in percent of termwidth) */
77 int flags; /* SCOLS_FL_* */
78 const char *help;
79 };
80
81 /* columns descriptions */
82 static const struct colinfo infos[] = {
83 [COL_NS] = { "NS", 10, SCOLS_FL_RIGHT, N_("namespace identifier (inode number)") },
84 [COL_TYPE] = { "TYPE", 5, 0, N_("kind of namespace") },
85 [COL_PATH] = { "PATH", 0, 0, N_("path to the namespace")},
86 [COL_NPROCS] = { "NPROCS", 5, SCOLS_FL_RIGHT, N_("number of processes in the namespace") },
87 [COL_PID] = { "PID", 5, SCOLS_FL_RIGHT, N_("lowest PID in the namespace") },
88 [COL_PPID] = { "PPID", 5, SCOLS_FL_RIGHT, N_("PPID of the PID") },
89 [COL_COMMAND] = { "COMMAND", 0, SCOLS_FL_TRUNC, N_("command line of the PID")},
90 [COL_UID] = { "UID", 0, SCOLS_FL_RIGHT, N_("UID of the PID")},
91 [COL_USER] = { "USER", 0, 0, N_("username of the PID")}
92 };
93
94 static int columns[ARRAY_SIZE(infos) * 2];
95 static size_t ncolumns;
96
97 enum {
98 LSNS_ID_MNT = 0,
99 LSNS_ID_NET,
100 LSNS_ID_PID,
101 LSNS_ID_UTS,
102 LSNS_ID_IPC,
103 LSNS_ID_USER
104 };
105
106 static char *ns_names[] = {
107 [LSNS_ID_MNT] = "mnt",
108 [LSNS_ID_NET] = "net",
109 [LSNS_ID_PID] = "pid",
110 [LSNS_ID_UTS] = "uts",
111 [LSNS_ID_IPC] = "ipc",
112 [LSNS_ID_USER] = "user"
113 };
114
115 struct lsns_namespace {
116 ino_t id;
117 int type; /* LSNS_* */
118 int nprocs;
119
120 struct lsns_process *proc;
121
122 struct list_head namespaces; /* lsns->processes member */
123 struct list_head processes; /* head of lsns_process *siblings */
124 };
125
126 struct lsns_process {
127 pid_t pid; /* process PID */
128 pid_t ppid; /* parent's PID */
129 pid_t tpid; /* thread group */
130 char state;
131 uid_t uid;
132
133 ino_t ns_ids[ARRAY_SIZE(ns_names)];
134 struct list_head ns_siblings[ARRAY_SIZE(ns_names)];
135
136 struct list_head processes; /* list of processes */
137
138 struct libscols_line *outline;
139 struct lsns_process *parent;
140 };
141
142 struct lsns {
143 struct list_head processes;
144 struct list_head namespaces;
145
146 pid_t fltr_pid; /* filter out by PID */
147 ino_t fltr_ns; /* filter out by namespace */
148 int fltr_types[ARRAY_SIZE(ns_names)];
149 int fltr_ntypes;
150
151 unsigned int raw : 1,
152 json : 1,
153 tree : 1,
154 list : 1,
155 notrunc : 1,
156 no_headings: 1;
157 };
158
159 static void lsns_init_debug(void)
160 {
161 __UL_INIT_DEBUG(lsns, LSNS_DEBUG_, 0, LSNS_DEBUG);
162 }
163
164 static int ns_name2type(const char *name)
165 {
166 size_t i;
167
168 for (i = 0; i < ARRAY_SIZE(ns_names); i++) {
169 if (strcmp(ns_names[i], name) == 0)
170 return i;
171 }
172 return -1;
173 }
174
175 static int column_name_to_id(const char *name, size_t namesz)
176 {
177 size_t i;
178
179 assert(name);
180
181 for (i = 0; i < ARRAY_SIZE(infos); i++) {
182 const char *cn = infos[i].name;
183
184 if (!strncasecmp(name, cn, namesz) && !*(cn + namesz))
185 return i;
186 }
187 warnx(_("unknown column: %s"), name);
188 return -1;
189 }
190
191 static inline int get_column_id(int num)
192 {
193 assert(num >= 0);
194 assert((size_t) num < ncolumns);
195 assert(columns[num] < (int) ARRAY_SIZE(infos));
196
197 return columns[num];
198 }
199
200 static inline const struct colinfo *get_column_info(unsigned num)
201 {
202 return &infos[ get_column_id(num) ];
203 }
204
205 static ino_t get_ns_ino(int dir, const char *nsname, ino_t *ino)
206 {
207 struct stat st;
208 char path[16];
209
210 snprintf(path, sizeof(path), "ns/%s", nsname);
211
212 if (fstatat(dir, path, &st, 0) != 0)
213 return -errno;
214 *ino = st.st_ino;
215 return 0;
216 }
217
218
219 static int read_process(struct lsns *ls, pid_t pid)
220 {
221 struct lsns_process *p = NULL;
222 char buf[BUFSIZ];
223 DIR *dir;
224 int rc = 0, fd;
225 FILE *f = NULL;
226 size_t i;
227 struct stat st;
228
229 DBG(PROC, ul_debug("reading %d", (int) pid));
230
231 snprintf(buf, sizeof(buf), "/proc/%d", pid);
232 dir = opendir(buf);
233 if (!dir)
234 return -errno;
235
236 p = xcalloc(1, sizeof(*p));
237 if (!p) {
238 rc = -ENOMEM;
239 goto done;
240 }
241
242 if (fstat(dirfd(dir), &st) == 0) {
243 p->uid = st.st_uid;
244 add_uid(uid_cache, st.st_uid);
245 }
246
247 fd = openat(dirfd(dir), "stat", O_RDONLY);
248 if (fd < 0) {
249 rc = -errno;
250 goto done;
251 }
252 if (!(f = fdopen(fd, "r"))) {
253 rc = -errno;
254 goto done;
255 }
256 rc = fscanf(f, "%d %*s %c %d*[^\n]", &p->pid, &p->state, &p->ppid);
257 if (rc != 3) {
258 rc = -errno;
259 goto done;
260 }
261 rc = 0;
262
263 for (i = 0; i < ARRAY_SIZE(p->ns_ids); i++) {
264 INIT_LIST_HEAD(&p->ns_siblings[i]);
265
266 if (!ls->fltr_types[i])
267 continue;
268
269 rc = get_ns_ino(dirfd(dir), ns_names[i], &p->ns_ids[i]);
270 if (rc && rc != -EACCES)
271 goto done;
272 rc = 0;
273 }
274
275 INIT_LIST_HEAD(&p->processes);
276
277 DBG(PROC, ul_debugobj(p, "new pid=%d", p->pid));
278 list_add_tail(&p->processes, &ls->processes);
279 done:
280 if (f)
281 fclose(f);
282 closedir(dir);
283 if (rc)
284 free(p);
285 return rc;
286 }
287
288 static int read_processes(struct lsns *ls)
289 {
290 struct proc_processes *proc = NULL;
291 pid_t pid;
292 int rc = 0;
293
294 DBG(PROC, ul_debug("opening /proc"));
295
296 if (!(proc = proc_open_processes())) {
297 rc = -errno;
298 goto done;
299 }
300
301 while (proc_next_pid(proc, &pid) == 0) {
302 rc = read_process(ls, pid);
303 if (rc && rc != -EACCES && rc != -ENOENT)
304 break;
305 rc = 0;
306 }
307 done:
308 DBG(PROC, ul_debug("closing /proc"));
309 proc_close_processes(proc);
310 return rc;
311 }
312
313 static struct lsns_namespace *get_namespace(struct lsns *ls, ino_t ino)
314 {
315 struct list_head *p;
316
317 list_for_each(p, &ls->namespaces) {
318 struct lsns_namespace *ns = list_entry(p, struct lsns_namespace, namespaces);
319
320 if (ns->id == ino)
321 return ns;
322 }
323 return NULL;
324 }
325
326 static int namespace_has_process(struct lsns_namespace *ns, pid_t pid)
327 {
328 struct list_head *p;
329
330 list_for_each(p, &ns->processes) {
331 struct lsns_process *proc = list_entry(p, struct lsns_process, ns_siblings[ns->type]);
332
333 if (proc->pid == pid)
334 return 1;
335 }
336 return 0;
337 }
338
339 static struct lsns_namespace *add_namespace(struct lsns *ls, int type, ino_t ino)
340 {
341 struct lsns_namespace *ns = xcalloc(1, sizeof(*ns));
342
343 if (!ns)
344 return NULL;
345
346 DBG(NS, ul_debugobj(ns, "new %s[%lu]", ns_names[type], ino));
347
348 INIT_LIST_HEAD(&ns->processes);
349 INIT_LIST_HEAD(&ns->namespaces);
350
351 ns->type = type;
352 ns->id = ino;
353
354 list_add_tail(&ns->namespaces, &ls->namespaces);
355 return ns;
356 }
357
358 static int add_process_to_namespace(struct lsns *ls, struct lsns_namespace *ns, struct lsns_process *proc)
359 {
360 struct list_head *p;
361
362 DBG(NS, ul_debugobj(ns, "add process [%p] pid=%d to %s[%lu]", proc, proc->pid, ns_names[ns->type], ns->id));
363
364 list_for_each(p, &ls->processes) {
365 struct lsns_process *xproc = list_entry(p, struct lsns_process, processes);
366
367 if (xproc->pid == proc->ppid) /* my parent */
368 proc->parent = xproc;
369 else if (xproc->ppid == proc->pid) /* my child */
370 xproc->parent = proc;
371 }
372
373 list_add_tail(&proc->ns_siblings[ns->type], &ns->processes);
374 ns->nprocs++;
375
376 if (!ns->proc || ns->proc->pid > proc->pid)
377 ns->proc = proc;
378
379 return 0;
380 }
381
382 static int cmp_namespaces(struct list_head *a, struct list_head *b,
383 __attribute__((__unused__)) void *data)
384 {
385 struct lsns_namespace *xa = list_entry(a, struct lsns_namespace, namespaces),
386 *xb = list_entry(b, struct lsns_namespace, namespaces);
387
388 return cmp_numbers(xa->id, xb->id);
389 }
390
391 static int read_namespaces(struct lsns *ls)
392 {
393 struct list_head *p;
394
395 DBG(NS, ul_debug("reading namespace"));
396
397 list_for_each(p, &ls->processes) {
398 size_t i;
399 struct lsns_namespace *ns;
400 struct lsns_process *proc = list_entry(p, struct lsns_process, processes);
401
402 for (i = 0; i < ARRAY_SIZE(proc->ns_ids); i++) {
403 if (proc->ns_ids[i] == 0)
404 continue;
405 if (!(ns = get_namespace(ls, proc->ns_ids[i]))) {
406 ns = add_namespace(ls, i, proc->ns_ids[i]);
407 if (!ns)
408 return -ENOMEM;
409 }
410 add_process_to_namespace(ls, ns, proc);
411 }
412 }
413
414 list_sort(&ls->namespaces, cmp_namespaces, NULL);
415
416 return 0;
417 }
418
419 static void add_scols_line(struct lsns *ls, struct libscols_table *table,
420 struct lsns_namespace *ns, struct lsns_process *proc)
421 {
422 size_t i;
423 struct libscols_line *line;
424
425 assert(ns);
426 assert(table);
427
428 line = scols_table_new_line(table,
429 ls->tree && proc->parent ? proc->parent->outline : NULL);
430 if (!line) {
431 warn(_("failed to add line to output"));
432 return;
433 }
434
435 for (i = 0; i < ncolumns; i++) {
436 char *str = NULL;
437
438 switch (get_column_id(i)) {
439 case COL_NS:
440 xasprintf(&str, "%lu", ns->id);
441 break;
442 case COL_PID:
443 xasprintf(&str, "%d", (int) proc->pid);
444 break;
445 case COL_PPID:
446 xasprintf(&str, "%d", (int) proc->ppid);
447 break;
448 case COL_TYPE:
449 xasprintf(&str, "%s", ns_names[ns->type]);
450 break;
451 case COL_NPROCS:
452 xasprintf(&str, "%d", ns->nprocs);
453 break;
454 case COL_COMMAND:
455 str = proc_get_command(proc->pid);
456 if (!str)
457 str = proc_get_command_name(proc->pid);
458 break;
459 case COL_PATH:
460 xasprintf(&str, "/proc/%d/ns/%s", (int) proc->pid, ns_names[ns->type]);
461 break;
462 case COL_UID:
463 xasprintf(&str, "%d", (int) proc->uid);
464 break;
465 case COL_USER:
466 xasprintf(&str, "%s", get_id(uid_cache, proc->uid)->name);
467 break;
468 default:
469 break;
470 }
471
472 if (str)
473 scols_line_set_data(line, i, str);
474 }
475
476 proc->outline = line;
477 }
478
479 static struct libscols_table *init_scols_table(struct lsns *ls)
480 {
481 struct libscols_table *tab;
482 size_t i;
483
484 tab = scols_new_table();
485 if (!tab) {
486 warn(_("failed to initialize output table"));
487 return NULL;
488 }
489
490 scols_table_enable_raw(tab, ls->raw);
491 scols_table_enable_json(tab, ls->json);
492 scols_table_enable_noheadings(tab, ls->no_headings);
493
494 if (ls->json)
495 scols_table_set_name(tab, "namespaces");
496
497 for (i = 0; i < ncolumns; i++) {
498 const struct colinfo *col = get_column_info(i);
499 int flags = col->flags;
500
501 if (ls->notrunc)
502 flags &= ~SCOLS_FL_TRUNC;
503 if (ls->tree && get_column_id(i) == COL_COMMAND)
504 flags |= SCOLS_FL_TREE;
505
506 if (!scols_table_new_column(tab, col->name, col->whint, flags)) {
507 warnx(_("failed to initialize output column"));
508 goto err;
509 }
510 }
511
512 return tab;
513 err:
514 scols_unref_table(tab);
515 return NULL;
516 }
517
518 static int show_namespaces(struct lsns *ls)
519 {
520 struct libscols_table *tab;
521 struct list_head *p;
522 int rc = 0;
523
524 tab = init_scols_table(ls);
525 if (!tab)
526 return -ENOMEM;
527
528 list_for_each(p, &ls->namespaces) {
529 struct lsns_namespace *ns = list_entry(p, struct lsns_namespace, namespaces);
530
531 if (ls->fltr_pid != 0 && !namespace_has_process(ns, ls->fltr_pid))
532 continue;
533
534 add_scols_line(ls, tab, ns, ns->proc);
535 }
536
537 scols_print_table(tab);
538 scols_unref_table(tab);
539 return rc;
540 }
541
542 static void show_process(struct lsns *ls, struct libscols_table *tab,
543 struct lsns_process *proc, struct lsns_namespace *ns)
544 {
545 /*
546 * create a tree from parent->child relation, but only if the parent is
547 * within the same namespace
548 */
549 if (ls->tree
550 && proc->parent
551 && !proc->parent->outline
552 && proc->parent->ns_ids[ns->type] == proc->ns_ids[ns->type])
553 show_process(ls, tab, proc->parent, ns);
554
555 add_scols_line(ls, tab, ns, proc);
556 }
557
558
559 static int show_namespace_processes(struct lsns *ls, struct lsns_namespace *ns)
560 {
561 struct libscols_table *tab;
562 struct list_head *p;
563
564 tab = init_scols_table(ls);
565 if (!tab)
566 return -ENOMEM;
567
568 list_for_each(p, &ns->processes) {
569 struct lsns_process *proc = list_entry(p, struct lsns_process, ns_siblings[ns->type]);
570
571 if (!proc->outline)
572 show_process(ls, tab, proc, ns);
573 }
574
575
576 scols_print_table(tab);
577 scols_unref_table(tab);
578 return 0;
579 }
580
581 static void __attribute__ ((__noreturn__)) usage(FILE * out)
582 {
583 size_t i;
584
585 fputs(USAGE_HEADER, out);
586
587 fprintf(out,
588 _(" %s [options] [<namespace>]\n"), program_invocation_short_name);
589
590 fputs(USAGE_SEPARATOR, out);
591 fputs(_("List system namespaces.\n"), out);
592
593 fputs(USAGE_OPTIONS, out);
594 fputs(_(" -J, --json use JSON output format\n"), out);
595 fputs(_(" -l, --list use list format output\n"), out);
596 fputs(_(" -n, --noheadings don't print headings\n"), out);
597 fputs(_(" -o, --output <list> define which output columns to use\n"), out);
598 fputs(_(" -p, --task <pid> print process namespaces\n"), out);
599 fputs(_(" -r, --raw use the raw output format\n"), out);
600 fputs(_(" -u, --notruncate don't truncate text in columns\n"), out);
601 fputs(_(" -t, --type <name> namespace type (mnt, net, ipc, user, pid, uts)\n"), out);
602
603 fputs(USAGE_SEPARATOR, out);
604 fputs(USAGE_HELP, out);
605 fputs(USAGE_VERSION, out);
606
607 fputs(_("\nAvailable columns (for --output):\n"), out);
608
609 for (i = 0; i < ARRAY_SIZE(infos); i++)
610 fprintf(out, " %11s %s\n", infos[i].name, _(infos[i].help));
611
612 fprintf(out, USAGE_MAN_TAIL("lsns(8)"));
613
614 exit(out == stderr ? EXIT_FAILURE : EXIT_SUCCESS);
615 }
616
617
618 int main(int argc, char *argv[])
619 {
620 struct lsns ls;
621 int c;
622 int r = 0;
623 char *outarg = NULL;
624 static const struct option long_opts[] = {
625 { "json", no_argument, NULL, 'J' },
626 { "task", required_argument, NULL, 'p' },
627 { "help", no_argument, NULL, 'h' },
628 { "output", required_argument, NULL, 'o' },
629 { "notruncate", no_argument, NULL, 'u' },
630 { "version", no_argument, NULL, 'V' },
631 { "noheadings", no_argument, NULL, 'n' },
632 { "list", no_argument, NULL, 'l' },
633 { "raw", no_argument, NULL, 'r' },
634 { "type", required_argument, NULL, 't' },
635 { NULL, 0, NULL, 0 }
636 };
637
638 static const ul_excl_t excl[] = { /* rows and cols in ASCII order */
639 { 'J','r' },
640 { 0 }
641 };
642 int excl_st[ARRAY_SIZE(excl)] = UL_EXCL_STATUS_INIT;
643
644 setlocale(LC_ALL, "");
645 bindtextdomain(PACKAGE, LOCALEDIR);
646 textdomain(PACKAGE);
647 atexit(close_stdout);
648
649 lsns_init_debug();
650 memset(&ls, 0, sizeof(ls));
651
652 INIT_LIST_HEAD(&ls.processes);
653 INIT_LIST_HEAD(&ls.namespaces);
654
655 while ((c = getopt_long(argc, argv,
656 "Jlp:o:nruhVt:", long_opts, NULL)) != -1) {
657
658 err_exclusive_options(c, long_opts, excl, excl_st);
659
660 switch(c) {
661 case 'J':
662 ls.json = 1;
663 break;
664 case 'l':
665 ls.list = 1;
666 break;
667 case 'o':
668 outarg = optarg;
669 break;
670 case 'V':
671 printf(UTIL_LINUX_VERSION);
672 return EXIT_SUCCESS;
673 case 'p':
674 ls.fltr_pid = strtos32_or_err(optarg, _("invalid PID argument"));
675 break;
676 case 'h':
677 usage(stdout);
678 case 'n':
679 ls.no_headings = 1;
680 break;
681 case 'r':
682 ls.raw = 1;
683 break;
684 case 'u':
685 ls.notrunc = 1;
686 break;
687 case 't':
688 {
689 int type = ns_name2type(optarg);
690 if (type < 0)
691 errx(EXIT_FAILURE, _("unknown namespace type: %s"), optarg);
692 ls.fltr_types[type] = 1;
693 ls.fltr_ntypes++;
694 break;
695 }
696 case '?':
697 default:
698 usage(stderr);
699 }
700 }
701
702 if (!ls.fltr_ntypes) {
703 size_t i;
704 for (i = 0; i < ARRAY_SIZE(ns_names); i++)
705 ls.fltr_types[i] = 1;
706 }
707
708 if (optind < argc) {
709 if (ls.fltr_pid)
710 errx(EXIT_FAILURE, _("--task is mutually exclusive with <namespace>"));
711 ls.fltr_ns = strtou64_or_err(argv[optind], _("invalid namespace argument"));
712 ls.tree = ls.list ? 0 : 1;
713
714 if (!ncolumns) {
715 columns[ncolumns++] = COL_PID;
716 columns[ncolumns++] = COL_PPID;
717 columns[ncolumns++] = COL_USER;
718 columns[ncolumns++] = COL_COMMAND;
719 }
720 }
721
722 if (!ncolumns) {
723 columns[ncolumns++] = COL_NS;
724 columns[ncolumns++] = COL_TYPE;
725 columns[ncolumns++] = COL_NPROCS;
726 columns[ncolumns++] = COL_PID;
727 columns[ncolumns++] = COL_USER;
728 columns[ncolumns++] = COL_COMMAND;
729 }
730
731 if (outarg && string_add_to_idarray(outarg, columns, ARRAY_SIZE(columns),
732 &ncolumns, column_name_to_id) < 0)
733 return EXIT_FAILURE;
734
735 scols_init_debug(0);
736
737 uid_cache = new_idcache();
738 if (!uid_cache)
739 err(EXIT_FAILURE, _("failed to allocate UID cache"));
740
741 r = read_processes(&ls);
742 if (!r)
743 r = read_namespaces(&ls);
744 if (!r) {
745 if (ls.fltr_ns) {
746 struct lsns_namespace *ns = get_namespace(&ls, ls.fltr_ns);
747
748 if (!ns)
749 errx(EXIT_FAILURE, _("not found namespace: %ju"), (uintmax_t) ls.fltr_ns);
750 r = show_namespace_processes(&ls, ns);
751 } else
752 r = show_namespaces(&ls);
753 }
754
755 free_idcache(uid_cache);
756 return r == 0 ? EXIT_SUCCESS : EXIT_FAILURE;
757 }