Home | History | Annotate | Download | only in cscope-fast
      1 /*
      2  * CDDL HEADER START
      3  *
      4  * The contents of this file are subject to the terms of the
      5  * Common Development and Distribution License, Version 1.0 only
      6  * (the "License").  You may not use this file except in compliance
      7  * with the License.
      8  *
      9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
     10  * or http://www.opensolaris.org/os/licensing.
     11  * See the License for the specific language governing permissions
     12  * and limitations under the License.
     13  *
     14  * When distributing Covered Code, include this CDDL HEADER in each
     15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
     16  * If applicable, add the following below this CDDL HEADER, with the
     17  * fields enclosed by brackets "[]" replaced with your own identifying
     18  * information: Portions Copyright [yyyy] [name of copyright owner]
     19  *
     20  * CDDL HEADER END
     21  */
     22 /*	Copyright (c) 1988 AT&T	*/
     23 /*	  All Rights Reserved  	*/
     24 
     25 
     26 /*
     27  * Copyright (c) 1999 by Sun Microsystems, Inc.
     28  * All rights reserved.
     29  */
     30 
     31 #pragma ident	"%Z%%M%	%I%	%E% SMI"
     32 
     33 #include <sys/types.h>	/* needed by stat.h */
     34 #include <sys/stat.h>	/* stat */
     35 #include <stdio.h>	/* NULL */
     36 #include <string.h>	/* string functions */
     37 #include <stdlib.h>
     38 
     39 /*
     40  * if the ksh PWD environment variable matches the current
     41  * working directory, don't call getwd()
     42  */
     43 
     44 char *
     45 mygetwd(char *dir)
     46 {
     47 	char	*pwd;			/* PWD environment variable value */
     48 	struct	stat	d_sb;  		/* current directory status */
     49 	struct	stat	tmp_sb; 	/* temporary stat buffer */
     50 	char	*getwd();
     51 
     52 	/* get the current directory's status */
     53 	if (stat(".", &d_sb) < 0) {
     54 		return (NULL);
     55 	}
     56 	/* use $PWD if it matches this directory */
     57 	if ((pwd = getenv("PWD")) != NULL && *pwd != '\0' &&
     58 	    stat(pwd, &tmp_sb) == 0 &&
     59 	    d_sb.st_ino == tmp_sb.st_ino && d_sb.st_dev == tmp_sb.st_dev) {
     60 		(void) strcpy(dir, pwd);
     61 		return (pwd);
     62 	}
     63 	return (getwd(dir));
     64 }
     65