Changeset 27312 for branches/eam_branches/largefiles.20100314/Ohana
- Timestamp:
- Mar 17, 2010, 2:52:38 PM (16 years ago)
- Location:
- branches/eam_branches/largefiles.20100314/Ohana/src
- Files:
-
- 25 edited
-
relastro/include/relastro.h (modified) (10 diffs)
-
relastro/src/ImageOps.c (modified) (16 diffs)
-
relastro/src/MosaicOps.c (modified) (10 diffs)
-
relastro/src/UpdateChips.c (modified) (2 diffs)
-
relastro/src/UpdateMeasures.c (modified) (1 diff)
-
relastro/src/UpdateMosaic.c (modified) (1 diff)
-
relastro/src/UpdateObjects.c (modified) (5 diffs)
-
relastro/src/bcatalog.c (modified) (2 diffs)
-
relastro/src/load_images.c (modified) (1 diff)
-
relastro/src/select_images.c (modified) (3 diffs)
-
relphot/include/relphot.h (modified) (2 diffs)
-
relphot/src/GridOps.c (modified) (7 diffs)
-
relphot/src/ImageOps.c (modified) (6 diffs)
-
relphot/src/MosaicOps.c (modified) (14 diffs)
-
relphot/src/StarOps.c (modified) (1 diff)
-
relphot/src/select_images.c (modified) (1 diff)
-
relphot/src/setExclusions.c (modified) (1 diff)
-
relphot/src/setMrelFinal.c (modified) (1 diff)
-
tools/src/ftable.c (modified) (2 diffs)
-
tools/src/mktemp.c (modified) (3 diffs)
-
uniphot/include/uniphot.h (modified) (1 diff)
-
uniphot/src/find_image_sgroups.c (modified) (1 diff)
-
uniphot/src/find_image_tgroups.c (modified) (1 diff)
-
uniphot/src/subset_images.c (modified) (2 diffs)
-
uniphot/src/update.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/include/relastro.h
r24308 r27312 140 140 char *GetPhotnamebyCode PROTO((PhotCodeData *photcodes, int code)); 141 141 void InterpolateGrid PROTO((float *buffer, int Nx, int Ny, Coords *ccd, Coords *gcoords)); 142 int *SelectRefMosaic PROTO((Mosaic **refmosaic, int *Nimage));142 off_t *SelectRefMosaic PROTO((Mosaic **refmosaic, off_t *Nimage)); 143 143 int args PROTO((int argc, char **argv)); 144 144 int bcatalog PROTO((Catalog *subcatalog, Catalog *catalog)); … … 153 153 void findImages PROTO((Catalog *catalog, int Ncatalog)); 154 154 int findMosaics PROTO((Catalog *catalog, int Ncatalog)); 155 Image *find_images PROTO((FITS_DB *db, GSCRegion *region, int Nregion, int *Nimage, int **LineNum));155 Image *find_images PROTO((FITS_DB *db, GSCRegion *region, off_t Nregion, off_t *Nimage, off_t **LineNum)); 156 156 void set_db (FITS_DB *in); 157 157 int Shutdown (char *format, ...); … … 160 160 int SetSignals (void); 161 161 162 GSCRegion *find_regions PROTO((Image *image, int Nimage, int *Nregions, GSCRegion *fullregion));162 GSCRegion *find_regions PROTO((Image *image, off_t Nimage, int *Nregions, GSCRegion *fullregion)); 163 163 void freeGridBins PROTO((int Ncatalog)); 164 164 void freeImageBins PROTO((int Ncatalog)); … … 166 166 void free_catalogs PROTO((Catalog *catalog, int Ncatalog)); 167 167 int gcatalog PROTO((Catalog *catalog, int FINAL)); 168 Coords *getCoords PROTO(( int meas, int cat));169 float getMcal PROTO(( int meas, int cat));170 float getMgrid PROTO(( int meas, int cat));171 float getMmos PROTO(( int meas, int cat));172 float getMrel PROTO((Catalog *catalog, int meas, int cat));173 GSCRegion *get_regions PROTO((double minRa, double maxRa, double minDec, double maxDec, int *Nregions));174 void getfullregion PROTO((Image *image, int Nimage, GSCRegion *fullregion));175 Image *getimage PROTO(( int N));176 Image *getimages PROTO(( int *N));168 Coords *getCoords PROTO((off_t meas, int cat)); 169 float getMcal PROTO((off_t meas, int cat)); 170 float getMgrid PROTO((off_t meas, int cat)); 171 float getMmos PROTO((off_t meas, int cat)); 172 float getMrel PROTO((Catalog *catalog, off_t meas, int cat)); 173 GSCRegion *get_regions PROTO((double minRa, double maxRa, double minDec, double maxDec, off_t *Nregions)); 174 void getfullregion PROTO((Image *image, off_t Nimage, GSCRegion *fullregion)); 175 Image *getimage PROTO((off_t N)); 176 Image *getimages PROTO((off_t *N)); 177 177 void global_stats PROTO((Catalog *catalog, int Ncatalog)); 178 178 void initGrid PROTO((int dX, int dY)); 179 179 void initGridBins PROTO((Catalog *catalog, int Ncatalog)); 180 180 void initImageBins PROTO((Catalog *catalog, int Ncatalog)); 181 void initImages PROTO((Image *input, int N));181 void initImages PROTO((Image *input, off_t N)); 182 182 void initMosaicBins PROTO((Catalog *catalog, int Ncatalog)); 183 void initMosaicGrid PROTO((Image *image, int Nimage));184 void initMosaics PROTO((Image *image, int Nimage));183 void initMosaicGrid PROTO((Image *image, off_t Nimage)); 184 void initMosaics PROTO((Image *image, off_t Nimage)); 185 185 void initMrel PROTO((Catalog *catalog, int Ncatalog)); 186 186 void initialize PROTO((int argc, char **argv)); … … 189 189 Catalog *load_catalogs PROTO((SkyList *skylist, int *Ncatalog, int subselect)); 190 190 SkyList *load_images PROTO((FITS_DB *db, SkyRegion *region)); 191 Image *select_images PROTO((SkyList *skylist, Image *timage, int Ntimage, int **LineNumber, int *Nimage));191 Image *select_images PROTO((SkyList *skylist, Image *timage, off_t Ntimage, off_t **LineNumber, off_t *Nimage)); 192 192 193 193 void check_permissions (char *basefile); … … 198 198 199 199 int main PROTO((int argc, char **argv)); 200 void mark_images PROTO((Image *image, int Nimage, Image *timage, int Ntimage));201 void matchImage PROTO((Catalog *catalog, int meas, int cat));202 void matchMosaics PROTO((Catalog *catalog, int meas, int cat));203 GSCRegion *name_region PROTO((char *name, int *Nregions));200 void mark_images PROTO((Image *image, off_t Nimage, Image *timage, off_t Ntimage)); 201 void matchImage PROTO((Catalog *catalog, off_t meas, int cat)); 202 void matchMosaics PROTO((Catalog *catalog, off_t meas, int cat)); 203 GSCRegion *name_region PROTO((char *name, off_t *Nregions)); 204 204 double opening_angle PROTO((double x1, double y1, double x2, double y2, double x3, double y3)); 205 205 void plot_chisq PROTO((Catalog *catalog, int Ncatalog)); … … 224 224 int setMrelOutput PROTO((Catalog *catalog, int Ncatalog, int mark)); 225 225 void set_ZP PROTO((double ZERO)); 226 int setrefcode PROTO((Image *image, int Nimage));226 int setrefcode PROTO((Image *image, off_t Nimage)); 227 227 void skip_measurements PROTO((Catalog *catalog, int pass)); 228 228 void sortA PROTO((double *X, int N)); … … 268 268 int UpdateMosaic (Catalog *catalog, int Ncatalog); 269 269 int UpdateMeasures (Catalog *catalog, int Ncatalog); 270 void fixImageRaw (Catalog *catalog, int Ncatalog, int im);270 void fixImageRaw (Catalog *catalog, int Ncatalog, off_t im); 271 271 void FlagOutliers(Catalog *catalog); 272 272 int MeasFilterTest(Measure *measure); … … 278 278 int FitPMandPar (PMFit *fit, double *X, double *dX, double *Y, double *dY, double *T, double *pR, double *pD, int Npts); 279 279 280 Mosaic *getMosaicForImage ( int N);281 282 StarData *getImageRef (Catalog *catalog, int Ncatalog, int im, int *Nstars, CoordMode mode);283 StarData *getImageRaw (Catalog *catalog, int Ncatalog, int im, int *Nstars, CoordMode mode);284 285 Mosaic *getmosaics ( int *N);286 void initMosaics (Image *image, int Nimage);287 StarData *getMosaicRaw (Catalog *catalog, int Ncatalog, int mos, int *Nstars);288 StarData *getMosaicRef (Catalog *catalog, int Ncatalog, int mos, int *Nstars);289 Mosaic *getMosaicForImage ( int im);280 Mosaic *getMosaicForImage (off_t N); 281 282 StarData *getImageRef (Catalog *catalog, int Ncatalog, off_t im, off_t *Nstars, CoordMode mode); 283 StarData *getImageRaw (Catalog *catalog, int Ncatalog, off_t im, off_t *Nstars, CoordMode mode); 284 285 Mosaic *getmosaics (off_t *N); 286 void initMosaics (Image *image, off_t Nimage); 287 StarData *getMosaicRaw (Catalog *catalog, int Ncatalog, off_t mos, off_t *Nstars); 288 StarData *getMosaicRef (Catalog *catalog, int Ncatalog, off_t mos, off_t *Nstars); 289 Mosaic *getMosaicForImage (off_t im); 290 290 291 291 double getMeanR (Measure *measure, Average *average, SecFilt *secfilt); … … 297 297 int relastro_objects (void); 298 298 int UpdateObjectOffsets (SkyList *skylist); 299 300 int relastroVisualPlotRawRef(StarData *raw, StarData *ref, double dRmax, int numObj); 301 int relastroVisualPlotScatter(double values[], double thresh, int npts); 302 int relastroVisualPlotOutliers(Catalog *catalog, int offset, int Nmeasure, 303 StatType statsR, StatType statsD, double thresh); 304 -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/ImageOps.c
r24308 r27312 4 4 static unsigned int *start; 5 5 static unsigned int *stop; 6 static int **bin; 7 8 static int **clist; 9 static int **mlist;10 static int *Nlist;11 static int *NLIST;12 13 static Image *image; 14 static int Nimage;15 16 Image *getimages ( int *N) {6 7 static off_t **bin; // link from catalog,measure to image 8 static int **clist; // catalog which supplied measurement on image 9 static off_t **mlist; // measure reference for measurement on image 10 static off_t *Nlist; // number of measurements on image 11 static off_t *NLIST; // allocated number of measurements on image 12 13 static Image *image; // list of available images 14 static off_t Nimage; // number of available images 15 16 Image *getimages (off_t *N) { 17 17 *N = Nimage; 18 18 return (image); 19 19 } 20 20 21 Image *getimage ( int N) {21 Image *getimage (off_t N) { 22 22 return (&image[N]); 23 23 } 24 24 25 void initImages (Image *input, int N) {26 27 int i;25 void initImages (Image *input, off_t N) { 26 27 off_t i; 28 28 29 29 image = input; … … 41 41 void initImageBins (Catalog *catalog, int Ncatalog) { 42 42 43 int i, j;44 45 ALLOCATE (bin, int *, Ncatalog);43 off_t i, j; 44 45 ALLOCATE (bin, off_t *, Ncatalog); 46 46 for (i = 0; i < Ncatalog; i++) { 47 ALLOCATE (bin[i], int, MAX (catalog[i].Nmeasure, 1));47 ALLOCATE (bin[i], off_t, MAX (catalog[i].Nmeasure, 1)); 48 48 for (j = 0; j < catalog[i].Nmeasure; j++) bin[i][j] = -1; 49 49 } 50 50 51 ALLOCATE (Nlist, int,Nimage);52 ALLOCATE (NLIST, int,Nimage);53 ALLOCATE (clist, int *, Nimage);54 ALLOCATE (mlist, int *, Nimage);51 ALLOCATE (Nlist, off_t, Nimage); 52 ALLOCATE (NLIST, off_t, Nimage); 53 ALLOCATE (clist, int *, Nimage); 54 ALLOCATE (mlist, off_t *, Nimage); 55 55 56 56 for (i = 0; i < Nimage; i++) { … … 58 58 NLIST[i] = 100; 59 59 ALLOCATE (clist[i], int, NLIST[i]); 60 ALLOCATE (mlist[i], int, NLIST[i]);60 ALLOCATE (mlist[i], off_t, NLIST[i]); 61 61 } 62 62 } … … 64 64 void freeImageBins (int Ncatalog) { 65 65 66 int i;66 off_t i; 67 67 68 68 for (i = 0; i < Ncatalog; i++) { … … 81 81 void findImages (Catalog *catalog, int Ncatalog) { 82 82 83 int i, j;83 off_t i, j; 84 84 char *name; 85 85 … … 92 92 for (i = 0; VERBOSE && (i < Nimage); i++) { 93 93 name = GetPhotcodeNamebyCode (image[i].photcode); 94 fprintf (stderr, "image % d has %d measures (%s, %s)\n", i,Nlist[i],94 fprintf (stderr, "image %lld has %lld measures (%s, %s)\n", (long long) i, (long long) Nlist[i], 95 95 ohana_sec_to_date(image[i].tzero), name); 96 96 } … … 98 98 99 99 /* modify this function to use the measure->imageID field */ 100 void matchImage (Catalog *catalog, int meas, int cat) {101 102 int i;100 void matchImage (Catalog *catalog, off_t meas, int cat) { 101 102 off_t i; 103 103 Measure *measure; 104 104 … … 124 124 if (Nlist[i] == NLIST[i]) { 125 125 NLIST[i] += 100; 126 REALLOCATE (clist[i], int, NLIST[i]);127 REALLOCATE (mlist[i], int, NLIST[i]);126 REALLOCATE (clist[i], int, NLIST[i]); 127 REALLOCATE (mlist[i], off_t, NLIST[i]); 128 128 } 129 129 return; … … 131 131 } 132 132 133 Coords *getCoords ( int meas, int cat) {134 135 int i;133 Coords *getCoords (off_t meas, int cat) { 134 135 off_t i; 136 136 137 137 i = bin[cat][meas]; … … 142 142 void plot_images () { 143 143 144 int i, bin;144 off_t i, bin; 145 145 double *xlist, *Mlist, *dlist; 146 146 Graphdata graphdata; … … 188 188 // return StarData values for detections in the specified image, converting coordinates from the 189 189 // chip positions: X,Y -> L,M -> P,Q -> R,D 190 void fixImageRaw (Catalog *catalog, int Ncatalog, int im) {191 192 int i, m, c, n;190 void fixImageRaw (Catalog *catalog, int Ncatalog, off_t im) { 191 192 off_t i, m, c, n; 193 193 double X, Y, L, M, P, Q, R, D, dR, dD; 194 194 … … 257 257 // chip positions: X,Y -> L,M -> P,Q -> R,D. This function is used by the image fitting steps, for 258 258 // which the detections have already been filtered when they were loaded (bcatalog) 259 StarData *getImageRaw (Catalog *catalog, int Ncatalog, int im, int *Nstars, CoordMode mode) {260 261 int i, m, c, n;259 StarData *getImageRaw (Catalog *catalog, int Ncatalog, off_t im, off_t *Nstars, CoordMode mode) { 260 261 off_t i, m, c, n; 262 262 263 263 Mosaic *mosaic; … … 332 332 // the sky positions: R,D -> P,Q -> L,M -> X,Y 333 333 334 StarData *getImageRef (Catalog *catalog, int Ncatalog, int im, int *Nstars, CoordMode mode) {335 336 int i, m, c, n;334 StarData *getImageRef (Catalog *catalog, int Ncatalog, off_t im, off_t *Nstars, CoordMode mode) { 335 336 off_t i, m, c, n; 337 337 338 338 Mosaic *mosaic; … … 399 399 return; 400 400 401 int i, j, k, m, N, Ndel, Nave, Nmax, TOOFEW, Nsecfilt; 401 int Ndel, Nave; 402 off_t i, j, k, m, N, Nmax, TOOFEW, Nsecfilt; 402 403 double Ns, theta, x, y; 403 404 double *R, *D, *dR, *dD; … … 490 491 void FlagOutliers2D (Catalog *catalog) { 491 492 492 int i, j, k, m, N, Ndel, Nave, Nmax, TOOFEW, Nsecfilt; 493 int Ndel, Nave; 494 off_t i, j, k, m, N, Nmax, TOOFEW, Nsecfilt; 493 495 double *index; 494 496 double Ns, theta, x, y; … … 569 571 // recalculate image center, sigma based on closest 50% of points 570 572 for(k = 0; k < N; k++) { 571 int ind = (int) index[k];573 off_t ind = (off_t) index[k]; 572 574 R[k] = catalog[0].measure[ind].dR; 573 575 D[k] = catalog[0].measure[ind].dD; -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/MosaicOps.c
r21508 r27312 2 2 3 3 // array of mosaic definition structures 4 static int Nmosaic;4 static off_t Nmosaic; 5 5 static Mosaic *mosaic; 6 6 7 7 // list of all images associated with a mosaic 8 static int *Nmosaic_own_images; // number of images for this mosaic9 static int *Amosaic_own_images; // size of allocated array10 static int **mosaic_own_images; // array of arrays: mosaic -> images8 static off_t *Nmosaic_own_images; // number of images for this mosaic 9 static off_t *Amosaic_own_images; // size of allocated array 10 static off_t **mosaic_own_images; // array of arrays: mosaic -> images 11 11 12 12 // list of mosaic associated with each image 13 static int Nmosaic_for_images; // number of images (for internal checks)14 static int *mosaic_for_images; // array of: image -> mosaic13 static off_t Nmosaic_for_images; // number of images (for off_ternal checks) 14 static off_t *mosaic_for_images; // array of: image -> mosaic 15 15 16 Mosaic *getmosaics ( int *N) {16 Mosaic *getmosaics (off_t *N) { 17 17 *N = Nmosaic; 18 18 return (mosaic); … … 20 20 21 21 // find mosaic frames (unique time periods & photcode name matches mosaic) 22 void initMosaics (Image *image, int Nimage) {22 void initMosaics (Image *image, off_t Nimage) { 23 23 24 int i, j, found, NMOSAIC;24 off_t i, j, found, NMOSAIC; 25 25 unsigned int start, stop; 26 26 … … 29 29 ALLOCATE (mosaic, Mosaic, NMOSAIC); 30 30 31 ALLOCATE (Nmosaic_own_images, int, NMOSAIC);32 ALLOCATE (Amosaic_own_images, int, NMOSAIC);33 ALLOCATE (mosaic_own_images, int *, NMOSAIC);31 ALLOCATE (Nmosaic_own_images, off_t, NMOSAIC); 32 ALLOCATE (Amosaic_own_images, off_t, NMOSAIC); 33 ALLOCATE (mosaic_own_images, off_t *, NMOSAIC); 34 34 35 35 /* find the mosaic images (coords.ctype = DIS); generate list of unique mosaics */ … … 54 54 Nmosaic_own_images[Nmosaic] = 0; 55 55 Amosaic_own_images[Nmosaic] = 10; 56 ALLOCATE (mosaic_own_images[Nmosaic], int, Amosaic_own_images[Nmosaic]);56 ALLOCATE (mosaic_own_images[Nmosaic], off_t, Amosaic_own_images[Nmosaic]); 57 57 58 58 Nmosaic ++; … … 60 60 NMOSAIC += 10; 61 61 REALLOCATE (mosaic, Mosaic, NMOSAIC); 62 REALLOCATE (mosaic_own_images, int *, NMOSAIC);63 REALLOCATE (Nmosaic_own_images, int, NMOSAIC);64 REALLOCATE (Amosaic_own_images, int, NMOSAIC);62 REALLOCATE (mosaic_own_images, off_t *, NMOSAIC); 63 REALLOCATE (Nmosaic_own_images, off_t, NMOSAIC); 64 REALLOCATE (Amosaic_own_images, off_t, NMOSAIC); 65 65 } 66 66 } … … 68 68 // array to store image->mosaic index 69 69 Nmosaic_for_images = Nimage; 70 ALLOCATE (mosaic_for_images, int, Nmosaic_for_images);70 ALLOCATE (mosaic_for_images, off_t, Nmosaic_for_images); 71 71 72 72 /* now assign the WRP images to these mosaics */ … … 99 99 if (Nmosaic_own_images[j] == Amosaic_own_images[j]) { 100 100 Amosaic_own_images[j] += 10; 101 REALLOCATE (mosaic_own_images[j], int, Amosaic_own_images[j]);101 REALLOCATE (mosaic_own_images[j], off_t, Amosaic_own_images[j]); 102 102 } 103 103 assert (Nmosaic_own_images[j] < Amosaic_own_images[j]); … … 109 109 // return StarData values for detections in the specified image, converting coordinates from the 110 110 // chip positions: X,Y -> L,M -> P,Q -> R,D 111 StarData *getMosaicRaw (Catalog *catalog, int Ncatalog, int mos, int *Nstars) {111 StarData *getMosaicRaw (Catalog *catalog, int Ncatalog, off_t mos, off_t *Nstars) { 112 112 113 int i, j, im, Nraw, Nnew;113 off_t i, j, im, Nraw, Nnew; 114 114 StarData *raw, *new; 115 115 … … 142 142 // return StarData values for averages positions in the specified image, converting coordinates from 143 143 // the sky positions: R,D -> P,Q -> L,M -> X,Y 144 StarData *getMosaicRef (Catalog *catalog, int Ncatalog, int mos, int *Nstars) {144 StarData *getMosaicRef (Catalog *catalog, int Ncatalog, off_t mos, off_t *Nstars) { 145 145 146 int i, j, im, Nref, Nnew;146 off_t i, j, im, Nref, Nnew; 147 147 StarData *ref, *new; 148 148 … … 172 172 } 173 173 174 Mosaic *getMosaicForImage ( int im) {174 Mosaic *getMosaicForImage (off_t im) { 175 175 176 int mos;176 off_t mos; 177 177 178 178 if (im < 0) abort(); -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/UpdateChips.c
r17151 r27312 4 4 5 5 /* we can measure new image parameters for each non-mosaic chip independently */ 6 int i, Nimage, Nraw, Nref;6 off_t i, Nimage, Nraw, Nref; 7 7 Image *image; 8 8 StarData *raw, *ref; … … 25 25 26 26 // FitChip does iterative, clipped fitting 27 fprintf (stderr, "image % d : Nstars: %d\n", i,Nraw);27 fprintf (stderr, "image %lld : Nstars: %lld\n", (long long) i, (long long) Nraw); 28 28 FitChip (raw, ref, Nraw, &image[i].coords); 29 29 -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/UpdateMeasures.c
r16810 r27312 3 3 int UpdateMeasures (Catalog *catalog, int Ncatalog) { 4 4 5 int i, Nimage;5 off_t i, Nimage; 6 6 Image *image; 7 7 -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/UpdateMosaic.c
r15600 r27312 4 4 5 5 /* we can measure new image parameters for each mosaic independently */ 6 int i, Nmosaic, Nstars;6 off_t i, Nmosaic, Nstars; 7 7 Mosaic *mosaic; 8 8 StarData *raw, *ref; -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/UpdateObjects.c
r24308 r27312 1 1 # include "relastro.h" 2 2 3 static intNmax;3 static off_t Nmax; 4 4 static double *X, *dX; 5 5 static double *Y, *dY; … … 13 13 void initObjectData (Catalog *catalog, int Ncatalog) { 14 14 15 int i, j;15 off_t i, j; 16 16 17 17 Nmax = 0; … … 40 40 int UpdateObjects (Catalog *catalog, int Ncatalog) { 41 41 42 int i, j, k, m, N, Nsecfilt , found, kp;42 int i, j, k, m, N, Nsecfilt; 43 43 StatType statsR, statsD; 44 44 Coords coords; … … 47 47 int mode, Nave, Npm, Npar, Nskip; 48 48 double Tmin, Tmax; 49 float mag;50 int mask;51 PhotCode *code;52 49 53 50 initObjectData (catalog, Ncatalog); … … 74 71 for (i = 0; i < Ncatalog; i++) { 75 72 76 if (VERBOSE) fprintf (stderr, "astrometrize catalog %d : % d ave, %d meas\n", i, catalog[i].Naverage,catalog[i].Nmeasure);73 if (VERBOSE) fprintf (stderr, "astrometrize catalog %d : %lld ave, %lld meas\n", i, (long long) catalog[i].Naverage, (long long) catalog[i].Nmeasure); 77 74 78 75 Nskip = 0; -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/bcatalog.c
r24308 r27312 3 3 int bcatalog (Catalog *subcatalog, Catalog *catalog) { 4 4 5 int i, j, k, offset, found; 6 int NAVERAGE, NMEASURE, Naverage, Nmeasure, Nm, Nsecfilt; 7 float mag; 8 int mask; 9 PhotCode *code; 5 off_t i, j, offset; 6 off_t NAVERAGE, NMEASURE, Naverage, Nmeasure, Nm; 7 int Nsecfilt; 10 8 11 9 // XXX in the future, use catalog[0].Nsecfilt only? allow catalogs to have variable Nsecfilt? … … 106 104 107 105 if (VERBOSE) { 108 fprintf (stderr, "%d: using %d stars (%d measures) for catalog\n", i, 109 subcatalog[0].Naverage, subcatalog[0].Nmeasure); 106 fprintf (stderr, "%lld: using %lld stars (%lld measures) for catalog\n", (long long) i, (long long) subcatalog[0].Naverage, (long long) subcatalog[0].Nmeasure); 110 107 } 111 108 return (TRUE); -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/load_images.c
r25757 r27312 4 4 5 5 Image *image, *subset; 6 intNimage, Nsubset;7 int*LineNumber;6 off_t Nimage, Nsubset; 7 off_t *LineNumber; 8 8 9 9 SkyTable *sky = NULL; -
branches/eam_branches/largefiles.20100314/Ohana/src/relastro/src/select_images.c
r21508 r27312 13 13 } SkyRegionCoords; 14 14 15 Image *select_images (SkyList *skylist, Image *timage, int Ntimage, int **LineNumber, int *Nimage) {15 Image *select_images (SkyList *skylist, Image *timage, off_t Ntimage, off_t **LineNumber, off_t *Nimage) { 16 16 17 17 Image *image; 18 int i, j, k, m, found, nimage, NIMAGE;19 int InRange ;18 off_t i, j, k, m, nimage, NIMAGE; 19 int InRange, found; 20 20 double Ri[5], Di[5], Xi[5], Yi[5], dx, dy; 21 int *line_number;21 off_t *line_number; 22 22 Coords tcoords; 23 23 SkyRegionCoords *skycoords; … … 71 71 NIMAGE = 100; 72 72 ALLOCATE (image, Image, NIMAGE); 73 ALLOCATE (line_number, int, NIMAGE);73 ALLOCATE (line_number, off_t, NIMAGE); 74 74 75 75 // go through the complete list of images, selecting ones which overlap any region … … 161 161 NIMAGE += 100; 162 162 REALLOCATE (image, Image, NIMAGE); 163 REALLOCATE (line_number, int, NIMAGE);163 REALLOCATE (line_number, off_t, NIMAGE); 164 164 } 165 165 } 166 166 } 167 167 168 if (VERBOSE) fprintf (stderr, "found % d images\n",nimage);168 if (VERBOSE) fprintf (stderr, "found %lld images\n", (long long) nimage); 169 169 170 170 REALLOCATE (image, Image, MAX (nimage, 1)); 171 REALLOCATE (line_number, int, MAX (nimage, 1));171 REALLOCATE (line_number, off_t, MAX (nimage, 1)); 172 172 free (skycoords); 173 173 -
branches/eam_branches/largefiles.20100314/Ohana/src/relphot/include/relphot.h
r27306 r27312 7 7 # define GRID_V2 8 8 # define NO_IMAGE -100 9 10 # if (0)11 typedef struct {12 double xmin, xmax, ymin, ymax;13 int style, ptype, ltype, etype, color;14 double lweight, size;15 } Graphdata;16 # endif17 9 18 10 typedef struct { … … 110 102 111 103 # ifdef GRID_V1 112 int setGridMeasure ( int meas, int cat, double X, double Y);104 int setGridMeasure (off_t meas, int cat, double X, double Y); 113 105 # endif 114 106 115 107 # ifdef GRID_V2 116 int setGridMeasure ( int meas, int cat, double X, double Y, int ccdnum);108 int setGridMeasure (off_t meas, int cat, double X, double Y, int ccdnum); 117 109 # endif 118 110 -
branches/eam_branches/largefiles.20100314/Ohana/src/relphot/src/GridOps.c
r27305 r27312 7 7 }; 8 8 9 static int Ngrid; 9 static int Ngrid; // number of grid elements (gridX * gridY) 10 10 static float *gridM; // magnitude offset for this grid cell 11 11 static float *gridS; // stdev of the magnitude offset for this grid cell 12 12 static int *gridN; // number of stars used to measure the magnitude offset for this grid cell 13 13 static int *gridV; // data mode for this cell: fitted, frozen, reference 14 static int gridX; 15 static int gridY; 16 17 static int **bin; 18 static int **Xmeas; 19 static int **Ymeas; 14 static int gridX; // number of grid elements in X direction 15 static int gridY; // number of grid elements in Y direction 16 17 static int **bin; // link from catalog, measure to grid element 18 static int **Xmeas; // grid x-coordinate for a measurement 19 static int **Ymeas; // grid y-coordinate for a measurement 20 20 21 21 static int **clist; // link from measurement on a cell to catalog containing measurement 22 static int**mlist; // link from measurement on a cell to measurement in a catalog23 static int *Nlist; // listof measurements for each grid cell24 static int *NLIST;22 static off_t **mlist; // link from measurement on a cell to measurement in a catalog 23 static off_t *Nlist; // number of measurements for each grid cell 24 static off_t *NLIST; // allocated number of measurements for each grid cell 25 25 26 26 static struct { … … 159 159 ALLOCATE (Ymeas, int *, Ncatalog); 160 160 for (i = 0; i < Ncatalog; i++) { 161 ALLOCATE (bin[i], int, MAX (catalog[i].Nmeasure, 1));161 ALLOCATE (bin[i], int, MAX (catalog[i].Nmeasure, 1)); 162 162 ALLOCATE (Xmeas[i], int, MAX (catalog[i].Nmeasure, 1)); 163 163 ALLOCATE (Ymeas[i], int, MAX (catalog[i].Nmeasure, 1)); … … 166 166 167 167 /* define grid -> cat,meas pointers */ 168 ALLOCATE (Nlist, int,Ngrid);169 ALLOCATE (NLIST, int,Ngrid);170 ALLOCATE (clist, int *, Ngrid);171 ALLOCATE (mlist, int *, Ngrid);168 ALLOCATE (Nlist, off_t, Ngrid); 169 ALLOCATE (NLIST, off_t, Ngrid); 170 ALLOCATE (clist, int *, Ngrid); 171 ALLOCATE (mlist, off_t *, Ngrid); 172 172 173 173 for (i = 0; i < Ngrid; i++) { 174 174 Nlist[i] = 0; 175 175 NLIST[i] = 100; 176 ALLOCATE (clist[i], int, NLIST[i]);177 ALLOCATE (mlist[i], int, NLIST[i]);176 ALLOCATE (clist[i], int, NLIST[i]); 177 ALLOCATE (mlist[i], off_t, NLIST[i]); 178 178 } 179 179 } … … 206 206 } 207 207 208 int setGridMeasure ( int meas, int cat, double X, double Y, int ccdnum) {208 int setGridMeasure (off_t meas, int cat, double X, double Y, int ccdnum) { 209 209 210 210 int ix, iy, Cx, Cy, i; … … 241 241 if (Nlist[i] == NLIST[i]) { 242 242 NLIST[i] += 100; 243 REALLOCATE (clist[i], int, NLIST[i]);244 REALLOCATE (mlist[i], int, NLIST[i]);243 REALLOCATE (clist[i], int, NLIST[i]); 244 REALLOCATE (mlist[i], off_t, NLIST[i]); 245 245 } 246 246 return (TRUE); … … 264 264 } 265 265 266 float getMgrid ( int meas, int cat) {266 float getMgrid (off_t meas, int cat) { 267 267 268 268 int i; … … 673 673 void dump_grid () { 674 674 675 int i, j, Nimage, Nbytes, Nformat; 676 int *imlist; 675 off_t i, Nimage; 676 int j, Nbytes, Nformat; 677 off_t *imlist; 677 678 FILE *f; 678 679 Header header, theader; -
branches/eam_branches/largefiles.20100314/Ohana/src/relphot/src/ImageOps.c
r27306 r27312 165 165 /* XXX convert this to use the values of measure->Xccd,Yccd */ 166 166 /* XXX need to apply the conversion for ELIXIR and LONEOS formats */ 167 void matchImage (Catalog *catalog, off_t meas, off_t cat) { 168 169 off_t i, ccdnum; 167 void matchImage (Catalog *catalog, off_t meas, int cat) { 168 169 off_t i; 170 int ccdnum; 170 171 double X, Y; 171 172 char *pname, *filter, *p, base[256]; … … 229 230 } 230 231 231 off_t getImageEntry (off_t meas, off_t cat) {232 off_t getImageEntry (off_t meas, int cat) { 232 233 233 234 off_t i; … … 237 238 } 238 239 239 float getMcal (off_t meas, off_t cat) {240 float getMcal (off_t meas, int cat) { 240 241 241 242 off_t i; … … 250 251 } 251 252 252 Coords *getCoords (off_t meas, off_t cat) {253 Coords *getCoords (off_t meas, int cat) { 253 254 254 255 off_t i; … … 262 263 void setMcal (Catalog *catalog, int PoorImages) { 263 264 264 off_t i, j, m, c, n, N, Nmax, mark, bad, Nfew, Nbad, Nmos, Ngrid, Nrel, Nsys; 265 off_t i, j, m, c, n, N, Nmax, mark, bad; 266 int Nfew, Nbad, Nmos, Ngrid, Nrel, Nsys; 265 267 float Msys, Mrel, Mmos, Mgrid; 266 268 double *list, *dlist; … … 360 362 void clean_images () { 361 363 362 off_t i, N, mark, Nmark; 364 int mark, Nmark; 365 off_t i, N; 363 366 double *mlist, *slist, *dlist; 364 367 double MaxOffset, MaxScatter, MedOffset; -
branches/eam_branches/largefiles.20100314/Ohana/src/relphot/src/MosaicOps.c
r27306 r27312 8 8 static off_t **bin; /* catalog, measure -> mosaic */ 9 9 10 static off_t**clist; /* mosaic -> catalog[] */10 static int **clist; /* mosaic -> catalog[] */ 11 11 static off_t **mlist; /* mosiac -> measure[] */ 12 12 static off_t *Nlist; … … 26 26 ALLOCATE (mosaic, Mosaic, NMOSAIC); 27 27 28 ALLOCATE (imlist, off_t *, NMOSAIC);29 ALLOCATE (Nimlist, off_t, NMOSAIC);30 ALLOCATE (NIMLIST, off_t, NMOSAIC);28 ALLOCATE (imlist, off_t *, NMOSAIC); 29 ALLOCATE (Nimlist, off_t, NMOSAIC); 30 ALLOCATE (NIMLIST, off_t, NMOSAIC); 31 31 32 32 /* generate list of unique mosaics */ … … 78 78 if (Nmosaic == NMOSAIC) { 79 79 NMOSAIC += 10; 80 REALLOCATE (mosaic, Mosaic,NMOSAIC);81 REALLOCATE (imlist, off_t *, NMOSAIC);82 REALLOCATE (Nimlist, off_t, NMOSAIC);83 REALLOCATE (NIMLIST, off_t, NMOSAIC);80 REALLOCATE (mosaic, Mosaic, NMOSAIC); 81 REALLOCATE (imlist, off_t *, NMOSAIC); 82 REALLOCATE (Nimlist, off_t, NMOSAIC); 83 REALLOCATE (NIMLIST, off_t, NMOSAIC); 84 84 } 85 85 } … … 201 201 202 202 /* mosaic -> measure */ 203 ALLOCATE (Nlist, off_t, Nmosaic);204 ALLOCATE (NLIST, off_t, Nmosaic);205 ALLOCATE (clist, off_t *,Nmosaic);203 ALLOCATE (Nlist, off_t, Nmosaic); 204 ALLOCATE (NLIST, off_t, Nmosaic); 205 ALLOCATE (clist, int *, Nmosaic); 206 206 ALLOCATE (mlist, off_t *, Nmosaic); 207 207 … … 209 209 Nlist[i] = 0; 210 210 NLIST[i] = 100; 211 ALLOCATE (clist[i], off_t,NLIST[i]);211 ALLOCATE (clist[i], int, NLIST[i]); 212 212 ALLOCATE (mlist[i], off_t, NLIST[i]); 213 213 } … … 239 239 int findMosaics (Catalog *catalog, int Ncatalog) { 240 240 241 int i, ecode; 241 242 off_t j; 242 int i, ecode;243 243 244 244 if (!MOSAIC_ZEROPT) return (FALSE); … … 260 260 void matchMosaics (Catalog *catalog, off_t meas, int cat) { 261 261 262 int off_t;262 int i; 263 263 264 264 for (i = 0; i < Nmosaic; i++) { … … 286 286 if (Nlist[i] == NLIST[i]) { 287 287 NLIST[i] += 100; 288 REALLOCATE (clist[i], int, NLIST[i]);289 REALLOCATE (mlist[i], int, NLIST[i]);288 REALLOCATE (clist[i], int, NLIST[i]); 289 REALLOCATE (mlist[i], off_t, NLIST[i]); 290 290 } 291 291 return; … … 295 295 } 296 296 297 float getMmos (off_t meas, off_t cat) {297 float getMmos (off_t meas, int cat) { 298 298 299 299 off_t i; … … 392 392 mark = (N < IMAGE_TOOFEW) || (N < IMAGE_GOOD_FRACTION*Nlist[i]); 393 393 if (mark) { 394 fprintf (stderr, "marked image %s (% d), (%d < %d) || (%d < %f*%d)\n", image[imlist[i][0]].name, i, N, IMAGE_TOOFEW, N, IMAGE_GOOD_FRACTION,Nlist[i]);394 fprintf (stderr, "marked image %s (%lld), (%lld < %d) || (%lld < %f*%lld)\n", image[imlist[i][0]].name, (long long) i, (long long) N, IMAGE_TOOFEW, (long long) N, IMAGE_GOOD_FRACTION, (long long) Nlist[i]); 395 395 mosaic[i].flags |= ID_IMAGE_FEW; 396 396 Nfew ++; … … 400 400 } 401 401 liststats (list, dlist, N, &stats); 402 if (PoorImages) fprintf (stderr, "Mmos: %f %f %d % d\n", stats.mean, stats.sigma, stats.Nmeas,N);402 if (PoorImages) fprintf (stderr, "Mmos: %f %f %d %lld\n", stats.mean, stats.sigma, stats.Nmeas, (long long) N); 403 403 mosaic[i].Mcal = stats.mean; 404 404 mosaic[i].dMcal = stats.sigma; … … 511 511 n++; 512 512 } 513 fprintf (stderr, "Nmosaic: % d, n: %d\n", Nmosaic,n);513 fprintf (stderr, "Nmosaic: %lld, n: %lld\n", (long long) Nmosaic, (long long) n); 514 514 515 515 liststats (list, dlist, n, &stats); … … 591 591 } 592 592 593 fprintf (stderr, "% d mosaics marked poor\n",Nmark);593 fprintf (stderr, "%lld mosaics marked poor\n", (long long) Nmark); 594 594 initstats (STATMODE); 595 595 free (mlist); … … 635 635 } 636 636 637 sprintf (string, "Mosaic % d",i);637 sprintf (string, "Mosaic %lld", (long long) i); 638 638 plot_defaults (&graphdata); 639 639 plot_list (&graphdata, xlist, ylist, N, string, NULL); -
branches/eam_branches/largefiles.20100314/Ohana/src/relphot/src/StarOps.c
r27305 r27312 20 20 } 21 21 22 float getMrel (Catalog *catalog, int meas, int cat) {22 float getMrel (Catalog *catalog, off_t meas, int cat) { 23 23 24 24 int ave; -
branches/eam_branches/largefiles.20100314/Ohana/src/relphot/src/select_images.c
r27305 r27312 151 151 } 152 152 153 if (VERBOSE) fprintf (stderr, "found % d images\n",nimage);153 if (VERBOSE) fprintf (stderr, "found %lld images\n", (long long) nimage); 154 154 155 155 REALLOCATE (image, Image, MAX (nimage, 1)); -
branches/eam_branches/largefiles.20100314/Ohana/src/relphot/src/setExclusions.c
r27305 r27312 50 50 } 51 51 } 52 if (VERBOSE) fprintf (stderr, "% d measurements marked by area\n",Narea);53 if (VERBOSE) fprintf (stderr, "% d measurements marked nocal\n",Nnocal);54 if (VERBOSE) fprintf (stderr, "% d measurements kept for analysis\n",Ngood);52 if (VERBOSE) fprintf (stderr, "%lld measurements marked by area\n", (long long) Narea); 53 if (VERBOSE) fprintf (stderr, "%lld measurements marked nocal\n", (long long) Nnocal); 54 if (VERBOSE) fprintf (stderr, "%lld measurements kept for analysis\n", (long long) Ngood); 55 55 return (TRUE); 56 56 } -
branches/eam_branches/largefiles.20100314/Ohana/src/relphot/src/setMrelFinal.c
r27305 r27312 68 68 69 69 off_t i, k, m; 70 int ecode , d1, d2;70 int ecode; 71 71 off_t Ntot, Ntry, Nkeep, Nskip; 72 72 float mag; -
branches/eam_branches/largefiles.20100314/Ohana/src/tools/src/ftable.c
r27295 r27312 213 213 fprintf (stderr, "missing %s\n", axisname); 214 214 } 215 fprintf (stdout, " %7 d",Nelem);215 fprintf (stdout, " %7lld", (long long) Nelem); 216 216 } 217 217 fprintf (stdout, "\n"); … … 358 358 if (!strcmp (type, "int64_t")) { 359 359 memcpy (line, &data[i*Nv*Nb + Nb*j], Nb); 360 fprintf (stdout, "% d ",*(int64_t*)line);360 fprintf (stdout, "%lld ", (long long) *(int64_t*)line); 361 361 } 362 362 if (!strcmp (type, "float")) { -
branches/eam_branches/largefiles.20100314/Ohana/src/tools/src/mktemp.c
r25757 r27312 5 5 # define FALSE 0 6 6 # define TRUE 1 7 8 void usage(void); 7 9 8 10 int main (int argc, char **argv) { … … 95 97 96 98 if (make_directory) { 97 if (mkdtemp (template) == -1) {99 if (mkdtemp (template) == NULL) { 98 100 if (!fail_silently) fprintf (stderr, "failed to make temp file from %s\n", template); 99 101 exit (1); … … 111 113 } 112 114 113 usage() {115 void usage(void) { 114 116 fprintf (stderr, "Usage: mktemp [-V] | [-dqtu] [-p prefix] [template]\n"); 115 117 exit (1); -
branches/eam_branches/largefiles.20100314/Ohana/src/uniphot/include/uniphot.h
r21153 r27312 93 93 void wcatalog PROTO((Catalog *catalog)); 94 94 void wimages PROTO((Image *image, int Nimage)); 95 void check_permissions (char *basefile);96 void lock_image_db (FITS_DB *db, char *filename);97 void unlock_image_db (FITS_DB *db);98 void create_image_db (FITS_DB *db);99 void set_db (FITS_DB *in);100 int Shutdown (char *format, ...);101 void TrapSignal (int sig);102 void SetProtect (int mode);103 int SetSignals (void);104 int subset_images (FITS_DB *db);105 void update (FITS_DB *db, Group *sgroup, int Nsgroup);106 void sort_time (unsigned int *value, int N);95 void check_permissions PROTO((char *basefile)); 96 void lock_image_db PROTO((FITS_DB *db, char *filename)); 97 void unlock_image_db PROTO((FITS_DB *db)); 98 void create_image_db PROTO((FITS_DB *db)); 99 void set_db PROTO((FITS_DB *in)); 100 int Shutdown PROTO((char *format, ...)); 101 void TrapSignal PROTO((int sig)); 102 void SetProtect PROTO((int mode)); 103 int SetSignals PROTO((void)); 104 int subset_images PROTO((FITS_DB *db)); 105 void update PROTO((FITS_DB *db, Group *sgroup, int Nsgroup)); 106 void sort_time PROTO((unsigned int *value, int N)); -
branches/eam_branches/largefiles.20100314/Ohana/src/uniphot/src/find_image_sgroups.c
r21508 r27312 3 3 Group *find_image_sgroups (FITS_DB *db, ImageLink **Imlink, int *Nsgroup) { 4 4 5 int i, j, Nimage, Ngroup, Nentry, NENTRY; 5 off_t i, Nimage; 6 int j, Ngroup, Nentry, NENTRY; 6 7 double r, d, x, y, radius; 7 8 Group *group; -
branches/eam_branches/largefiles.20100314/Ohana/src/uniphot/src/find_image_tgroups.c
r21508 r27312 4 4 5 5 char *start, *stop; 6 int i, j, Nimage, Ngroup, NGROUP, Nentry, NENTRY; 6 int j, Ngroup, NGROUP, Nentry, NENTRY; 7 off_t i, Nimage; 7 8 unsigned int *time, *tmin, *tmax; 8 9 Group *group; -
branches/eam_branches/largefiles.20100314/Ohana/src/uniphot/src/subset_images.c
r21508 r27312 3 3 int subset_images (FITS_DB *db) { 4 4 5 int i, Nimage, equiv;6 int Nkeep, *keep;5 off_t i, Nimage, Nkeep, *keep; 6 int equiv; 7 7 Image *image; 8 8 … … 11 11 12 12 Nkeep = 0; 13 ALLOCATE (keep, int, Nimage);13 ALLOCATE (keep, off_t, Nimage); 14 14 15 15 /* mark images to be calibrated */ -
branches/eam_branches/largefiles.20100314/Ohana/src/uniphot/src/update.c
r21508 r27312 4 4 void update (FITS_DB *db, Group *sgroup, int Nsgroup) { 5 5 6 int i, j, status, Nmin, Nimage; 6 off_t i, Nimage; 7 int j, status, Nmin; 7 8 char line[256]; 8 9 glob_t pglob;
Note:
See TracChangeset
for help on using the changeset viewer.
