tools/dtdesc/examinedtdesc.c

   1 /*
   2     Copyright © 2000, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: DataTypesDescriptorExaminator
   6     Lang: English.
   7 */
   8
   9 /*
  10  *  includes
  11  */
  12
  13 #include <stdlib.h>
  14 #include <stdio.h>
  15 #include <string.h>
  16 #include <ctype.h>
  17
  18 #include <c_iff.h>
  19
  20 #include "dtdesc.h"
  21
  22 /*
  23  *  prototypes
  24  */
  25
  26 void PrintID(uint32_t ID, uint8_t *Buffer);
  27
  28 /*
  29  *  functions
  30  */
  31
  32 int main(int argc, char **argv)
  33 {
  34  struct IFFHandle *IH;
  35  char Buffer[128];
  36  long Size;
  37  uint8_t ID[5];
  38  int i;
  39
  40  if(!(argc==2))
  41  {
  42   fprintf(stderr, "usage: %s datatypedescriptor\n", argv[0]);
  43
  44   return(0);
  45  }
  46
  47  IH=OpenIFF(argv[1]);
  48  if(!IH)
  49  {
  50   fprintf(stderr, "Could not open %s\n", argv[1]);
  51
  52   return(0);
  53  }
  54
  55  if(!(IH->IFFType==MAKE_ID('D','T','Y','P')))
  56  {
  57   fprintf(stderr, "This IFF is not a valid DataType-Descriptor\n");
  58
  59   CloseIFF(IH);
  60   return(0);
  61  }
  62
  63  fprintf(stdout, "# DataTypeDescription for %s\n", argv[1]);
  64  fprintf(stdout, "# Automatically generated by %s\n\n", argv[0]);
  65
  66  while(TRUE)
  67  {
  68   if(!ReadChunkHeader(IH))
  69   {
  70    break;
  71   }
  72
  73   switch(IH->ChunkID)
  74   {
  75    case MAKE_ID('F','V','E','R'):
  76    {
  77     fprintf(stdout, "Version=");
  78
  79     while(TRUE)
  80     {
  81      Size=ReadChunkData(IH, Buffer, 127);
  82      if(Size<=0)
  83      {
  84       break;
  85      }
  86
  87      Buffer[Size]='\0';
  88      fprintf(stdout, "%s", Buffer);
  89     }
  90
  91     fprintf(stdout, "\n");
  92
  93     SkipChunkData(IH);
  94     break;
  95    }
  96
  97    case MAKE_ID('N','A','M','E'):
  98    {
  99     fprintf(stdout, "Name=");
 100
 101     while(TRUE)
 102     {
 103      Size=ReadChunkData(IH, Buffer, 127);
 104      if(Size<=0)
 105      {
 106       break;
 107      }
 108
 109      Buffer[Size]='\0';
 110      fprintf(stdout, "%s", Buffer);
 111     }
 112
 113     fprintf(stdout, "\n");
 114
 115     SkipChunkData(IH);
 116     break;
 117    }
 118
 119    case MAKE_ID('D','T','H','D'):
 120    {
 121     struct DataTypeHeader *DTH;
 122     unsigned char *DTHDBuffer;
 123
 124     DTHDBuffer=malloc(IH->BytesLeftInChunk);
 125     if(!DTHDBuffer)
 126     {
 127      goto TheEnd;
 128     }
 129
 130     Size=IH->BytesLeftInChunk;
 131     if(!(ReadChunkData(IH, DTHDBuffer, IH->BytesLeftInChunk)==Size))
 132     {
 133      free((void *) DTHDBuffer);
 134      goto TheEnd;
 135     }
 136
 137     DTH=(struct DataTypeHeader *) DTHDBuffer;
 138
 139     DTH->dth_Name     = (uint8_t *)  Swap32IfLE(((uint32_t) DTH->dth_Name));
 140     DTH->dth_BaseName = (uint8_t *)  Swap32IfLE(((uint32_t) DTH->dth_BaseName));
 141     DTH->dth_Pattern  = (uint8_t *)  Swap32IfLE(((uint32_t) DTH->dth_Pattern));
 142     DTH->dth_Mask     = (uint16_t *) Swap32IfLE(((uint32_t) DTH->dth_Mask));
 143     DTH->dth_GroupID  = Swap32IfLE(DTH->dth_GroupID);
 144     DTH->dth_ID       = Swap32IfLE(DTH->dth_ID);
 145     DTH->dth_MaskLen  = Swap16IfLE(DTH->dth_MaskLen);
 146     DTH->dth_Pad      = Swap16IfLE(DTH->dth_Pad);
 147     DTH->dth_Flags    = Swap16IfLE(DTH->dth_Flags);
 148     DTH->dth_Priority = Swap16IfLE(DTH->dth_Priority);
 149
 150     fprintf(stdout, "BaseName=%s\n", (char *) (((long) DTHDBuffer) + ((long) DTH->dth_BaseName)));
 151
 152     fprintf(stdout, "Pattern=%s\n", (char *) (((long) DTHDBuffer) + ((long) DTH->dth_Pattern)));
 153
 154     fprintf(stdout, "Mask=");
 155     for(i=1; i<=DTH->dth_MaskLen; i++)
 156     {
 157     #if 1
 158         unsigned short mask;
 159
 160         mask = *((unsigned char *) (((long) DTHDBuffer) + ((long) DTH->dth_Mask) + (2*i-2)));
 161         mask *= 256;
 162         mask += *((unsigned char *) (((long) DTHDBuffer) + ((long) DTH->dth_Mask) + (2*i-1)));
 163
 164         if ((short)mask < 0)
 165         {
 166             fprintf(stdout, "ANY ");
 167         }
 168         else if (mask > 255)
 169         {
 170             fprintf(stdout, "0x%x ", mask);
 171         }
 172         else if (isalnum(mask))
 173         {
 174             fprintf(stdout, "'%c' ", mask);
 175         }
 176         else
 177         {
 178             fprintf(stdout, "0x%x ", mask);
 179         }
 180     #else
 181         fputc((int) *((char *) (((long) DTHDBuffer) + ((long) DTH->dth_Mask) + (2*i-1))), stdout);
 182     #endif
 183     }
 184     fprintf(stdout, "\n");
 185
 186     PrintID(DTH->dth_GroupID, ID);
 187     fprintf(stdout, "GroupID=%s\n", ID);
 188
 189     PrintID(DTH->dth_ID, ID);
 190     fprintf(stdout, "ID=%s\n", ID);
 191
 192     fprintf(stdout, "Flags=");
 193
 194     switch(DTH->dth_Flags&0x000F)
 195     {
 196      case 0:
 197      {
 198       fprintf(stdout, "DTF_BINARY");
 199
 200       break;
 201      }
 202
 203      case 1:
 204      {
 205       fprintf(stdout, "DTF_ASCII");
 206
 207       break;
 208      }
 209
 210      case 2:
 211      {
 212       fprintf(stdout, "DTF_IFF");
 213
 214       break;
 215      }
 216
 217      case 3:
 218      {
 219       fprintf(stdout, "DTF_MISC");
 220
 221       break;
 222      }
 223     }
 224
 225     if(DTH->dth_Flags & 0x0010)
 226     {
 227      fprintf(stdout, ",DTF_CASE");
 228     }
 229
 230     if(DTH->dth_Flags & 0x1000)
 231     {
 232      fprintf(stdout, ",DTF_SYSTEM1");
 233     }
 234
 235     fprintf(stdout, "\n");
 236
 237     fprintf(stdout, "Priority=%hu\n", DTH->dth_Priority);
 238
 239     free((void *) DTHDBuffer);
 240     SkipChunkData(IH);
 241     break;
 242    }
 243
 244    default:
 245    {
 246 #if 0
 247     PrintID(IH->ChunkID, ID);
 248     fprintf(stderr, "Unsupported chunk : %s\n", ID);
 249 #endif /* 0 */
 250     SkipChunkData(IH);
 251     break;
 252    }
 253   }
 254  }
 255
 256 TheEnd:
 257
 258  CloseIFF(IH);
 259
 260  return(0);
 261 }
 262
 263 void PrintID(uint32_t ID, uint8_t *Buffer)
 264 {
 265  if(!Buffer)
 266  {
 267   return;
 268  }
 269
 270  Buffer[0]=(ID&0xFF000000)>>24;
 271  Buffer[1]=(ID&0xFF0000)  >>16;
 272  Buffer[2]=(ID&0xFF00)    >> 8;
 273  Buffer[3]=(ID&0xFF);
 274  Buffer[4]='\0';
 275 }
 276
 277