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
  42 #ifndef _WIN32
  43 #include <libgen.h>
  44 #endif // _WIN32
  45
  46 #include <setjmp.h>
  47
  48 #include <version.h>
  49 #include <status.h>
  50 #include <vm.h>
  51 #include <bc.h>
  52 #include <dc.h>
  53
  54 int main(int argc, char *argv[]) {
  55
  56         char *name;
  57         size_t len = strlen(BC_EXECPREFIX);
  58
  59         // Must set the locale properly in order to have the right error messages.
  60         vm.locale = setlocale(LC_ALL, "");
  61
  62         // Set the start pledge().
  63         bc_pledge(bc_pledge_start, NULL);
  64
  65         // Figure out the name of the calculator we are using. We can't use basename
  66         // because it's not portable, but yes, this is stripping off the directory.
  67         name = strrchr(argv[0], BC_FILE_SEP);
  68         vm.name = (name == NULL) ? argv[0] : name + 1;
  69
  70         // If the name is longer than the length of the prefix, skip the prefix.
  71         if (strlen(vm.name) > len) vm.name += len;
  72
  73         BC_SIG_LOCK;
  74
  75         // We *must* do this here. Otherwise, other code could not jump out all of
  76         // the way.
  77         bc_vec_init(&vm.jmp_bufs, sizeof(sigjmp_buf), BC_DTOR_NONE);
  78
  79         BC_SETJMP_LOCKED(exit);
  80
  81 #if !DC_ENABLED
  82         bc_main(argc, argv);
  83 #elif !BC_ENABLED
  84         dc_main(argc, argv);
  85 #else
  86         // BC_IS_BC uses vm.name, which was set above. So we're good.
  87         if (BC_IS_BC) bc_main(argc, argv);
  88         else dc_main(argc, argv);
  89 #endif
  90
  91 exit:
  92         BC_SIG_MAYLOCK;
  93
  94         // Ensure we exit appropriately.
  95         return bc_vm_atexit((int) vm.status);
  96 }