108 lines
2.2 KiB
C
108 lines
2.2 KiB
C
/*
|
|
* |-----------------------------------------------------------|
|
|
* | Copyright (c) 1991, 1990 MIPS Computer Systems, Inc. |
|
|
* | All Rights Reserved |
|
|
* |-----------------------------------------------------------|
|
|
* | Restricted Rights Legend |
|
|
* | Use, duplication, or disclosure by the Government is |
|
|
* | subject to restrictions as set forth in |
|
|
* | subparagraph (c)(1)(ii) of the Rights in Technical |
|
|
* | Data and Computer Software Clause of DFARS 252.227-7013. |
|
|
* | MIPS Computer Systems, Inc. |
|
|
* | 950 DeGuigne Avenue |
|
|
* | Sunnyvale, California 94088-3650, USA |
|
|
* |-----------------------------------------------------------|
|
|
*/
|
|
#ident "$Header: /proj/irix6.5.7m/isms/eoe/cmd/lp_svr4/lib/lp/RCS/makepath.c,v 1.1 1992/12/14 13:28:57 suresh Exp $"
|
|
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
|
|
/* All Rights Reserved */
|
|
|
|
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
|
|
/* The copyright notice above does not evidence any */
|
|
/* actual or intended publication of such source code. */
|
|
|
|
/* LINTLIBRARY */
|
|
|
|
#if defined(__STDC__)
|
|
#include "stdarg.h"
|
|
#else
|
|
#include "varargs.h"
|
|
#endif
|
|
|
|
#include "string.h"
|
|
#include "errno.h"
|
|
#include "stdlib.h"
|
|
|
|
#include "lp.h"
|
|
|
|
/**
|
|
** makepath() - CREATE PATHNAME FROM COMPONENTS
|
|
**/
|
|
|
|
/*VARARGS1*/
|
|
char *
|
|
#if defined(__STDC__)
|
|
makepath (
|
|
char * s,
|
|
...
|
|
)
|
|
#else
|
|
makepath (s, va_alist)
|
|
char * s;
|
|
va_dcl
|
|
#endif
|
|
{
|
|
register va_list ap;
|
|
|
|
register char *component,
|
|
*p,
|
|
*q;
|
|
|
|
register int len;
|
|
|
|
char *ret;
|
|
|
|
|
|
#if defined(__STDC__)
|
|
va_start (ap, s);
|
|
#else
|
|
va_start (ap);
|
|
#endif
|
|
|
|
for (len = strlen(s) + 1; (component = va_arg(ap, char *)); )
|
|
len += strlen(component) + 1;
|
|
|
|
va_end (ap);
|
|
|
|
if (!len) {
|
|
errno = 0;
|
|
return (0);
|
|
}
|
|
|
|
if (!(ret = Malloc(len))) {
|
|
errno = ENOMEM;
|
|
return (0);
|
|
}
|
|
|
|
#if defined(__STDC__)
|
|
va_start (ap, s);
|
|
#else
|
|
va_start (ap);
|
|
#endif
|
|
|
|
for (
|
|
p = ret, component = s;
|
|
component;
|
|
component = va_arg(ap, char *)
|
|
) {
|
|
for (q = component; *q; )
|
|
*p++ = *q++;
|
|
*p++ = '/';
|
|
}
|
|
p[-1] = 0;
|
|
|
|
va_end (ap);
|
|
|
|
return (ret);
|
|
}
|