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 * 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 * 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