/* * Copyright (C) Bull S.A. 2001 * Copyright (c) International Business Machines Corp., 2001 * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 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 General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ /******************************************************************************/ /* */ /* Dec-03-2001 Created: Jacky Malcles & Jean Noel Cordenner */ /* These tests are adapted from AIX float PVT tests. */ /* */ /******************************************************************************/ #include #include #include #include #include #include #include #include #include #include #include #include #include #define MAX_FNAME_LEN 16 /***************************************************************** * create file: * * func_name is the name of the function * * code can take 2 values: DATA_CREATE to create a input data file * RESULT_CREATE for output result file */ int create_file(char *func_name, int NbVal) { pid_t myproc; switch (myproc = fork()) { case -1: err(1, "fork failed"); case 0:{ char *arglist[] = { func_name, NULL }; execvp(arglist[0], arglist); err(1, "execvp failed"); } default: ; } return myproc; } int main(int argc, char *argv[]) { char *funct, *bin_path; pid_t child; if (argc != 2) err(1, "need the path to generation binaries"); bin_path = argv[1]; funct = malloc(strlen(bin_path) + MAX_FNAME_LEN); sprintf(funct, "%s/gencosh", bin_path); child = create_file(funct, 0); waitpid(child, NULL, 0); sprintf(funct, "%s/gensinh", bin_path); child = create_file(funct, 0); waitpid(child, NULL, 0); sprintf(funct, "%s/gentanh", bin_path); child = create_file(funct, 0); waitpid(child, NULL, 0); return 0; }