4 * Copyright (c) 2008 Nicholas Marriott <nicm@users.sourceforge.net>
6 * Permission to use, copy, modify, and distribute this software for any
7 * purpose with or without fee is hereby granted, provided that the above
8 * copyright notice and this permission notice appear in all copies.
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14 * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
15 * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
16 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19 #include <sys/types.h>
20 #include <sys/utsname.h>
31 * Show various information about server.
34 int cmd_server_info_exec(struct cmd
*, struct cmd_ctx
*);
36 const struct cmd_entry cmd_server_info_entry
= {
37 "server-info", "info",
48 cmd_server_info_exec(unused
struct cmd
*self
, struct cmd_ctx
*ctx
)
50 struct tty_term
*term
;
55 struct window_pane
*wp
;
56 struct tty_code
*code
;
57 const struct tty_term_code_entry
*ent
;
69 tim
= ctime(&start_time
);
70 *strchr(tim
, '\n') = '\0';
71 ctx
->print(ctx
, "pid %ld, started %s", (long) getpid(), tim
);
73 ctx
, "socket path %s, debug level %d", socket_path
, debug_level
);
74 if (uname(&un
) >= 0) {
75 ctx
->print(ctx
, "system is %s %s %s %s",
76 un
.sysname
, un
.release
, un
.version
, un
.machine
);
79 ctx
->print(ctx
, "configuration file is %s", cfg_file
);
81 ctx
->print(ctx
, "configuration file not specified");
82 ctx
->print(ctx
, "protocol version is %d", PROTOCOL_VERSION
);
83 ctx
->print(ctx
, "%s", "");
85 ctx
->print(ctx
, "Clients:");
86 for (i
= 0; i
< ARRAY_LENGTH(&clients
); i
++) {
87 c
= ARRAY_ITEM(&clients
, i
);
88 if (c
== NULL
|| c
->session
== NULL
)
91 ctx
->print(ctx
,"%2d: %s (%d, %d): %s [%ux%u %s bs=%hho] "
92 "[flags=0x%x/0x%x, references=%u]", i
, c
->tty
.path
,
93 c
->ibuf
.fd
, c
->tty
.fd
, c
->session
->name
,
94 c
->tty
.sx
, c
->tty
.sy
, c
->tty
.termname
,
95 c
->tty
.tio
.c_cc
[VERASE
], c
->flags
,
96 c
->tty
.flags
, c
->references
);
98 ctx
->print(ctx
, "%s", "");
100 ctx
->print(ctx
, "Sessions: [%zu/%zu]",
101 sizeof (struct grid_cell
), sizeof (struct grid_utf8
));
102 RB_FOREACH(s
, sessions
, &sessions
) {
103 t
= s
->creation_time
.tv_sec
;
105 *strchr(tim
, '\n') = '\0';
107 ctx
->print(ctx
, "%2u: %s: %u windows (created %s) [%ux%u] "
108 "[flags=0x%x]", s
->idx
, s
->name
,
109 winlink_count(&s
->windows
), tim
, s
->sx
, s
->sy
, s
->flags
);
110 RB_FOREACH(wl
, winlinks
, &s
->windows
) {
112 ctx
->print(ctx
, "%4u: %s [%ux%u] [flags=0x%x, "
113 "references=%u, last layout=%d]", wl
->idx
, w
->name
,
114 w
->sx
, w
->sy
, w
->flags
, w
->references
,
117 TAILQ_FOREACH(wp
, &w
->panes
, entry
) {
118 lines
= ulines
= size
= usize
= 0;
120 for (k
= 0; k
< gd
->hsize
+ gd
->sy
; k
++) {
121 gl
= &gd
->linedata
[k
];
122 if (gl
->celldata
!= NULL
) {
124 size
+= gl
->cellsize
*
125 sizeof *gl
->celldata
;
127 if (gl
->utf8data
!= NULL
) {
129 usize
+= gl
->utf8size
*
130 sizeof *gl
->utf8data
;
133 ctx
->print(ctx
, "%6u: %s %lu %d %u/%u, %zu "
134 "bytes; UTF-8 %u/%u, %zu bytes", j
,
135 wp
->tty
, (u_long
) wp
->pid
, wp
->fd
, lines
,
136 gd
->hsize
+ gd
->sy
, size
, ulines
,
137 gd
->hsize
+ gd
->sy
, usize
);
142 ctx
->print(ctx
, "%s", "");
144 ctx
->print(ctx
, "Terminals:");
145 LIST_FOREACH(term
, &tty_terms
, entry
) {
146 ctx
->print(ctx
, "%s [references=%u, flags=0x%x]:",
147 term
->name
, term
->references
, term
->flags
);
148 for (i
= 0; i
< NTTYCODE
; i
++) {
149 ent
= &tty_term_codes
[i
];
150 code
= &term
->codes
[ent
->code
];
151 switch (code
->type
) {
153 ctx
->print(ctx
, "%2u: %s: [missing]",
154 ent
->code
, ent
->name
);
157 strnvis(out
, code
->value
.string
, sizeof out
,
158 VIS_OCTAL
|VIS_TAB
|VIS_NL
);
159 ctx
->print(ctx
, "%2u: %s: (string) %s",
160 ent
->code
, ent
->name
, out
);
163 ctx
->print(ctx
, "%2u: %s: (number) %d",
164 ent
->code
, ent
->name
, code
->value
.number
);
167 ctx
->print(ctx
, "%2u: %s: (flag) %s",
168 ent
->code
, ent
->name
,
169 code
->value
.flag
? "true" : "false");
174 ctx
->print(ctx
, "%s", "");
176 ctx
->print(ctx
, "Jobs:");
177 LIST_FOREACH(job
, &all_jobs
, lentry
) {
178 ctx
->print(ctx
, "%s [fd=%d, pid=%d, status=%d]",
179 job
->cmd
, job
->fd
, job
->pid
, job
->status
);