workbench/c/Identify/main.c

   1 /*
   2     Copyright © 2004-2016, 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         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-Sequence
  39         S:Startup-Sequence:     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 #ifdef __VBCC__
  56 typedef unsigned long IPTR;
  57 #else
  58 #include <proto/alib.h>
  59 #endif
  60 #include <proto/dos.h>
  61 #include <proto/datatypes.h>
  62 #include <datatypes/datatypes.h>
  63
  64 #ifndef BNULL
  65 #define BNULL NULL
  66 #define AROS_LONG2BE
  67 #define ErrorOutput() Output()
  68 #endif
  69
  70 #define PROG_NAME "Identify"
  71 static const TEXT prog_name[] = PROG_NAME;
  72
  73 const TEXT version_string[] = "$VER: " PROG_NAME " 41.2 (14.7.2016)";
  74 static const TEXT template[] = "FILE/M/A,VERBOSE/S";
  75
  76 enum
  77 {
  78     ARG_FILE,
  79     ARG_VERBOSE,
  80     ARG_COUNT
  81 };
  82
  83 /*** Prototypes *************************************************************/
  84 static LONG identify(CONST_STRPTR filename, BOOL verbose);
  85
  86 /*** Functions **************************************************************/
  87 int main(void)
  88 {
  89     int            rc              = RETURN_OK;
  90     struct RDArgs *rdargs          = NULL;
  91     IPTR           args[ARG_COUNT] = { 0 };
  92
  93     if ((rdargs = ReadArgs(template, args, NULL)) != NULL)
  94     {
  95         CONST_STRPTR *files = (CONST_STRPTR *) args[ARG_FILE], file;
  96
  97         while ((file = *files++) != NULL)
  98         {
  99             if (identify(file, args[ARG_VERBOSE]) != RETURN_OK)
 100             {
 101                 rc = RETURN_WARN;
 102             }
 103         }
 104
 105         FreeArgs(rdargs);
 106     }
 107     else
 108     {
 109         PrintFault(IoErr(), prog_name);
 110         rc = RETURN_FAIL;
 111     }
 112
 113     return rc;
 114 }
 115
 116 static LONG identify(CONST_STRPTR filename, BOOL verbose)
 117 {
 118     int  rc   = RETURN_OK;
 119     BPTR lock = Lock(filename, ACCESS_READ);
 120
 121     if (lock != BNULL)
 122     {
 123         struct DataType *dt = ObtainDataType(DTST_FILE, (APTR)lock, TAG_DONE);
 124         if (dt != NULL)
 125         {
 126             struct DataTypeHeader *dth = dt->dtn_Header;
 127             CONST_STRPTR gid_str = GetDTString(dth->dth_GroupID);
 128
 129             if (!verbose)
 130             {
 131                 Printf("%s:\t%s/%s\n", filename, gid_str, dth->dth_Name);
 132             }
 133             else
 134             {
 135                 ULONG gid = AROS_LONG2BE(dth->dth_GroupID),
 136                       id  = AROS_LONG2BE(dth->dth_ID);
 137
 138                 Printf
 139                 (
 140                     "File:        %s\n"
 141                     "Type:        %s/%s\t(GID: %.4s, ID: %.4s)\n"
 142                     "DT Basename: %s\n\n",
 143                     filename, gid_str, dth->dth_Name,
 144                     (CONST_STRPTR) &gid, (CONST_STRPTR) &id,
 145                     dth->dth_BaseName
 146                 );
 147             }
 148
 149             ReleaseDataType(dt);
 150         }
 151         else
 152         {
 153             FPrintf(ErrorOutput(),
 154                 PROG_NAME ": Could not obtain datatype for file.\n");
 155             rc = RETURN_FAIL;
 156         }
 157
 158         UnLock(lock);
 159     }
 160     else
 161     {
 162         PrintFault(IoErr(), prog_name);
 163         rc = RETURN_FAIL;
 164     }
 165
 166     return rc;
 167 }