ve/misc.c at main · evilotto/ve · GitHub

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
/* misc.c - miscellaneous routines */

# include "ve.h"
#include <errno.h>

int
skipword(fp)
	FILE   *fp;
{
	register int c;

	for (;;) {
		c = getc(fp);
		if (c == '\n' || c == ' ' || c == '\t')
			return (1);
		if (c == EOF)
			return (0);
	}
}


void
pitchline(fp)
	FILE   *fp;
{
	register int c;

	while ((c = getc(fp)) != '\n')
		if (c == EOF)
			break;

}
/*
 * findchar - Find next non-blank character.
 */
char   *
findchar(addr)
	char   *addr;
{
	while ((*addr != 0) && (*addr == ' '))
		addr++;
	return (addr);
}
/*
 * findblank - Find next blank character.
 */
char   *
findblank(addr)
	register char *addr;
{
	while ((*addr != 0) && (*addr != ' '))
		addr++;
	return (addr);
}					    /* findblank */
/*
 * bfindchar - Find previous non-blank character.
 */
char   *
bfindchar(addr)
	char   *addr;
{
	while ((*addr != 0) && (*addr == ' '))
		addr--;
	return (addr);
}
/*
 * bfindblank - Find previous blank character.
 */
char   *
bfindblank(addr)
	register char *addr;
{
	while ((*addr != 0) && (*addr != ' '))
		addr--;
	return (addr);
}					    /* findblank */

void printAtBot(str)
     char *str;
{
	move(LINES - 1, 0);
	addstr(str);
	clrtoeol();
}

extern char *invo_name;
void
error(int type, char *fmt, ...)
{
	va_list ap;
	char buf[ 1024 ];

	va_start(ap, fmt);
	(void)uprintf(buf, fmt, &ap);
	va_end(ap);
	if (incurses) {
		printAtBot(buf);
		if (type)
			exit(type);
		return;
	}
	fprintf(stderr, "%s: %s", invo_name, buf);
	fprintf(stderr, "[%s]\n", strerror(errno));
	if (type)
		exit(type);
}