Changeset 27435 for trunk/Ohana/src/opihi/cmd.data/read_vectors.c

Timestamp:

Mar 24, 2010, 11:22:25 AM (16 years ago)

Author:

eugene

Message:

large update merging in changes for Ohana to support large files

Location:

trunk/Ohana

Files:

• . (modified) (1 prop)
• src/opihi/cmd.data/read_vectors.c (modified) (6 diffs)

trunk/Ohana/src/opihi/cmd.data/read_vectors.c

@@ -57 +57 @@
     return (FALSE);
   }
-  fseek (f, 0, SEEK_SET);
+  fseeko (f, 0LL, SEEK_SET);
 
   Nvec = (argc - 1) / 2;
@@ -159 +159 @@
 int read_table_vectors (int argc, char **argv, char *extname) {
 
-  int i, j, k, N, Nbytes, Nextend, Ny, Binary, vecType;
+  off_t Nbytes;
+  int i, j, k, N, Nextend, Ny, Binary, vecType;
   char type[16], ID[80], *CCDKeyword;
   FTable table;
@@ -184 +185 @@
 
   if (f == NULL) ESCAPE ("file not found");
-  fseek (f, 0, SEEK_SET);
+  fseeko (f, 0LL, SEEK_SET);
   table.header = &header;
 
@@ -193 +194 @@
     if (!gfits_load_header (f, &header)) ESCAPE ("error reading primary header for file");
     Nbytes = gfits_data_size (&header);
-    fseek (f, Nbytes, SEEK_CUR);
+    fseeko (f, Nbytes, SEEK_CUR);
     gfits_free_header (&header);
 
@@ -200 +201 @@
       Nbytes = gfits_data_size (&header);
       /* skip the prior data buffers */
-      fseek (f, Nbytes, SEEK_CUR);
+      fseeko (f, Nbytes, SEEK_CUR);
       gfits_free_header (&header);
     }
@@ -215 +216 @@
 
     while (1) {
-      if (!gfits_load_header (f, &header)) ESCAPE ("extensio not found in file");
+      if (!gfits_load_header (f, &header)) ESCAPE ("extension not found in file");
       Nbytes = gfits_data_size (&header);
 
       if (!gfits_scan (&header, CCDKeyword, "%s", 1, ID)) {
-        fseek (f, Nbytes, SEEK_CUR);
+        fseeko (f, Nbytes, SEEK_CUR);
         gfits_free_header (&header);
         continue;
       }
       if (strcmp (ID, extname)) {
-        fseek (f, Nbytes, SEEK_CUR);
+        fseeko (f, Nbytes, SEEK_CUR);
         gfits_free_header (&header);
         continue;