Merge branches 'hammer2' and 'master' of ssh://crater.dragonflybsd.org/repository...
[dragonfly.git] / sbin / hammer2 / cmd_debug.c
1 /*
2  * Copyright (c) 2011-2012 The DragonFly Project.  All rights reserved.
3  *
4  * This code is derived from software contributed to The DragonFly Project
5  * by Matthew Dillon <dillon@dragonflybsd.org>
6  * by Venkatesh Srinivas <vsrinivas@dragonflybsd.org>
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  *
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in
16  *    the documentation and/or other materials provided with the
17  *    distribution.
18  * 3. Neither the name of The DragonFly Project nor the names of its
19  *    contributors may be used to endorse or promote products derived
20  *    from this software without specific, prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
23  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
24  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
25  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
26  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
27  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
28  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
29  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
30  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
31  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
32  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35
36 #include "hammer2.h"
37
38 #define SHOW_TAB        2
39
40 static void shell_recv(hammer2_iocom_t *iocom);
41 static void shell_send(hammer2_iocom_t *iocom);
42 static void shell_tty(hammer2_iocom_t *iocom);
43 static void hammer2_shell_parse(hammer2_iocom_t *iocom, hammer2_msg_t *msg);
44
45 /************************************************************************
46  *                                  SHELL                               *
47  ************************************************************************/
48
49 int
50 cmd_shell(const char *hostname)
51 {
52         struct sockaddr_in lsin;
53         struct hammer2_iocom iocom;
54         hammer2_msg_t *msg;
55         struct hostent *hen;
56         int fd;
57
58         /*
59          * Acquire socket and set options
60          */
61         if ((fd = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
62                 fprintf(stderr, "cmd_debug: socket(): %s\n",
63                         strerror(errno));
64                 return 1;
65         }
66
67         /*
68          * Connect to the target
69          */
70         bzero(&lsin, sizeof(lsin));
71         lsin.sin_family = AF_INET;
72         lsin.sin_addr.s_addr = 0;
73         lsin.sin_port = htons(HAMMER2_LISTEN_PORT);
74
75         if (hostname) {
76                 hen = gethostbyname2(hostname, AF_INET);
77                 if (hen == NULL) {
78                         if (inet_pton(AF_INET, hostname, &lsin.sin_addr) != 1) {
79                                 fprintf(stderr,
80                                         "Cannot resolve %s\n", hostname);
81                                 return 1;
82                         }
83                 } else {
84                         bcopy(hen->h_addr, &lsin.sin_addr, hen->h_length);
85                 }
86         }
87         if (connect(fd, (struct sockaddr *)&lsin, sizeof(lsin)) < 0) {
88                 close(fd);
89                 fprintf(stderr, "debug: connect failed: %s\n",
90                         strerror(errno));
91                 return 0;
92         }
93
94         /*
95          * Run the session.  The remote end transmits our prompt.
96          */
97         hammer2_iocom_init(&iocom, fd, 0);
98         printf("debug: connected\n");
99
100         msg = hammer2_msg_alloc(&iocom, 0, HAMMER2_DBG_SHELL);
101         hammer2_ioq_write(&iocom, msg);
102
103         hammer2_iocom_core(&iocom, shell_recv, shell_send, shell_tty);
104         fprintf(stderr, "debug: disconnected\n");
105         close(fd);
106         return 0;
107 }
108
109 /*
110  * Callback from hammer2_iocom_core() when messages might be present
111  * on the socket.
112  */
113 static
114 void
115 shell_recv(hammer2_iocom_t *iocom)
116 {
117         hammer2_msg_t *msg;
118
119         while ((iocom->flags & HAMMER2_IOCOMF_EOF) == 0 &&
120                (msg = hammer2_ioq_read(iocom)) != NULL) {
121
122                 switch(msg->any.head.cmd & HAMMER2_MSGF_CMDSWMASK) {
123                 case HAMMER2_LNK_ERROR:
124                 case HAMMER2_LNK_ERROR | HAMMER2_MSGF_REPLY:
125                         if (msg->any.head.error) {
126                                 fprintf(stderr,
127                                         "Link Error: %d\n",
128                                         msg->any.head.error);
129                         } else {
130                                 write(1, "debug> ", 7);
131                         }
132                         break;
133                 case HAMMER2_DBG_SHELL:
134                         /*
135                          * We send the commands, not accept them.
136                          */
137                         hammer2_msg_reply(iocom, msg, HAMMER2_MSG_ERR_UNKNOWN);
138                         break;
139                 case HAMMER2_DBG_SHELL | HAMMER2_MSGF_REPLY:
140                         /*
141                          * A reply from the remote is data we copy to stdout.
142                          */
143                         if (msg->aux_size) {
144                                 msg->aux_data[msg->aux_size - 1] = 0;
145                                 write(1, msg->aux_data, strlen(msg->aux_data));
146                         }
147                         break;
148                 default:
149                         fprintf(stderr, "Unknown message: %08x\n",
150                                 msg->any.head.cmd);
151                         assert((msg->any.head.cmd & HAMMER2_MSGF_REPLY) == 0);
152                         hammer2_msg_reply(iocom, msg, HAMMER2_MSG_ERR_UNKNOWN);
153                         break;
154                 }
155                 hammer2_state_cleanuprx(iocom, msg);
156         }
157         if (iocom->ioq_rx.error) {
158                 fprintf(stderr, "node_master_recv: comm error %d\n",
159                         iocom->ioq_rx.error);
160         }
161 }
162
163 /*
164  * Callback from hammer2_iocom_core() when messages might be transmittable
165  * to the socket.
166  */
167 static
168 void
169 shell_send(hammer2_iocom_t *iocom)
170 {
171         hammer2_iocom_flush(iocom);
172 }
173
174 static
175 void
176 shell_tty(hammer2_iocom_t *iocom)
177 {
178         hammer2_msg_t *msg;
179         char buf[256];
180         size_t len;
181
182         if (fgets(buf, sizeof(buf), stdin) != NULL) {
183                 len = strlen(buf);
184                 if (len && buf[len - 1] == '\n')
185                         buf[--len] = 0;
186                 ++len;
187                 msg = hammer2_msg_alloc(iocom, len, HAMMER2_DBG_SHELL);
188                 bcopy(buf, msg->aux_data, len);
189                 hammer2_ioq_write(iocom, msg);
190         } else {
191                 /*
192                  * Set EOF flag without setting any error code for normal
193                  * EOF.
194                  */
195                 iocom->flags |= HAMMER2_IOCOMF_EOF;
196         }
197 }
198
199 /*
200  * This is called from the master node to process a received debug
201  * shell command.  We process the command, outputting the results,
202  * then finish up by outputting another prompt.
203  */
204 void
205 hammer2_shell_remote(hammer2_iocom_t *iocom, hammer2_msg_t *msg)
206 {
207         if (msg->aux_data)
208                 msg->aux_data[msg->aux_size - 1] = 0;
209         if (msg->any.head.cmd & HAMMER2_MSGF_REPLY) {
210                 /*
211                  * A reply just prints out the string.  No newline is added
212                  * (it is expected to be embedded if desired).
213                  */
214                 if (msg->aux_data)
215                         write(2, msg->aux_data, strlen(msg->aux_data));
216         } else {
217                 /*
218                  * Otherwise this is a command which we must process.
219                  * When we are finished we generate a final reply.
220                  */
221                 hammer2_shell_parse(iocom, msg);
222                 hammer2_msg_reply(iocom, msg, 0);
223         }
224 }
225
226 static void
227 hammer2_shell_parse(hammer2_iocom_t *iocom, hammer2_msg_t *msg)
228 {
229         char *cmdbuf = msg->aux_data;
230         char *cmd = strsep(&cmdbuf, " \t");
231
232         if (cmd == NULL || *cmd == 0) {
233                 ;
234         } else if (strcmp(cmd, "help") == 0 || strcmp(cmd, "?") == 0) {
235                 iocom_printf(iocom, 0, "help        Command help\n");
236         } else {
237                 iocom_printf(iocom, 0, "Unrecognized command: %s\n", cmd);
238         }
239 }
240
241 /*
242  * Returns text debug output to the original defined by (msg).  (msg) is
243  * not modified and stays intact.  We use a one-way message with REPLY set
244  * to distinguish between a debug command and debug terminal output.
245  *
246  * To prevent loops iocom_printf() can filter the message (cmd) related
247  * to the iocom_printf().  We filter out DBG messages.
248  */
249 void
250 iocom_printf(hammer2_iocom_t *iocom, uint32_t cmd, const char *ctl, ...)
251 {
252         hammer2_msg_t *rmsg;
253         va_list va;
254         char buf[1024];
255         size_t len;
256
257         if ((cmd & HAMMER2_MSGF_PROTOS) == HAMMER2_MSG_PROTO_DBG)
258                 return;
259
260         va_start(va, ctl);
261         vsnprintf(buf, sizeof(buf), ctl, va);
262         va_end(va);
263         len = strlen(buf) + 1;
264
265         rmsg = hammer2_msg_alloc(iocom, len, HAMMER2_DBG_SHELL |
266                                              HAMMER2_MSGF_REPLY);
267         bcopy(buf, rmsg->aux_data, len);
268
269         hammer2_ioq_write(iocom, rmsg);
270 }
271
272 /************************************************************************
273  *                                  SHOW                                *
274  ************************************************************************/
275
276 static void show_bref(int fd, int tab, int bi, hammer2_blockref_t *bref);
277 static void tabprintf(int tab, const char *ctl, ...);
278
279 int
280 cmd_show(const char *devpath)
281 {
282         hammer2_blockref_t broot;
283         int fd;
284
285         fd = open(devpath, O_RDONLY);
286         if (fd < 0) {
287                 perror("open");
288                 return 1;
289         }
290         bzero(&broot, sizeof(broot));
291         broot.type = HAMMER2_BREF_TYPE_VOLUME;
292         broot.data_off = 0 | HAMMER2_PBUFRADIX;
293         show_bref(fd, 0, 0, &broot);
294         close(fd);
295
296         return 0;
297 }
298
299 static void
300 show_bref(int fd, int tab, int bi, hammer2_blockref_t *bref)
301 {
302         hammer2_media_data_t media;
303         hammer2_blockref_t *bscan;
304         int bcount;
305         int i;
306         int didnl;
307         int namelen;
308         int obrace = 1;
309         size_t bytes;
310         const char *type_str;
311         char *str = NULL;
312
313         switch(bref->type) {
314         case HAMMER2_BREF_TYPE_EMPTY:
315                 type_str = "empty";
316                 break;
317         case HAMMER2_BREF_TYPE_INODE:
318                 type_str = "inode";
319                 break;
320         case HAMMER2_BREF_TYPE_INDIRECT:
321                 type_str = "indblk";
322                 break;
323         case HAMMER2_BREF_TYPE_DATA:
324                 type_str = "data";
325                 break;
326         case HAMMER2_BREF_TYPE_VOLUME:
327                 type_str = "volume";
328                 break;
329         default:
330                 type_str = "unknown";
331                 break;
332         }
333
334
335         tabprintf(tab, "%s.%-3d %016jx %016jx/%-2d mir=%016jx mod=%016jx ",
336                type_str, bi, (intmax_t)bref->data_off,
337                (intmax_t)bref->key, (intmax_t)bref->keybits,
338                (intmax_t)bref->mirror_tid, (intmax_t)bref->modify_tid);
339         tab += SHOW_TAB;
340
341         bytes = (size_t)1 << (bref->data_off & HAMMER2_OFF_MASK_RADIX);
342         if (bytes < HAMMER2_MINIOSIZE || bytes > sizeof(media)) {
343                 printf("(bad block size %zd)\n", bytes);
344                 sleep(1);
345                 return;
346         }
347         if (bref->type != HAMMER2_BREF_TYPE_DATA || VerboseOpt >= 1) {
348                 lseek(fd, bref->data_off & ~HAMMER2_OFF_MASK_RADIX, 0);
349                 if (read(fd, &media, bytes) != (ssize_t)bytes) {
350                         printf("(media read failed)\n");
351                         sleep(1);
352                         return;
353                 }
354         }
355
356         bscan = NULL;
357         bcount = 0;
358         didnl = 0;
359
360         switch(bref->type) {
361         case HAMMER2_BREF_TYPE_EMPTY:
362                 obrace = 0;
363                 break;
364         case HAMMER2_BREF_TYPE_INODE:
365                 printf("{\n");
366                 if (media.ipdata.op_flags & HAMMER2_OPFLAG_DIRECTDATA) {
367                         /* no blockrefs */
368                 } else {
369                         bscan = &media.ipdata.u.blockset.blockref[0];
370                         bcount = HAMMER2_SET_COUNT;
371                 }
372                 namelen = media.ipdata.name_len;
373                 if (namelen > HAMMER2_INODE_MAXNAME)
374                         namelen = 0;
375                 tabprintf(tab, "filename \"%*.*s\"\n",
376                           namelen, namelen, media.ipdata.filename);
377                 tabprintf(tab, "version  %d\n", media.ipdata.version);
378                 tabprintf(tab, "uflags   0x%08x\n",
379                           media.ipdata.uflags);
380                 if (media.ipdata.rmajor || media.ipdata.rminor) {
381                         tabprintf(tab, "rmajor   %d\n",
382                                   media.ipdata.rmajor);
383                         tabprintf(tab, "rminor   %d\n",
384                                   media.ipdata.rminor);
385                 }
386                 tabprintf(tab, "ctime    %s\n",
387                           hammer2_time64_to_str(media.ipdata.ctime, &str));
388                 tabprintf(tab, "mtime    %s\n",
389                           hammer2_time64_to_str(media.ipdata.mtime, &str));
390                 tabprintf(tab, "atime    %s\n",
391                           hammer2_time64_to_str(media.ipdata.atime, &str));
392                 tabprintf(tab, "btime    %s\n",
393                           hammer2_time64_to_str(media.ipdata.btime, &str));
394                 tabprintf(tab, "uid      %s\n",
395                           hammer2_uuid_to_str(&media.ipdata.uid, &str));
396                 tabprintf(tab, "gid      %s\n",
397                           hammer2_uuid_to_str(&media.ipdata.gid, &str));
398                 tabprintf(tab, "type     %s\n",
399                           hammer2_iptype_to_str(media.ipdata.type));
400                 tabprintf(tab, "opflgs   0x%02x\n",
401                           media.ipdata.op_flags);
402                 tabprintf(tab, "capflgs  0x%04x\n",
403                           media.ipdata.cap_flags);
404                 tabprintf(tab, "mode     %-7o\n",
405                           media.ipdata.mode);
406                 tabprintf(tab, "inum     0x%016jx\n",
407                           media.ipdata.inum);
408                 tabprintf(tab, "size     %ju\n",
409                           (uintmax_t)media.ipdata.size);
410                 tabprintf(tab, "nlinks   %ju\n",
411                           (uintmax_t)media.ipdata.nlinks);
412                 tabprintf(tab, "iparent  0x%016jx\n",
413                           (uintmax_t)media.ipdata.iparent);
414                 tabprintf(tab, "name_key 0x%016jx\n",
415                           (uintmax_t)media.ipdata.name_key);
416                 tabprintf(tab, "name_len %u\n",
417                           media.ipdata.name_len);
418                 tabprintf(tab, "ncopies  %u\n",
419                           media.ipdata.ncopies);
420                 tabprintf(tab, "compalg  %u\n",
421                           media.ipdata.comp_algo);
422                 if (media.ipdata.op_flags & HAMMER2_OPFLAG_PFSROOT) {
423                         tabprintf(tab, "pfs_type %u (%s)\n",
424                                   media.ipdata.pfs_type,
425                                   hammer2_pfstype_to_str(media.ipdata.pfs_type));
426                         tabprintf(tab, "pfs_inum 0x%016jx\n",
427                                   (uintmax_t)media.ipdata.pfs_inum);
428                         tabprintf(tab, "pfs_id   %s\n",
429                                   hammer2_uuid_to_str(&media.ipdata.pfs_id,
430                                                       &str));
431                         tabprintf(tab, "pfs_fsid %s\n",
432                                   hammer2_uuid_to_str(&media.ipdata.pfs_fsid,
433                                                       &str));
434                 }
435                 tabprintf(tab, "data_quota  %ju\n",
436                           (uintmax_t)media.ipdata.data_quota);
437                 tabprintf(tab, "data_count  %ju\n",
438                           (uintmax_t)media.ipdata.data_count);
439                 tabprintf(tab, "inode_quota %ju\n",
440                           (uintmax_t)media.ipdata.inode_quota);
441                 tabprintf(tab, "inode_count %ju\n",
442                           (uintmax_t)media.ipdata.inode_count);
443                 tabprintf(tab, "attr_tid    0x%016jx\n",
444                           (uintmax_t)media.ipdata.attr_tid);
445                 if (media.ipdata.type == HAMMER2_OBJTYPE_DIRECTORY) {
446                         tabprintf(tab, "dirent_tid  %016jx\n",
447                                   (uintmax_t)media.ipdata.dirent_tid);
448                 }
449                 break;
450         case HAMMER2_BREF_TYPE_INDIRECT:
451                 bscan = &media.npdata.blockref[0];
452                 bcount = bytes / sizeof(hammer2_blockref_t);
453                 didnl = 1;
454                 printf("{\n");
455                 break;
456         case HAMMER2_BREF_TYPE_DATA:
457                 if (VerboseOpt >= 2) {
458                         printf("{\n");
459                 } else {
460                         printf("\n");
461                         obrace = 0;
462                 }
463                 break;
464         case HAMMER2_BREF_TYPE_VOLUME:
465                 bscan = &media.voldata.sroot_blockset.blockref[0];
466                 bcount = HAMMER2_SET_COUNT;
467                 printf("{\n");
468                 break;
469         default:
470                 break;
471         }
472         if (str)
473                 free(str);
474         for (i = 0; i < bcount; ++i) {
475                 if (bscan[i].type != HAMMER2_BREF_TYPE_EMPTY) {
476                         if (didnl == 0) {
477                                 printf("\n");
478                                 didnl = 1;
479                         }
480                         show_bref(fd, tab, i, &bscan[i]);
481                 }
482         }
483         tab -= SHOW_TAB;
484         if (obrace) {
485                 if (bref->type == HAMMER2_BREF_TYPE_INODE)
486                         tabprintf(tab, "} (%s.%d, \"%s\")\n",
487                                   type_str, bi, media.ipdata.filename);
488                 else
489                         tabprintf(tab, "} (%s.%d)\n", type_str,bi);
490         }
491 }
492
493 static
494 void
495 tabprintf(int tab, const char *ctl, ...)
496 {
497         va_list va;
498
499         printf("%*.*s", tab, tab, "");
500         va_start(va, ctl);
501         vprintf(ctl, va);
502         va_end(va);
503 }