summaryrefslogtreecommitdiff
path: root/package/sash/src/hexdump.c
blob: f12f62494e60c1cf2145ece4eb947d50da106a2c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
/*
 * Copyright (c) 1993 by David I. Bell
 * Permission is granted to use, distribute, or modify this source,
 * provided that this copyright notice remains intact.
 *
 * Most simple built-in commands are here.
 */

#include "sash.h"

#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <fcntl.h>
#include <signal.h>
#include <pwd.h>
#include <grp.h>
#include <utime.h>
#include <errno.h>

void
do_hexdump(argc, argv)
	int	argc;
	char	**argv;
{
	FILE	*fp;
	int	count;
	int	c;
	char	text[17];
	unsigned char	buf[130];

	char	*name = 0;
	unsigned long pos = 0;
	char	*myname = argv[0];
 
	if ( (argc > 2) && !strcmp(argv[1],"-s") ) {
		pos = strtoul(argv[2], 0, 0);
		argc -= 2;
		argv += 2;
	}
	
	if (argc <= 1) {
		fprintf(stderr, "No filename provided\n");
		return;
	}

	name = argv[1];
	fp = fopen(name, "r");
	if (!fp) {
		fprintf(stderr, "Failed to open file '%s': %s\n",
			name, strerror(errno));
		return;
	}

	if (pos)
		fseek(fp, pos, SEEK_SET);
	
	c = 0;
	
	text[16] = 0;
	
	while(!feof(fp)) {
	
	  strcmp(text, "                ");
	
	  while (c < (pos & 0xf)) {
	    if (c == 0)
	      printf("%4X:", pos & 0xfffffff0);
	    printf( (c == 8) ? "-  " : "   ");
	    text[c] = ' ';
	    c++;
	  }
	
	  {
	    int p = 0;
            count = fread(buf, 1, 128 - (pos % 16), fp);
          
            if (count <= 0)
              break;

            while (p < count) {
              c = (pos & 0xf);
            
              if (c == 0)
                printf("%4X:", pos & 0xfffffff0);
              
              if ((buf[p] < 32) || (buf[p]>126))
                text[c] = '.';
              else
                text[c] = buf[p];
            
	      printf( (c==15) ? " %02.2X" : (c == 8) ? "-%02.2X" : " %02.2X", buf[p]);
	      
	      if (c == 15)
	        printf(" %s\n", text);
	    
              pos++;
              p++;
            }
	  }
	  
	  if (c = (pos & 0x0f)) {

	    while (c < 16) {
	      printf( (c == 8) ? "-  " : "   ");
	      text[c] = ' ';
	      c++;
	    }
	  
	    printf(" %s\n", text);
	  }
	    
	  if (feof(fp))
	    break;
	  
	  printf("--more--");
	  fflush(stdout);
	  
	  fgets(buf, 80, stdin);
	  if (toupper(buf[0]) == 'Q')
	    break;
	}

	if (fp != stdin)
		fclose(fp);
}