/* * CDDL HEADER START * * The contents of this file are subject to the terms of the * Common Development and Distribution License, Version 1.0 only * (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 2004 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */ /* All Rights Reserved */ #pragma ident "%Z%%M% %I% %E% SMI" /* * Create message files in a specific format. * the gettxt message retrieval function must know the format of * the data file created by this utility. * * FORMAT OF MESSAGE FILES __________________________ | Number of messages | -------------------------- | offset to the 1st mesg | -------------------------- | offset to the 2nd mesg | -------------------------- | offset to the 3rd mesg | -------------------------- | . | | . | | . | -------------------------- | offset to the nth mesg | -------------------------- | message #1 -------------------------- | message #2 -------------------------- | message #3 -------------------------- . . . -------------------------- | message #n -------------------------- * */ #include #include #include #include #include #include #include #include #include /* * Definitions */ #define LINESZ 2048 /* max line in input base */ #define STDERR 2 #define P_locale "/usr/lib/locale/" /* locale info directory */ #define L_locale sizeof(P_locale) #define MESSAGES "/LC_MESSAGES/" /* messages category */ /* * internal functions */ static char *syserr(void); /* Returns description of error */ static void usage(void); /* Displays valid invocations */ static int mymkdir(char *); /* Creates sub-directories */ static void clean(int); /* removes work file */ /* * static variables */ static char *cmdname; /* Last qualifier of arg0 */ static char *workp; /* name of the work file */ int main(argc, argv) int argc; char *argv[]; { int c; /* contains option letter */ char *ifilep; /* input file name */ char *ofilep; /* output file name */ char *localep; /* locale name */ char *localedirp; /* full-path name of parent directory * of the output file */ char *outfilep; /* full-path name of output file */ FILE *fp_inp; /* input file FILE pointer */ FILE *fp_outp; /* output file FILE pointer */ char *bufinp, *bufworkp; /* pointers to input and work areas */ int *bufoutp; /* pointer to the output area */ char *msgp; /* pointer to the a message */ int num_msgs; /* number of messages in input file */ int iflag; /* -i option was specified */ int oflag; /* -o option was slecified */ int nitems; /* number of bytes to write */ char *pathoutp; /* full-path name of output file */ struct stat buf; /* buffer to stat the work file */ unsigned size; /* used for argument to malloc */ int i; /* Initializations */ localep = (char *)NULL; num_msgs = 0; iflag = 0; oflag = 0; /* Get name of command */ if (cmdname = strrchr(argv[0], '/')) ++cmdname; else cmdname = argv[0]; /* Check for invalid number of arguments */ if (argc < 3 && argc > 6) usage(); /* Get command line options */ while ((c = getopt(argc, argv, "oi:")) != EOF) { switch (c) { case 'o': oflag++; break; case 'i': iflag++; localep = optarg; break; case '?': usage(); break; } } /* Initialize pointers to input and output file names */ ifilep = argv[optind]; ofilep = argv[optind + 1]; /* check for invalid invocations */ if (iflag && oflag && argc != 6) usage(); if (iflag && ! oflag && argc != 5) usage(); if (! iflag && oflag && argc != 4) usage(); if (! iflag && ! oflag && argc != 3) usage(); /* Construct a full-path to the output file */ if (localep) { size = L_locale + strlen(localep) + sizeof(MESSAGES) + strlen(ofilep); if ((pathoutp = malloc(2 * (size + 1))) == NULL) { (void)fprintf(stderr, "%s: malloc error (size = %d)\n", cmdname, size); exit(1); } localedirp = pathoutp + size + 1; (void)strcpy(pathoutp, P_locale); (void)strcpy(&pathoutp[L_locale - 1], localep); (void)strcat(pathoutp, MESSAGES); (void)strcpy(localedirp, pathoutp); (void)strcat(pathoutp, ofilep); } /* Check for overwrite error conditions */ if (! oflag) { if (iflag) { if (access(pathoutp, 0) == 0) { (void)fprintf(stderr, "%s: Message file \"%s\" already exists;\ndid not overwrite it\n", cmdname, pathoutp); if (localep) free(pathoutp); exit(1); } } else if (access(ofilep, 0) == 0) { (void)fprintf(stderr, "%s: Message file \"%s\" already exists;\ndid not overwrite it\n", cmdname, ofilep); if (localep) free(pathoutp); exit(1); } } /* Open input file */ if ((fp_inp = fopen(ifilep, "r")) == NULL) { (void)fprintf(stderr, "%s: %s: %s\n", cmdname, ifilep, syserr()); exit(1); } /* Allocate buffer for input and work areas */ if ((bufinp = malloc(2 * LINESZ)) == NULL) { (void)fprintf(stderr, "%s: malloc error (size = %d)\n", cmdname, 2 * LINESZ); exit(1); } bufworkp = bufinp + LINESZ; if (sigset(SIGINT, SIG_IGN) == SIG_DFL) (void)sigset(SIGINT, clean); /* Open work file */ workp = tempnam(".", "xx"); if ((fp_outp = fopen(workp, "a+")) == NULL) { (void)fprintf(stderr, "%s: %s: %s\n", cmdname, workp, syserr()); if (localep) free(pathoutp); free(bufinp); exit(1); } /* Search for C-escape sequences in input file and * replace them by the appropriate characters. * The modified lines are copied to the work area * and written to the work file */ for(;;) { if (!fgets(bufinp, LINESZ, fp_inp)) { if (!feof(fp_inp)) { (void)fprintf(stderr,"%s: %s: %s\n", cmdname, ifilep, syserr()); free(bufinp); if (localep) free(pathoutp); exit(1); } break; } if(*(bufinp+strlen(bufinp)-1) != '\n') { (void)fprintf(stderr, "%s: %s: data base file: error on line %d\n", cmdname, ifilep, num_msgs); free(bufinp); exit(1); } *(bufinp + strlen(bufinp) -1) = (char)0; /* delete newline */ num_msgs++; (void)strccpy(bufworkp, bufinp); nitems = strlen(bufworkp) + 1; if (fwrite(bufworkp, sizeof(*bufworkp), nitems, fp_outp) != nitems) { (void)fprintf(stderr, "%s: %s: %s\n", cmdname, workp, syserr()); exit(1); } } free(bufinp); (void)fclose(fp_outp); /* Open and stat the work file */ if ((fp_outp = fopen(workp, "r")) == NULL) { (void)fprintf(stderr, "%s: %s: %s\n", cmdname, workp, syserr()); exit(1); } if ((stat(workp, &buf)) != 0) { (void)fprintf(stderr, "%s: %s: %s\n", cmdname, workp, syserr()); } /* Find the size of the output message file * and copy the control information and the messages * to the output file */ size = sizeof(int) + num_msgs * sizeof(int) + buf.st_size; if ( (bufoutp = (int *)malloc((uint)size)) == NULL ) { (void)fprintf(stderr, "%s: malloc error (size = %d)\n", cmdname, size); exit(1); } bufinp = (char *)bufoutp; if ( (fread(bufinp + sizeof(int) + num_msgs * sizeof(int), sizeof(*bufinp), buf.st_size, fp_outp)) != buf.st_size ) { free(bufinp); (void) fprintf(stderr, "%s: %s: %s\n", cmdname, workp, syserr()); } (void) fclose(fp_outp); (void) unlink(workp); free(workp); msgp = bufinp + sizeof(int) + num_msgs * sizeof(int); *bufoutp = num_msgs; *(bufoutp + 1) = (bufinp + sizeof(int) + num_msgs * sizeof(int)) - bufinp; for(i = 2; i <= num_msgs; i++) { *(bufoutp + i) = (msgp + strlen(msgp) + 1) - bufinp; msgp = msgp + strlen(msgp) + 1; } if (iflag) { outfilep = pathoutp; if (mymkdir(localedirp) == 0) { free(bufinp); if (localep) free(pathoutp); exit(1); } } else outfilep = ofilep; if ((fp_outp = fopen(outfilep, "w")) == NULL) { (void)fprintf(stderr, "%s: %s: %s\n", cmdname, outfilep, syserr()); free(bufinp); if (localep) free(pathoutp); exit(1); } if (fwrite((char *)bufinp, sizeof(*bufinp), size, fp_outp) != size) { (void)fprintf(stderr, "%s: %s: %s\n", cmdname, ofilep, syserr()); free(bufinp); if (localep) free(pathoutp); exit(1); } free(bufinp); if (localep) free(pathoutp); return (0); } /* * syserr() * * Return a pointer to a system error message. */ static char * syserr() { return (strerror(errno)); } static void usage() { (void)fprintf(stderr, "Usage: %s [-o] inputstrings outputmsgs\n", cmdname); (void)fprintf(stderr, " %s [-o] [-i locale] inputstrings outputmsgs\n", cmdname); exit(1); } static int mymkdir(localdir) char *localdir; { char *dirp; char *s1 = localdir; char *path; if ((path = malloc(strlen(localdir)+1)) == NULL) return(0); *path = '\0'; while( (dirp = strtok(s1, "/")) != NULL ) { s1 = (char *)NULL; (void)strcat(path, "/"); (void)strcat(path, dirp); if (access(path, 3) == 0) continue; if (mkdir(path, 0777) == -1) { (void)fprintf(stderr, "%s: %s: %s\n", cmdname, path, syserr()); free(path); return(0); } } free(path); return(1); } /* ARGSUSED */ static void clean(int sig) { (void)sigset(SIGINT, SIG_IGN); if (workp) (void) unlink(workp); exit(1); }