version 1.2, 2012/08/21 22:14:34
|
version 1.4, 2012/09/20 17:33:45
|
Line 75 int jretile_manytofew(void) |
|
Line 75 int jretile_manytofew(void) |
|
sprint_time(tstartstr, tstart, "TAI", 0); | sprint_time(tstartstr, tstart, "TAI", 0); |
ttotal=(char *)cmdparams_save_str(&cmdparams, "TTOTAL", &newstat); | ttotal=(char *)cmdparams_save_str(&cmdparams, "TTOTAL", &newstat); |
status=drms_names_parseduration(&ttotal, &nseconds, 1); | status=drms_names_parseduration(&ttotal, &nseconds, 1); |
if (status) |
if (status != DRMS_SUCCESS) |
{ | { |
// newstat = newstat | CPSAVE_UNKNOWN_ERROR; | // newstat = newstat | CPSAVE_UNKNOWN_ERROR; |
fprintf(stderr, "ERROR: problem parsing TTOTAL, = %s\n", ttotal); | fprintf(stderr, "ERROR: problem parsing TTOTAL, = %s\n", ttotal); |
Line 85 int jretile_manytofew(void) |
|
Line 85 int jretile_manytofew(void) |
|
if (strcmp(kNOTSPECIFIED, tchunk)) | if (strcmp(kNOTSPECIFIED, tchunk)) |
{ | { |
status=drms_names_parseduration(&tchunk, &chunksecs, 1); | status=drms_names_parseduration(&tchunk, &chunksecs, 1); |
if (status) |
if (status != DRMS_SUCCESS) |
newstat = newstat | CPSAVE_UNKNOWN_ERROR; | newstat = newstat | CPSAVE_UNKNOWN_ERROR; |
} | } |
else | else |
Line 287 int jretile_manytofew(void) |
|
Line 287 int jretile_manytofew(void) |
|
return 1; | return 1; |
} | } |
| |
/* |
long long calversout, calvers; |
irecout=0; |
int calversunset=1; |
for (iset=0; iset < ntimechunks; iset++) |
|
{ |
|
tstartout=tstart + iset * chunksecs; |
|
tstopout=tstartout+chunksecs; |
|
|
|
for (lchunk = lchunkfirst; lchunk <= lchunklast; lchunk++) |
|
{ |
|
lminout = lchunk * lchunksize; |
|
lmaxout = lminout + lchunksize - 1; |
|
lminout = MAXIMUM(lminout,lmin); |
|
lmaxout = MINIMUM(lmaxout,lmax); |
|
|
|
outrec = outrecset->records[irecout]; |
|
if (histlink) |
|
drms_setlink_static(outrec, histlinkname, histrecnum); |
|
drms_setkey_int(outrec, "LMIN", lminout); |
|
drms_setkey_int(outrec, "LMAX", lmaxout); |
|
drms_setkey_time(outrec, "T_START", tstartout); |
|
drms_setkey_time(outrec, "T_STOP", tstopout); |
|
drms_setkey_time(outrec, "T_OBS", tstartout+chunksecs/2); |
|
drms_setkey_int(outrec, "NDT", ndt); |
|
|
|
irecout++; |
|
} |
|
} |
|
*/ |
|
| |
int firsttimethrough=1; | int firsttimethrough=1; |
int *nskiparr=(int *)calloc(nrecsout,sizeof(int)); | int *nskiparr=(int *)calloc(nrecsout,sizeof(int)); |
Line 343 int jretile_manytofew(void) |
|
Line 317 int jretile_manytofew(void) |
|
// continue; | // continue; |
} | } |
| |
|
if (calversunset) |
|
{ |
|
calversout=drms_getkey_longlong(inrec, "CALVER64", &status); |
|
if (status != DRMS_SUCCESS) |
|
calversout = 0; |
|
calversunset=0; |
|
} |
|
|
|
calvers=drms_getkey_longlong(inrec, "CALVER64", &status); |
|
if (status != DRMS_SUCCESS) |
|
calvers = 0; |
|
|
|
if (calvers != calversout) |
|
{ |
|
fprintf(stderr, "ERROR: input data has mixed CALVER64: %lld and %lld, recnum = %lld, histrecnum = %lld\n", calversout, calvers, inrec->recnum, histrecnum); |
|
return 0; |
|
} |
|
|
if (seginflag) | if (seginflag) |
segin = drms_segment_lookup(inrec, segnamein); | segin = drms_segment_lookup(inrec, segnamein); |
else | else |
segin = drms_segment_lookupnum(inrec, 0); | segin = drms_segment_lookupnum(inrec, 0); |
if (segin) |
if (segin != NULL) |
inarr = drms_segment_read(segin, usetype, &status); | inarr = drms_segment_read(segin, usetype, &status); |
// inarr = drms_segment_readslice(segin, usetype, startind, endind, &status); | // inarr = drms_segment_readslice(segin, usetype, startind, endind, &status); |
if (status != DRMS_SUCCESS || inarr == NULL || segin == NULL) | if (status != DRMS_SUCCESS || inarr == NULL || segin == NULL) |
Line 381 int jretile_manytofew(void) |
|
Line 373 int jretile_manytofew(void) |
|
| |
if (firsttimethrough) | if (firsttimethrough) |
{ | { |
if (histlink) |
if (histlink != NULL) |
drms_setlink_static(outrec, histlinkname, histrecnum); | drms_setlink_static(outrec, histlinkname, histrecnum); |
drms_copykeys(outrec, inrec, 0, kDRMS_KeyClass_Explicit); | drms_copykeys(outrec, inrec, 0, kDRMS_KeyClass_Explicit); |
|
// copykeys takes care of MAPMMAX, SINBDIVS, CALVER64, etc. that should be constant across the input |
drms_setkey_int(outrec, "LMIN", lminout); | drms_setkey_int(outrec, "LMIN", lminout); |
drms_setkey_int(outrec, "LMAX", lmaxout); | drms_setkey_int(outrec, "LMAX", lmaxout); |
drms_setkey_time(outrec, "T_START", tstartout); | drms_setkey_time(outrec, "T_START", tstartout); |
Line 451 int jretile_manytofew(void) |
|
Line 444 int jretile_manytofew(void) |
|
in_offset+=2*tstepin/cadence; | in_offset+=2*tstepin/cadence; |
} | } |
| |
|
outarr->bzero=segout->bzero; |
|
outarr->bscale=segout->bscale; |
status=drms_segment_writeslice_ext(segout, outarr, startind, endind, totallength, 0); | status=drms_segment_writeslice_ext(segout, outarr, startind, endind, totallength, 0); |
if (status != DRMS_SUCCESS) | if (status != DRMS_SUCCESS) |
{ | { |