1 files changed, 299 insertions, 0 deletions
diff --git a/cpukit/libcsupport/src/mount.c b/cpukit/libcsupport/src/mount.c
new file mode 100644
index 0000000000..fa8cebc3f9
--- /dev/null
+++ b/cpukit/libcsupport/src/mount.c
@@ -0,0 +1,299 @@
+/*
+ *  mount()
+ *
+ *  XXX
+ *
+ *  XXX make sure no required ops are NULL 
+ *  XXX make sure no optional ops you are using are NULL 
+ *  XXX unmount should be required.
+ *
+ *  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 <sys/types.h>
+#include <sys/stat.h>
+#include <chain.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <errno.h>
+#include <stdlib.h>
+#include <string.h>
+#include <assert.h>
+
+#include "libio_.h"
+
+Chain_Control rtems_filesystem_mount_table_control;
+
+
+rtems_filesystem_limits_and_options_t IMFS_LIMITS_AND_OPTIONS = {
+   5,	/* link_max */
+   6,	/* max_canon */
+   7,	/* max_input */
+   255,	/* name_max */
+   255,	/* path_max */
+   2,	/* pipe_buf */
+   1,	/* posix_async_io */
+   2,	/* posix_chown_restrictions */
+   3,	/* posix_no_trunc */
+   4,	/* posix_prio_io */
+   5,	/* posix_sync_io */
+   6	/* posix_vdisable */
+};
+
+/*
+ *  XXX
+ */
+
+int search_mt_for_mount_point(
+  rtems_filesystem_location_info_t *location_of_mount_point
+);
+
+
+rtems_filesystem_options_t get_file_system_options(
+  char *fsoptions
+);
+
+int init_fs_mount_table( void );
+
+
+/*
+ *  XXX
+ */
+
+#define FOUND      0
+#define NOT_FOUND -1
+
+/*
+ *  mount
+ *
+ *  This routine will attempt to mount a new file system at the specified 
+ *  mount point. A series of tests will be run to determine if any of the 
+ *  following reasons exist to prevent the mount operation:
+ *
+ * 	1) The file system type or options are not valid
+ *	2) No new file system root node is specified
+ * 	3) The selected file system has already been mounted
+ * 	4) The mount point exists with the proper permissions to allow mounting
+ *	5) The selected mount point already has a file system mounted to it
+ *
+ */
+
+int mount(
+  rtems_filesystem_mount_table_entry_t **mt_entry,
+  rtems_filesystem_operations_table    *fs_ops,
+  char                                 *fsoptions,
+  char                                 *device,
+  char                                 *mount_point
+)
+{
+  rtems_filesystem_location_info_t      temp_loc;
+  rtems_filesystem_options_t            options;
+  rtems_filesystem_mount_table_entry_t *temp_mt_entry;
+
+/* XXX add code to check for required operations */
+
+  /*
+   *  Are the file system options valid?
+   */
+
+  options = get_file_system_options( fsoptions );
+  if ( options == RTEMS_FILESYSTEM_BAD_OPTIONS ){
+    errno = EINVAL;
+    return -1;
+  }
+
+  /*
+   *  Is the file system type valid?
+   */
+
+  if ( fs_ops == NULL ){
+    errno = EINVAL;
+    return -1;
+  }
+
+  /*
+   * Allocate a mount table entry 
+   */
+
+   temp_mt_entry = malloc( sizeof(rtems_filesystem_mount_table_entry_t) );
+
+   temp_mt_entry->mt_fs_root.mt_entry = temp_mt_entry;
+   temp_mt_entry->options = options;
+   if( device )
+      sprintf( temp_mt_entry->dev, "%s", device );
+   else
+      temp_mt_entry->dev = 0;
+
+  /*
+   *  The mount_point should be a directory with read/write/execute
+   *  permissions in the existing tree. 
+   */
+
+  if ( mount_point ) {
+     if ( rtems_filesystem_evaluate_path( 
+       mount_point, 
+       RTEMS_LIBIO_PERMS_RWX,
+       &temp_loc ,
+       TRUE ) == -1 )
+       goto cleanup_and_bail;
+
+     /* 
+      * Test to see if it is a directory
+      */
+
+     if ( temp_loc.ops->node_type( &temp_loc ) != RTEMS_FILESYSTEM_DIRECTORY ){ 
+       errno = ENOTDIR;
+       goto cleanup_and_bail;
+     }
+
+     /*
+      *  You can only mount one file system onto a single mount point.
+      */
+
+     if ( search_mt_for_mount_point( &temp_loc ) == FOUND ){
+       errno = EBUSY;
+       goto cleanup_and_bail;
+     }
+ 
+     /*
+      * This must be a good mount point, so move the location information
+      * into the allocated mount entry
+      */
+
+     temp_mt_entry->mt_point_node.node_access = temp_loc.node_access;
+     temp_mt_entry->mt_point_node.handlers = temp_loc.handlers;
+     temp_mt_entry->mt_point_node.ops = temp_loc.ops;
+     temp_mt_entry->mt_point_node.mt_entry = temp_loc.mt_entry;
+
+     /* 
+      * This link to the parent is only done when we are dealing with system 
+      * below the base file system 
+      */
+
+     if ( !temp_loc.ops->mount ){
+      errno = ENOTSUP;
+      goto cleanup_and_bail;
+     }
+
+     if ( temp_loc.ops->mount( temp_mt_entry ) ) {
+        goto cleanup_and_bail;
+     }
+  }
+  else {
+
+     /* 
+      * This is a mount of the base file system --> The 
+      * mt_point_node.node_access will be set to null to indicate that this 
+      * is the root of the entire file system.
+      */
+
+      temp_mt_entry->mt_fs_root.node_access = NULL;
+      temp_mt_entry->mt_fs_root.handlers = NULL;
+      temp_mt_entry->mt_fs_root.ops = NULL;
+
+      temp_mt_entry->mt_point_node.node_access = NULL;
+      temp_mt_entry->mt_point_node.handlers = NULL;
+      temp_mt_entry->mt_point_node.ops = NULL;
+      temp_mt_entry->mt_point_node.mt_entry = NULL;
+  }
+
+  if ( !fs_ops->fsmount_me ){
+      errno = ENOTSUP;
+      goto cleanup_and_bail;
+  }
+
+  if ( fs_ops->fsmount_me( temp_mt_entry ) )
+      goto cleanup_and_bail;
+
+  /*
+   * Add the mount table entry to the mount table chain 
+   */
+
+  Chain_Append( &rtems_filesystem_mount_table_control, &temp_mt_entry->Node );
+
+  *mt_entry = temp_mt_entry;
+  return 0;
+
+cleanup_and_bail:
+
+  free( temp_mt_entry );
+  return -1;
+}
+
+
+
+/*
+ *  init_fs_mount_table
+ *
+ *  This routine will initialize the chain control element that manages the
+ *  mount table chain.
+ */
+
+int init_fs_mount_table()
+{
+  Chain_Initialize_empty ( &rtems_filesystem_mount_table_control );
+  return 0;
+}
+
+/*
+ *  get_file_system_options
+ *
+ *  This routine will determine is the text string that represents the options
+ *  that are to be used to mount the file system are actually valid. If the
+ *  options are valid the appropriate file system options type will be returned
+ *  to the calling routine.
+ */
+
+rtems_filesystem_options_t get_file_system_options(
+  char *fsoptions
+)
+{
+  if ( strcmp( "RO", strupr( fsoptions ) ) == 0 )
+    return RTEMS_FILESYSTEM_READ_ONLY;
+  if ( strcmp( "RW", strupr( fsoptions ) ) == 0 )
+    return RTEMS_FILESYSTEM_READ_WRITE_ONLY;
+  else
+    return RTEMS_FILESYSTEM_BAD_OPTIONS;
+}
+
+
+
+/*
+ *  search_mt_for_mount_point
+ *
+ *  This routine will run through the entries that currently exist in the
+ *  mount table chain. For each entry in the mount table chain it will
+ *  compare the mount tables mt_point_node to the node describing the selected
+ *  mount point.. If any of the mount table file system mount point nodes
+ *  match the new file system selected mount point node, we are attempting
+ *  to mount the new file system onto a node that already has a file system
+ *  mounted to it. This is not a permitted operation.
+ */
+
+int search_mt_for_mount_point(
+  rtems_filesystem_location_info_t *location_of_mount_point
+)
+{
+  Chain_Node  *the_node;
+  rtems_filesystem_mount_table_entry_t *the_mount_entry;
+
+  for ( the_node = rtems_filesystem_mount_table_control.first;
+        !Chain_Is_tail( &rtems_filesystem_mount_table_control, the_node );
+        the_node = the_node->next ) {
+
+     the_mount_entry = (rtems_filesystem_mount_table_entry_t *) the_node;
+     if ( the_mount_entry->mt_point_node.node_access  == 
+             location_of_mount_point->node_access )
+        return FOUND;
+  }
+  return NOT_FOUND;
+}
+