Return to getwd.c CVS log

Up to [MW Coherent from dump] / coherent / d / lib / libc / gen

Annotation of coherent/d/lib/libc/gen/getwd.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Return a static string containing the current
                      3:  * working directory for this process.
                      4:  * (Warning: this call may change the current directory
                      5:  * of the process if for any reason it fails.)
                      6:  */
                      7: 
                      8: #include <stdio.h>
                      9: #include <sys/types.h>
                     10: #include <sys/stat.h>
                     11: #include <sys/dir.h>
                     12: #include <canon.h>
                     13: 
                     14: #define        MAXNAME 400             /* Longest pathname */
                     15: 
                     16: extern int     errno;
                     17: static int     oerrno;
                     18: 
                     19: static
                     20: char *
                     21: fail()
                     22: {
                     23:        if (errno == 0)
                     24:                errno = oerrno;         /* preserve previous errno */
                     25:        return NULL;
                     26: }
                     27: 
                     28: char *
                     29: getwd()
                     30: {
                     31:        struct stat d, dd;
                     32:        struct direct dir;
                     33:        static char fnbuf[MAXNAME];
                     34:        register char *cp, *dp;
                     35:        register int file;
                     36:        register dev_t rdev;
                     37:        register ino_t rino;
                     38: 
                     39:        oerrno = errno;                 /* save old errno */
                     40:        errno = 0;
                     41:        dp = fnbuf+MAXNAME-1;
                     42:        *dp = '\0';
                     43:        if (stat("/", &d) < 0)
                     44:                return fail();
                     45:        rdev = d.st_dev;
                     46:        rino = d.st_ino;
                     47:        while (stat(".", &d)>=0 && (d.st_ino!=rino || d.st_dev!=rdev)) {
                     48:                if ((file = open("..", 0)) < 0)
                     49:                        return fail();
                     50:                if (fstat(file, &dd)<0 || chdir("..")<0) {
                     51:                        close(file);
                     52:                        return fail();
                     53:                }
                     54:                if (d.st_dev == dd.st_dev) {
                     55:                        if (d.st_ino == dd.st_ino) {
                     56:                                close(file);
                     57:                                break;
                     58:                        }
                     59:                        do {
                     60:                                if (read(file, (char *)&dir, sizeof (dir))
                     61:                                    != sizeof (dir)) {
                     62:                                        close(file);
                     63:                                        return fail();
                     64:                                }
                     65:                                canino(dir.d_ino);
                     66:                        } while (dir.d_ino != d.st_ino);
                     67:                } else
                     68:                        do {
                     69:                                if (read(file, (char *)&dir, sizeof (dir))
                     70:                                    != sizeof  (dir)) {
                     71:                                        close(file);
                     72:                                        return fail();
                     73:                                }
                     74:                                canino(dir.d_ino);
                     75:                                if (dir.d_ino!=0 && stat(dir.d_name, &dd)<0) {
                     76:                                        close(file);
                     77:                                        return fail();
                     78:                                }
                     79:                        } while (dd.st_ino!=d.st_ino || dd.st_dev!=d.st_dev);
                     80:                close(file);
                     81:                if (dp-DIRSIZ <= fnbuf)
                     82:                        return fail();
                     83:                for (cp=dir.d_name; cp!=dir.d_name+DIRSIZ && *cp!='\0'; cp++)
                     84:                        ;
                     85:                while (cp > dir.d_name)
                     86:                        *--dp = *--cp;
                     87:                *--dp = '/';
                     88:        }
                     89:        if (errno)
                     90:                return NULL;
                     91:        if (*dp != '/')
                     92:                *--dp = '/';
                     93:        if (chdir(dp) < 0)
                     94:                return fail();
                     95:        errno = oerrno;
                     96:        return dp;
                     97: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.