create_test_data.cc

//
// Copyright (c) 2014 Limit Point Systems, Inc.
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
//   http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.
//


#include "SheafSystem/lps_environment.h"
#include "SheafSystem/std_iostream.h"
#include "SheafSystem/std_string.h"
#include "SheafSystem/std_unistd.h"
#include <sys/wait.h>

void exec_test_case(string xfile);

void re_exec(int argc, char* argv[]);

int main(int argc, char* argv[])
{
  //re_exec(argc, argv);

  exec_test_case("./test_case_3d.t");
  exec_test_case("./test_case_3d_irregular.t");
  exec_test_case("./test_case_2d.t");

}

void exec_test_case(string xfile)
{
  int status;

  // Get a child process.
  int pid = fork();

  if(pid < 0)
  {
    // Fork failed.
    perror(xfile.c_str());
    exit(1);
  }

  if(pid == 0)
  {
    // This is the child process

    cout << "Attempting to execute \"" << xfile << "\"" << endl;

    if(execlp(xfile.c_str(), (char*)0) == -1)
    {
      perror(xfile.c_str());
      exit(1);
    }
  }
  while(wait(&status) != pid)
    ; // Dont't delete this ';'
}

void re_exec(int argc, char* argv[])
{
  static const char* env_name = "__HAVE_SET_ENV_SO_LD_LIBRARY_PATH_WORKS__";

  if(getenv(env_name) == NULL)
  {
    setenv(env_name, "yes", 1);
    setenv("LD_LIBRARY_PATH", LD_LIBRARY_PATH, 1);
    setenv("CLASSPATH", CLASSPATH, 1);

    if(execvp(argv[0], argv))
    {
      perror(argv[0]);
      exit(1);
    }
  }
}