1 files changed, 91 insertions, 0 deletions
diff --git a/cpukit/libfs/src/imfs/imfs_gtkn.c b/cpukit/libfs/src/imfs/imfs_gtkn.c
new file mode 100644
index 0000000000..b15b2f1136
--- /dev/null
+++ b/cpukit/libfs/src/imfs/imfs_gtkn.c
@@ -0,0 +1,91 @@
+/*
+ *  IMFS_get_token
+ *
+ *  Routine to get a token (name or separator) from the path
+ *  the length of the token is returned in token_len.
+ *
+ *  COPYRIGHT (c) 1989-1999.
+ *  On-Line Applications Research Corporation (OAR).
+ *
+ *  The license and distribution terms for this file may be
+ *  found in the file LICENSE in this distribution or at
+ *  http://www.rtems.com/license/LICENSE.
+ *
+ *  $Id$
+ */
+
+#if HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <stdlib.h>
+#include <string.h>
+
+#include "imfs.h"
+#include <rtems/libio_.h>
+
+IMFS_token_types IMFS_get_token(
+  const char       *path,
+  int               pathlen,
+  char             *token,
+  int              *token_len
+)
+{
+  register int i = 0;
+  IMFS_token_types  type = IMFS_NAME;
+  register char c;
+
+  /*
+   *  Copy a name into token.  (Remember NULL is a token.)
+   */
+  c = path[i];
+  while ( (!IMFS_is_separator(c)) && (i < pathlen) && (i <= IMFS_NAME_MAX) ) {
+
+     token[i] = c;
+
+     if ( i == IMFS_NAME_MAX )
+       return IMFS_INVALID_TOKEN;
+
+     if ( !IMFS_is_valid_name_char(c) )
+       type = IMFS_INVALID_TOKEN;
+
+     c = path [++i];
+  }
+
+  /*
+   *  Copy a seperator into token.
+   */
+
+  if ( i == 0 ) {
+    token[i] = c;
+
+    if ( (token[i] != '\0') && pathlen ) {
+      i++;
+      type = IMFS_CURRENT_DIR;
+    } else {
+      type = IMFS_NO_MORE_PATH;
+    }
+  } else if (token[ i-1 ] != '\0') {
+    token[i] = '\0';
+  }
+
+  /*
+   *  Set token_len to the number of characters copied.
+   */
+
+  *token_len = i;
+
+  /*
+   *  If we copied something that was not a seperator see if
+   *  it was a special name.
+   */
+
+  if ( type == IMFS_NAME ) {
+    if ( strcmp( token, "..") == 0 )
+      type = IMFS_UP_DIR;
+    else if ( strcmp( token, "." ) == 0 )
+      type = IMFS_CURRENT_DIR;
+  }
+
+  return type;
+}