write_ascii_slice.c

Go to the documentation of this file.

/*
** write_ascii_slice.c
** 
** Made by (Johnny Q. Hacker)
** Login   <solarion@borkborkbork>
** 
    Copyright (C) 2010 Joseph Pingenot

    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU Affero General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU Affero General Public License for more details.

    You should have received a copy of the GNU Affero General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.

** Started on  Thu Feb 25 14:19:00 2010 Johnny Q. Hacker
** Last update Sun May 12 01:17:25 2002 Speed Blue
*/

#include "write_ascii_slice.h"
#include "gcc_hints.h"

#define LIBPOSTPROC_WRITE_ASCII_SLICE_DOMAIN 2378

hotfunc ___const ___always_inline long unsigned int get_assignment_index3(int x, int y, int z, int Nx, int Ny) {
    return x + Nx*(y + Ny*(z));
}

GError* postproc_write_ascii_slice(int Nd, const int* sizes, enum postproc_type t, const void* buffer, enum postproc_coord coord, int value, GFile* base) {
  if(Nd != 3) {
    return g_error_new(LIBPOSTPROC_WRITE_ASCII_SLICE_DOMAIN, 1, "libpostproc::write_ascii_slice.c::postproc_write_ascii_slice: Dimensions other then 3 not supported.");
  }
  GError *e = NULL;
  GError *err;
  GString *s = g_string_new("gridslice_");;
  switch(coord) {
  case POSTPROC_X:
    g_string_append_printf(s, "X=%d.pdata", coord);
    break;
  case POSTPROC_Y:
    g_string_append_printf(s, "Y=%d.pdata", coord);
    break;
  case POSTPROC_Z:
    g_string_append_printf(s, "Z=%d.pdata", coord);
    break;
  }
  GFile* f;
  if(base == NULL) {
    f = g_file_new_for_path(s->str);
  }else{
    f = g_file_resolve_relative_path(base, s->str);
  }
  GFileIOStream *gfos = g_file_create_readwrite(f, G_FILE_CREATE_REPLACE_DESTINATION, NULL, &e);
  if(e != NULL) {
    return e;
  }
  GOutputStream *os = g_io_stream_get_output_stream((GIOStream*)gfos);
  GDataOutputStream *dos = g_data_output_stream_new(os);
  g_string_printf(s, "#index\tmaterial\n");
  e=NULL;
  char *str;
  g_data_output_stream_put_string(dos, s->str, NULL, &e);
  if(e != NULL) {
    err = e;
    g_string_free(s, TRUE);
    e=NULL;
    g_io_stream_close((GIOStream*)gfos, NULL, &e);
    if(e != NULL) {
      err = g_error_new(LIBPOSTPROC_WRITE_ASCII_SLICE_DOMAIN, 1, "libpostprocess::write_ascii_slice.c::write_ascii_slice: had an error (%s) while writing string (%s), but had another error (%s) while closing the file (%s)!\n", (err)->message, s->str, e->message, str=g_file_get_uri(f));
      g_free(str);
    }
    return err;
  }

  return NULL;
}