sofi_pfits.c

/* $Id: sofi_pfits.c,v 1.6 2013-03-12 08:04:54 llundin Exp $
 *
 * This file is part of the SOFI Pipeline
 * Copyright (C) 2002,2003 European Southern Observatory
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02111-1307  USA
 */
 
/*
 * $Author: llundin $
 * $Date: 2013-03-12 08:04:54 $
 * $Revision: 1.6 $
 * $Name: not supported by cvs2svn $
 */
 
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
 
/*-----------------------------------------------------------------------------
                                Includes
 -----------------------------------------------------------------------------*/
 
#include <string.h>
#include <cpl.h>
 
#include "sofi_pfits.h"
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/

 
/*-----------------------------------------------------------------------------
                            Function codes
 -----------------------------------------------------------------------------*/
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_airmass_start(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "ESO TEL AIRM START") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_airmass_end(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "ESO TEL AIRM END") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_arcfile(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "ARCFILE");
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_chip(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, 
            "ESO DET CHIP NAME");
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_cumoffsetx(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "ESO SEQ CUMOFFSETX") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_cumoffsety(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "ESO SEQ CUMOFFSETY") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_current_exp_nb(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_int(plist, "ESO TPL EXPNO") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_date(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "DATE") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_date_obs(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "DATE-OBS") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_dec(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "DEC") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_frame_type(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, 
            "ESO DET FRAM TYPE") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_dit(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "ESO DET DIT")  ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_dpr_catg(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "ESO DPR CATG") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_dpr_tech(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "ESO DPR TECH") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_dpr_type(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "ESO DPR TYPE") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_filter(const cpl_propertylist * plist)
{
    const char  *   val ;
 
    val = cpl_propertylist_get_string(plist, "ESO INS FILT1 ID") ;
    if (val == NULL) return NULL ;
    /* If FILT1 is not open, return its value */
    if (strcmp(val, "open")) return val ;
    /* FILT1 is open, return value from FILT2 */
    val = cpl_propertylist_get_string(plist, "ESO INS FILT2 ID") ;
    if (val == NULL) return NULL ;
    if (strcmp(val, "open")) return val ;
    return NULL ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_humidity_level(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "ESO TEL AMBI RHUM") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_instrument(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "INSTRUME") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_lamp1_name(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist,
            "ESO INS LAMP1 NAME") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_lamp1_status(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_bool(plist, "ESO INS LAMP1 ST") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_lamp2_name(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist,
            "ESO INS LAMP2 NAME") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_lamp2_status(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_bool(plist, "ESO INS LAMP2 ST") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_mjdobs(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "MJD-OBS") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_mode(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "ESO INS MODE") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_naxis2(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_int(plist, "NAXIS2") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_ndit(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_int(plist, "ESO DET NDIT") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_numbexp(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_int(plist, "ESO TPL NEXP") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_obs_id(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_int(plist, "ESO OBS ID") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_targ_name(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, 
            "ESO OBS TARG NAME") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_opti1_id(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist,
            "ESO INS OPTI1 ID") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_origfile(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "ORIGFILE") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_pixscale(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "ESO INS PIXSCALE") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
double sofi_pfits_get_ra(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_double(plist, "RA") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_resolution(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, 
            "ESO INS OPTI2 NAME") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_rom(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_int(plist, "ESO DET NCORRS") ;
}
 
/*----------------------------------------------------------------------------*/         
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_romode_name(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist,
            "ESO DET MODE NAME");
}
 
/*----------------------------------------------------------------------------*/         
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_rom_name(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist,
            "ESO DET NCORRS NAME");
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
int sofi_pfits_get_rspeed(const cpl_propertylist * plist)
{
    return cpl_propertylist_get_int(plist, "ESO DET RSPEED") ;
}
 
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
const char * sofi_pfits_get_templateid(const cpl_propertylist * plist)
{
    return (const char *) cpl_propertylist_get_string(plist, "ESO TPL ID") ;
}