Changeset 9275 for trunk/Ohana/src/opihi/cmd.data
- Timestamp:
- Oct 4, 2006, 4:29:10 PM (20 years ago)
- Location:
- trunk/Ohana/src/opihi/cmd.data
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/opihi/cmd.data/create.c
r7917 r9275 1 1 # include "data.h" 2 3 int imcreate (int argc, char **argv);4 2 5 3 int create (int argc, char **argv) { … … 8 6 float start, end, delta; 9 7 Vector *vec; 10 11 if ((N = get_argument (argc, argv, "-image"))) {12 remove_argument (N, &argc, argv);13 return (imcreate (argc, argv));14 }15 8 16 9 if ((argc != 5) && (argc != 4)) { … … 43 36 return (TRUE); 44 37 } 45 46 47 int imcreate (int argc, char **argv) {48 49 Buffer *buf;50 51 if (argc != 4) {52 gprint (GP_ERR, "USAGE: create -image buffer Nx Ny\n");53 return (FALSE);54 }55 56 if ((buf = SelectBuffer (argv[1], ANYBUFFER, TRUE)) == NULL) return (FALSE);57 gfits_free_matrix (&buf[0].matrix);58 gfits_free_header (&buf[0].header);59 60 buf[0].bitpix = 16;61 buf[0].unsign = FALSE;62 buf[0].bscale = 1.0;63 buf[0].bzero = 0x8000;64 65 buf[0].header.bitpix = -32;66 buf[0].header.unsign = FALSE;67 buf[0].header.bscale = 1.0;68 buf[0].header.bzero = 0.0;69 70 buf[0].header.Naxes = 2;71 buf[0].header.Naxis[0] = atoi (argv[2]);72 buf[0].header.Naxis[1] = atoi (argv[3]);73 74 gfits_create_header (&buf[0].header);75 gfits_create_matrix (&buf[0].header, &buf[0].matrix);76 77 return (TRUE);78 79 } -
trunk/Ohana/src/opihi/cmd.data/dimenup.c
r8873 r9275 24 24 } 25 25 26 buf[0].matrix.Naxis[0] = Nx;27 buf[0].matrix.Naxis[1] = Ny;28 29 /* I should encapsulate this in a create_default_buffer */30 26 gfits_free_matrix (&buf[0].matrix); 31 27 gfits_free_header (&buf[0].header); 32 buf[0].header.bitpix = buf[0].bitpix = -32; 33 buf[0].header.unsign = buf[0].unsign = FALSE; 34 buf[0].header.bscale = buf[0].bscale = 1.0; 35 buf[0].header.bzero = buf[0].bzero = 0.0; 36 buf[0].header.Naxes = 2; 37 buf[0].header.Naxis[0] = Nx; 38 buf[0].header.Naxis[1] = Ny; 39 gfits_create_header (&buf[0].header); 40 gfits_create_matrix (&buf[0].header, &buf[0].matrix); 28 CreateBuffer (buf, Nx, Ny, -32, 0.0, 1.0); 41 29 42 30 out = (float *) buf[0].matrix.buffer; -
trunk/Ohana/src/opihi/cmd.data/gridify.c
r7917 r9275 40 40 Ny = (Ymax - Ymin) / dY + 1; 41 41 42 /* these steps are a standard 'createbuffer', define? */ 43 bf[0].bitpix = -32; 44 bf[0].unsign = FALSE; 45 bf[0].bscale = 1.0; 46 bf[0].bzero = 0.0; 42 gfits_free_matrix (&bf[0].matrix); 43 gfits_free_header (&bf[0].header); 44 CreateBuffer (bf, Nx, Ny, -32, 0.0, 1.0); 47 45 strcpy (bf[0].file, "(empty)"); 48 49 bf[0].header.bitpix = bf[0].bitpix;50 bf[0].header.bscale = bf[0].bscale;51 bf[0].header.bzero = bf[0].bzero;52 bf[0].header.unsign = bf[0].unsign;53 bf[0].header.Naxes = 2;54 bf[0].header.Naxis[0] = Nx;55 bf[0].header.Naxis[1] = Ny;56 free (bf[0].header.buffer); /* ALLOCATEd in SelectBuffer */57 free (bf[0].matrix.buffer); /* ALLOCATEd in SelectBuffer */58 gfits_create_header (&bf[0].header);59 gfits_create_matrix (&bf[0].header, &bf[0].matrix);60 46 61 47 ALLOCATE (val, float, Nx*Ny); -
trunk/Ohana/src/opihi/cmd.data/mcreate.c
r7917 r9275 15 15 Ny = atof (argv[3]); 16 16 17 buf[0].matrix.Naxis[0] = Nx;18 buf[0].matrix.Naxis[1] = Ny;19 20 17 /* I should encapsulate this in a create_default_buffer */ 21 18 gfits_free_matrix (&buf[0].matrix); 22 19 gfits_free_header (&buf[0].header); 23 buf[0].header.bitpix = buf[0].bitpix = -32; 24 buf[0].header.unsign = buf[0].unsign = FALSE; 25 buf[0].header.bscale = buf[0].bscale = 1.0; 26 buf[0].header.bzero = buf[0].bzero = 0.0; 27 buf[0].header.Naxes = 2; 28 buf[0].header.Naxis[0] = Nx; 29 buf[0].header.Naxis[1] = Ny; 30 gfits_create_header (&buf[0].header); 31 gfits_create_matrix (&buf[0].header, &buf[0].matrix); 20 CreateBuffer (buf, Nx, Ny, -32, 1.0, 0.0); 32 21 return (TRUE); 33 34 22 } 35 36 -
trunk/Ohana/src/opihi/cmd.data/vgrid.c
r7917 r9275 34 34 Ny = (Ymax - Ymin) / dY + 1; 35 35 36 /* these steps are a standard 'createbuffer', define? */ 37 bf[0].bitpix = -32; 38 bf[0].unsign = FALSE; 39 bf[0].bscale = 1.0; 40 bf[0].bzero = 0.0; 36 gfits_free_matrix (&bf[0].matrix); 37 gfits_free_header (&bf[0].header); 38 CreateBuffer (bf, Nx, Ny, -32, 0.0, 1.0); 41 39 strcpy (bf[0].file, "(empty)"); 42 43 bf[0].header.bitpix = bf[0].bitpix;44 bf[0].header.bscale = bf[0].bscale;45 bf[0].header.bzero = bf[0].bzero;46 bf[0].header.unsign = bf[0].unsign;47 bf[0].header.Naxes = 2;48 bf[0].header.Naxis[0] = Nx;49 bf[0].header.Naxis[1] = Ny;50 free (bf[0].header.buffer); /* ALLOCATEd in SelectBuffer */51 free (bf[0].matrix.buffer); /* ALLOCATEd in SelectBuffer */52 gfits_create_header (&bf[0].header);53 gfits_create_matrix (&bf[0].header, &bf[0].matrix);54 40 55 41 ALLOCATE (val, float, Nx*Ny);
Note:
See TracChangeset
for help on using the changeset viewer.
