Logo Search packages:      
Sourcecode: ksh version File versions

rmdir3d.c

/***********************************************************************
*                                                                      *
*               This software is part of the ast package               *
*           Copyright (c) 1989-2007 AT&T Knowledge Ventures            *
*                      and is licensed under the                       *
*                  Common Public License, Version 1.0                  *
*                      by AT&T Knowledge Ventures                      *
*                                                                      *
*                A copy of the License is available at                 *
*            http://www.opensource.org/licenses/cpl1.0.txt             *
*         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
*                                                                      *
*              Information and Software Systems Research               *
*                            AT&T Research                             *
*                           Florham Park NJ                            *
*                                                                      *
*                 Glenn Fowler <gsf@research.att.com>                  *
*                  David Korn <dgk@research.att.com>                   *
*                   Eduardo Krell <ekrell@adexus.cl>                   *
*                                                                      *
***********************************************************************/
#pragma prototyped

#include "3d.h"

#include "dir_3d.h"

static int
rmfiles(char* path, char* endpath, ino_t ino)
{
      register DIRDIR*        dp;
      register struct DIRdirent*    ep;
      register char*                s;
      register char*                t;
      int                     pass = 0;

      *endpath = 0;
      if (!(dp = OPENDIR(path))) return(0);
      *endpath++ = '/';
      for (;;)
      {
            if (!(ep = (struct DIRdirent*)READDIR(dp)))
            {
                  if (pass++)
                  {
                        CLOSEDIR(dp);
                        return(1);
                  }
                  SEEKDIR(dp, 0L);
            }
            else
            {
#ifdef D_FILENO
                  if (D_FILENO(ep) != ino)
#else
                  struct stat st;

                  strcpy(endpath, ep->d_name);
                  if (STAT(path, &st)) break;
                  if (st.st_ino != ino)
#endif
                  {
                        s = state.opaque;
                        t = ep->d_name;
                        while (*s && *s++ == *t) t++;
                        if (*s || *t) break;
                  }
                  else if (pass)
                  {
#ifdef D_FILENO
                        strcpy(endpath, ep->d_name);
#endif
                        if (UNLINK(path)) break;
                  }
            }
      }
      CLOSEDIR(dp);
      return(0);
}

int
rmdir3d(const char* path)
{
      register char*    sp;
      register int      r;
      int         pass = 0;
      struct stat st;
#if FS
      Mount_t*    mp;

      if (!fscall(NiL, MSG_rmdir, 0, path))
            return(state.ret);
      mp = monitored();
#endif
      if (!(sp = pathreal(path, P_PATHONLY, NiL)))
            return(-1);
      if (state.path.level)
            return(0);
 retry:
      r = RMDIR(sp);
      if (!r)
      {
#if FS
            if (mp) fscall(mp, MSG_rmdir, 0, path);
            for (mp = state.global; mp; mp = mp->global)
                  if (fssys(mp, MSG_rmdir))
                        fscall(mp, MSG_rmdir, 0, path);
#endif
      }
      else
      {
            if (errno == ENOENT && pathreal(path, 0, NiL))
                  return(0);
            if (errno == ENOTEMPTY && !pass++)
            {
                  register char*    slast = sp;

                  while (*slast) slast++;
                  *slast = '/';
                  strcpy(slast+1, state.opaque);
                  if (!LSTAT(sp, &st))
                  {
                        if (rmfiles(sp, slast, st.st_ino))
                        {
                              *slast = 0;
                              goto retry;
                        }
                  }
                  else errno = ENOTEMPTY;
            }
      }
      return(r);
}

Generated by  Doxygen 1.6.0   Back to index