Added tests in support of the file system infrastructure.

3 files changed, 601 insertions, 0 deletions

diff --git a/testsuites/psxtests/psxreaddir/main.c b/testsuites/psxtests/psxreaddir/main.c
new file mode 100644
index 0000000000..0e8d54fc31
--- /dev/null
+++ b/testsuites/psxtests/psxreaddir/main.c
@@ -0,0 +1,29 @@
+/*
+ *  Simple test program -- simplified version of sample test hello.
+ */
+
+#define TEST_INIT
+
+#include <bsp.h>
+
+void test_main( void );
+
+rtems_task Init(
+  rtems_task_argument ignored
+)
+{
+  test_main();
+  exit( 0 );
+}
+
+/* configuration information */
+
+#define CONFIGURE_TEST_NEEDS_CONSOLE_DRIVER
+
+#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
+
+#define CONFIGURE_INIT
+
+#include <confdefs.h>
+
+/* end of file */
diff --git a/testsuites/psxtests/psxreaddir/psxreaddir.scn b/testsuites/psxtests/psxreaddir/psxreaddir.scn
new file mode 100644
index 0000000000..5d6011e3cc
--- /dev/null
+++ b/testsuites/psxtests/psxreaddir/psxreaddir.scn
@@ -0,0 +1,156 @@
+

+

+*** READDIR TEST ***

+

+chdir to the root directory

+chdir() status : 0

+

+

+Creating a series of directories under /

+Creating directory: a      0 0    Success

+Creating directory: b      0 0    Success

+Creating directory: c      0 0    Success

+Creating directory: d      0 0    Success

+Creating directory: e      0 0    Success

+Creating directory: f      0 0    Success

+Creating directory: c/y      0 0    Success

+Creating directory: c/z      0 0    Success

+Creating directory: c/x      0 0    Success

+Creating directory: c/y/a3333      0 0    Success

+Creating directory: c/y/j123      0 0    Success

+

+Performing stat of directory /

+status for stat : 0, size of directory: 196

+

+

+Opening directory /

+         name               inode   offset   reclen  type

+    dev                         1        0     28   0x001c

+    a                           1       28     28   0x001c

+    b                           1       56     28   0x001c

+    c                           1       84     28   0x001c

+    d                           1      112     28   0x001c

+    e                           1      140     28   0x001c

+    f                           1      168     28   0x001c

+

+Opening directory /c

+         name               inode   offset   reclen  type

+    y                           1        0     28   0x001c

+    z                           1       28     28   0x001c

+    x                           1       56     28   0x001c

+

+Opening directory /c/y

+         name               inode   offset   reclen  type

+    a3333                       1        0     28   0x001c

+    j123                        1       28     28   0x001c

+

+LSEEK to the start of the open directory

+         name               inode   offset   reclen  type

+    dev                         1        0     28   0x001c

+    a                           1       28     28   0x001c

+    b                           1       56     28   0x001c

+    c                           1       84     28   0x001c

+    d                           1      112     28   0x001c

+    e                           1      140     28   0x001c

+    f                           1      168     28   0x001c

+

+Rewinding directory

+         name               inode   offset   reclen  type

+    dev                         1        0     28   0x001c

+    a                           1       28     28   0x001c

+    b                           1       56     28   0x001c

+    c                           1       84     28   0x001c

+    d                           1      112     28   0x001c

+    e                           1      140     28   0x001c

+    f                           1      168     28   0x001c

+

+Seek directory

+telldir() should report only sizeof(struct dirent) increments 

+in position. Sizeof(struct dirent): 28

+seeked to  0 -- currently at  0

+seeked to  7 -- currently at  0

+seeked to 14 -- currently at  0

+seeked to 21 -- currently at  0

+seeked to 28 -- currently at 28

+seeked to 35 -- currently at 28

+seeked to 42 -- currently at 28

+seeked to 49 -- currently at 28

+seeked to 56 -- currently at 56

+seeked to 63 -- currently at 56

+seeked to 70 -- currently at 56

+seeked to 77 -- currently at 56

+seeked to 84 -- currently at 84

+seeked to 91 -- currently at 84

+seeked to 98 -- currently at 84

+seeked to 105 -- currently at 84

+seeked to 112 -- currently at 112

+seeked to 119 -- currently at 112

+seeked to 126 -- currently at 112

+seeked to 133 -- currently at 112

+seeked to 140 -- currently at 140

+seeked to 147 -- currently at 140

+seeked to 154 -- currently at 140

+seeked to 161 -- currently at 140

+seeked to 168 -- currently at 168

