workbench/c/Identify/main.c

   1 /*
   2     Copyright © 2004, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: File Identifier/starter
   6     Lang: English
   7 */
   8 /******************************************************************************
   9
  10
  11     NAME
  12
  13         Identify
  14
  15     SYNOPSIS
  16
  17         FILE/M/A, VERBOSE/S
  18
  19     LOCATION
  20
  21         Sys:C
  22
  23     FUNCTION
  24
  25         Identifies the file type or directory
  26
  27     INPUTS
  28
  29         FILE    -- file to be recognized
  30         VERBOSE   -- activates verbose output
  31
  32     RESULT
  33
  34     NOTES
  35
  36     EXAMPLE
  37
  38         Identify s:startup-sequenceS:startup-sequence
  39         > Text/Ascii
  40
  41         (This will identify the startup-sequence as a text file.)
  42
  43     BUGS
  44
  45     SEE ALSO
  46
  47         AddDatatypes
  48
  49     INTERNALS
  50
  51     HISTORY
  52
  53 ******************************************************************************/
  54
  55 #include <proto/dos.h>
  56 #include <proto/datatypes.h>
  57 #include <datatypes/datatypes.h>
  58
  59 #include <stdio.h>
  60
  61 enum
  62 {
  63     ARG_FILE,
  64     ARG_VERBOSE,
  65     ARG_COUNT
  66 };
  67
  68 #define ERROR_HEADER "Identify"
  69
  70 /*** Prototypes *************************************************************/
  71 int          identify(CONST_STRPTR filename, BOOL verbose);
  72 CONST_STRPTR gid2string(ULONG gid);
  73
  74 /*** Functions **************************************************************/
  75 int main(void)
  76 {
  77     int            rc              = RETURN_OK;
  78     struct RDArgs *rdargs          = NULL;
  79     IPTR           args[ARG_COUNT] = { 0 };
  80
  81     if ((rdargs = ReadArgs("FILE/M/A,VERBOSE/S", args, NULL)) != NULL)
  82     {
  83         CONST_STRPTR *files = (CONST_STRPTR *) args[ARG_FILE], file;
  84
  85         while ((file = *files++) != NULL)
  86         {
  87             if (identify(file, args[ARG_VERBOSE]) != RETURN_OK)
  88             {
  89                 rc = RETURN_WARN;
  90             }
  91         }
  92
  93         FreeArgs(rdargs);
  94     }
  95     else
  96     {
  97         PrintFault(IoErr(), ERROR_HEADER);
  98         rc = RETURN_FAIL;
  99     }
 100
 101     return rc;
 102 }
 103
 104 int identify(CONST_STRPTR filename, BOOL verbose)
 105 {
 106     int  rc   = RETURN_OK;
 107     BPTR lock = Lock(filename, ACCESS_READ);
 108
 109     if (lock != NULL)
 110     {
 111         struct DataType *dt = ObtainDataType(DTST_FILE, lock, TAG_DONE);
 112         if (dt != NULL)
 113         {
 114             struct DataTypeHeader *dth = dt->dtn_Header;
 115
 116             if (!verbose)
 117             {
 118                 Printf
 119                 (
 120                     "%s:\t%s/%s\n",
 121                     filename, gid2string(dth->dth_GroupID), dth->dth_Name
 122                 );
 123             }
 124             else
 125             {
 126                 ULONG gid = AROS_LONG2BE(dth->dth_GroupID),
 127                       id  = AROS_LONG2BE(dth->dth_ID);
 128
 129                 Printf
 130                 (
 131                     "File:        %s\n"
 132                     "Type:        %s/%s\t(GID: %.4s, ID: %.4s)\n"
 133                     "DT Basename: %s\n\n",
 134                     filename, gid2string(dth->dth_GroupID), dth->dth_Name,
 135                     (CONST_STRPTR) &gid, (CONST_STRPTR) &id,
 136                     dth->dth_BaseName
 137                 );
 138             }
 139         }
 140         else
 141         {
 142             FPrintf(Error(), ERROR_HEADER": Could not obtain datatype for file.\n");
 143             rc = RETURN_FAIL;
 144         }
 145
 146         UnLock(lock);
 147     }
 148     else
 149     {
 150         PrintFault(IoErr(), ERROR_HEADER);
 151         rc = RETURN_FAIL;
 152     }
 153
 154     return rc;
 155 }
 156
 157 CONST_STRPTR gid2string(ULONG gid)
 158 {
 159     switch (gid)
 160     {
 161         case GID_SYSTEM:     return "System";
 162         case GID_TEXT:       return "Text";
 163         case GID_DOCUMENT:   return "Document";
 164         case GID_SOUND:      return "Sound";
 165         case GID_INSTRUMENT: return "Instrument";
 166         case GID_MUSIC:      return "Music";
 167         case GID_PICTURE:    return "Picture";
 168         case GID_ANIMATION:  return "Animation";
 169         case GID_MOVIE:      return "Movie";
 170         default:             return NULL;
 171     }
 172 }