hex editor prototype in 200 CLOC

4 files changed, 314 insertions, 0 deletions

diff --git a/hex_editor_1k/Makefile b/hex_editor_1k/Makefile
new file mode 100644
index 0000000..0c4be02
--- /dev/null
+++ b/hex_editor_1k/Makefile
@@ -0,0 +1,2 @@
+make:
+	tcc he.c -o he
\ No newline at end of file
diff --git a/hex_editor_1k/debug.h b/hex_editor_1k/debug.h
new file mode 100644
index 0000000..a8bf211
--- /dev/null
+++ b/hex_editor_1k/debug.h
@@ -0,0 +1,69 @@
+#ifndef __RB_DEBUG_UTILS_H
+#define __RB_DEBUG_UTILS_H
+
+//what about kprintf?
+
+//config options
+#define PRINTF printf
+#define COLORIZE
+#define PRINT_LINENUM
+#define PRINT_FILENAME
+#define PRINT_DEBUG
+
+
+//use color
+#ifdef COLORIZE
+	#define D_COLOR "1;32m"
+	#define D_COLOR_S "\033[" D_COLOR
+	#define D_COLOR_E "\033[0m"
+	#define E_COLOR "1;31m"
+	#define E_COLOR_S "\033[" E_COLOR
+	#define E_COLOR_E "\033[0m"
+#else
+	#define D_COLOR
+	#define D_COLOR_S
+	#define D_COLOR_E
+	#define E_COLOR
+	#define E_COLOR_S
+	#define E_COLOR_E
+#endif
+
+//print debug line
+#ifdef PRINT_LINENUM
+	#define PRINT_LINE_F "LINE:%d "
+	#define PRINT_LINE_D __LINE__
+#else
+	#define PRINT_LINE_F ""
+	#define PRINT_LINE_D ""
+#endif
+
+//print
+#ifdef PRINT_FILENAME
+	#define PRINT_FILE_F "FILE:%s "
+	#define PRINT_FILE_D __FILE__
+#else
+	#define PRINT_FILE_F ""
+	#define PRINT_FILE_D ""
+#endif
+
+//print debug string
+#ifdef PRINT_DEBUG
+	#define PRINT_DEBUG_F "Debug: "
+#else
+	#define PRINT_DEBUG_F ""
+#endif
+
+#define PRINT( format, args ... ) PRINTF( D_COLOR_S PRINT_DEBUG_F \
+	PRINT_FILE_F PRINT_LINE_F format D_COLOR_E, PRINT_FILE_D, \
+	PRINT_LINE_D, ##args);
+
+#define ERROR( format, args ... ) PRINTF( E_COLOR_S PRINT_DEBUG_F \
+	PRINT_FILE_F PRINT_LINE_F format E_COLOR_E, PRINT_FILE_D, \
+	PRINT_LINE_D, ##args);
+
+#define PNL() PRINT("\n");
+
+#define ENL() ERROR("\n");
+
+
+#endif
diff --git a/hex_editor_1k/he.c b/hex_editor_1k/he.c
new file mode 100644
index 0000000..2b2b84e
--- /dev/null
+++ b/hex_editor_1k/he.c
@@ -0,0 +1,214 @@
+#include <stdlib.h>
+#include <stdio.h>
+#include <unistd.h>
+#include <string.h>
+#include <fcntl.h>
+#include <limits.h>
+#include <sys/stat.h>
+#include <sys/types.h>
+#include <stdint.h>
+
+#include "zen.h"
+#include "debug.h"
+
+long
+strtol(nptr, endptr, base)
+	const char *nptr;
+	char **endptr;
+	register int base;
+{
+	register const char *s = nptr;
+	register unsigned long acc;
+	register int c;
+	register unsigned long cutoff;
+	register int neg = 0, any, cutlim;
+
+	/*
+	 * Skip white space and pick up leading +/- sign if any.
+	 * If base is 0, allow 0x for hex and 0 for octal, else
+	 * assume decimal; if base is already 16, allow 0x.
+	 */
+	do {
+		c = *s++;
+	} while (isspace(c));
+	if (c == '-') {
+		neg = 1;
+		c = *s++;
+	} else if (c == '+')
+		c = *s++;
+	if ((base == 0 || base == 16) &&
+	    c == '0' && (*s == 'x' || *s == 'X')) {
+		c = s[1];
+		s += 2;
+		base = 16;
+	} else if ((base == 0 || base == 2) &&
+	    c == '0' && (*s == 'b' || *s == 'B')) {
+		c = s[1];
+		s += 2;
+		base = 2;
+	}
+	if (base == 0)
+		base = c == '0' ? 8 : 10;
+
+	/*
+	 * Compute the cutoff value between legal numbers and illegal
+	 * numbers.  That is the largest legal value, divided by the
+	 * base.  An input number that is greater than this value, if
+	 * followed by a legal input character, is too big.  One that
+	 * is equal to this value may be valid or not; the limit
+	 * between valid and invalid numbers is then based on the last
+	 * digit.  For instance, if the range for longs is
+	 * [-2147483648..2147483647] and the input base is 10,
+	 * cutoff will be set to 214748364 and cutlim to either
+	 * 7 (neg==0) or 8 (neg==1), meaning that if we have accumulated
+	 * a value > 214748364, or equal but the next digit is > 7 (or 8),
+	 * the number is too big, and we will return a range error.
+	 *
+	 * Set any if any `digits' consumed; make it negative to indicate
+	 * overflow.
+	 */
+	cutoff = neg ? -(unsigned long)LONG_MIN : LONG_MAX;
+	cutlim = cutoff % (unsigned long)base;
+	cutoff /= (unsigned long)base;
+	for (acc = 0, any = 0;; c = *s++) {
+		if (isdigit(c))
+			c -= '0';
+		else if (isalpha(c))
+			c -= isupper(c) ? 'A' - 10 : 'a' - 10;
+		else
+			break;
+		if (c >= base)
+			break;
+		if (any < 0 || acc > cutoff || acc == cutoff && c > cutlim)
+			any = -1;
+		else {
+			any = 1;
+			acc *= base;
+			acc += c;
+		}
+	}
+	if (any < 0) {
+		acc = neg ? LONG_MIN : LONG_MAX;
+//		errno = ERANGE;
+	} else if (neg)
+		acc = -acc;
+	if (endptr != 0)
+		*endptr = (char *)(any ? s - 1 : nptr);
+	return (acc);
+}
+
+int main()
+{
+
+	int run=1;
+	int const max_sz=1024;
+	char cmd[max_sz];
+	int sz;
+
+	int fd_in=-1;
+	
+
+	W( run )
+	{
+		write( 1, ">", 1 );
+		sz = read(  2, cmd, max_sz-1 );
+		cmd[sz]=0;
+		printf("%s",cmd);
+		S( cmd[0] )
+		{
+			//>f [MODE] [fname]
+			case 'f':
+				{
+					//check if size is more then needed
+					//>"f t" is min?
+					//add modes?
+					I(sz<3)B;
+					cmd[sz-1]=0;
+					fd_in = open(&cmd[2],O_WRONLY|O_CREAT,S_IRUSR);
+					PRINT("%s",&cmd[2]);
+				}
+				break;
+			case 'a':
+				{
+
+				}
+				break;
+			//close >c
+			case 'c':
+				{
+					PNL();
+					I(fd_in!=-1)
+					{
+						close( fd_in );
+						fd_in=-1;
+					}
+				}
+				break;
+			//file position >p [NUMBER]
+			case 'p':
+				{	
+					I(fd_in==-1)B;
+					off_t p=lseek(fd_in,strtol(&cmd[2],NULL,10),SEEK_SET);
+					printf("Position: %d",p);
+				}
+				break;
+			//put bytes into file at current position >e 0x00 0xaa 0x11
+			case 'e':
+				{
+					char *iter;
+					int i=0;
+					uint8_t num;
+
+					I(fd_in==-1)B;
+					I(sz<6)B;
+
+					i = 2;
+					iter = &cmd[i];
+					while ( i<sz )
+					{
+						num = (uint8_t)strtol( iter, NULL, 16 );
+						write( fd_in, &num, 1 );
+						i += 5;
+						iter = &cmd[i];
+					}
+
+				}
+				break;
+			// dump hex >v [SIZE] how much bytes to see
+			case 'v':
+				{
+					I(fd_in==-1)B;
+					I(sz<3)B;
+					int i;
+					int dumpsz=strtol(&cmd[2],NULL,10);
+					uint8_t val;
+					for (i=0;i<dumpsz;i++)
+					{
+						read( fd_in, &val, 1);
+						printf("%02x ", val);
+					}
+					write(1,"\n",1);
+				}
+				break;
+			case 'h':
+				{
+					char s[]="Help:\n\
+f [FILE] - create file with name FILE\n\
+p [POSITION] - set postion in file\n\
+q - exit\n\
+e [0x00] ... - write value with hex fow \n\
+c - close file \n";
+					write(1,s,strlen(s) );
+				}	
+				break;
+			case 'q':
+				write(1,"exiting ...\n",strlen("exiting ...\n"));
+				run = 0;
+				break;
+			default:
+				{};
+		}
+	}
+
+	return 0;
+}
\ No newline at end of file
diff --git a/hex_editor_1k/zen.h b/hex_editor_1k/zen.h
new file mode 100644
index 0000000..cf7bd3f
--- /dev/null
+++ b/hex_editor_1k/zen.h
@@ -0,0 +1,29 @@
+#ifndef _ZEN_H
+#define _ZEN_H
+
+/*
+shortenings
+*/
+#define F(A,B,C) for((A);(B);(C))
+//number based for cycle
+#define FI(A,B,C,D) for(auto A=B;A<C;A+=D)
+#define W(A) while((A))
+#define D(A) do((A))
+#define I(A) if((A))
+#define E() else
+#define EI(A) else if ((A))
+#define G(A) goto(A)
+#define L(A) A:
+#define T(A) typedef A
+#define B break
+#define S(A) switch(A)
+#define C(A) case A
+#define M(A,B) main(int A, char **B)
+#define DF default
+#define TD(A,B) typedef struct A {B} A
+
+/*
+
+*/
+
+#endif
\ No newline at end of file