[BACK]Return to mumps.c CVS log [TXT] [DIR] Up to [Coherent Logic Development] / freem / src

Diff for /freem/src/mumps.c between versions 1.18 and 1.20

version 1.18, 2025/04/09 19:52:02 version 1.20, 2025/04/13 04:22:43
Line 24 Line 24
  *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.   *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
  *   *
  *   $Log$   *   $Log$
    *   Revision 1.20  2025/04/13 04:22:43  snw
    *   Fix snprintf calls
    *
    *   Revision 1.19  2025/04/10 01:24:38  snw
    *   Remove C++ style comments
    *
  *   Revision 1.18  2025/04/09 19:52:02  snw   *   Revision 1.18  2025/04/09 19:52:02  snw
  *   Eliminate as many warnings as possible while building with -Wall   *   Eliminate as many warnings as possible while building with -Wall
  *   *
Line 234  int main (int argc, char **argv, char ** Line 240  int main (int argc, char **argv, char **
                 break;                  break;
   
             case 'e': /* specify FreeM environment */              case 'e': /* specify FreeM environment */
                 strncpy (shm_env, optarg, 255);                  strncpy (shm_env, optarg, sizeof (shm_env) - 1);
                 break;                  break;
   
             case 'R':              case 'R':
Line 359  int main (int argc, char **argv, char ** Line 365  int main (int argc, char **argv, char **
                     break;                      break;
   
                 case 'e':  /* specify FreeM environment */                  case 'e':  /* specify FreeM environment */
                     strncpy (shm_env, optarg, 255);                      strncpy (shm_env, optarg, sizeof (shm_env) - 1);
                     break;                      break;
   
                 case 'R':                  case 'R':
Line 456  int main (int argc, char **argv, char ** Line 462  int main (int argc, char **argv, char **
     }      }
 #endif  #endif
           
     snprintf (config_file, 4096, "%s/freem/%s/freem.conf", SYSCONFDIR, shm_env);      snprintf (config_file, sizeof (config_file) - 1, "%s/freem/%s/freem.conf", SYSCONFDIR, shm_env);
     snprintf (env_config_file, 4096, "%s/freem/env.conf", SYSCONFDIR);          snprintf (env_config_file, sizeof (config_file) - 1, "%s/freem/env.conf", SYSCONFDIR);    
           
     if (!file_exists (env_config_file)) {      if (!file_exists (env_config_file)) {
         fprintf (stderr, "freem:  environment catalog does not exist; may need to run fmadm configure\n");          fprintf (stderr, "freem:  environment catalog does not exist; may need to run fmadm configure\n");
Line 667  int main (int argc, char **argv, char ** Line 673  int main (int argc, char **argv, char **
         skip_init = 1;          skip_init = 1;
   
         /* initialize FreeM environment */          /* initialize FreeM environment */
         strncpy (nsnbuf, nsname, 255);              strncpy (nsnbuf, nsname, sizeof (nsnbuf));    
         if (init (nsnbuf) == FALSE) {          if (init (nsnbuf) == FALSE) {
                           
             if (fm_initialized) set_io (UNIX);              if (fm_initialized) set_io (UNIX);
Line 722  int main (int argc, char **argv, char ** Line 728  int main (int argc, char **argv, char **
         }          }
   
         /* make this the startup routine */          /* make this the startup routine */
         snprintf (startuprou, 256, "^%s\201", cli_rtn_name);          snprintf (startuprou, sizeof (startuprou) - 1, "^%s\201", cli_rtn_name);
   
         /* re-work the namespace config to search for the           /* re-work the namespace config to search for the 
            routine in the discovered path */             routine in the discovered path */
         if (cli_rtn_name[0] == '%') {          if (cli_rtn_name[0] == '%') {
   
             snprintf (rou0plib, 256, "%s\201", cli_rtn_path);              snprintf (rou0plib, sizeof (rou0plib) - 1, "%s\201", cli_rtn_path);
             snprintf (rou1plib, 256, "%s\201", cli_rtn_path);              snprintf (rou1plib, sizeof (rou1plib) - 1, "%s\201", cli_rtn_path);
   
         }          }
         else {          else {
   
             snprintf (rou0path, 256, "%s\201", cli_rtn_path);              snprintf (rou0path, sizeof (rou0path) - 1, "%s\201", cli_rtn_path);
             snprintf (rou1path, 256, "%s\201", cli_rtn_path);              snprintf (rou1path, sizeof (rou1path) - 1, "%s\201", cli_rtn_path);
   
         }          }
   
Line 754  int main (int argc, char **argv, char ** Line 760  int main (int argc, char **argv, char **
   
     if (!skip_init) {      if (!skip_init) {
         /* initialize FreeM environment */          /* initialize FreeM environment */
         strncpy (nsnbuf, nsname, 255);              strncpy (nsnbuf, nsname, sizeof (nsnbuf));    
         if (init (nsnbuf) == FALSE) {                 if (init (nsnbuf) == FALSE) {       
             set_io (UNIX);              set_io (UNIX);
             fprintf (stderr, "\nError initializing FreeM.\n");              fprintf (stderr, "\nError initializing FreeM.\n");
Line 872  int main (int argc, char **argv, char ** Line 878  int main (int argc, char **argv, char **
   
             if (varval != NULL) {              if (varval != NULL) {
                 snprintf (symname, i_maxlen, "ENV.%s\201\201", varname);                  snprintf (symname, i_maxlen, "ENV.%s\201\201", varname);
                 strncpy (symval, varval, i_maxlen);                  strncpy (symval, varval, i_maxlen - 1);
                                   
                 stcnv_c2m (symval);                  stcnv_c2m (symval);
   
Line 891  int main (int argc, char **argv, char ** Line 897  int main (int argc, char **argv, char **
         stcpy (verstr, FREEM_VERSION_STR);          stcpy (verstr, FREEM_VERSION_STR);
         stcnv_m2c (verstr);          stcnv_m2c (verstr);
                                   
         snprintf (version, 255, "\r\nCoherent Logic Development FreeM version %s [DIALECT: %s%s]\r\n\201", verstr, m_dialect, (restricted_mode == TRUE ? "/RESTRICTED" : ""));          snprintf (version, sizeof (version) - 1, "\r\nCoherent Logic Development FreeM version %s [DIALECT: %s%s]\r\n\201", verstr, m_dialect, (restricted_mode == TRUE ? "/RESTRICTED" : ""));
         write_m (version);          write_m (version);
   
         snprintf (version, 255, "Copyright (C) 2014, 2020, 2021, 2023, 2025 Coherent Logic Development LLC\r\n\r\n\201");          snprintf (version, sizeof (version) - 1, "Copyright (C) 2014, 2020, 2021, 2023, 2025 Coherent Logic Development LLC\r\n\r\n\201");
         write_m (version);          write_m (version);
   
         /*          /*
Line 911  int main (int argc, char **argv, char ** Line 917  int main (int argc, char **argv, char **
     if (dx_mode) {      if (dx_mode) {
         char k_buf[512];                  char k_buf[512];        
   
         snprintf (k_buf, 512 - 1, "%%TMPINITMCODE\201\201");          snprintf (k_buf, sizeof (k_buf) - 1, "%%TMPINITMCODE\201\201");
         symtab (set_sym, k_buf, dx_mcode);          symtab (set_sym, k_buf, dx_mcode);
         const_define (k_buf, dx_mcode);          const_define (k_buf, dx_mcode);
     }      }
Line 919  int main (int argc, char **argv, char ** Line 925  int main (int argc, char **argv, char **
     if (routine_mode) {      if (routine_mode) {
         char k_buf[512];          char k_buf[512];
   
         snprintf (k_buf, 512 - 1, "%%TMPINITROUTINE\201\201");          snprintf (k_buf, sizeof (k_buf) - 1, "%%TMPINITROUTINE\201\201");
         symtab (set_sym, k_buf, startup_routine);          symtab (set_sym, k_buf, startup_routine);
         const_define (k_buf, startup_routine);          const_define (k_buf, startup_routine);
     }      }
Removed from v.1.18  
changed lines
  Added in v.1.20

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>