psmile_io_scandir.c File Reference

#include <sys/types.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <dirent.h>
#include "PSMILe_f2c.h"

Include dependency graph for psmile_io_scandir.c:

Go to the source code of this file.

Defines
#define	__SYSV
#define	__MYALPHASORT   alphasort
Functions/Subroutines
void	__psmile_io_scandir (char *basename, int len_of_basename, char *file_list, int len_of_list_entry, int len_of_list, int *no_of_files, int *ierror)
void	__psmile_io_scandir_no_of_files (char *basename, int len_of_basename, int *no_of_files, int *ierror)
void	psmile_io_scandir (char *basename, char *file_list, int *len_of_list, int *no_of_files, int *ierror, int len_of_basename, int len_of_list_entry)
void	psmile_io_scandir_no_of_files (char *basename, int *no_of_files, int *ierror, int len_of_basename)

---

Define Documentation

#define __MYALPHASORT   alphasort

Definition at line 32 of file psmile_io_scandir.c.

Referenced by __psmile_io_scandir(), and __psmile_io_scandir_no_of_files().

#define __SYSV

Definition at line 1 of file psmile_io_scandir.c.

---

Function Documentation

void __psmile_io_scandir	(	char *	basename,
		int	len_of_basename,
		char *	file_list,
		int	len_of_list_entry,
		int	len_of_list,
		int *	no_of_files,
		int *	ierror
	)

Definition at line 45 of file psmile_io_scandir.c.

References __MYALPHASORT, and n.

Referenced by psmile_io_scandir().

                                        {
/*
  !LOCAL VARIABLES:
#if defined(__SYSV) || defined(__Linux)
           struct dirent **namelist;
#else
           struct direct **namelist;
#endif
           int n, entry=0;
           int offset=len_of_list_entry;
           size_t len=len_of_basename;

  !DESCRIPTION:
   Routine lists all files of a given basename in the current directory.

  !REVISION HISTORY:

    Date      Programmer   Description
  ----------  ----------   -----------
  31.10.03    R. Vogelsang created
  
//EOP
*/
           static char mycvs[80]="$Id: psmile_io_scandir.c 2325 2010-04-21 15:00:07Z valcke $";

#if defined(__SYSV) || defined(__Linux)
           struct dirent **namelist;
#else
           struct direct **namelist;
#endif
           int n, entry=0;
           int offset=len_of_list_entry;
           size_t len=len_of_basename;

           printf("%s %d %d %d \n",basename ,len_of_basename,len_of_list_entry,len_of_list);
           

#if defined(__SYSV) || defined(__Linux)
           n = scandir(".", &namelist, 0, __MYALPHASORT);
#else
           n = scandir(".", &namelist, 0, __MYALPHASORT);
#endif
           if (n < 0) {
               perror("psmile_io_scandir: The directory contains no files!");
               *ierror=999;
           } else {
               while(n--) {
                   if( ! strncmp(basename,namelist[n]->d_name,len)){
/*          printf("%s\n", namelist[n]->d_name);*/
                        if( entry < len_of_list ) {
                          strncpy(file_list + entry * offset
                                 ,namelist[n]->d_name
                                 ,strlen(namelist[n]->d_name));
                        }
                        entry++;
                    }       
                   free(namelist[n]);
               }
               free(namelist);
           }
           *no_of_files=entry;
       }

Here is the caller graph for this function:

void __psmile_io_scandir_no_of_files	(	char *	basename,
		int	len_of_basename,
		int *	no_of_files,
		int *	ierror
	)

Definition at line 113 of file psmile_io_scandir.c.

References __MYALPHASORT, and n.

Referenced by psmile_io_scandir_no_of_files().

                                        {
#if defined(__SYSV) || defined(__Linux)
           struct dirent **namelist;
#else
           struct direct **namelist;
#endif
           int n, entry=0;
           size_t len=len_of_basename;
           printf("%s %d \n",basename ,len_of_basename);
           

#if defined(__SYSV) || defined(__Linux)
           n = scandir(".", &namelist, 0, __MYALPHASORT);
#else
           n = scandir(".", &namelist, 0, __MYALPHASORT);
#endif
           if (n < 0) {
               perror("psmile_io_scandir: The directory contains no files!");
               *ierror=999;
           } else {
               while(n--) {
                   if( ! strncmp(basename,namelist[n]->d_name,len)){
/*          printf("%s\n", namelist[n]->d_name);*/
                        entry++;
                    }       
                   free(namelist[n]);
               }
               free(namelist);
           }
           *no_of_files=entry;
       }

Here is the caller graph for this function:

void psmile_io_scandir	(	char *	basename,
		char *	file_list,
		int *	len_of_list,
		int *	no_of_files,
		int *	ierror,
		int	len_of_basename,
		int	len_of_list_entry
	)

Definition at line 149 of file psmile_io_scandir.c.

References __psmile_io_scandir().

Referenced by psmile_open_file_byid().

                                                  {

            __psmile_io_scandir( basename
                              , len_of_basename
                              , file_list
                  , len_of_list_entry
                  ,*len_of_list
                  , no_of_files
                  , ierror);

       }

Here is the call graph for this function:

Here is the caller graph for this function:

void psmile_io_scandir_no_of_files	(	char *	basename,
		int *	no_of_files,
		int *	ierror,
		int	len_of_basename
	)

Definition at line 166 of file psmile_io_scandir.c.

References __psmile_io_scandir_no_of_files().

Referenced by psmile_open_file_byid().

                                                {

            __psmile_io_scandir_no_of_files( basename
                              , len_of_basename
                  , no_of_files
                  , ierror);

       }

Here is the call graph for this function:

Here is the caller graph for this function: