/*****************************************************************************
#   Copyright (C) 1994-2008 by David Gordon.
#   All rights reserved.                           
#                                                                           
#   This software is part of a beta-test version of the Consed/Autofinish
#   package.  It should not be redistributed or
#   used for any commercial purpose, including commercially funded
#   sequencing, without written permission from the author and the
#   University of Washington.
#   
#   This software is provided ``AS IS'' and any express or implied
#   warranties, including, but not limited to, the implied warranties of
#   merchantability and fitness for a particular purpose, are disclaimed.
#   In no event shall the authors or the University of Washington be
#   liable for any direct, indirect, incidental, special, exemplary, or
#   consequential damages (including, but not limited to, procurement of
#   substitute goods or services; loss of use, data, or profits; or
#   business interruption) however caused and on any theory of liability,
#   whether in contract, strict liability, or tort (including negligence
#   or otherwise) arising in any way out of the use of this software, even
#   if advised of the possibility of such damage.
#
#   Building Consed from source is error prone and not simple which is
#   why I provide executables.  Due to time limitations I cannot
#   provide any assistance in building Consed.  Even if you do not
#   modify the source, you may introduce errors due to using a
#   different version of the compiler, a different version of motif,
#   different versions of other libraries than I used, etc.  For this
#   reason, if you discover Consed bugs, I can only offer help with
#   those bugs if you first reproduce those bugs with an executable
#   provided by me--not an executable you have built.
# 
#   Modifying Consed is also difficult.  Although Consed is modular,
#   some modules are used by many other modules.  Thus making a change
#   in one place can have unforeseen effects on many other features.
#   It may takes months for you to notice these other side-effects
#   which may not seen connected at all.  It is not feasable for me to
#   provide help with modifying Consed sources because of the
#   potentially huge amount of time involved.
#
#*****************************************************************************/
/** readType.c **/

/*
*|***************************************************************************|*
*|                                                                           |*
*|   phred * NOT FOR DISTRIBUTION                                            |*
*|   Copyright (C) 1995-1999 by Phil Green and Brent Ewing.                  |*
*|   All rights reserved.                                                    |*
*|                                                                           |*
*|***************************************************************************|*
*/

/*
*******************************************************************************
**                                                                           **
**    * readType.c                                                     *     **
**    * benefits from ideas in code written by LaDeana Hillier and     *     **
**    * Tim Gleeson.                                                   *     **
**                                                                           **
*******************************************************************************
*/

/* ---- Imports ---- */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>
#include <ctype.h>
// #include "phred.h"
#include "chromatData.h"
#include "typeDef.h"


// added prototype (DG, 4/2000)
int isESD( char *filename );



typedef struct
{
  int type;
  int offset;
  char *string;
  int len;
} Magic;

#define NUMMAG	4
Magic magic[NUMMAG] =
{
{ SCFFormat , 0,   ".scf",             4  } ,
{ ABIFormat , 0,   "ABIF",             4  } ,
{ ABIFormat , 128, "ABIF",             4  } ,
{ SCFFormat , 0,   "\234\330\300\000", 16 }
};

#ifdef ANSI_C
int readType( char *fn )
#else
int readType( fn )
char *fn;
#endif
{
  int i;
  int len;
  char buf[512];
  FILE *fp;

  /*
  ** Try to open file.
  */
  if( ( fp = fopen( fn, "rb" ) ) == NULL )
  {
    return( EEKFormat );
  }

  /*
  ** Check magic strings.
  */
  for( i = 0 ; i < NUMMAG; i++ )
  {
    if( fseek( fp, magic[i].offset, 0 ) == 0 )
    {
      len = magic[i].len;
      if( fread( buf, len, 1, fp ) == 1 )
      {
        if( strncmp( buf, magic[i].string, len ) == 0 )
        {
          fclose( fp );
          return( magic[i].type );
        }
      }
    }
  }

  fclose( fp );

  /*
  ** Check for Molecular Dynamics ESD file by calculating
  ** the number of data points based on the file/header
  ** sizes and comparing that to the value in the trailer,
  ** assuming we can read a trailer successfully.
  */
  i = isESD( fn );
  if( i == 1 )
  {
    return( MD1Format );
  }
  else
  if( i == 2 )
  {
    return( MD2Format );
  }

  return( UNKFormat );
}