handle multiple uba's

[unix-history] / usr / src / bin / pwd / pwd.c

static char *sccsid = "@(#)pwd.c        4.3 (Berkeley) %G%";
/*
* Print working (current) directory
*/
#include        <stdio.h>
#include        <sys/param.h>
#include        <sys/stat.h>
#include        <dir.h>

char    dot[]   = ".";
char    dotdot[] = "..";
char    name[BUFSIZ];
DIR     *file;
int     off     = -1;
struct  stat    d, dd;
struct  direct  *dir;

main()
{
       int rdev, rino;

       stat("/", &d);
       rdev = d.st_dev;
       rino = d.st_ino;
       for (;;) {
               stat(dot, &d);
               if (d.st_ino==rino && d.st_dev==rdev)
                       prname();
               if ((file = opendir(dotdot)) == NULL) {
                       fprintf(stderr,"pwd: cannot open ..\n");
                       exit(1);
               }
               fstat(file->dd_fd, &dd);
               chdir(dotdot);
               if(d.st_dev == dd.st_dev) {
                       if(d.st_ino == dd.st_ino)
                               prname();
                       do
                               if ((dir = readdir(file)) == NULL) {
                                       fprintf(stderr,"read error in ..\n");
                                       exit(1);
                               }
                       while (dir->d_ino != d.st_ino);
               } else
                       do {
                               if ((dir = readdir(file)) == NULL) {
                                       fprintf(stderr,"read error in ..\n");
                                       exit(1);
                               }
                               stat(dir->d_name, &dd);
                       } while(dd.st_ino != d.st_ino || dd.st_dev != d.st_dev);
               closedir(file);
               cat();
       }
}

prname()
{
       write(1, "/", 1);
       if (off<0)
               off = 0;
       name[off] = '\n';
       write(1, name, off+1);
       exit(0);
}

cat()
{
       register i, j;

       i = dir->d_namlen;
       if ((off + dir->d_namlen + 2) > BUFSIZ-1)
               prname();
       for(j=off+1; j>=0; --j)
               name[j+i+1] = name[j];
       off=i+off+1;
       name[i] = '/';
       for(--i; i>=0; --i)
               name[i] = dir->d_name[i];
}