-void
-sdf2d_to_pgm (ImageFile& im, char *outfile, int nxcell, int nycell, double densmin, double densmax)
-{
- FILE *fp;
- int irow;
- unsigned char *rowp;
- int nx = im.nx();
- int ny = im.ny();
- ImageFileArray v = im.getArray();
-
- rowp = (unsigned char *) sys_alloc(nx * nxcell,"sdf2d_to_img");
- if (rowp == NULL)
- return;
-
- if ((fp = fopen (outfile, "wb")) == NULL)
- return;
-
- fprintf(fp, "P5\n");
- fprintf(fp, "%d %d\n", nx, ny);
- fprintf(fp, "255\n");
-
- for (irow = ny - 1; irow >= 0; irow--)
- {
- int icol, ir;
-
- for (icol = 0; icol < nx; icol++)
- {
- double dens;
- int p;
- int pos = icol * nxcell;
- dens = (v[icol][irow] - densmin) / (densmax - densmin);
- if (dens < 0)
- dens = 0;
- else if (dens > 1)
- dens = 1;
- for (p = pos; p < pos + nxcell; p++)
- {
- rowp[p] = (unsigned int) (dens * 255.);
- }
- }
- for (ir = 0; ir < nycell; ir++)
- {
- int ic;
- for (ic = 0; ic < nx * nxcell; ic++)
- fprintf(fp, "%c ", rowp[ic]);
- }
- }
- sys_free(rowp, "if2img");
-
- fclose(fp);
-}
-
-void
-sdf2d_to_pgmasc (ImageFile& im, char *outfile, int nxcell, int nycell, double densmin, double densmax)
-{
- FILE *fp;
- int irow;
- unsigned char *rowp;
- int nx = im.nx();
- int ny = im.ny();
- ImageFileArray v = im.getArray();
-
- rowp = (unsigned char *) sys_alloc(nx * nxcell,"sdf2d_to_img");
- if (rowp == NULL)
- return;
-
- if ((fp = fopen (outfile, "wb")) == NULL)
- return;
-
- fprintf(fp, "P2\n");
- fprintf(fp, "%d %d\n", nx, ny);
- fprintf(fp, "255\n");
-
- for (irow = ny - 1; irow >= 0; irow--)
- {
- int icol, ir;
-
- for (icol = 0; icol < nx; icol++)
- {
- double dens;
- int p;
- int pos = icol * nxcell;
- dens = (v[icol][irow] - densmin) / (densmax - densmin);
- if (dens < 0)
- dens = 0;
- else if (dens > 1)
- dens = 1;
- for (p = pos; p < pos + nxcell; p++)
- {
- rowp[p] = (unsigned int) (dens * 255.);
- }
- }
- for (ir = 0; ir < nycell; ir++)
- {
- int ic;
- for (ic = 0; ic < nx * nxcell; ic++)
- fprintf(fp, "%d ", rowp[ic]);
- fprintf(fp, "\n");
- }
- }
- sys_free(rowp, "if2img");
-
- fclose(fp);
-}
-
-
-#ifdef HAVE_PNG
-void
-sdf2d_to_png (ImageFile& im, char *outfile, int bitdepth, int nxcell, int nycell, double densmin, double densmax)
-{
- FILE *fp;
- png_structp png_ptr;
- png_infop info_ptr;
- int irow;
- unsigned char *rowp;
- double max_out_level = (1 << bitdepth) - 1;
- int nx = im.nx();
- int ny = im.ny();
- ImageFileArray v = im.getArray();
-
- rowp = (unsigned char *) sys_alloc(nx * nxcell * (bitdepth / 8),"sdf2d_to_img");
- if (rowp == NULL)
- return;
-
- if ((fp = fopen (outfile, "wb")) == NULL)
- return;
-
- png_ptr = png_create_write_struct (PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
- if (! png_ptr)
- return;
-
- info_ptr = png_create_info_struct(png_ptr);
- if (! info_ptr)
- {
- png_destroy_write_struct(&png_ptr, (png_infopp) NULL);
- fclose(fp);
- return;
- }
-
- if (setjmp(png_ptr->jmpbuf))
- {
- png_destroy_write_struct(&png_ptr, &info_ptr);
- fclose(fp);
- return;
- }
-
- png_init_io(png_ptr, fp);
-
- png_set_IHDR(png_ptr, info_ptr, nx * nxcell, ny * nycell, bitdepth, PNG_COLOR_TYPE_GRAY, PNG_INTERLACE_NONE, PNG_COMPRESSION_TYPE_BASE, PNG_FILTER_TYPE_DEFAULT);
-
- png_write_info(png_ptr, info_ptr);
- for (irow = ny - 1; irow >= 0; irow--)
- {
- png_bytep row_pointer = rowp;
- int icol, ir;
-
- for (icol = 0; icol < nx; icol++)
- {
- double dens;
- int p;
- unsigned int outval;
- int pos = icol * nxcell;
- dens = (v[icol][irow] - densmin) / (densmax - densmin);
- if (dens < 0)
- dens = 0;
- else if (dens > 1)
- dens = 1;
- outval = (unsigned int) (dens * max_out_level);
- for (p = pos; p < pos + nxcell; p++)
- {
- if (bitdepth == 8)
- rowp[p] = outval;
- else {
- int rowpos = p * 2;
- rowp[rowpos] = (outval >> 8) & 0xFF;
- rowp[rowpos+1] = (outval & 0xFF);
- }
- }
- }
- for (ir = 0; ir < nycell; ir++)
- {
- png_write_rows (png_ptr, &row_pointer, 1);
- }
- }
- sys_free(rowp, "if2img");
-
- png_write_end(png_ptr, info_ptr);
- png_destroy_write_struct(&png_ptr, &info_ptr);
-
- fclose(fp);
-}
-#endif
-
-#ifdef HAVE_GD
-#include "gd.h"
-#define N_GRAYSCALE 256
-#endif
-
-void
-sdf2d_to_gif (ImageFile& im, char *outfile, int nxcell, int nycell, double densmin, double densmax)
-{
-#ifdef HAVE_GD
- gdImagePtr gif;
- FILE *out;
- int gs_indices[N_GRAYSCALE];
- int i;
- int irow;
- int lastrow;
- unsigned char *rowp;
- int nx = im.nx();
- int ny = im.ny();
- ImageFileArray v = im.getArray();
-
- rowp = (unsigned char *) sys_alloc(nx * nxcell,"sdf2d_to_img");
- if (rowp == NULL)
- return;
-
- gif = gdImageCreate(nx * nxcell, ny * nycell);
- for (i = 0; i < N_GRAYSCALE; i++)
- gs_indices[i] = gdImageColorAllocate(gif, i, i, i);
-
- lastrow = ny * nycell - 1;
- for (irow = 0; irow < ny; irow++)
- {
- int icol, ir;
- int rpos = irow * nycell;
- for (ir = rpos; ir < rpos + nycell; ir++)
- {
- for (icol = 0; icol < nx; icol++)
- {
- double dens;
- int ic;
- int cpos = icol * nxcell;
- dens = (v[icol][irow] - densmin) / (densmax - densmin);
- if (dens < 0)
- dens = 0;
- else if (dens > 1)
- dens = 1;
- for (ic = cpos; ic < cpos + nxcell; ic++)
- {
- rowp[ic] = (unsigned int) (dens * (double) (N_GRAYSCALE - 1));
- gdImageSetPixel(gif, ic, lastrow - ir, gs_indices[rowp[ic]]);
- }
- }
- }
- }
- sys_free(rowp, "if2img");
-
- if ((out = fopen(outfile,"w")) == NULL)
- {
- fprintf(stderr,"Error opening output file %s for writing\n", outfile);
- exit(1);
- }
- gdImageGif(gif,out);
- fclose(out);
- gdImageDestroy(gif);
-#else
- fprintf(stderr, "This version does not support GIF");
-#endif
-}
-