%%	options

copyright owner	=	Dirk Krause
copyright year	=	2011-2013
license		=	bsd



%%	module

#include "dk3all.h"



$(trace-include)


static dkChar const gn[] = { dkT("dkt3-test") } ;
static dkChar const dd[] = { "." };


static dkChar const * const kw[] = {
dkT("Directory: "),
dkT("     File: "),
dkT("     Size: "),
dkT("\n"),
NULL
};

static
void
show_entry(dk3_dir_t *d, int isdir)
{
  dk3_um_t	sz;

  dk3sf_fputs(kw[(isdir) ?  0 : 1], stdout);
  dk3sf_fputs(dk3dir_get_shortname(d), stdout);
  dk3sf_fputs(kw[3], stdout);
}



DK3_MAIN
{
  dk3_app_t *app;
  dkChar	mycmd[DK3_MAX_PATH];
  dkChar	wd[DK3_MAX_PATH];
  dkChar	tmpfile[DK3_MAX_PATH];
  dkChar const	*p;
  FILE		*fipo;
  dk3_dir_t	*dir;
  $(trace-init test-app.deb)
  $? "+ main"
  app = dk3app_open_command(argc, (dkChar const * const *)argv, gn);
  if(app) {
    if(argc > 1) {
      p = argv[1];
    } else {
      p = dd;
    }
    dir = dk3dir_open_app(p, app);
    if(dir) {
      while(dk3dir_get_next_directory(dir)) {
        show_entry(dir, 1);
      }
      while(dk3dir_get_next_file(dir)) {
        show_entry(dir, 0);
      }
      dk3dir_close(dir);
    }
    dk3app_close(app); app = NULL;
  }
  $? "- main"
  $(trace-end)
  exit(0); return 0;
}