|
version 1.5, 2013/01/24 06:45:53
|
version 1.9, 2017/03/31 19:43:36
|
|
|
|
| |
char *cvsinfo_jretile_manytofew = "cvsinfo: $Header$"; |
| |
|
| int jretile_manytofew(void) | int jretile_manytofew(void) |
| { | { |
| int newstat = 0; | int newstat = 0; |
| Line 119 int jretile_manytofew(void) |
|
| Line 121 int jretile_manytofew(void) |
|
| } | } |
| | |
| // set up ancillary dataseries for processing metadata | // set up ancillary dataseries for processing metadata |
| char *cvsinfo = strdup("$Header$"); |
// char *cvsinfo = strdup("$Header$"); |
| DRMS_Link_t *histlink = hcon_lookup_lower(&tempoutrec->links, histlinkname); | DRMS_Link_t *histlink = hcon_lookup_lower(&tempoutrec->links, histlinkname); |
| if (histlink != NULL) | if (histlink != NULL) |
| { | { |
| histrecnum=set_history(histlink, cvsinfo); |
histrecnum=set_history(histlink); |
| if (histrecnum < 0) | if (histrecnum < 0) |
| { | { |
| drms_close_record(tempoutrec, DRMS_FREE_RECORD); | drms_close_record(tempoutrec, DRMS_FREE_RECORD); |
| Line 195 int jretile_manytofew(void) |
|
| Line 197 int jretile_manytofew(void) |
|
| if (outkeytest != NULL && outkeytest->info->recscope == 1) | if (outkeytest != NULL && outkeytest->info->recscope == 1) |
| sinbdivsout=drms_getkey_int(tempoutrec, "SINBDIVS", &status); | sinbdivsout=drms_getkey_int(tempoutrec, "SINBDIVS", &status); |
| | |
| |
float apinnerout=0.0; |
| |
float apwidthout=0.0; |
| |
outkeytest = hcon_lookup_lower(&tempoutrec->keywords, "APINNER"); |
| |
if (outkeytest != NULL && outkeytest->info->recscope == 1) |
| |
apinnerout=drms_getkey_float(tempoutrec, "APINNER", &status); |
| |
outkeytest = hcon_lookup_lower(&tempoutrec->keywords, "APWIDTH"); |
| |
if (outkeytest != NULL && outkeytest->info->recscope == 1) |
| |
apwidthout=drms_getkey_float(tempoutrec, "APWIDTH", &status); |
| |
|
| drms_close_record(tempoutrec, DRMS_FREE_RECORD); | drms_close_record(tempoutrec, DRMS_FREE_RECORD); |
| | |
| char *inchecklist[] = {"T_START", "QUALITY", "LMIN", "LMAX", "T_STEP"}; | char *inchecklist[] = {"T_START", "QUALITY", "LMIN", "LMAX", "T_STEP"}; |
| Line 260 int jretile_manytofew(void) |
|
| Line 271 int jretile_manytofew(void) |
|
| } | } |
| | |
| inkeytest = hcon_lookup_lower(&inrec->keywords, "SINBDIVS"); | inkeytest = hcon_lookup_lower(&inrec->keywords, "SINBDIVS"); |
| if (outkeytest != NULL) |
if (inkeytest != NULL) |
| sinbdivs=drms_getkey_int(inrec, "SINBDIVS", &status); | sinbdivs=drms_getkey_int(inrec, "SINBDIVS", &status); |
| if (sinbdivsout != -1 && sinbdivsout != sinbdivs) | if (sinbdivsout != -1 && sinbdivsout != sinbdivs) |
| { | { |
| Line 269 int jretile_manytofew(void) |
|
| Line 280 int jretile_manytofew(void) |
|
| return 1; | return 1; |
| } | } |
| | |
| |
float apinner=0.0; |
| |
float apwidth=0.0; |
| |
inkeytest = hcon_lookup_lower(&inrec->keywords, "APINNER"); |
| |
if (inkeytest != NULL) |
| |
apinner=drms_getkey_float(inrec, "APINNER", &status); |
| |
if (apinnerout != 0.0 && (int)(10000*apinnerout) != (int)(10000*apinner)) |
| |
{ |
| |
fprintf(stderr, "ERROR: input APINNER does not equal output APINNER, in=%d, out=%d\n",apinner, apinnerout); |
| |
drms_close_records(inrecset, DRMS_FREE_RECORD); |
| |
return 1; |
| |
} |
| |
|
| |
inkeytest = hcon_lookup_lower(&inrec->keywords, "APWIDTH"); |
| |
if (inkeytest != NULL) |
| |
apwidth=drms_getkey_float(inrec, "APWIDTH", &status); |
| |
if (apinnerout != 0.0 && (int)(10000*apwidthout) != (int)(10000*apwidth)) |
| |
{ |
| |
fprintf(stderr, "ERROR: input APWIDTH does not equal output APWIDTH, in=%d, out=%d\n", apwidth, apwidth); |
| |
drms_close_records(inrecset, DRMS_FREE_RECORD); |
| |
return 1; |
| |
} |
| |
|
| status=drms_stage_records(inrecset, 1, 0); | status=drms_stage_records(inrecset, 1, 0); |
| if (status != DRMS_SUCCESS) | if (status != DRMS_SUCCESS) |
| { | { |
| Line 328 int jretile_manytofew(void) |
|
| Line 361 int jretile_manytofew(void) |
|
| if (verbflag > 2) | if (verbflag > 2) |
| { | { |
| // sprint_time(tscrstr, tstartin, "TAI", 0); | // sprint_time(tscrstr, tstartin, "TAI", 0); |
| fprintf(stderr, "WARNING: input data not used due to quality: T_START = %s, LMIN = %d, LMAX = %d, recnum = %lld, irec = %d, status = %d, quality = %08x\n", |
printf("SKIP: input data not used due to quality: T_START = %s, LMIN = %d, LMAX = %d, recnum = %lld, irec = %d, status = %d, quality = %08x\n", |
| tscrstr, lminin, lmaxin, inrec->recnum, irecin, status, quality); | tscrstr, lminin, lmaxin, inrec->recnum, irecin, status, quality); |
| } | } |
| for (irecout=0; irecout < nrecsout; irecout++) | for (irecout=0; irecout < nrecsout; irecout++) |
Return to
jretile_manytofew.c
CVS log
Up to [Development] / JSOC / proj / globalhs / apps