This is an old version from the tos.hyp. The new is on GitHub!

8.10 Extended file-selectors

The following functions were introduced with MagiC 4, and permit management of the file-selector:

Note: The existence of these functions can be checked with a call of appl_getinfo (opcode 7).

The main advantage of using these routines lies in the ability of the functions specified here to work also with alternative file-systems (catchword: long filenames).

See also:
File-selector as a dialog   File-selector in a window   Operation of file-selectors

8.10.1 fslx_close

8.10.1.1 Bindings for fslx_close

int16_t fslx_close ( void *fsd )
{
   addr_in[0] = fsd;
   crys_if (191);

   return ( int_out[0] );
}

8.10.2 fslx_do

8.10.2.1 Bindings for fslx_do

void *fslx_do ( int8_t *title, int8_t *path, int16_t pathlen,
                int8_t *fname, int16_t fnamelen, int8_t *patterns,
                XFSL_FILTER *filter, int8_t *paths,
                int16_t *sort_mode, int16_t flags, int16_t *button,
                int16_t *nfiles, int8_t **pattern )
{
   addr_in[0] = title;
   addr_in[1] = path;
   addr_in[2] = fname;
   addr_in[3] = patterns;
   addr_in[4] = filter;
   addr_in[5] = paths;

   int_in[0] = pathlen;
   int_in[1] = fnamelen;
   int_in[2] = *sort_mode;
   int_in[3] = flags;

   crys_if (194);

   *button    = int_out[1];
   *nfiles    = int_out[2];
   *sort_mode = int_out[3];
   *pattern   = addr_out[1];

   return ( (void *) addr_out[0] );
}

8.10.3 fslx_evnt

8.10.3.1 Bindings for fslx_evnt

int16_t fslx_evnt ( void *fsd, EVNT *events, int8_t *path,
                    int8_t *fname, int16_t *button, int16_t *nfiles,
                    int16_t *sort_mode, int8_t **pattern )
{
   addr_in[0] = fsd;
   addr_in[1] = events;
   addr_in[2] = path;
   addr_in[3] = fname;

   crys_if (193);

   *button    = int_out[1];
   *nfiles    = int_out[2];
   *sort_mode = int_out[3];
   *pattern   = addr_out[0];

   return ( int_out[0] );
}

8.10.4 fslx_getnxtfile

8.10.4.1 Bindings for fslx_getnxtfile

int16_t fslx_getnxtfile ( void *fsd, int8_t *fname )
{
   addr_in[0] = fsd;
   addr_in[1] = fname;

   crys_if (192);

   return ( int_out[0] );
}

8.10.5 fslx_open

8.10.5.1 Bindings for fslx_open

void *fslx_open ( int8_t *title, int16_t x, int16_t y, int16_t *whdl,
                  int8_t *path, int16_t pathlen, int8_t *fname,
                  int16_t fnamelen, int8_t *patterns,
                  XFSL_FILTER *filter, int8_t *paths,
                  int16_t sort_mode, int16_t flags )
{
   addr_in[0] = title;
   addr_in[1] = path;
   addr_in[2] = fname;
   addr_in[3] = patterns;
   addr_in[4] = filter;
   addr_in[5] = paths;

   int_in[0] = x;
   int_in[1] = y;
   int_in[2] = pathlen;
   int_in[3] = fnamelen;
   int_in[4] = sort_mode;
   int_in[5] = flags;

   crys_if (190);

   *whdl = int_out[0];
   return ( (void *) addr_out[0] );
}

8.10.6 fslx_set_flags

8.10.6.1 Bindings for fslx_set_flags

int16_t fslx_set_flags ( int16_t flags, int16_t *oldval )
{
   int_in[0] = 0;
   int_in[1] = flags;

   crys_if (195);

   *oldval = int_out[1];
   return ( int_out[0] );
}

8.10.7 Operation of file-selectors from MagiC 4 onwards

MagiC as from Version 4.0 makes its own file-selector box available, which apart from support of long filenames also offers some operating niceties otherwise known only from alternative file-selectors. The following table gives a synopsis of the more important shortcuts:

There are some things to note for the operation of the buttons too: A double-click on the 'parent' field jumps back to the root directory. A click on a line selects the object. In cases where several files are selectable (can be influenced through the system call), these can be selected with a [Shift]-click.
In each case one can deselect one file with [Shift]-click.

Further, one should note:

• Long filenames are returned only if the caller has signalled beforehand with Pdomain(1) that he could do something with them.

• When selecting a folder with [Return], the input field will be cleared. If nothing is selected, then 'Cursor down' selects the first line, 'Cursor up' the last line.

• With the old calls fsel_(ex)input, the sort-mode is set during booting to 'By name' and later stored in a global variable, i.e. the last set sort-mode is saved until the next boot process.

• With the old function fsel_(ex)input the mask '*.*' instead of '*' may be returned in some cases.

See also: Key assignments

8.10.8 File-selector as a dialog

fsel = fslx_do(..., &button, &nfiles, ...);

if (fsel) /* Was the selector open? */
{
   if (button)
   {
      while (--nfiles) /* Several files? */
         fslx_getnxtfile(...);   /* Get them all */
   }

   fslx_close(fsel); /* Release everything again */
}

8.10.9 File-selector in a window

fsel = fslx_open(...);
if (fsel)
{
   do {
      evnt.mwhich = evnt_multi(...);
      rv = fslx_evnt(fsel, &evnt, ..., &nfiles, ...);

      /* Evaluate bits for own windows/menus */
   } while (rv);

   while (--nfiles) fslx_getnxtfile(...);
   fslx_close(fsel);
}