+seeked to 175 -- currently at 168

+seeked to 182 -- currently at 168

+seeked to 189 -- currently at 168

+seeked to 196 -- currently at 196

+

+Closing directory

+

+SCANDIR TEST

+

+selection rule 1

+scanning for any entry under directory /c

+

+SCANDIR SELECT1 accepts  nodename: y

+SCANDIR SELECT1 accepts  nodename: z

+SCANDIR SELECT1 accepts  nodename: x

+

+scandir status: 3

+Selected Node Name: y

+Selected Node Name: z

+Selected Node Name: x

+

+selection rule 2

+scanning for any entry under directory /c whose name = y

+

+SCANDIR SELECT accepted nodename: y

+SCANDIR SELECT rejected nodename: z

+SCANDIR SELECT rejected nodename: x

+

+scandir status: 1

+Selected Node Name: y

+

+SCANDIR with sorting

+

+selection rule 1

+scanning for any entry under directory /c

+sort in ascending order

+

+SCANDIR SELECT1 accepts  nodename: y

+SCANDIR SELECT1 accepts  nodename: z

+SCANDIR SELECT1 accepts  nodename: x

+

+scandir status: 3

+Selected and Sorted Node Name: x

+Selected and Sorted Node Name: y

+Selected and Sorted Node Name: z

+

+SCANDIR with sorting

+

+selection rule 1

+scanning for any entry under directory /c

+sort in descending order

+

+SCANDIR SELECT1 accepts  nodename: y

+SCANDIR SELECT1 accepts  nodename: z

+SCANDIR SELECT1 accepts  nodename: x

+scandir status: 3

+Selected and Sorted Node Name: z

+Selected and Sorted Node Name: y

+Selected and Sorted Node Name: x

+

+

+*** END OF READDIR TEST ***

