contrib/bc/src/main.c

   1 /*
   2  * *****************************************************************************
   3  *
   4  * SPDX-License-Identifier: BSD-2-Clause
   5  *
   6  * Copyright (c) 2018-2021 Gavin D. Howard and contributors.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions are met:
  10  *
  11  * * Redistributions of source code must retain the above copyright notice, this
  12  *   list of conditions and the following disclaimer.
  13  *
  14  * * Redistributions in binary form must reproduce the above copyright notice,
  15  *   this list of conditions and the following disclaimer in the documentation
  16  *   and/or other materials provided with the distribution.
  17  *
  18  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  19  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  21  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
  22  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  23  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  24  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  25  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  26  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  27  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  28  * POSSIBILITY OF SUCH DAMAGE.
  29  *
  30  * *****************************************************************************
  31  *
  32  * The entry point for bc.
  33  *
  34  */
  35
  36 #include <assert.h>
  37 #include <stdlib.h>
  38 #include <string.h>
  39
  40 #include <locale.h>
  41 #include <libgen.h>
  42
  43 #include <setjmp.h>
  44
  45 #include <status.h>
  46 #include <vm.h>
  47 #include <bc.h>
  48 #include <dc.h>
  49
  50 int main(int argc, char *argv[]) {
  51
  52         char *name;
  53         size_t len = strlen(BC_EXECPREFIX);
  54
  55         vm.locale = setlocale(LC_ALL, "");
  56
  57         name = strrchr(argv[0], '/');
  58         vm.name = (name == NULL) ? argv[0] : name + 1;
  59
  60         if (strlen(vm.name) > len) vm.name += len;
  61
  62         BC_SIG_LOCK;
  63
  64         bc_vec_init(&vm.jmp_bufs, sizeof(sigjmp_buf), NULL);
  65
  66         BC_SETJMP_LOCKED(exit);
  67
  68 #if !DC_ENABLED
  69         bc_main(argc, argv);
  70 #elif !BC_ENABLED
  71         dc_main(argc, argv);
  72 #else
  73         if (BC_IS_BC) bc_main(argc, argv);
  74         else dc_main(argc, argv);
  75 #endif
  76
  77 exit:
  78         BC_SIG_MAYLOCK;
  79
  80         return bc_vm_atexit((int) vm.status);
  81 }