process-gimme-density-args.c

Go to the documentation of this file.

/*
** process-integrator-args.c
** 
** Made by (Johnny Q. Hacker)
** Login   <solarion@borkborkbork>

    Copyright (C) 2009 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  Fri Feb 27 16:19:26 2009 Johnny Q. Hacker
** Last update Sun May 12 01:17:25 2002 Speed Blue
*/


#include <glib.h>
#include <stdio.h>
#include <gio/gio.h>
#include <gimmeprogs/process-gimme-density-args.h>
#include <gimmeprogs/argdefaults.h>
#include <math.h>

extern void program_print_version(FILE* f);
extern void libpostproccalx_print_version(FILE* f);
extern void libnextnano_print_version(FILE* f);
extern void libmodeling_print_version(FILE* f);
extern void libcommon_print_version(FILE* f);

void do_print_version() {
  program_print_version(stdout);
  libpostproccalx_print_version(stdout);
  libnextnano_print_version(stdout);
  libmodeling_print_version(stdout);
  libcommon_print_version(stdout);
}

/*Should be threadsafe here; we don't need multiple threads processing args!*/
static struct gimme_density_args processed_args = {.dir=NULL, .base_dir=NULL, .xmin=NAN, .xmax=NAN, .input_gfile=NULL, .material=NULL};

struct gimme_density_args* process_gimme_density_args(int argc, char* argv[]) {
  gboolean print_version = FALSE;
  GOptionEntry options[] = {
    { "dir", 'd', 0, G_OPTION_ARG_FILENAME, &(processed_args.dir), "Directory with nextnano output", NULL },
    { "material", 'm', G_OPTION_FLAG_OPTIONAL_ARG, G_OPTION_ARG_STRING, &(processed_args.material), "Calculate the total charge in this region (NOT IMPLEMENTED YET)", NULL },
    { "version", 'v', G_OPTION_FLAG_OPTIONAL_ARG, G_OPTION_ARG_NONE, &print_version, "Print version information about this program", NULL },
    { NULL }
  };
  GOptionEntry deprecated_opts[] = {
    { "xmin", 'x', G_OPTION_FLAG_OPTIONAL_ARG, G_OPTION_ARG_DOUBLE, &(processed_args.xmin), "x coordinate from which to integrate the charge density", NULL },
    { "xmax", 'X', G_OPTION_FLAG_OPTIONAL_ARG, G_OPTION_ARG_DOUBLE, &(processed_args.xmax), "x coordinate to which to integrate the charge density", NULL },
    { NULL }
  };
  GOptionContext *ctx;
  GOptionGroup *deprecated_group;
  
  ctx = g_option_context_new("- computes the Rashba spin-orbit parameter from the output of a nextnano well calculation.");
  deprecated_group = g_option_group_new("deprecated", ARGDEFAULT_DEPRECATED_GROUP_HELPINFO, "Show help about deprecated options.", NULL, NULL);

  g_option_group_add_entries(deprecated_group, deprecated_opts);

  g_option_context_add_main_entries(ctx, options, "Options");
  g_option_context_add_group(ctx, deprecated_group);

  g_option_context_parse(ctx, &argc, &argv, NULL);
  

  if(print_version){
    do_print_version();
    return NULL;
  }

  gchar* htext = g_option_context_get_help(ctx, FALSE, NULL);

  int errored=0;
  if(((isnan(processed_args.xmin)  || isnan(processed_args.xmax))) && (processed_args.material == NULL)) {
    fprintf(stderr, "ERROR: You MUST specify either --material or --xmin and --xmax!\n");
    errored=1;
  }
  if((!((isnan(processed_args.xmin)  || isnan(processed_args.xmax)))) && (processed_args.material != NULL)) {
    fprintf(stderr, "ERROR: You MAY ONLY specify either --material or --xmin and --xmax, not both!\n");
    errored=1;
  }

  g_option_context_free(ctx);

  if(errored){
    int errored=0;
    printf("%s", htext);
    printf("**Run with --version for version and compilation information**\n");
    return NULL;
  }

  /*Check to make sure what we want is there.*/
  processed_args.base_dir = g_file_new_for_commandline_arg(processed_args.dir);
  /*
  if(processed_args.base_dir != NULL)
    fprintf(stderr, "base_dir OK\n");
  else
    fprintf(stderr, "base_dir NULL!!\n");
  */
  return &processed_args;
}