test/dos/match.c

   1 /*
   2     Copyright © 1995-2016, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <exec/exec.h>
   7 #include <dos/dos.h>
   8 #include <dos/dosextens.h>
   9 #include <dos/dosasl.h>
  10 #include <proto/exec.h>
  11 #include <proto/dos.h>
  12
  13 #include <stdio.h>
  14 #include <string.h>
  15 #include <stdlib.h>
  16
  17 /****************************************************************************************/
  18
  19 static void showacflags(struct AChain *ac)
  20 {
  21     BYTE flags = ac->an_Flags;
  22
  23     printf("(");
  24
  25     if (flags & DDF_PatternBit)
  26     {
  27         flags &= ~DDF_PatternBit;
  28         printf("DDF_PatternBit ");
  29     }
  30
  31     if (flags & DDF_ExaminedBit)
  32     {
  33         flags &= ~DDF_ExaminedBit;
  34         printf("DDF_ExaminedBit ");
  35     }
  36
  37     if (flags & DDF_Completed)
  38     {
  39         flags &= ~DDF_Completed;
  40         printf("DDF_Completed ");
  41     }
  42
  43     if (flags & DDF_AllBit)
  44     {
  45         flags &= ~DDF_AllBit;
  46         printf("DDF_All ");
  47     }
  48
  49     if (flags & DDF_Single)
  50     {
  51          flags &= ~DDF_Single;
  52          printf("DDF_Single ");
  53     }
  54
  55     if (flags)
  56     {
  57          printf("UNKNOWN = %8x ", flags);
  58     }
  59
  60     printf(")");
  61 }
  62
  63 static void showaclist(struct AChain *ac)
  64 {
  65     while(ac)
  66     {
  67         printf("achain: address = %p flags = %x ", ac, ac->an_Flags);
  68         showacflags(ac);
  69         printf(" string=\"%s\"\n", ac->an_String);
  70         ac = ac->an_Child;
  71     }
  72
  73 }
  74
  75 /****************************************************************************************/
  76
  77 #define ARG_TEMPLATE "FILE/A,ALL/S"
  78 #define ARG_FILE 0
  79 #define ARG_ALL  1
  80 #define NUM_ARGS 2
  81
  82 /****************************************************************************************/
  83
  84 static char s[300];
  85 static char *filename;
  86 static BOOL all;
  87 static struct RDArgs *myargs;
  88 static IPTR args[NUM_ARGS];
  89
  90 /****************************************************************************************/
  91
  92 static void cleanup(char *msg)
  93 {
  94     if (msg) printf("newmatch: %s\n", msg);
  95
  96     if (myargs) FreeArgs(myargs);
  97
  98     exit(0);
  99 }
 100
 101 /****************************************************************************************/
 102
 103 static void doserror(void)
 104 {
 105     Fault(IoErr(), 0, s, 255);
 106     cleanup(s);
 107 }
 108
 109 /****************************************************************************************/
 110
 111 static void getarguments(void)
 112 {
 113     if (!(myargs = ReadArgs(ARG_TEMPLATE, args, 0)))
 114     {
 115         doserror();
 116     }
 117
 118     filename = (char *)args[ARG_FILE];
 119     all = args[ARG_ALL] ? TRUE : FALSE;
 120 }
 121
 122 /****************************************************************************************/
 123
 124 static void my_matchme(char *pattern, BOOL all)
 125 {
 126     struct AnchorPath stackap[2], *AP;
 127     LONG error = 0;
 128
 129     AP = (struct AnchorPath *)((((IPTR)stackap) + 3) & ~3);
 130
 131     memset(AP, 0, sizeof(struct AnchorPath));
 132
 133     error =  MatchFirst(pattern, AP);
 134
 135     if (error != 0)
 136     {
 137         printf("MatchFirst: error = %d\n", (int)error);
 138     }
 139     else
 140     {
 141         printf("direntrytype = %d\n", (int)AP->ap_Info.fib_DirEntryType);
 142         if (!(AP->ap_Flags & APF_ITSWILD) &&
 143              (AP->ap_Info.fib_DirEntryType > 0))
 144         {
 145              /* pattern was an explicitely named directory */
 146              AP->ap_Flags |= APF_DODIR;
 147         }
 148
 149         printf("ap_Flags = %x\n", AP->ap_Flags);
 150         NameFromLock(AP->ap_Current->an_Lock, s, 300);
 151         printf("BaseLock = \"%s\"\n", s);
 152
 153         showaclist(AP->ap_Base);
 154
 155         while(error == 0)
 156         {
 157             if (AP->ap_Flags & APF_DIDDIR)
 158             {
 159                 printf("DIDDIR: ");
 160             } else {
 161                 if (all && (AP->ap_Info.fib_DirEntryType > 0))
 162                 {
 163                     AP->ap_Flags |= APF_DODIR;
 164                     printf("DOING DIR: ");
 165                 }
 166             }
 167             printf("fib_FileName = \"%s\"\n", AP->ap_Info.fib_FileName);
 168
 169             error = MatchNext(AP);
 170         }
 171
 172     }
 173
 174     MatchEnd(AP);
 175
 176 }
 177
 178 /****************************************************************************************/
 179 /****************************************************************************************/
 180
 181 int main(void)
 182 {
 183     getarguments();
 184     my_matchme(filename, all);
 185     cleanup(0);
 186     return 0;
 187 }
 188
 189 /****************************************************************************************/