isaac_img_lingain.c

00001 /* $Id: isaac_img_lingain.c,v 1.3 2009/04/28 14:45:17 llundin Exp $
00002  *
00003  * This file is part of the DETMON Pipeline
00004  * Copyright (C) 2002,2003 European Southern Observatory
00005  *
00006  * This program is free software; you can redistribute it and/or modify
00007  * it under the terms of the GNU General Public License as published by
00008  * the Free Software Foundation; either version 2 of the License, or
00009  * (at your option) any later version.
00010  *
00011  * This program is distributed in the hope that it will be useful,
00012  * but WITHOUT ANY WARRANTY; without even the implied warranty of
00013  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00014  * GNU General Public License for more details.
00015  *
00016  * You should have received a copy of the GNU General Public License
00017  * along with this program; if not, write to the Free Software
00018  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
00019  */
00020 
00021 /*
00022  * $Author: llundin $
00023  * $Date: 2009/04/28 14:45:17 $
00024  * $Revision: 1.3 $
00025  * $Name: HEAD $
00026  */
00027 
00028 #ifdef HAVE_CONFIG_H
00029 #include <config.h>
00030 #endif
00031 
00032 /*----------------------------------------------------------------------------
00033                              Includes and Defines
00034  ----------------------------------------------------------------------------*/
00035 
00036 #include <cpl.h>
00037 
00038 #include "irplib_detmon.h"
00039 #include "irplib_detmon_lg.h"
00040 #include "irplib_plugin.h"
00041 
00042 /* Define here the DO.CATG keywords */
00043 #define ISAAC_IMG_LINGAIN_ON_RAW                    "CAL_LINGAIN_LAMP"
00044 #define ISAAC_IMG_LINGAIN_OFF_RAW           "CAL_LINGAIN_DARK"
00045 
00046 #define RECIPE_NAME "isaac_img_lingain"
00047 
00048 /* Copy here instrument specific keywords which need to be in the PAF file */
00049 #define INSTREGEXP   "ESO DET CHIP NAME|ESO DET MODE NAME"
00050 
00051 #define PAFREGEXP    "^(" REGEXP "|" INSTREGEXP ")$"
00052 
00053 #define NIR TRUE
00054 
00055 /*----------------------------------------------------------------------------
00056                  Functions prototypes
00057  ----------------------------------------------------------------------------*/
00058 
00059 CPL_RECIPE_DEFINE(isaac_img_lingain, ISAAC_BINARY_VERSION,
00060                   irplib_detmon_lg_fill_parlist_nir_default
00061                   (recipe->parameters, RECIPE_NAME, PACKAGE_TARNAME),
00062                   "Lars Lundin", PACKAGE_BUGREPORT, "2008", 
00063                   "Linearity/Gain recipe for the IR domain",
00064                   irplib_detmon_lg_get_description(RECIPE_NAME, "ISAAC",
00065                                                    ISAAC_IMG_LINGAIN_ON_RAW,
00066                                                    ISAAC_IMG_LINGAIN_OFF_RAW));
00067 
00068 /*---------------------------------------------------------------------------*/
00069 /*
00070   @brief    Interpret the command line options and execute the data processing
00071   @param    frameset    the frames list
00072   @param    parlist     the parameters list
00073   @return   0 if everything is ok
00074  */
00075 /*---------------------------------------------------------------------------*/
00076 
00077 static int isaac_img_lingain(cpl_frameset            * frameset,
00078              const cpl_parameterlist * parlist)
00079 {
00080     cpl_propertylist * lintbl = 
00081     irplib_detmon_fill_prolist("DET_LIN_INFO", "TYPE", "TECH", CPL_TRUE);
00082 
00083     cpl_propertylist * gaintbl = 
00084     irplib_detmon_fill_prolist("GAIN_INFO",    "TYPE", "TECH", CPL_TRUE);
00085 
00086     cpl_propertylist * coeffscube = 
00087     irplib_detmon_fill_prolist("COEFFS_CUBE",  "TYPE", "TECH", CPL_TRUE);
00088 
00089     cpl_propertylist * bpm = 
00090     irplib_detmon_fill_prolist("BP_MAP_NL",    "TYPE", "TECH", CPL_TRUE);
00091 
00092     cpl_propertylist * corr = 
00093     irplib_detmon_fill_prolist("AUTOCORR",     "TYPE", "TECH", CPL_TRUE);
00094 
00095     cpl_propertylist * diff_flat = 
00096     irplib_detmon_fill_prolist("DIFF_FLAT",    "TYPE", "TECH", CPL_TRUE);
00097 
00098     const cpl_error_code error = irplib_detmon_lg(frameset,
00099                                                   parlist,
00100                                                   ISAAC_IMG_LINGAIN_ON_RAW,
00101                                                   ISAAC_IMG_LINGAIN_OFF_RAW,
00102                                                   RECIPE_NAME,
00103                                               PACKAGE_TARNAME,
00104                                                   PAFREGEXP,
00105                                                   lintbl, gaintbl, coeffscube,
00106                           bpm, corr, diff_flat,
00107                                                   PACKAGE "/" PACKAGE_VERSION,
00108                                                   NULL, NULL, NIR);
00109 
00110     cpl_propertylist_delete(lintbl);
00111     cpl_propertylist_delete(gaintbl);
00112     cpl_propertylist_delete(coeffscube);
00113     cpl_propertylist_delete(bpm);
00114     cpl_propertylist_delete(corr);
00115     cpl_propertylist_delete(diff_flat);
00116 
00117     /* Propagate the error, if any */
00118     cpl_ensure_code(!error, error);
00119 
00120     return CPL_ERROR_NONE;
00121 }

Generated on Wed Mar 9 15:43:10 2011 for ISAAC Pipeline Reference Manual by  doxygen 1.5.8