Return to getcom.c CVS log

Up to [CSRG BSD Unix] / 43BSD / games / battlestar

Annotation of 43BSD/games/battlestar/getcom.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Copyright (c) 1983 Regents of the University of California,
        !             3:  * All rights reserved.  Redistribution permitted subject to
        !             4:  * the terms of the Berkeley Software License Agreement.
        !             5:  */
        !             6: 
        !             7: #ifndef lint
        !             8: static char sccsid[] = "@(#)getcom.c   1.3 4/24/85";
        !             9: #endif
        !            10: 
        !            11: #include <stdio.h>
        !            12: #include <ctype.h>
        !            13: 
        !            14: char *
        !            15: getcom(buf, size, prompt, error)
        !            16:        char *buf;
        !            17:        int size;
        !            18:        char *prompt, *error;
        !            19: {
        !            20:        for (;;) {
        !            21:                fputs(prompt, stdout); 
        !            22:                if (fgets(buf, size, stdin) == 0) {
        !            23:                        clearerr(stdin);
        !            24:                        continue;
        !            25:                }
        !            26:                while (isspace(*buf))
        !            27:                        buf++;
        !            28:                if (*buf)
        !            29:                        break;
        !            30:                if (error)
        !            31:                        puts(error);
        !            32:        }
        !            33:        return (buf);
        !            34: }
        !            35: 
        !            36: 
        !            37: /*
        !            38:  * shifts to UPPERCASE if flag > 0, lowercase if flag < 0,
        !            39:  * and leaves it unchanged if flag = 0
        !            40:  */
        !            41: char *
        !            42: getword(buf1, buf2, flag)
        !            43:        register char *buf1, *buf2;
        !            44:        register flag;
        !            45: {
        !            46:        while (isspace(*buf1))
        !            47:                buf1++;
        !            48:        if (*buf1 != ',') {
        !            49:                if (!*buf1) {
        !            50:                        *buf2 = 0;
        !            51:                        return (0);
        !            52:                }
        !            53:                while (*buf1 && !isspace(*buf1) && *buf1 != ',')
        !            54:                        if (flag < 0)
        !            55:                                if (isupper(*buf1))
        !            56:                                        *buf2++ = tolower(*buf1++);
        !            57:                                else
        !            58:                                        *buf2++ = *buf1++;
        !            59:                        else if (flag > 0)
        !            60:                                if (islower(*buf1))
        !            61:                                        *buf2++ = toupper(*buf1++);
        !            62:                                else
        !            63:                                        *buf2++ = *buf1++;
        !            64:                        else
        !            65:                                *buf2++ = *buf1++;
        !            66:        } else
        !            67:                *buf2++ = *buf1++;
        !            68:        *buf2 = 0;
        !            69:        while (isspace(*buf1))
        !            70:                buf1++;
        !            71:        return (*buf1 ? buf1 : 0);
        !            72: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.