IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 4854 for trunk/Ohana/src/opihi


Ignore:
Timestamp:
Aug 22, 2005, 10:08:38 AM (21 years ago)
Author:
eugene
Message:

working towards a unified dvo_image interface

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Ohana/src/opihi/dvo/LoadImages.c

    r3462 r4854  
    44
    55  char filename[256];
    6   int Nimage, NIMAGE;
    7   FILE *f;
    8   Header header;
    96  Image *image;
     7  FITS_DB db;
    108 
    119  VarConfig ("IMAGE_CATALOG", "%s", filename);
    1210
    13   *nimage = 0;
    14   NIMAGE = 0;
    15   Nimage = 0;
    16   image  = NULL;
    17 
    18   /* check if image datafile exists, get header */
    19   if (!fits_read_header (filename, &header)) {
     11  fits_db_init (&db);
     12  if (!fits_db_lock (&db, filename)) {
    2013    fprintf (stderr, "No available image catalog %s (1)\n", filename);
    2114    return (NULL);
    2215  }
    2316
    24   fits_scan (&header, "NIMAGES", "%d", 1, &NIMAGE);
    25   if (NIMAGE == 0) {
    26     fprintf (stderr, "no images found\n");
    27     return (NULL);
    28   }
     17  dvo_image_load (&db, TRUE);
     18  fits_db_close (&db);
    2919
    30   /* get ready to read data on images */
    31   f = fopen (filename, "r");
    32   if (f == (FILE *) NULL) {
    33     fprintf (stderr, "No available image catalog: %s (2)\n", filename);
    34     free (header.buffer);
    35     return (NULL);
    36   }
    37 
    38   ALLOCATE (image, Image, NIMAGE);
    39   fseek (f, header.size, SEEK_SET);
    40   Nimage = Fread (image, sizeof(Image), NIMAGE, f, "image");
    41   if (Nimage != NIMAGE) {
    42     fprintf (stderr, "failed to read in all images (%d of %d)\n", Nimage, NIMAGE);
    43   }
    44 
    45   fclose (f);
    46   *nimage = Nimage;
     20  image = fits_table_get_Image (&db.ftable, nimage);
    4721  return (image);
    4822}
Note: See TracChangeset for help on using the changeset viewer.