diff --git a/testsuites/psxtests/psxreaddir/test.c b/testsuites/psxtests/psxreaddir/test.c
new file mode 100644
index 0000000000..be5751d580
--- /dev/null
+++ b/testsuites/psxtests/psxreaddir/test.c
@@ -0,0 +1,416 @@
+/*
+ *  This is a native test to explore how the readdir() family works.
+ *  Newlib supports the following readdir() family members:
+ *
+ *    closedir()   - 
+ *    readdir()    - 
+ *    scandir()    - 
+ *    opendir()    - 
+ *    rewinddir()  - 
+ *    telldir()    - BSD not in POSIX 
+ *    seekdir()    - BSD not in POSIX
+ *
+ *
+ *  seekdir() takes an offset which is a byte offset.  The Linux
+ *  implementation of this appears to seek to the ((off/DIRENT_SIZE) + 1)
+ *  record where DIRENT_SIZE seems to be 12 bytes.
+ *
+ *
+ *
+ *  $Id$
+ */
+#include <stdio.h>
+#include <sys/types.h>
+#include <fcntl.h>
+#include <dirent.h>
+#include <string.h>
+#include <assert.h>
+#include <unistd.h>
+#include <errno.h>
+
+#include "/usr1/rtems/mg10/rtems-mg10/c/src/lib/libc/libio_.h"
+
+DIR *directory;
+DIR *directory2;
+DIR *directory3;
+DIR *directory_not;
+
+#ifndef __P
+#define __P(args)()
+#endif
+
+int scandir ( const char *dirname,
+   struct dirent *** namelist,
+   int (*select) __P((struct dirent *)),
+   int (*dcomp) __P((const void *, const void *))
+);
+
+#if defined(__rtems__)
+#define d_type d_reclen
+#endif
+
+void printdir( DIR *directory )
+{
+  struct dirent *d;
+
+  printf( "    %-20s %8s %8s %8s %4s\n",
+     "     name", "inode", " offset", "reclen", " type" );
+  d = readdir(directory);
+  
+  while (d) {
+    printf( "    %-20s %8d %8d %6d   0x%04x\n",
+       d->d_name, (int)d->d_ino, (int)d->d_off, d->d_reclen, d->d_type );
+    d = readdir(directory);
+
+  }
+}
+
+char *many_files[] = {
+	"a",
+        "b",
+        "c",
+        "d",
+        "e",
+        "f",
+        "g",
+        "h",
+        "i",
+        "j",
+        "k",
+        "l",
+        "m",
+        "n",
+        "o",
+        "p",
+        "q",
+        "r",
+        "s",
+        "t",
+        "u",
+        "v",
+        "w",
+        "x",
+        "y",
+        "z",
+        "aa",
+        "ab",
+        "ac",
+        "ad",
+        "ae",
+        "af",
+        "ag",
+        "ah",
+        "ai",
+        "aj",
+        "ak",
+        "al",
+        "am",
+        "an",
+        "ao",
+        "ap",
+        "aq",
+        "ar"
+};
+
+char *dnames[] = {
+	"a",
+	"b",
+	"c",
+	"d",
+	"e",
+	"f",
+	"c/y",
+	"c/z",
+	"c/x",
+	"c/y/a3333",
+	"c/y/j123",
+        "END"
+};
+
+int select1 ( struct dirent *entry )
+{
+   printf("SCANDIR SELECT1 accepts  nodename: %s\n", entry->d_name );
+   return 1;
+}
+
+int select2 ( struct dirent *entry )
+{
+   if( strcmp( entry->d_name, "y") == 0 ) {
+      printf("SCANDIR SELECT accepted nodename: %s\n", entry->d_name );
+      return 1;
+   }
+   printf("SCANDIR SELECT rejected nodename: %s\n", entry->d_name );
+   return 0;
+}
+
+int compare_ascending( struct dirent **a, struct dirent **b )
+{
+   int i;
+
+   i = strcmp (
+      (char *)((struct dirent *)(*a)->d_name),
+      (char *)((struct dirent *)(*b)->d_name)
+   );
+   return i;
+}
+
+
+int compare_descending( struct dirent **a, struct dirent **b )
+{
+   int i;
+
+   i = strcmp (
+      (char *)((struct dirent *)(*b)->d_name),
+      (char *)((struct dirent *)(*a)->d_name)
+   );
+
+   return i;
+}
+
+#if defined(__rtems__)
+int test_main(void)
+#else
+int main(
+  int argc,
+  char **argv
+)
+#endif
+{
+  int fd;
+  int i;
+  int status;
+  off_t off;
+  struct dirent *d_not;
+  struct dirent **namelist;
+  struct stat s;
+
+
+  printf( "\n\n*** READDIR TEST ***\n" );
+
+  printf( "\nchdir to the root directory\n" );
+  status = chdir( "/" );
+  printf( "chdir() status : %d\n\n", status );
+
+  printf( "\nCreating a series of directories under /\n" );
+  i=0;
+  while ( strcmp(dnames[i], "END") != 0 )
+  {
+     status = mkdir( dnames[i], 0x1c0 );
+     printf("Creating directory: %s      %d %d   ", dnames[i], status, errno );
+     if ( errno == 0 )
+        printf(" Success\n");
+     else
+        printf(" Failure\n");
+
+     i++;
+  }
+
+  status = mkdir( "/many", 0x1c0 );
+  status = chdir( "/many" ); 
+  for (i = 0; i<=44; i++) {
+    fd = open (many_files[i], O_CREAT);
+    close (fd);
+  }
+  directory_not = opendir( "/many" );
+  printdir ( directory_not );
+  d_not = readdir( directory_not );
+
+  fd = open ("/b/my_file", O_CREAT);
+  assert( fd != -1 );
+  close (fd);
+
+  status = scandir(
+     "/b/my_file",
+     &namelist,
+     select1,
+     NULL
+  );
+
+  fd  = open( "/b/new_file", O_CREAT );
+  assert( fd != -1 );
+
+  status = fcntl( fd, F_SETFD, 1 );
+  assert( status == 0 );
+  status = fcntl( fd, F_GETFD, 1 );
+  assert( status == 1 );
+
+  status = fcntl( fd, F_DUPFD, 1 );
+  assert ( status == -1 );
+
+  status = fcntl( fd, F_GETFL, 1 );
+  assert ( status == -1 );
+
+  status = fcntl( fd, F_SETFL, 1 );
+  assert ( status == -1 );
+
+  status = fcntl( fd, F_GETLK, 1 );
+  assert ( status == -1 );
+
+  status = fcntl( fd, F_SETLK, 1 );
+  assert ( status == -1 );
+
+  status = fcntl( fd, F_SETLKW, 1 );
+  assert ( status == -1 );
+
+  status = fcntl( fd, F_SETOWN, 1 );
+  assert ( status == -1 );
+
+  status = fcntl( fd, F_GETOWN, 1 );
+  assert ( status == -1 );
+
+  status = fcntl( fd, 0xb, 1 );
+  assert( status == -1 );
+
+  directory_not = opendir ("/b/my_file");
+  d_not = readdir(directory_not);
+
+  directory_not = opendir ("/a");
+  d_not = readdir (directory_not);
+
+  status = chdir ("/b/my_file");
+  assert (status == -1);
+
+  printf( "\nPerforming stat of directory /\n");
+  status = stat( "/", &s );
+  printf("status for stat : %d, size of directory: %d\n\n",
+         status,(int)s.st_size);
+
+  puts( "\nOpening directory /" );
+  directory = opendir("/");
+
+  assert( directory );
+
+  printdir(directory);
+
+  printf("\nmkdir /d/my_dir\n");
+  status = mkdir( "/d/my_dir", 0x1c0 );
+  printf("Open /d/my_dir\n");
+  directory_not = opendir( "/d/my_dir" );
+  assert( directory_not );
+
+  printf( "remove /d/my_dir.\n" );
+  status = rmdir( "/d/my_dir" );
+  assert( status == 0 );
+
+  printf( "close /d/my_dir.\n" );
+  closedir( directory_not );
+
+  printf( "\nOpening directory /c\n" );
+  directory2 = opendir("/c");
+
+  assert( directory2 );
+
+  printdir(directory2);
+  status = closedir( directory2 );
+
+  printf( "\nOpening directory /c/y\n" );
+  directory3 = opendir("/c/y");
+
+  assert( directory3 );
+
+  printdir(directory3);
+  status = closedir( directory3 );
+
+  printf( "\nLSEEK to the start of the open directory\n" );
+  lseek( directory->dd_fd, 0, SEEK_SET );
+  printdir(directory);
+
+  lseek( directory->dd_fd, 0, SEEK_CUR );
+
+  lseek( directory->dd_fd, 0, SEEK_END );
+
+  lseek( directory->dd_fd, 0, -99 );
+
+  printf( "\nRewinding directory\n" );
+  rewinddir( directory );
+  printdir(directory);
+
+/* Don't know how to check this one automatically. */
+  printf( "Send rewinddir a NULL pointer\n");
+  rewinddir( NULL );
+
+  printf( "\nSeek directory\n" );
+  printf( "telldir() should report only sizeof(struct dirent) increments \n" );
+  printf( "in position. Sizeof(struct dirent): %d\n", sizeof(struct dirent) );
+  rewinddir( directory );
+  for( off=0 ; off<=200 ; off=off + sizeof(struct dirent) / 4 ) {
+    seekdir( directory, off );
+    printf( 
+       "seeked to %2d -- currently at %2d\n", 
+       (int)off, 
+       (int)telldir(directory) 
+    );
+  }
+
+  seekdir( NULL, off );
+
+  printf( "\nClosing directory\n" );
+  status = closedir( directory );
+
+  printf( "\nSCANDIR TEST\n");
+  printf( "\nselection rule 1\n");
+  printf( "scanning for any entry under directory /c\n\n");
+  status = scandir(
+     "/c",
+     &namelist,
+     select1,
+     NULL
+  );
+  printf("\nscandir status: %d\n", status );
+  for ( i=0; i<status; i++)
+  {
+     printf("Selected Node Name: %s\n", namelist[i]->d_name );
+  }
+
+  printf( "\nselection rule 2\n");
+  printf( "scanning for any entry under directory /c whose name = y\n\n");
+  status = scandir(
+     "/c",
+     &namelist,
+     select2,
+     NULL
+  );
+  printf("\nscandir status: %d\n", status );
+  for ( i=0; i<status; i++)
+  {
+     printf("Selected Node Name: %s\n", namelist[i]->d_name );
+  }
+
+  printf( "\nSCANDIR with sorting\n" );
+  printf( "\nselection rule 1\n");
+  printf( "scanning for any entry under directory /c\n");
+  printf( "sort in ascending order\n\n");
+  status = scandir(
+     "/c",
+     &namelist,
+     select1,
+     compare_ascending
+  );
+  printf("\nscandir status: %d\n", status );
+  for ( i=0; i<status; i++)
+  {
+     printf("Selected and Sorted Node Name: %s\n", namelist[i]->d_name );
+  }
+
+
+  printf( "\nSCANDIR with sorting\n" );
+  printf( "\nselection rule 1\n");
+  printf( "scanning for any entry under directory /c\n");
+  printf( "sort in descending order\n\n");
+  status = scandir(
+     "/c",
+     &namelist,
+     select1,
+     compare_descending
+  );
+  printf("scandir status: %d\n", status );
+  for ( i=0; i<status; i++)
+  {
+     printf("Selected and Sorted Node Name: %s\n", namelist[i]->d_name );
+  }
+
+
+  printf( "\n\n*** END OF READDIR TEST ***\n" );
+  exit(0);
+}
+