cmd/echo/echo.c

/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright (c) 1989, 2010, Oracle and/or its affiliates. All rights reserved.
 */

/*  Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/*    All Rights Reserved   */


#include <stdio.h>
#include <stdlib.h>
#include <wchar.h>
#include <string.h>
#include <locale.h>

int
main(int argc, char *argv[])
{

    register char   *cp;
    register int    i, wd;
    int j;
    wchar_t     wc;
    int     b_len;
    char        *ep;

    (void) setlocale(LC_ALL, "");

    if (--argc == 0) {
        (void) putchar('\n');
        if (fflush(stdout) != 0)
            return (1);
        return (0);
    }

    for (i = 1; i <= argc; i++) {
        for (cp = argv[i], ep = cp + (int)strlen(cp);
            cp < ep; cp += b_len) {
        if ((b_len = mbtowc(&wc, cp, MB_CUR_MAX)) <= 0) {
            (void) putchar(*cp);
            b_len = 1;
            continue;
        }

        if (wc != '\\') {
            (void) putwchar(wc);
            continue;
        }

            cp += b_len;
            b_len = 1;
            switch (*cp) {
                case 'a':   /* alert - XCU4 */
                    (void) putchar('\a');
                    continue;

                case 'b':
                    (void) putchar('\b');
                    continue;

                case 'c':
                    if (fflush(stdout) != 0)
                        return (1);
                    return (0);

                case 'f':
                    (void) putchar('\f');
                    continue;

                case 'n':
                    (void) putchar('\n');
                    continue;

                case 'r':
                    (void) putchar('\r');
                    continue;

                case 't':
                    (void) putchar('\t');
                    continue;

                case 'v':
                    (void) putchar('\v');
                    continue;

                case '\\':
                    (void) putchar('\\');
                    continue;
                case '0':
                    j = wd = 0;
                    while ((*++cp >= '0' && *cp <= '7') &&
                        j++ < 3) {
                        wd <<= 3;
                        wd |= (*cp - '0');
                    }
                    (void) putchar(wd);
                    --cp;
                    continue;

                default:
                    cp--;
                    (void) putchar(*cp);
            }
        }
        (void) putchar(i == argc? '\n': ' ');
        if (fflush(stdout) != 0)
            return (1);
    }
    return (0);
}