ossp-pkg/rc/rc.c
1.33
/* OSSP rc - Run-command processor
** Copyright (c) 2002 Ralf S. Engelschall
** Copyright (c) 2002 Cable & Wireless Deutschland GmbH
** Copyright (c) 2002 The OSSP Project <http://www.ossp.org/>
**
** This file is part of OSSP rc, a portable Run-command processor
** which can be found at http://www.ossp.org/pkg/lib/rc/
**
** Permission to use, copy, modify, and distribute this software for
** any purpose with or without fee is hereby granted, provided that
** the above copyright notice and this permission notice appear in all
** copies.
**
** THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
** WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
** MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
** IN NO EVENT SHALL THE AUTHORS AND COPYRIGHT HOLDERS AND THEIR
** CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
** SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
** LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
** USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
** ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
** OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
** OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
** SUCH DAMAGE.
**
** rc.c: Run-command processor ISO C source file
*/
#include <stdlib.h>
#include "rc.h" /* Public interfaces */
/************************************************
* main(int, char **) *
* Main rc control block *
************************************************/
int main(int argc, char *argv[])
{
ex_t Except;
ex_try { /* Configuration block */
configNew(); /* Construct a new configuration */
configLoad(argc, (const char **)argv); /* Load cli, env, and conf */
configVerify(); /* Test for usage, help, and version options */
}
ex_catch(Except) { /* Exceptions of the configuration block */
if ((rc_return_t)Except.ex_value == RC_WRN_TRM)
exit(0);
else if ((rc_return_t)Except.ex_value == RC_ERR_USE)
clioptPrintusage();
else {
fprintf(stderr, "Class '%s' threw exception %d in %s:%s():%d.\n",\
(char *)Except.ex_class, (int)Except.ex_value,\
Except.ex_file, Except.ex_func, Except.ex_line);
}
if (FAILED((rc_return_t)Except.ex_value)) /* NOP on warnings */
exit(1); /* Report failure and exit the program */
}
ex_try { /* Main processing block, the script is built here */
rc_proc_t *pProc = NULL;
pProc = procNew(); /* Construct a new processor, build script */
procPopulate(pProc); /* Populate with run commands */
procRun(pProc); /* [Execute|Evaluate|Print] script */
procDelete(pProc); /* Destroy the processor */
configDelete(); /* Destroy the configuration */
}
ex_catch(Except) { /* Error exceptions thrown during script processing */
TRACE("Also, exception dans le processor bloque");
if (FAILED((rc_return_t)Except.ex_value)) { /* NOP on warnings */
fprintf(stderr, "Class '%s' threw exception %d in %s:%s():%d.\n",\
(char *)Except.ex_class, (int)Except.ex_value,\
Except.ex_file, Except.ex_func, Except.ex_line);
exit(1); /* Return failure */
}
else
RC_NOP; /* No operation on warnings */
}
exit(0); /* Return success */
}