00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028 #ifdef HAVE_CONFIG_H
00029 #include <config.h>
00030 #endif
00031
00032
00033
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
00043 #define NACO_LINGAIN_ON_RAW "ON_RAW"
00044 #define NACO_LINGAIN_OFF_RAW "OFF_RAW"
00045
00046 #define RECIPE_NAME "naco_lingain"
00047
00048
00049 #define INSTREGEXP "ESO DET MODE NAME|ESO DET NCORRS NAME|" \
00050 "ESO INS OPTI7 NAME|ESO INS OPTI6 NAME|" \
00051 "ESO INS OPTI5 NAME|ESO INS OPTI4 NAME"
00052
00053 #define PAFREGEXP "^(" REGEXP "|" INSTREGEXP ")$"
00054
00055 #define NIR TRUE
00056
00057
00058
00059
00060
00061 IRPLIB_RECIPE_DEFINE(naco_lingain, DETMON_BINARY_VERSION,
00062
00063
00064 irplib_detmon_lg_fill_parlist_nir_default(recipe->parameters,
00065 RECIPE_NAME, "naco"),
00066
00067
00068 "Lander de Bilbao", PACKAGE_BUGREPORT, "2007",
00069 "Linearity/Gain recipe for the IR domain",
00070 irplib_detmon_lg_get_description(RECIPE_NAME, "NACO",
00071 NACO_LINGAIN_ON_RAW,
00072 NACO_LINGAIN_OFF_RAW));
00073
00074
00075
00076
00077
00078
00079
00080
00081
00082
00083 static int naco_lingain(cpl_frameset * frameset,
00084 const cpl_parameterlist * parlist)
00085 {
00086 cpl_propertylist * lintbl =
00087 irplib_detmon_fill_prolist("DET_LIN_INFO", "REDUCED", "TECH", CPL_FALSE);
00088
00089 cpl_propertylist * gaintbl =
00090 irplib_detmon_fill_prolist("GAIN_INFO", "REDUCED", "TECH", CPL_FALSE);
00091
00092 cpl_propertylist * coeffscube =
00093 irplib_detmon_fill_prolist("COEFFS_CUBE", "REDUCED", "TECH", CPL_FALSE);
00094
00095 cpl_propertylist * bpm =
00096 irplib_detmon_fill_prolist("BP_MAP_NL", "REDUCED", "TECH", CPL_FALSE);
00097
00098 cpl_propertylist * corr =
00099 irplib_detmon_fill_prolist("AUTOCORR", "REDUCED", "TECH", CPL_FALSE);
00100
00101 cpl_propertylist * diff_flat =
00102 irplib_detmon_fill_prolist("DIFF_FLAT", "REDUCED", "TECH", CPL_FALSE);
00103
00104 const cpl_error_code error = irplib_detmon_lg(frameset,
00105 parlist,
00106 NACO_LINGAIN_ON_RAW,
00107 NACO_LINGAIN_OFF_RAW,
00108 RECIPE_NAME,
00109 "naco",
00110 PAFREGEXP,
00111 lintbl, gaintbl, coeffscube,
00112 bpm, corr, diff_flat,
00113 PACKAGE "/" PACKAGE_VERSION,
00114 NULL, NULL, NIR);
00115
00116 cpl_propertylist_delete(lintbl);
00117 cpl_propertylist_delete(gaintbl);
00118 cpl_propertylist_delete(coeffscube);
00119 cpl_propertylist_delete(bpm);
00120 cpl_propertylist_delete(corr);
00121 cpl_propertylist_delete(diff_flat);
00122
00123
00124 cpl_ensure_code(!error, error);
00125
00126 return CPL_ERROR_NONE;
00127 }