MtkMakeFilename.c

Go to the documentation of this file.

/*===========================================================================
=                                                                           =
=                             MtkMakeFilename                               =
=                                                                           =
=============================================================================

                         Jet Propulsion Laboratory
                                   MISR
                               MISR Toolkit

            Copyright 2005, California Institute of Technology.
                           ALL RIGHTS RESERVED.
                 U.S. Government Sponsorship acknowledged.

============================================================================*/

#include "MisrFileQuery.h"
#include "MisrError.h"
#include <stdio.h>
#include <string.h>
#include <ctype.h>

MTKt_status MtkMakeFilename(
  const char *basedir, 
  const char *product, 
  const char *camera,  
  int path,            
  int orbit,           
  const char *version, 
  char **filename       )
{
  int status_code;
  int len;
  char *temp;
  int i;
  char *slash = "/";

  if (basedir == NULL || product == NULL || version == NULL ||
      filename == NULL)
    MTK_ERR_CODE_JUMP(MTK_NULLPTR);

  len = (int)strlen(basedir);

  if (len == 0 || strncmp(&(basedir[len-1]), slash, 1) == 0)
    slash = "";

  temp = (char*)malloc((len + 256) * sizeof(char));
  if (temp == NULL)
    MTK_ERR_CODE_JUMP(MTK_MALLOC_FAILED);

  if (camera == NULL || strlen(camera) == 0)
    if (orbit > 0) {
      sprintf(temp,"%s%sMISR_AM1_%s_P%03d_O%06d_%s.hdf",basedir,
          slash,product,path,orbit,version);
    } else {
      sprintf(temp,"%s%sMISR_AM1_%s_P%03d_%s.hdf",basedir,
          slash,product,path,version);
    }
  else
    sprintf(temp,"%s%sMISR_AM1_%s_P%03d_O%06d_%s_%s.hdf",basedir,
            slash,product,path,orbit,camera,version);

  for (i = (int)strlen(basedir); (unsigned)i < strlen(temp) - 4; ++i)
    temp[i] = toupper(temp[i]);

  *filename = temp;

  return MTK_SUCCESS;

 ERROR_HANDLE:
  return status_code;
}