/*
 * 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 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

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

#include "mt.h"
#include "uucp.h"

/*
 * generate a vector of pointers (arps) to the
 * substrings in string "s".
 * Each substring is separated by blanks and/or tabs.
 *      s       -> string to analyze -- s GETS MODIFIED
 *      arps    -> array of pointers -- count + 1 pointers
 *      count   -> max number of fields
 * returns:
 *      i       -> # of subfields
 *      arps[i] = NULL
 */

static int
getargs(char *s, char *arps[], int count)
{
        int i;

        for (i = 0; i < count; i++) {
                while (*s == ' ' || *s == '\t')
                        *s++ = '\0';
                if (*s == '\n')
                        *s = '\0';
                if (*s == '\0')
                        break;
                arps[i] = s++;
                while (*s != '\0' && *s != ' ' && *s != '\t' && *s != '\n')
                        s++;
        }
        arps[i] = NULL;
        return (i);
}

/*
 *      bsfix(args) - remove backslashes from args
 *
 *      \123 style strings are collapsed into a single character
 *      \000 gets mapped into \N for further processing downline.
 *      \ at end of string is removed
 *      \t gets replaced by a tab
 *      \n gets replaced by a newline
 *      \r gets replaced by a carriage return
 *      \b gets replaced by a backspace
 *      \s gets replaced by a blank
 *      any other unknown \ sequence is left intact for further processing
 *      downline.
 */

static void
bsfix(char **args)
{
        char *str, *to, *cp;
        int num;

        for (; *args; args++) {
                str = *args;
                for (to = str; *str; str++) {
                        if (*str == '\\') {
                                if (str[1] == '\0')
                                        break;
                                switch (*++str) {
                                case '0':
                                case '1':
                                case '2':
                                case '3':
                                case '4':
                                case '5':
                                case '6':
                                case '7':
                                        for (num = 0, cp = str;
                                                        cp - str < 3; cp++) {
                                                if ('0' <= *cp && *cp <= '7') {
                                                        num <<= 3;
                                                        num += *cp - '0';
                                                } else
                                                    break;
                                        }
                                        if (num == 0) {
                                                *to++ = '\\';
                                                *to++ = 'N';
                                        } else
                                                *to++ = (char)num;
                                        str = cp-1;
                                        break;

                                case 't':
                                        *to++ = '\t';
                                        break;

                                case 's':
                                        *to++ = ' ';
                                        break;

                                case 'n':
                                        *to++ = '\n';
                                        break;

                                case 'r':
                                        *to++ = '\r';
                                        break;

                                case 'b':
                                        *to++ = '\b';
                                        break;

                                default:
                                        *to++ = '\\';
                                        *to++ = *str;
                                        break;
                                }
                        }
                        else
                                *to++ = *str;
                }
                *to = '\0';
        }
}