--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/pped/interface.c	Sat Dec 06 04:37:01 1997 +0000
@@ -0,0 +1,549 @@
+/*
+ * interface.c
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <signal.h>
+#include <termios.h>
+#include <sys/ioctl.h>
+#include <time.h>
+#include <struct.h>
+#include <curses.h>
+#include "common.h"
+#include "db.h"
+#include "interface.h"
+#include "intfdesc.h"
+#include "file.h"
+#include "data.h"
+
+
+static char *shrt_royal_names[] = {
+	"",
+	"Wes",
+	"Cen",
+	"Pra",
+	"Emp"
+};
+
+static char *royal_names[] = {
+	"none",
+	"Wesley",
+	"Centurion",
+	"Praetor",
+	"Emperor"
+};
+
+static char *shrt_rank_names[] = {
+	"Recr", "Spec", "Cadt", "Mids", "EnJr", "Ensi", "LtJr",
+	"Lieu", "LtCm", "Cmdr", "HiCm", "Capt", "FlCp", "Comd",
+	"Adml", "RAdm", "Moff", "GrMo"
+};
+
+static char *rank_names[] = {
+	"Recruit",     "Specialist", "Cadet",        "Midshipman",
+	"Ensn. Jr.",   "Ensign",     "Lt. Jnr. Gr.", "Lieutenant",
+	"Lt. Cmdr.",   "Commander",  "High Cmdr.",   "Captain",
+	"Fleet Capt.", "Commodore",  "Admiral",      "Rear Adml.",
+	"Moff",        "Grand Moff"
+};
+
+void getTTYinfo()
+{
+	struct winsize ws;
+	char *name, bp[1024], area[1024], *ap = area;
+
+#ifdef SYSV
+	signal(SIGWINCH, getTTYinfo);
+#endif
+
+	/* determine # of lines */
+	ioctl(0, TIOCGWINSZ, &ws);
+	numLines = ws.ws_row;
+
+	/* find terminal sequence to clear the screen */
+	if(name = getenv("TERM"))
+		if(tgetent(bp, name) > 0)
+			clrStr = tgetstr("cl", &ap);
+}
+
+void cls()
+{
+	printf("%s", clrStr); fflush(stdout);
+}
+
+void Interface()
+{
+	struct plnode *p, *pn;
+	int lines, top, i, num;
+	char buf[18], *c;
+
+	top = 0;
+	for(;;) {
+		lines = numLines - 4;
+		if(lines < 5) err_fatal("not enough tty lines!");
+
+		cls();
+		printf("\
+ C  #  Rnk  Ryl  Name                  C  #  Rnk  Ryl  Name\n");
+		printf("\
+ - --- ---- ---- -----------------     - --- ---- ---- -----------------\n");
+
+		for(i = 0; i < lines; i++) {
+			if(top + i > numDBentries - 1) {
+				printf("\n");
+				continue;
+			}
+			p = GetNode(top + i);
+			if(!p) {
+				printf("\n");
+				continue;
+			}
+			strncpy(buf, p->player.name, 16);
+			strcat(buf, "_");
+			printf(" %c%4d %-4s %-4s %-17.17s    ",
+				p->status ? '*':' ', top + i,
+				shrt_rank_names[p->player.stats.st_rank],
+				shrt_royal_names[p->player.stats.st_royal],
+				Strip(buf));
+
+			if(top + i + lines > numDBentries - 1) {
+				printf("\n");
+				continue;
+			}
+			p = GetNode(top + i + lines);
+			if(!p) {
+				printf("\n");
+				continue;
+			}
+			strncpy(buf, p->player.name, 16);
+			strcat(buf, "_");
+			printf(" %c%4d %-4s %-4s %s\n",
+				p->status ? '*':' ', top + i + lines,
+				shrt_rank_names[p->player.stats.st_rank],
+				shrt_royal_names[p->player.stats.st_royal],
+				Strip(buf));
+		}
+		printf("\nIndex: Command (? for help) -->"); fflush(stdout);
+		if(fgets(buf, 18, stdin) == NULL)
+			continue;
+
+		switch(buf[0]) {
+			case '\n':
+			case 'n':
+				top += (lines * 2);
+				if(top >= numDBentries)
+					top = 0;
+				break;
+			case 'p':
+				if(!top) {
+					if(numDBentries - 2 * lines > 0)
+						top = numDBentries - 2 * lines;
+					else
+						top = 0;
+				} else {
+					top -= (lines * 2);
+					if(top < 0) top = 0;
+				}
+				break;
+			case 'Q':
+				GoAway(CheckChanged());
+				break;
+			case 's':
+				DoSave(1);
+				break;
+			case 'e':
+				printf("Enter player name to edit -->");
+				fflush(stdout);
+				if(fgets(buf, 18, stdin) == NULL)
+					break;
+				if(c = strrchr(buf, '\n'))
+					*c = (char)0;
+				num = GetByName(buf);
+				if(num < 0) {
+					Report("Couldn't find any players by that name.");
+					break;
+				}
+				Edit(num);
+				break;
+			case '?':
+				Report("\n\
+[num] : Edit player [num]\n\
+  e   : Edit player (by name)\n\
+  n   : Next page\n\
+[ret] : Next page\n\
+  p   : Previous page\n\
+  s   : Save to file\n\
+  Q   : Quit pped\n");
+				break;
+			default:
+				i = sscanf(buf, "%d", &num);
+				if(!i || (num < 0) || (num >= numDBentries))
+					break;
+				Edit(num);
+		}
+	}
+}
+
+void Edit(int pnum)
+{
+	struct plnode *p, player;
+	char buf[18], txt[80];
+	int i, num, lines, top;
+
+	p = GetNode(pnum);
+	if(!p) return;
+	player = *p;
+	player.status = 0;
+	
+	top = 0;
+
+	for(;;) {
+		lines = numLines - 2;
+		cls();
+		Display(&player, top, top+lines);
+
+		printf("\nEdit: Command (? for help) -->"); fflush(stdout);
+		if(fgets(buf, 18, stdin) == NULL)
+			continue;
+
+		switch(buf[0]) {
+			case '?':  /* help */
+				Report("\n\
+  n   : Next page\n\
+  p   : Previous page\n\
+[num] : Change value [num]\n\
+  s   : Save and return to index\n\
+  w   : Save\n\
+[ret] : Return to index, don't save\n\
+  x   : Same as [ret]\n\
+  D   : Delete this entry and return to index\n\
+  r   : Revert (undo changes since last save)\n\
+  Q   : Quit pped\n");
+				break;
+
+			case 'n':  /* page forward */
+				top += lines;
+				if(top > NUMDESC + 1) top = 0;
+				continue;
+
+			case 'p':  /* page backward */
+				top -= lines;
+				if(top < 0) top = 0;
+				continue;
+
+			case 'D':  /* delete (and exit) */
+				sprintf(txt, "delete entry for player %s", p->player.name);
+				if(Verify(txt)) {
+					DeleteNode(pnum);
+					Report("Player deleted.");
+					return;
+				} else {
+					Report("Canceled.");
+				}
+				break;
+
+			case 'Q':  /* quit */
+				GoAway(player.status || CheckChanged());
+				break;
+
+			case 's':  /* save and exit */
+				if(player.status) {
+					*p = player;
+					player.status = 0;
+					Report("Player saved.");
+				}
+				return;
+				break;
+
+			case 'w':  /* save */
+				if(player.status) {
+					*p = player;
+					player.status = 0;
+					Report("Player saved.");
+				} else {
+					Report("No changes to save.");
+				}
+				break;
+
+			case 'r':  /* revert */
+				if(player.status) {
+					sprintf(txt, "undo changes for player %s?", p->player.name);
+					if(Verify(txt)) {
+						player = *p;
+						player.status = 0;
+						Report("Changes discarded.");
+					} else {
+						Report("Canceled.");
+					}
+				} else {
+					Report("No changes to undo.");
+				}
+				break;
+
+			case 0x1B:  /* (escape) exit, no changes */
+			case '\n':
+			case 'x':
+				if(player.status)
+					if(!Verify("exit?  There are unsaved changes."))
+						break;
+				return;
+
+			default:
+				i = sscanf(buf, "%d", &num);
+				if(!i || (num < 0) || (num >= NUMDESC))
+					break;
+				Change(num, &player);
+		}
+	}
+}
+
+int Verify(char *str)
+{
+	char buffer[18];
+
+	for(;;) {
+		printf("Verify %s (y/n) -->", str); fflush(stdout);
+		if(fgets(buffer, 18, stdin) == NULL)
+			continue;
+		switch(buffer[0]) {
+			case 'Y':
+			case 'y':
+				return 1;
+			case 'N':
+			case 'n':
+				return 0;
+		}
+	}
+}
+
+void Report(char *str)
+{
+	char buffer[18];
+
+	printf("%s\n", str);
+	printf("Press return to continue -->"); fflush(stdout);
+
+	fgets(buffer, 18, stdin);
+}
+
+void Change(int num, struct plnode *p)
+{
+	struct inter_desc *it;
+	void *ptr;
+	char str16[16], *c;
+	char buffer[80];
+	int intnum, i, col;
+	float floatnum;
+
+	if(num < 0 || num >= NUMDESC) return;
+	it = &idesc_tab[num];
+
+	ptr = (void *)((int)(&p->player) + it->offset);
+
+	switch(it->type) {
+		case DT_CHAR16:
+			printf("Current value for %s: \"%s\"\n", it->name, (char *)ptr);
+			printf("Enter new value -->"); fflush(stdout);
+			str16[0] = 0;
+			fgets(str16, 16, stdin);
+			if(c = strrchr(str16, '\n'))
+				*c = (char)0;
+
+			sprintf(buffer, "\"%s\" as new value for %s.", str16, it->name);
+			if(Verify(buffer)) {
+				if(strncmp((char *)ptr, str16, 16)) {
+					strncpy((char *)ptr, str16, 16);
+					p->status = 1; /* something changed */
+				}
+			}
+			break;
+
+		case DT_INT:
+		case DT_TICKS:
+			printf("Current value for %s: %d\n", it->name, *((int *)ptr));
+			printf("Enter new value -->"); fflush(stdout);
+			fgets(buffer, 30, stdin);
+			intnum = atoi(buffer);
+			sprintf(buffer, "%d as new value for %s.", intnum, it->name);
+			if(Verify(buffer)) {
+				if(intnum != *((int *)ptr)) {
+					*((int *)ptr) = intnum;
+					p->status = 1;
+				}
+			}
+			break;
+
+		case DT_FLOAT:
+			printf("Current value for %s: %f\n", it->name, *((float *)ptr));
+			printf("Enter new value -->"); fflush(stdout);
+			fgets(buffer, 30, stdin);
+			floatnum = (float)atof(buffer);
+			sprintf(buffer, "%f as new value for %s.", floatnum, it->name);
+			if(Verify(buffer)) {
+				if(floatnum != *((float *)ptr)) {
+					*((float *)ptr) = floatnum;
+					p->status = 1;
+				}
+			}
+			break;
+
+		case DT_RANK:
+			for(i = 0, col = 0; i < NUMRANKS; i++) {
+				printf(" %2d: %-7s ", i, shrt_rank_names[i]);
+				if(++col == 4) {
+					printf("\n");
+					col = 0;
+				}
+			}
+			printf("\nCurrent value for %s: %d (%s)\n", it->name,
+				  *((int *)ptr), rank_names[*((int *)ptr)]);
+			printf("Enter new value -->"); fflush(stdout);
+			fgets(buffer, 30, stdin);
+			intnum = atoi(buffer);
+			sprintf(buffer, "%d (%s) as new value for %s.", intnum,
+				  rank_names[intnum], it->name);
+			if(Verify(buffer)) {
+				if(intnum != *((int *)ptr)) {
+					*((int *)ptr) = intnum;
+					p->status = 1;
+				}
+			}
+			break;
+
+		case DT_ROYAL:
+			for(i = 0; i < NUMROYALRANKS; i++)
+				printf(" %2d: %s\n", i, royal_names[i]);
+
+			printf("Current value for %s: %d (%s)\n", it->name,
+				  *((int *)ptr), royal_names[*((int *)ptr)]);
+			printf("Enter new value -->"); fflush(stdout);
+			fgets(buffer, 30, stdin);
+			intnum = atoi(buffer);
+			sprintf(buffer, "%d (%s) as new value for %s.", intnum,
+				  royal_names[intnum], it->name);
+			if(Verify(buffer)) {
+				if(intnum != *((int *)ptr)) {
+					*((int *)ptr) = intnum;
+					p->status = 1;
+				}
+			}
+			break;
+		default:
+			Report("Error in case statement in Change()");
+			break;
+	}
+}
+
+void Display(struct plnode *n, int from, int to)
+{
+	int i, hour, dt = 0;
+	char c;
+	void *ptr;
+	struct inter_desc *it;
+	struct tm *stm;
+	time_t tt;
+
+	if(to > NUMDESC) {
+		to = NUMDESC;
+		dt = 1;
+	}
+
+	for(i = from; i < to; i++) {
+		it = &idesc_tab[i];
+		ptr = (void *)((int)(&n->player) + it->offset);
+
+		switch(it->type) {
+			case DT_CHAR16:
+				printf("  (%2d) %16s : \"%s\"\n", i, it->name, (char *)ptr);
+				break;
+			case DT_INT:
+				printf("  (%2d) %16s : %d\n", i, it->name, *((int *)ptr));
+				break;
+			case DT_FLOAT:
+				printf("  (%2d) %16s : %.2f\n", i, it->name, *((float *)ptr));
+				break;
+			case DT_TICKS:
+				printf("  (%2d) %16s : %d (%.2f hours)\n",
+					i, it->name, *((int *)ptr), (*((int *)ptr))/36000.0);
+				break;
+			case DT_RANK:
+				printf("  (%2d) %16s : %d (%s)\n", i, it->name, *((int *)ptr),
+					rank_names[*((int *)ptr)]);
+				break;
+			case DT_ROYAL:
+				printf("  (%2d) %16s : %d (%s)\n", i, it->name, *((int *)ptr),
+					royal_names[*((int *)ptr)]);
+				break;
+			default:
+				printf("Yikes! Unknown it->type in Display()\n");
+				break;
+		}
+	}
+	if(dt) {
+		tt = n->player.stats.st_lastlogin;
+		stm = localtime(&tt);
+		hour = stm->tm_hour;
+		c = 'A';
+		if(!hour) {
+			hour = 12;
+		} else if(hour > 12) {
+			hour -= 12;
+			c = 'P';
+		}
+		printf("        Last login: %2d:%02d %cM  %02d/%02d/%d\n",
+		  hour, stm->tm_min, c, stm->tm_mon+1, stm->tm_mday, stm->tm_year);
+	}
+}
+
+int CheckChanged()
+{
+	struct plnode *p;
+
+	if(dbDirty) return(1);
+
+	p = firstEnt;
+	while(p) {
+		if(p->status) return(1);
+		p = p->next;
+	}
+	return(0);
+}
+
+void ClearChanged()
+{
+	struct plnode *p;
+
+	dbDirty = 0;
+
+	p = firstEnt;
+	while(p) {
+		p->status = 0;
+		p = p->next;
+	}
+}
+
+/* Strip: convert non-printable control chars to ^L notation */
+char *Strip(char *str)
+{
+	static char buff[36], *o;
+
+	o = buff;
+	while(*str) {
+		*str &= 0x7f;
+		if((int)*str < (int)' ') {
+			*o++ = '^';
+			*o++ = *str + (char)64;
+		} else if ((int)*str == 127) {
+			*o++ = '^';
+			*o++ = '?';
+		} else {
+			*o++ = *str;
+		}
+		str++;
+	}
+	*o = 0;
+	return(buff);
+}
+