Initial revision

1 files changed, 143 insertions, 0 deletions

diff --git a/libnetfs/dir-lookup.c b/libnetfs/dir-lookup.c
new file mode 100644
index 00000000..ddd08e1c
--- /dev/null
+++ b/libnetfs/dir-lookup.c
@@ -0,0 +1,143 @@
+/* 
+   Copyright (C) 1995 Free Software Foundation, Inc.
+   Written by Michael I. Bushnell, p/BSG.
+
+   This file is part of the GNU Hurd.
+
+   The GNU Hurd is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation; either version 2, or (at
+   your option) any later version.
+
+   The GNU Hurd is distributed in the hope that it will be useful, but
+   WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA. */
+
+#include <fcntl.h>
+#include "netfs.h"
+#include "fs_S.h"
+
+
+error_t
+netfs_S_dir_lookup (struct protid *diruser,
+		    char *filename,
+		    int flags,
+		    mode_t mode,
+		    retry_type *do_retry,
+		    char *retry_name,
+		    mach_port_t *retry_port,
+		    mach_msg_type_name_t *retry_port_type)
+{
+  int create;			/* true if O_CREAT flag set */
+  int excl;			/* true if O_EXCL flag set */
+  int mustbedir;		/* true if the result must be S_IFDIR */
+  int lastcomp;			/* true if we are at the last component */
+  int newnode;			/* true if this node is newly created */
+  struct node *dnp, *np;
+  char *nextname;
+
+  if (!diruser)
+    return EOPNOTSUPP;
+  
+  create = (flags & O_CREAT);
+  excl = (flags & O_EXCL);
+  
+  /* Skip leading slashes */
+  while (*filename == '/')
+    filename++;
+  
+  *retry_poly = MACH_MSG_TYPE_MAKE_SEND;
+  *retry = FS_RETRY_NORMAL;
+  *retry_name = '\0';
+  
+  if (*filename == '\0')
+    {
+      mustbedir = 1;
+      
+      /* Set things up in the state expected by the code from gotit: on. */
+      dnp = 0;
+      np = diruser->po->np;
+      mutex_lock (&np->lock);
+      netfs_nref (np);
+      goto gotit;
+    }
+  
+  dnp = diruser->po->np;
+  mutex_lock (&dnp->lock);
+  np = 0;
+  
+  netfs_nref (dnp);		/* acquire a reference for later netfs_nput */
+  
+  do
+    {
+      assert (!lastcomp);
+      
+      /* Find the name of the next pathname component */
+      nextname = index (filename, '/');
+      
+      if (nextname)
+	{
+	  *nextname++ = '\0';
+	  while (*nextname == '/')
+	    nextname++;
+	  if (*nextname == '\0')
+	    {
+	      /* These are the rules for filenames ending in /. */
+	      nextname = 0;
+	      lastcomp = 1;
+	      mustbedir = 1;
+	      create = 0;
+	    }
+	  else
+	    lastcomp = 1;
+	  
+	  np = 0;
+	  
+	  /* Attempt a lookup on the next pathname component. */
+	  error = netfs_attempt_lookup (user, dnp, nextname, &np);
+
+	  /* Implement O_EXCL flag here */
+	  if (lastcomp && create && excl && (!error || error == EAGAIN))
+	    error = EEXIST;
+	  
+	  /* If we get an error, we're done */
+	  if (error == EAGAIN)
+	    {
+	      /* This really means .. from root */
+	      if (diruser->po->dotdotport != MACH_PORT_NULL)
+		{
+		  *retry = FS_RETRY_REAUTH;
+		  *retry_port = dircred->po->dotdotport;
+		  *retry_port_type = MACH_MSG_TYPE_COPY_SEND;
+		  if (!lastcomp)
+		    strcpy (retry_name, nextname);
+		  error = 0;
+		  goto out;
+		}
+	      else
+		{
+		  /* We are the global root; .. from our root is
+		     just our root again. */
+		  error = 0;
+		  np = dnp;
+		  netfs_nref (np);
+		}
+	    }
+	  
+	  /* Create the new node if necessary */
+	  if (lastcomp && create)
+	    {
+	      if (error == ENOENT)
+		{
+		  mode &= ~(S_IFMT | S_ISPARE | S_ISVTX);
+		  mode |= S_IFREG;
+		  error = netfs_attempt_create_file (diruser, dnp, 
+						     filename, mode, &np);
+		  newnode = 1;
+		}
+