1 /* $OpenBSD: getcom.c,v 1.17 2018/02/07 20:22:23 tedu Exp $ */
2 /* $NetBSD: getcom.c,v 1.3 1995/03/21 15:07:30 cgd Exp $ */
3
4 /*
5 * Copyright (c) 1983, 1993
6 * The Regents of the University of California. All rights reserved.
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 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33 #include <ctype.h>
34 #include <stdio.h>
35 #include <string.h>
36
37 #include "extern.h"
38
39 char *
getcom(char * buf,int size,const char * prompt,const char * error)40 getcom(char *buf, int size, const char *prompt, const char *error)
41 {
42 for (;;) {
43 fputs(prompt, stdout);
44 if (fgets(buf, size, stdin) == NULL) {
45 if (feof(stdin))
46 die(0);
47 clearerr(stdin);
48 continue;
49 }
50 while (isspace((unsigned char)*buf))
51 buf++;
52 if (*buf)
53 break;
54 if (error)
55 puts(error);
56 }
57 /* If we didn't get to the end of the line, don't read it in next time */
58 if (buf[strlen(buf) - 1] != '\n') {
59 int i;
60 while ((i = getchar()) != '\n' && i != EOF)
61 continue;
62 }
63 return (buf);
64 }
65
66
67 /*
68 * shifts to UPPERCASE if flag > 0, lowercase if flag < 0,
69 * and leaves it unchanged if flag = 0
70 */
71 char *
getword(char * buf1,char * buf2,int flag)72 getword(char *buf1, char *buf2, int flag)
73 {
74 int cnt;
75
76 cnt = 1;
77 while (isspace((unsigned char)*buf1))
78 buf1++;
79 if (*buf1 != ',' && *buf1 != '.') {
80 if (!*buf1) {
81 *buf2 = '\0';
82 return (0);
83 }
84 while (cnt < WORDLEN && *buf1 && !isspace((unsigned char)*buf1) &&
85 *buf1 != ',' && *buf1 != '.')
86 if (flag < 0) {
87 if (isupper((unsigned char)*buf1)) {
88 *buf2++ = tolower((unsigned char)*buf1++);
89 cnt++;
90 } else {
91 *buf2++ = *buf1++;
92 cnt++;
93 }
94 } else if (flag > 0) {
95 if (islower((unsigned char)*buf1)) {
96 *buf2++ = toupper((unsigned char)*buf1++);
97 cnt++;
98 } else {
99 *buf2++ = *buf1++;
100 cnt++;
101 }
102 } else {
103 *buf2++ = *buf1++;
104 cnt++;
105 }
106 if (cnt == WORDLEN)
107 while (*buf1 && !isspace((unsigned char)*buf1))
108 buf1++;
109 } else
110 *buf2++ = *buf1++;
111 *buf2 = '\0';
112 while (isspace((unsigned char)*buf1))
113 buf1++;
114 return (*buf1 ? buf1 : NULL);
115 }
116