1*0Sstevel@tonic-gate /* 2*0Sstevel@tonic-gate * CDDL HEADER START 3*0Sstevel@tonic-gate * 4*0Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5*0Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only 6*0Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance 7*0Sstevel@tonic-gate * with the License. 8*0Sstevel@tonic-gate * 9*0Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10*0Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 11*0Sstevel@tonic-gate * See the License for the specific language governing permissions 12*0Sstevel@tonic-gate * and limitations under the License. 13*0Sstevel@tonic-gate * 14*0Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 15*0Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16*0Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 17*0Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 18*0Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 19*0Sstevel@tonic-gate * 20*0Sstevel@tonic-gate * CDDL HEADER END 21*0Sstevel@tonic-gate */ 22*0Sstevel@tonic-gate /* 23*0Sstevel@tonic-gate * Copyright 2004 Sun Microsystems, Inc. All rights reserved. 24*0Sstevel@tonic-gate * Use is subject to license terms. 25*0Sstevel@tonic-gate */ 26*0Sstevel@tonic-gate 27*0Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" 28*0Sstevel@tonic-gate 29*0Sstevel@tonic-gate 30*0Sstevel@tonic-gate #include <ctype.h> 31*0Sstevel@tonic-gate #include <limits.h> 32*0Sstevel@tonic-gate #include <locale.h> 33*0Sstevel@tonic-gate #include <nl_types.h> 34*0Sstevel@tonic-gate #include <stdlib.h> 35*0Sstevel@tonic-gate #include <stdio.h> 36*0Sstevel@tonic-gate #include <string.h> 37*0Sstevel@tonic-gate #include <unistd.h> 38*0Sstevel@tonic-gate #include <errno.h> 39*0Sstevel@tonic-gate 40*0Sstevel@tonic-gate #define FF '\f' 41*0Sstevel@tonic-gate #define NL '\n' 42*0Sstevel@tonic-gate #define NUL '\0' 43*0Sstevel@tonic-gate 44*0Sstevel@tonic-gate static void usage(void); 45*0Sstevel@tonic-gate static void disp_file(FILE *f, char *filename); 46*0Sstevel@tonic-gate static FILE *get_next_file(int, char *, char *[], int); 47*0Sstevel@tonic-gate static void finish(int need_a_newline); 48*0Sstevel@tonic-gate 49*0Sstevel@tonic-gate int estatus = 0; /* exit status */ 50*0Sstevel@tonic-gate int i; /* argv index */ 51*0Sstevel@tonic-gate 52*0Sstevel@tonic-gate int 53*0Sstevel@tonic-gate main(int argc, char *argv[]) 54*0Sstevel@tonic-gate { 55*0Sstevel@tonic-gate int c; 56*0Sstevel@tonic-gate int form_feeds = 0; 57*0Sstevel@tonic-gate int need_a_newline = 0; 58*0Sstevel@tonic-gate char *filename = NULL; 59*0Sstevel@tonic-gate FILE *f; 60*0Sstevel@tonic-gate 61*0Sstevel@tonic-gate (void) setlocale(LC_ALL, ""); 62*0Sstevel@tonic-gate #if !defined(TEXT_DOMAIN) /* Should be defined by cc -D */ 63*0Sstevel@tonic-gate #define TEXT_DOMAIN "SYS_TEST" /* Use this only if it were not */ 64*0Sstevel@tonic-gate #endif 65*0Sstevel@tonic-gate 66*0Sstevel@tonic-gate (void) textdomain(TEXT_DOMAIN); 67*0Sstevel@tonic-gate 68*0Sstevel@tonic-gate while ((c = getopt(argc, argv, "f")) != EOF) { 69*0Sstevel@tonic-gate switch (c) { 70*0Sstevel@tonic-gate case 'f': 71*0Sstevel@tonic-gate form_feeds = 1; 72*0Sstevel@tonic-gate break; 73*0Sstevel@tonic-gate 74*0Sstevel@tonic-gate case '?': 75*0Sstevel@tonic-gate usage(); 76*0Sstevel@tonic-gate } 77*0Sstevel@tonic-gate } 78*0Sstevel@tonic-gate 79*0Sstevel@tonic-gate i = optind; 80*0Sstevel@tonic-gate if (argc <= i) { 81*0Sstevel@tonic-gate filename = NULL; 82*0Sstevel@tonic-gate f = stdin; 83*0Sstevel@tonic-gate } else { 84*0Sstevel@tonic-gate f = get_next_file(need_a_newline, filename, argv, argc); 85*0Sstevel@tonic-gate } 86*0Sstevel@tonic-gate 87*0Sstevel@tonic-gate need_a_newline = 0; 88*0Sstevel@tonic-gate for (;;) { 89*0Sstevel@tonic-gate /* interpret the first character in the line */ 90*0Sstevel@tonic-gate 91*0Sstevel@tonic-gate c = getc(f); 92*0Sstevel@tonic-gate switch (c) { 93*0Sstevel@tonic-gate case EOF: 94*0Sstevel@tonic-gate disp_file(f, filename); 95*0Sstevel@tonic-gate 96*0Sstevel@tonic-gate if (i >= argc) 97*0Sstevel@tonic-gate finish(need_a_newline); 98*0Sstevel@tonic-gate 99*0Sstevel@tonic-gate f = get_next_file(need_a_newline, filename, argv, argc); 100*0Sstevel@tonic-gate 101*0Sstevel@tonic-gate if (need_a_newline) { 102*0Sstevel@tonic-gate (void) putchar(NL); 103*0Sstevel@tonic-gate need_a_newline = 0; 104*0Sstevel@tonic-gate } 105*0Sstevel@tonic-gate 106*0Sstevel@tonic-gate if (form_feeds) 107*0Sstevel@tonic-gate (void) putchar(FF); 108*0Sstevel@tonic-gate 109*0Sstevel@tonic-gate continue; 110*0Sstevel@tonic-gate 111*0Sstevel@tonic-gate case NL: 112*0Sstevel@tonic-gate if (need_a_newline) 113*0Sstevel@tonic-gate (void) putchar(NL); 114*0Sstevel@tonic-gate need_a_newline = 1; 115*0Sstevel@tonic-gate continue; 116*0Sstevel@tonic-gate 117*0Sstevel@tonic-gate case '+': 118*0Sstevel@tonic-gate if (need_a_newline) 119*0Sstevel@tonic-gate (void) putchar('\r'); 120*0Sstevel@tonic-gate break; 121*0Sstevel@tonic-gate 122*0Sstevel@tonic-gate case '0': 123*0Sstevel@tonic-gate if (need_a_newline) 124*0Sstevel@tonic-gate (void) putchar(NL); 125*0Sstevel@tonic-gate (void) putchar(NL); 126*0Sstevel@tonic-gate break; 127*0Sstevel@tonic-gate 128*0Sstevel@tonic-gate case '1': 129*0Sstevel@tonic-gate if (need_a_newline) 130*0Sstevel@tonic-gate (void) putchar(NL); 131*0Sstevel@tonic-gate (void) putchar(FF); 132*0Sstevel@tonic-gate break; 133*0Sstevel@tonic-gate 134*0Sstevel@tonic-gate case ' ': 135*0Sstevel@tonic-gate default: 136*0Sstevel@tonic-gate if (need_a_newline) 137*0Sstevel@tonic-gate (void) putchar(NL); 138*0Sstevel@tonic-gate break; 139*0Sstevel@tonic-gate } 140*0Sstevel@tonic-gate 141*0Sstevel@tonic-gate need_a_newline = 0; 142*0Sstevel@tonic-gate 143*0Sstevel@tonic-gate for (;;) { 144*0Sstevel@tonic-gate c = getc(f); 145*0Sstevel@tonic-gate if (c == NL) { 146*0Sstevel@tonic-gate need_a_newline = 1; 147*0Sstevel@tonic-gate break; 148*0Sstevel@tonic-gate } else if (c == EOF) { 149*0Sstevel@tonic-gate disp_file(f, filename); 150*0Sstevel@tonic-gate 151*0Sstevel@tonic-gate if (i >= argc) 152*0Sstevel@tonic-gate finish(need_a_newline); 153*0Sstevel@tonic-gate 154*0Sstevel@tonic-gate f = get_next_file(need_a_newline, filename, 155*0Sstevel@tonic-gate argv, argc); 156*0Sstevel@tonic-gate 157*0Sstevel@tonic-gate if (form_feeds) { 158*0Sstevel@tonic-gate (void) putchar(NL); 159*0Sstevel@tonic-gate (void) putchar(FF); 160*0Sstevel@tonic-gate need_a_newline = 0; 161*0Sstevel@tonic-gate break; 162*0Sstevel@tonic-gate } 163*0Sstevel@tonic-gate } else { 164*0Sstevel@tonic-gate (void) putchar(c); 165*0Sstevel@tonic-gate } 166*0Sstevel@tonic-gate } 167*0Sstevel@tonic-gate } 168*0Sstevel@tonic-gate /* NOTREACHED */ 169*0Sstevel@tonic-gate return (0); 170*0Sstevel@tonic-gate } 171*0Sstevel@tonic-gate 172*0Sstevel@tonic-gate static void 173*0Sstevel@tonic-gate usage(void) 174*0Sstevel@tonic-gate { 175*0Sstevel@tonic-gate (void) fprintf(stderr, gettext("usage: asa [-f] [-|file...]\n")); 176*0Sstevel@tonic-gate exit(1); 177*0Sstevel@tonic-gate } 178*0Sstevel@tonic-gate 179*0Sstevel@tonic-gate 180*0Sstevel@tonic-gate static void 181*0Sstevel@tonic-gate disp_file(FILE *f, char *filename) 182*0Sstevel@tonic-gate { 183*0Sstevel@tonic-gate 184*0Sstevel@tonic-gate if (ferror(f)) { 185*0Sstevel@tonic-gate int serror = errno; 186*0Sstevel@tonic-gate if (filename) { 187*0Sstevel@tonic-gate (void) fprintf(stderr, gettext( 188*0Sstevel@tonic-gate "asa: read error on file %s\n"), filename); 189*0Sstevel@tonic-gate } else { 190*0Sstevel@tonic-gate (void) fprintf(stderr, gettext( 191*0Sstevel@tonic-gate "asa: read error on standard input\n")); 192*0Sstevel@tonic-gate } 193*0Sstevel@tonic-gate errno = serror; 194*0Sstevel@tonic-gate perror(""); 195*0Sstevel@tonic-gate estatus = 1; 196*0Sstevel@tonic-gate } 197*0Sstevel@tonic-gate 198*0Sstevel@tonic-gate (void) fclose(f); 199*0Sstevel@tonic-gate 200*0Sstevel@tonic-gate } 201*0Sstevel@tonic-gate 202*0Sstevel@tonic-gate static FILE * 203*0Sstevel@tonic-gate get_next_file(int need_a_newline, char *filename, char *argv[], int argc) 204*0Sstevel@tonic-gate { 205*0Sstevel@tonic-gate FILE *f; 206*0Sstevel@tonic-gate if (strcmp(argv[i], "-") == 0) { 207*0Sstevel@tonic-gate filename = NULL; 208*0Sstevel@tonic-gate f = stdin; 209*0Sstevel@tonic-gate } else { 210*0Sstevel@tonic-gate /* 211*0Sstevel@tonic-gate * Process each file operand. If unsuccessful, affect the 212*0Sstevel@tonic-gate * exit status and continue processing the next operand. 213*0Sstevel@tonic-gate */ 214*0Sstevel@tonic-gate filename = argv[i]; 215*0Sstevel@tonic-gate while ((f = fopen(filename, "r")) == NULL) { 216*0Sstevel@tonic-gate int serror = errno; 217*0Sstevel@tonic-gate (void) fprintf(stderr, 218*0Sstevel@tonic-gate gettext("asa: cannot open %s:"), filename); 219*0Sstevel@tonic-gate errno = serror; 220*0Sstevel@tonic-gate perror(""); 221*0Sstevel@tonic-gate estatus = 1; 222*0Sstevel@tonic-gate if (++i < argc) { 223*0Sstevel@tonic-gate if (strcmp(argv[i], "-") == 0) { 224*0Sstevel@tonic-gate filename = NULL; 225*0Sstevel@tonic-gate f = stdin; 226*0Sstevel@tonic-gate break; 227*0Sstevel@tonic-gate } else { 228*0Sstevel@tonic-gate filename = argv[i]; 229*0Sstevel@tonic-gate } 230*0Sstevel@tonic-gate } else { 231*0Sstevel@tonic-gate finish(need_a_newline); 232*0Sstevel@tonic-gate } 233*0Sstevel@tonic-gate } 234*0Sstevel@tonic-gate } 235*0Sstevel@tonic-gate ++i; 236*0Sstevel@tonic-gate return (f); 237*0Sstevel@tonic-gate } 238*0Sstevel@tonic-gate 239*0Sstevel@tonic-gate static void 240*0Sstevel@tonic-gate finish(int need_a_newline) 241*0Sstevel@tonic-gate { 242*0Sstevel@tonic-gate if (need_a_newline) 243*0Sstevel@tonic-gate (void) putchar(NL); 244*0Sstevel@tonic-gate exit(estatus); 245*0Sstevel@tonic-gate } 246