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

#pragma ident   "%Z%%M% %I% %E% SMI"

#include <sys/promif.h>
#include <sys/promimpl.h>

char *
prom_path_gettoken(register char *from, register char *to)
{
    while (*from) {
        switch (*from) {
        case '/':
        case '@':
        case ':':
        case ',':
            *to = '\0';
            return (from);
        default:
            *to++ = *from++;
        }
    }
    *to = '\0';
    return (from);
}

/*
 * Given an OBP pathname, do the best we can to fully expand
 * the OBP pathname, in place in the callers buffer.
 *
 * If we have to complete the addrspec of any component, we can
 * only handle devices that have a maximum of NREGSPECS "reg" specs.
 * We cannot allocate memory inside this function.
 */
void
prom_pathname(char *pathname)
{
    char tmp[OBP_MAXPATHLEN];
    char *from = tmp;
    char *to = pathname;
    char *p;
    cell_t ci[7];
#ifdef PROM_32BIT_ADDRS
    char *opathname = NULL;
#endif /* PROM_32BIT_ADDRS */

    if ((to == (char *)0) || (*to == (char)0))
        return;

#ifdef PROM_32BIT_ADDRS
    if ((uintptr_t)pathname > (uint32_t)-1) {
        opathname = pathname;
        pathname = promplat_alloc(OBP_MAXPATHLEN);
        if (pathname == NULL) {
            return;
        }
        (void) prom_strcpy(pathname, opathname);
        to = pathname;
    }
    if ((uintptr_t)from > (uint32_t)-1) {
        from = promplat_alloc(OBP_MAXPATHLEN);
        if (from == NULL) {
            if (opathname != NULL)
                promplat_free(pathname, OBP_MAXPATHLEN);
            return;
        }
    }
#endif /* PROM_32BIT_ADDRS */

    promif_preprom();

    (void) prom_strcpy(from, to);
    *to = (char)0;

    ci[0] = p1275_ptr2cell("canon");    /* Service name */
    ci[1] = (cell_t)3;          /* #argument cells */
    ci[2] = (cell_t)1;          /* #result cells */
    ci[3] = p1275_ptr2cell(from);       /* Arg1: token */
    ci[4] = p1275_ptr2cell(to);     /* Arg2: buffer address */
    ci[5] = p1275_uint2cell(OBP_MAXPATHLEN); /* Arg3: buffer length */

    (void) p1275_cif_handler(&ci);

    promif_postprom();

#ifdef PROM_32BIT_ADDRS
    if (opathname != NULL) {
        (void) prom_strcpy(opathname, pathname);
        promplat_free(pathname, OBP_MAXPATHLEN);
        to = pathname = opathname;
    }
    if (from != tmp) {
        (void) prom_strcpy(tmp, from);
        promplat_free(from, OBP_MAXPATHLEN);
        from = tmp;
    }
#endif /* PROM_32BIT_ADDRS */

    /*
     * workaround for bugid 1218110, the prom strips the
     * options from the input string ... save options at
     * at the end of the string if the prom didn't.
     * NB: The workaround only preserves options in the last
     * component of the string.
     */

    /*
     * If there are any options in the last component of the
     * output, the prom has copied them; No workaround required.
     */
    if ((p = prom_strrchr(to, '/')) == 0)
        return;
    if ((p = prom_strchr(p, ':')) != 0)
        return;

    /*
     * If there are no options in the input ... there's
     * nothing to preserve; return.
     */
    if ((p = prom_strrchr(from, '/')) == 0)
        p = from;
    if ((p = prom_strchr(p, ':')) == 0)
        return;

    /*
     * Concatenate the options we found to the end of the output string.
     */
    (void) prom_strcat(to, p);
}

/*
 * Strip any options strings from an OBP pathname.
 * Output buffer (to) expected to be as large as input buffer (from).
 */
void
prom_strip_options(char *from, char *to)
{
    while (*from != (char)0)  {
        if (*from == ':')  {
            while ((*from != (char)0) && (*from != '/'))
                ++from;
        } else
            *to++ = *from++;
    }
    *to = (char)0;
}