1 files changed, 130 insertions, 0 deletions
diff --git a/c/src/exec/libfs/src/imfs/imfs_creat.c b/c/src/exec/libfs/src/imfs/imfs_creat.c
new file mode 100644
index 0000000000..fd38e7f993
--- /dev/null
+++ b/c/src/exec/libfs/src/imfs/imfs_creat.c
@@ -0,0 +1,130 @@
+/*
+ *  IMFS_create_node()
+ *
+ *  Routine to create a new in memory file system node.
+ *
+ *  COPYRIGHT (c) 1989-1998.
+ *  On-Line Applications Research Corporation (OAR).
+ *  Copyright assigned to U.S. Government, 1994.
+ *
+ *  The license and distribution terms for this file may be
+ *  found in the file LICENSE in this distribution or at
+ *  http://www.OARcorp.com/rtems/license.html.
+ *
+ *  $Id$
+ */
+
+#include <assert.h>
+#include <stdlib.h>
+#include <string.h>
+#include "imfs.h"
+#include "libio_.h"
+
+IMFS_jnode_t *IMFS_create_node(
+  rtems_filesystem_location_info_t  *parent_loc,
+  IMFS_jnode_types_t                 type,
+  char                              *name,
+  mode_t                             mode,
+  IMFS_types_union                  *info
+)
+{
+  IMFS_jnode_t        *node;
+  struct timeval       tv;
+  IMFS_jnode_t        *parent = NULL;
+  IMFS_fs_info_t      *fs_info;
+  char                *sym_name;
+
+  if ( parent_loc != NULL )
+    parent = parent_loc->node_access;
+
+  /*
+   *  Allocate an IMFS jnode
+   */
+
+  node = calloc( 1, sizeof( IMFS_jnode_t ) );
+  if ( !node )
+    return NULL;
+
+  /*
+   *  Fill in the basic information
+   */
+
+  node->st_nlink = 1;
+  node->type     = type;
+  strncpy( node->name, name, NAME_MAX );
+
+  /*
+   *  Fill in the mode and permission information for the jnode structure.
+   */
+
+  node->st_mode = mode & ~rtems_filesystem_umask;
+  
+#if defined(RTEMS_POSIX_API)
+  node->st_uid = geteuid();
+  node->st_gid = getegid();
+#else
+  node->st_uid = 0;
+  node->st_gid = 0;
+#endif
+
+  /*
+   *  Now set all the times.
+   */
+
+  gettimeofday( &tv, 0 );
+
+  node->st_atime  = (time_t) tv.tv_sec;
+  node->st_mtime  = (time_t) tv.tv_sec;
+  node->st_ctime  = (time_t) tv.tv_sec;
+
+  /*
+   *  Set the type specific information
+   */
+
+  switch (type) {
+    case IMFS_DIRECTORY:
+      Chain_Initialize_empty(&node->info.directory.Entries);
+      break;
+
+    case IMFS_HARD_LINK:
+      node->info.hard_link.link_node = info->hard_link.link_node;
+      break;
+
+    case IMFS_SYM_LINK:
+      sym_name = calloc( 1, strlen( info->sym_link.name ) + 1 );
+      strcpy( sym_name, info->sym_link.name );
+      node->info.sym_link.name = sym_name;
+      break;
+
+    case IMFS_DEVICE:
+      node->info.device.major = info->device.major;
+      node->info.device.minor = info->device.minor;
+      break;
+
+    case IMFS_MEMORY_FILE:
+      node->info.file.size            = 0;
+      node->info.file.indirect        = 0;
+      node->info.file.doubly_indirect = 0;
+      node->info.file.triply_indirect = 0;
+      break;
+
+    default:
+      assert(0);
+      break;
+  }
+
+  /*
+   *  If this node has a parent, then put it in that directory list.
+   */
+
+  if ( parent ) {
+    Chain_Append( &parent->info.directory.Entries, &node->Node );
+    node->Parent = parent;
+
+    fs_info = parent_loc->mt_entry->fs_info;
+    node->st_ino = ++fs_info->ino_count;
+  }
+
+
+  return node;
+}