Changeset 39394
- Timestamp:
- Feb 26, 2016, 6:19:43 AM (10 years ago)
- Location:
- trunk/Ohana/src/libfits
- Files:
-
- 5 edited
-
header/F_read_H.c (modified) (1 diff)
-
include/gfitsio.h (modified) (1 diff)
-
table/F_set_column.c (modified) (6 diffs)
-
table/F_table_format.c (modified) (1 diff)
-
table/F_table_row.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/libfits/header/F_read_H.c
r38989 r39394 29 29 header[0].datasize = 0; 30 30 done = FALSE; 31 ALLOCATE (header[0].buffer, char, 1);31 ALLOCATE (header[0].buffer, char, FT_RECORD_SIZE); 32 32 33 33 for (i = 0; !done; i++) { -
trunk/Ohana/src/libfits/include/gfitsio.h
r39270 r39394 286 286 int gfits_dump_cmp_table (FTable *table, char *message); 287 287 288 void myMemset (char *ptr, int value, size_t N); 288 289 289 290 #endif /* FITSIO */ -
trunk/Ohana/src/libfits/table/F_set_column.c
r39324 r39394 2 2 # include <gfitsio.h> 3 3 # define OHANA_MEMCHECK 0 4 # define CHECK_MEMBLOCKS 0 4 5 5 6 # define SWAP_NONE … … 45 46 # endif 46 47 48 memset (tlabel, 0, 256); 49 memset (field, 0, 256); 50 memset (format, 0, 256); 51 memset (type, 0, 64); 52 memset (tmpline, 0, 64); 53 47 54 if (label == (char *) NULL) return (FALSE); 48 55 if (label[0] == 0) return (FALSE); … … 95 102 } 96 103 104 // ohana_memcheck (TRUE); 105 97 106 /* make duplicate of data with correct type 98 107 byte swap and Bzero/Bscale */ 99 108 ALLOCATE (array, char, Nbytes*Nval*Nrow); 109 if (CHECK_MEMBLOCKS) { 110 OhanaMemblock *ref = (OhanaMemblock *) array - 1; 111 fprintf (stderr, "ref: "OFF_T_FMT", array: "OFF_T_FMT"\n", (off_t) ref, (off_t) array); 112 if (!ref->nextBlock && !ref->prevBlock) abort(); 113 } 114 100 115 Pin = data; 101 116 Pout = array; 117 118 // ohana_memcheck (TRUE); 119 120 if (CHECK_MEMBLOCKS) { 121 OhanaMemblock *ref = (OhanaMemblock *) array - 1; 122 fprintf (stderr, "ref: "OFF_T_FMT", array: "OFF_T_FMT"\n", (off_t) ref, (off_t) array); 123 if (!ref->nextBlock && !ref->prevBlock) abort(); 124 } 102 125 103 126 // does it makes sense to scale 'char' data? … … 187 210 } 188 211 212 if (CHECK_MEMBLOCKS) { 213 OhanaMemblock *ref = (OhanaMemblock *) array - 1; 214 fprintf (stderr, "ref: "OFF_T_FMT", array: "OFF_T_FMT"\n", (off_t) ref, (off_t) array); 215 if (!ref->nextBlock && !ref->prevBlock) abort(); 216 } 217 189 218 /* check array space */ 190 219 if (Nx*Ny < Nx*(Nrow - 1) + Nstart + Nval*Nbytes) { … … 193 222 } 194 223 224 // ohana_memcheck (TRUE); 195 225 /* insert bytes from array into appropriate section of buffer */ 196 226 Pout = table[0].buffer + Nstart; … … 206 236 myAssert ( type[63] == 0x7f, "oops"); 207 237 myAssert (tmpline[63] == 0x7f, "oops"); 208 209 ohana_memcheck (TRUE); 210 # endif 238 # endif 239 // ohana_memcheck (TRUE); 240 241 if (CHECK_MEMBLOCKS) { 242 OhanaMemblock *ref = (OhanaMemblock *) array - 1; 243 fprintf (stderr, "ref: "OFF_T_FMT", array: "OFF_T_FMT"\n", (off_t) ref, (off_t) array); 244 if (!ref->nextBlock && !ref->prevBlock) abort(); 245 } 211 246 212 247 free (array); -
trunk/Ohana/src/libfits/table/F_table_format.c
r38553 r39394 115 115 // XXXX : check usage: 116 116 myAbort ("need to check length"); 117 sprintf (format, "%%-%s%c", Size, Type);117 // sprintf (format, "%%-%s%c", Size, Type); 118 118 119 119 return (TRUE); -
trunk/Ohana/src/libfits/table/F_table_row.c
r38441 r39394 31 31 32 32 memcpy (&table[0].buffer[Nstart], data, Nbytes*Nrow); 33 m emset (&table[0].buffer[Nx*Ny], ' ', nbytes - Nx*Ny);33 myMemset (&table[0].buffer[Nx*Ny], ' ', nbytes - Nx*Ny); 34 34 return (TRUE); 35 35 }
Note:
See TracChangeset
for help on using the changeset viewer.
