utf: linux compilation 85/18685/7
Cedric Delamarre [Thu, 10 Nov 2016 18:03:33 +0000 (19:03 +0100)]
Change-Id: Ifa5ede051ecb4eee2c93b649c843807b2c3f678e

130 files changed:
scilab/modules/ast/includes/operations/types_addition.hxx
scilab/modules/ast/includes/types/arrayof.hxx
scilab/modules/ast/includes/types/tostring_common.hxx
scilab/modules/ast/src/cpp/ast/run_AssignExp.hpp
scilab/modules/ast/src/cpp/ast/run_CallExp.hpp
scilab/modules/ast/src/cpp/ast/runvisitor.cpp
scilab/modules/ast/src/cpp/ast/visitor_common.cpp
scilab/modules/ast/src/cpp/operations/types_addition.cpp
scilab/modules/ast/src/cpp/operations/types_subtraction.cpp
scilab/modules/ast/src/cpp/parse/parser.cpp
scilab/modules/ast/src/cpp/symbol/context.cpp
scilab/modules/ast/src/cpp/system_env/configvariable.cpp
scilab/modules/ast/src/cpp/system_env/sci_home.cpp
scilab/modules/ast/src/cpp/system_env/sci_tmpdir.cpp
scilab/modules/ast/src/cpp/types/function.cpp
scilab/modules/ast/src/cpp/types/library.cpp
scilab/modules/ast/src/cpp/types/overload.cpp
scilab/modules/ast/src/cpp/types/polynom.cpp
scilab/modules/ast/src/cpp/types/singlepoly.cpp
scilab/modules/ast/src/cpp/types/string.cpp
scilab/modules/ast/src/cpp/types/struct.cpp
scilab/modules/ast/src/cpp/types/tostring_common.cpp
scilab/modules/ast/src/cpp/types/types_tools.cpp
scilab/modules/completion/src/c/completeLine.c
scilab/modules/completion/src/c/completion_generic.c
scilab/modules/console/src/c/dropFiles.c
scilab/modules/core/sci_gateway/cpp/sci_intppty.cpp
scilab/modules/core/src/c/InitializePreferences.c
scilab/modules/core/src/c/getmodules.c
scilab/modules/core/src/c/loadversion.c
scilab/modules/core/src/c/saveCWDInPreferences.c
scilab/modules/core/src/cpp/InitScilab.cpp
scilab/modules/core/src/cpp/runner.cpp
scilab/modules/coverage/src/cpp/CoverModule.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_bvode.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_daskr.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_dasrt.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_dassl.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_feval.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_impl.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_int2d.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_int3d.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_intg.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_ode.cpp
scilab/modules/differential_equations/sci_gateway/cpp/sci_odedc.cpp
scilab/modules/dynamic_link/src/cpp/dynamic_link.cpp
scilab/modules/fileio/sci_gateway/c/sci_copyfile.c
scilab/modules/fileio/sci_gateway/c/sci_movefile.c
scilab/modules/fileio/sci_gateway/cpp/sci_mclose.cpp
scilab/modules/fileio/sci_gateway/cpp/sci_mget.cpp
scilab/modules/fileio/sci_gateway/cpp/sci_mopen.cpp
scilab/modules/fileio/sci_gateway/cpp/sci_mput.cpp
scilab/modules/fileio/src/c/copyfile_others.c
scilab/modules/fileio/src/c/copyfile_windows.c
scilab/modules/fileio/src/c/createdirectory.c
scilab/modules/fileio/src/c/dlManager.c
scilab/modules/fileio/src/c/findfiles.c
scilab/modules/fileio/src/c/scicurdir.c
scilab/modules/functions/sci_gateway/cpp/sci_exec.cpp
scilab/modules/functions/sci_gateway/cpp/sci_execstr.cpp
scilab/modules/functions_manager/src/cpp/funcmanager.cpp
scilab/modules/graphics/sci_gateway/c/sci_light.c
scilab/modules/graphics/sci_gateway/c/sci_set.c
scilab/modules/graphics/src/c/getHandleProperty/getPropertyAssignedValue.c
scilab/modules/graphics/src/c/getHandleProperty/setGetHashTable.c
scilab/modules/graphics/src/c/getHandleProperty/set_alignment_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_anti_aliasing_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_arc_drawing_method_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_border_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_box_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_cdata_mapping_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_clip_state_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_constraints_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_data_mapping_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_figure_style_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_grid_position_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_image_type_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_layout_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_light_type_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_mark_size_unit_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_menubar_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_rotation_style_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_tabtitle_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_text_box_mode_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_tics_direction_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_tics_style_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_toolbar_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_view_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_x_location_property.c
scilab/modules/graphics/src/c/getHandleProperty/set_y_location_property.c
scilab/modules/graphics/src/c/name2rgb.c
scilab/modules/gui/sci_gateway/c/sci_figure.c
scilab/modules/gui/sci_gateway/c/sci_messagebox.c
scilab/modules/gui/sci_gateway/c/sci_uicontrol.c
scilab/modules/gui/sci_gateway/c/sci_uimenu.c
scilab/modules/gui/sci_gateway/cpp/sci_datatip_set_orient.cpp
scilab/modules/gui/src/c/messageboxoptions.c
scilab/modules/gui/src/cpp/GetScreenProperty.cpp
scilab/modules/gui/src/cpp/SetUicontrolFontAngle.cpp
scilab/modules/gui/src/cpp/SetUicontrolFontWeight.cpp
scilab/modules/gui/src/cpp/SetUicontrolHorizontalAlignment.cpp
scilab/modules/gui/src/cpp/SetUicontrolRelief.cpp
scilab/modules/gui/src/cpp/SetUicontrolUnits.cpp
scilab/modules/gui/src/cpp/SetUicontrolVerticalAlignment.cpp
scilab/modules/io/sci_gateway/cpp/sci_genlib.cpp
scilab/modules/io/src/cpp/loadlib.cpp
scilab/modules/jvm/src/c/JVM_Unix.c
scilab/modules/jvm/src/c/getJvmOptions.c
scilab/modules/jvm/src/c/loadClasspath.c
scilab/modules/jvm/src/c/loadLibrarypath.c
scilab/modules/localization/Makefile.am
scilab/modules/localization/Makefile.in
scilab/modules/output_stream/sci_gateway/cpp/sci_diary.cpp
scilab/modules/output_stream/src/cpp/diary_manager.cpp
scilab/modules/output_stream/src/cpp/diary_manager.hxx
scilab/modules/preferences/src/c/getScilabPreference.c
scilab/modules/scicos/src/cpp/LoggerView.cpp
scilab/modules/slint/src/cpp/PCREMatcher.cpp
scilab/modules/string/Makefile.in
scilab/modules/string/includes/os_string.h
scilab/modules/string/sci_gateway/cpp/sci_strtok.cpp
scilab/modules/string/src/c/os_wcstok.c
scilab/modules/string/src/c/stringToComplex.c
scilab/modules/string/src/c/stringToDouble.c
scilab/modules/string/src/c/stringsCompare.c
scilab/modules/string/src/c/stristr.c
scilab/modules/string/src/c/strsplit.c
scilab/modules/windows_tools/sci_gateway/cpp/sci_mcisendstring.cpp
scilab/modules/windows_tools/src/c/scilab_windows/console.c
scilab/modules/xml/sci_gateway/cpp/sci_htmlWrite.cpp

index 7843190..34f098e 100644 (file)
@@ -134,11 +134,7 @@ inline static void add(char** l, size_t size, char** r, int* length , char** o)
 {
     for (size_t i = 0; i < size ; ++i)
     {
-#ifdef _MSC_VER
         os_sprintf(o[i], length[i], "%s%s", l[i], r[i]);
-#else
-        os_sprintf(o[i], "%s%s", l[i], r[i]);
-#endif
     }
 }
 
@@ -216,11 +212,7 @@ inline static void add(char** l, size_t size, char* r, int* length , char** o)
 {
     for (size_t i = 0; i < size ; ++i)
     {
-#ifdef _MSC_VER
         os_sprintf(o[i], length[i], "%s%s", l[i], r);
-#else
-        os_sprintf(o[i], "%s%s", l[i], r);
-#endif
     }
 }
 
@@ -269,11 +261,7 @@ inline static void add(char* l, size_t size, char** r, int* length , char** o)
 {
     for (size_t i = 0; i < size ; ++i)
     {
-#ifdef _MSC_VER
         os_sprintf(o[i], length[i], "%s%s", l, r[i]);
-#else
-        os_sprintf(o[i], "%s%s", l, r[i]);
-#endif
     }
 }
 
@@ -323,11 +311,7 @@ template<typename T, typename U, typename O> inline static void add(T l, U r, O*
 //string version
 inline static void add(char* l, char* r, int length , char* o)
 {
-#ifdef _MSC_VER
     os_sprintf(o, length, "%s%s", l, r);
-#else
-    os_sprintf(o, "%s%s", l, r);
-#endif
 }
 
 //x1C + x1C
index 715215e..9aa7c6e 100644 (file)
@@ -117,7 +117,7 @@ protected :
                 if (m_iSize != 0 && iTmpSize / m_iSize != m_piDims[i])
                 {
                     char message[bsiz];
-                    os_sprintf(message, _("Can not allocate %.2f MB memory.\n"),  (double) ((double) m_iSize * (double) m_piDims[i] * sizeof(T)) / 1.e6);
+                    os_sprintf(message, bsiz, _("Can not allocate %.2f MB memory.\n"),  (double) ((double) m_iSize * (double) m_piDims[i] * sizeof(T)) / 1.e6);
                     throw ast::InternalError(message);
                 }
 
@@ -129,7 +129,7 @@ protected :
                 m_pRealData = NULL;
                 m_pImgData = NULL;
                 char message[bsiz];
-                os_sprintf(message, _("Can not allocate negative size (%d).\n"), m_iSize);
+                os_sprintf(message, bsiz, _("Can not allocate negative size (%d).\n"), m_iSize);
                 throw ast::InternalError(message);
             }
 
@@ -161,7 +161,7 @@ protected :
         catch (std::bad_alloc & /*e*/)
         {
             char message[bsiz];
-            os_sprintf(message, _("Can not allocate %.2f MB memory.\n"), (double)(m_iSize * sizeof(T)) / 1.e6);
+            os_sprintf(message, bsiz, _("Can not allocate %.2f MB memory.\n"), (double)(m_iSize * sizeof(T)) / 1.e6);
             throw ast::InternalError(message);
         }
 
index 1a6b09a..3338b03 100644 (file)
@@ -118,8 +118,8 @@ void addUnsignedIntValue(std::ostringstream *_postr, T _TVal, int _iWidth, bool
 
     if (bPrintOne == true || _TVal != 1)
     {
-        os_sprintf(pstFormat, " %s%llu", pstSign, (unsigned long long)(_TVal));
-        os_sprintf(pstOutput, "%*s", _iWidth + 1, pstFormat);//+1 for blank
+        os_sprintf(pstFormat, 32, " %s%llu", pstSign, (unsigned long long)(_TVal));
+        os_sprintf(pstOutput, 32, "%*s", _iWidth + 1, pstFormat);//+1 for blank
         *_postr << pstOutput;
     }
 }
@@ -142,8 +142,8 @@ void addSignedIntValue(std::ostringstream *_postr, T _TVal, int _iWidth, bool bP
     if (bPrintOne == true || _TVal != 1)
     {
         unsigned long long a = _abs64(_TVal);
-        os_sprintf(pstFormat, " %s%llu", pstSign, a);
-        os_sprintf(pstOutput, "%*s", _iWidth + 1, pstFormat);//+1 for blank
+        os_sprintf(pstFormat, 32, " %s%llu", pstSign, a);
+        os_sprintf(pstOutput, 32, "%*s", _iWidth + 1, pstFormat);//+1 for blank
         *_postr << pstOutput;
     }
 }
index 115d521..308e73c 100644 (file)
@@ -100,7 +100,7 @@ void RunVisitorT<T>::visitprivate(const AssignExp  &e)
                 {
                     char pstError[1024];
                     const char* pstFuncName = pVar->getSymbol().getName().data();
-                    os_sprintf(pstError, _("It is not possible to redefine the %s primitive this way (see clearfun).\n"), pstFuncName);
+                    os_sprintf(pstError, 1024,_("It is not possible to redefine the %s primitive this way (see clearfun).\n"), pstFuncName);
                     pIT->killMe();
                     CoverageInstance::stopChrono((void*)&e);
                     throw InternalError(pstError, 999, e.getLocation());
index 3a0a303..b206165 100644 (file)
@@ -285,11 +285,11 @@ void RunVisitorT<T>::visitprivate(const CallExp &e)
                     if (pIT->isCallable())
                     {
                         const char* strFName = pIT->getAs<types::Callable>()->getName().c_str();
-                        os_sprintf(szError, _("%s: Wrong number of output argument(s): %d expected.\n"), strFName, out.size());
+                        os_sprintf(szError, bsiz, _("%s: Wrong number of output argument(s): %d expected.\n"), strFName, out.size());
                     }
                     else
                     {
-                        os_sprintf(szError, _("%s: Wrong number of output argument(s): %d expected.\n"), "extract", out.size());
+                        os_sprintf(szError, bsiz, _("%s: Wrong number of output argument(s): %d expected.\n"), "extract", out.size());
                     }
 
                     throw InternalError(szError, 999, e.getLocation());
index bdb4779..7326f69 100644 (file)
@@ -33,7 +33,7 @@
 #include "generic_operations.hxx"
 #include "types_or.hxx"
 #include "types_and.hxx"
+
 #include "macrofile.hxx"
 #include "macro.hxx"
 #include "cell.hxx"
@@ -146,7 +146,7 @@ void RunVisitorT<T>::visitprivate(const SimpleVar & e)
     {
         char pstError[bsiz];
         const char* strErr = e.getSymbol().getName().c_str();
-        os_sprintf(pstError, _("Undefined variable: %s\n"), strErr);
+        os_sprintf(pstError, bsiz, _("Undefined variable: %s\n"), strErr);
 
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(pstError, 999, e.getLocation());
@@ -313,7 +313,7 @@ void RunVisitorT<T>::visitprivate(const FieldExp &e)
     if (!e.getTail()->isSimpleVar())
     {
         char szError[bsiz];
-        os_sprintf(szError, _("/!\\ Unmanaged FieldExp.\n"));
+        os_sprintf(szError, bsiz, _("/!\\ Unmanaged FieldExp.\n"));
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(szError, 999, e.getLocation());
     }
@@ -331,7 +331,7 @@ void RunVisitorT<T>::visitprivate(const FieldExp &e)
     if (getResult() == NULL)
     {
         char szError[bsiz];
-        os_sprintf(szError, _("Attempt to reference field of non-structure array.\n"));
+        os_sprintf(szError, bsiz, _("Attempt to reference field of non-structure array.\n"));
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(szError, 999, e.getLocation());
     }
@@ -343,7 +343,7 @@ void RunVisitorT<T>::visitprivate(const FieldExp &e)
     {
         clearResult();
         char szError[bsiz];
-        os_sprintf(szError, _("Not yet implemented in Scilab.\n"));
+        os_sprintf(szError, bsiz, _("Not yet implemented in Scilab.\n"));
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(szError, 999, e.getLocation());
     }
@@ -463,7 +463,7 @@ void RunVisitorT<T>::visitprivate(const FieldExp &e)
     {
         pValue->killMe();
         char szError[bsiz];
-        os_sprintf(szError, _("Attempt to reference field of non-structure array.\n"));
+        os_sprintf(szError, bsiz, _("Attempt to reference field of non-structure array.\n"));
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(szError, 999, e.getLocation());
     }
@@ -1524,7 +1524,7 @@ void RunVisitorT<T>::visitprivate(const TransposeExp &e)
     {
         clearResult();
         char szError[bsiz];
-        os_sprintf(szError, _("%s: Can not transpose multiple elements.\n"), "Transpose");
+        os_sprintf(szError, bsiz, _("%s: Can not transpose multiple elements.\n"), "Transpose");
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(szError, 999, e.getLocation());
     }
@@ -1623,7 +1623,7 @@ void RunVisitorT<T>::visitprivate(const FunctionDec & e)
     {
         char pstError[1024];
         const char* pstFuncName = e.getSymbol().getName().c_str();
-        os_sprintf(pstError, _("It is not possible to redefine the %s primitive this way (see clearfun).\n"), pstFuncName);
+        os_sprintf(pstError, 1024, _("It is not possible to redefine the %s primitive this way (see clearfun).\n"), pstFuncName);
         pMacro->killMe();
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(pstError, 999, e.getLocation());
@@ -1652,7 +1652,7 @@ void RunVisitorT<T>::visitprivate(const ListExp &e)
         pITStart->killMe();
         setResult(NULL);
         char szError[bsiz];
-        os_sprintf(szError,  _("%s: Wrong type for argument %d: Real scalar expected.\n"), "':'", 1);
+        os_sprintf(szError, bsiz, _("%s: Wrong type for argument %d: Real scalar expected.\n"), "':'", 1);
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(szError, 999, e.getLocation());
     }
@@ -1676,7 +1676,7 @@ void RunVisitorT<T>::visitprivate(const ListExp &e)
         pITStep->killMe();
         setResult(NULL);
         char szError[bsiz];
-        os_sprintf(szError, _("%s: Wrong type for argument %d: Real scalar expected.\n"), "':'", 2);
+        os_sprintf(szError, bsiz, _("%s: Wrong type for argument %d: Real scalar expected.\n"), "':'", 2);
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(szError, 999, e.getLocation());
     }
@@ -1702,7 +1702,7 @@ void RunVisitorT<T>::visitprivate(const ListExp &e)
         pITEnd->killMe();
         setResult(NULL);
         char szError[bsiz];
-        os_sprintf(szError, _("%s: Wrong type for argument %d: Real scalar expected.\n"), "':'", 3);
+        os_sprintf(szError, bsiz, _("%s: Wrong type for argument %d: Real scalar expected.\n"), "':'", 3);
         CoverageInstance::stopChrono((void*)&e);
         throw InternalError(szError, 999, e.getLocation());
     }
@@ -2144,7 +2144,7 @@ void RunVisitorT<T>::visitprivate(const TryCatchExp  &e)
 
             //print msg about recursion limit and trigger an error
             char sz[1024];
-            os_sprintf(sz, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
+            os_sprintf(sz, 1024, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
             CoverageInstance::stopChrono((void*)&e);
             throw ast::InternalError(sz);
         }
index ba73570..3691a4c 100644 (file)
@@ -1497,7 +1497,7 @@ types::InternalType* evaluateFields(const ast::Exp* _pExp, std::list<ExpHistory*
                 {
                     char szError[bsiz];
                     const char* strFName = pITCurrent->getAs<types::Callable>()->getName().c_str();
-                    os_sprintf(szError, _("Wrong insertion: insertion in output of '%s' is not allowed.\n"), strFName);
+                    os_sprintf(szError, bsiz, _("Wrong insertion: insertion in output of '%s' is not allowed.\n"), strFName);
 
                     throw ast::InternalError(szError, 999, pEH->getExp()->getLocation());
                 }
index fbaefa4..180e23b 100644 (file)
@@ -1977,7 +1977,7 @@ template<> InternalType* add_M_M<Polynom, Polynom, Polynom>(Polynom* _pL, Polyno
             }
 
             char pMsg[bsiz];
-            os_sprintf(pMsg, _("Error: operator %s: Matrix dimensions must agree (op1 is %s, op2 is %s).\n"),  "+", _pL->DimToString().c_str(), _pR->DimToString().c_str());
+            os_sprintf(pMsg, bsiz, _("Error: operator %s: Matrix dimensions must agree (op1 is %s, op2 is %s).\n"),  "+", _pL->DimToString().c_str(), _pR->DimToString().c_str());
             throw ast::InternalError(pMsg);
         }
     }
@@ -2193,7 +2193,7 @@ template<> InternalType* add_M_M<Double, Polynom, Polynom>(Double* _pL, Polynom*
         if (piDims1[i] != piDims2[i])
         {
             char pMsg[bsiz];
-            os_sprintf(pMsg, _("Error: operator %s: Matrix dimensions must agree (op1 is %s, op2 is %s).\n"),  "+", _pL->DimToString().c_str(), _pR->DimToString().c_str());
+            os_sprintf(pMsg, bsiz, _("Error: operator %s: Matrix dimensions must agree (op1 is %s, op2 is %s).\n"),  "+", _pL->DimToString().c_str(), _pR->DimToString().c_str());
             throw ast::InternalError(pMsg);
         }
     }
index 53be948..86048c7 100644 (file)
@@ -1936,7 +1936,7 @@ template<> InternalType* sub_M_M<Polynom, Double, Polynom>(Polynom* _pL, Double*
         if (piDims1[i] != piDims2[i])
         {
             char pMsg[bsiz];
-            os_sprintf(pMsg, _("Error: operator %s: Matrix dimensions must agree (op1 is %s, op2 is %s).\n"),  "-", _pL->DimToString().c_str(), _pR->DimToString().c_str());
+            os_sprintf(pMsg, bsiz, _("Error: operator %s: Matrix dimensions must agree (op1 is %s, op2 is %s).\n"),  "-", _pL->DimToString().c_str(), _pR->DimToString().c_str());
             throw ast::InternalError(pMsg);
         }
     }
@@ -2277,7 +2277,7 @@ template<> InternalType* sub_M_M<Double, Polynom, Polynom>(Double* _pL, Polynom*
         if (piDims1[i] != piDims2[i])
         {
             char pMsg[bsiz];
-            os_sprintf(pMsg, _("Error: operator %s: Matrix dimensions must agree (op1 is %s, op2 is %s).\n"),  "+", _pL->DimToString().c_str(), _pR->DimToString().c_str());
+            os_sprintf(pMsg, bsiz, _("Error: operator %s: Matrix dimensions must agree (op1 is %s, op2 is %s).\n"),  "+", _pL->DimToString().c_str(), _pR->DimToString().c_str());
             throw ast::InternalError(pMsg);
         }
     }
index 32ea664..d30bfe1 100644 (file)
@@ -93,7 +93,7 @@ void ParserSingleInstance::parseFile(const std::string& fileName, const std::str
     if (!yyin)
     {
         char szError[bsiz];
-        os_sprintf(szError, _("%s: Cannot open file %s.\n"), "parser", fileName.c_str());
+        os_sprintf(szError, bsiz, _("%s: Cannot open file %s.\n"), "parser", fileName.c_str());
         throw ast::InternalError(szError);
     }
 
@@ -162,7 +162,7 @@ void ParserSingleInstance::parse(const char *command)
 #ifdef _MSC_VER
     char szFile[MAX_PATH];
     char* pstTmpDIr = getTMPDIR();
-    os_sprintf(szFile, "%s\\%s", pstTmpDIr, "command.temp");
+    os_sprintf(szFile, MAX_PATH, "%s\\%s", pstTmpDIr, "command.temp");
     FREE(pstTmpDIr);
     if (fileLocker)
     {
@@ -177,7 +177,7 @@ void ParserSingleInstance::parse(const char *command)
         ParserSingleInstance::setExitStatus(Parser::Failed);
         ParserSingleInstance::resetErrorMessage();
         char szError[bsiz];
-        os_sprintf(szError, _("%s: Cannot open file %s.\n"), "parser", szFile);
+        os_sprintf(szError, bsiz, _("%s: Cannot open file %s.\n"), "parser", szFile);
         appendErrorMessage(szError);
         return;
     }
index d219183..13b0ed9 100644 (file)
@@ -276,7 +276,7 @@ int Context::getConsoleVarsName(std::list<std::string>& lst)
 {
     if (console)
     {
-        for (const auto& var : *console)
+        for (const auto & var : *console)
         {
             lst.push_back(var.first.getName());
         }
@@ -513,10 +513,10 @@ void Context::print(std::ostream& ostr, bool sorted) const
         iCurrentWidth += iVarLenMax + 1;
     }
 
-    os_sprintf(varElem, _(" using %10d elements out of  %10d.\n"), iMemUsed, iMemTotal);
+    os_sprintf(varElem, strSize, _(" using %10d elements out of  %10d.\n"), iMemUsed, iMemTotal);
     ostr << std::endl << varElem;
 
-    os_sprintf(varVariable, _(" and   %10d variables out of %10d.\n"), lstVar.size(), nbMaxVar);
+    os_sprintf(varVariable, strSize, _(" and   %10d variables out of %10d.\n"), lstVar.size(), nbMaxVar);
     ostr << varVariable << std::endl;
 
     ostr << std::endl << _("Your global variables are:") << std::endl << std::endl;
@@ -532,10 +532,10 @@ void Context::print(std::ostream& ostr, bool sorted) const
 
     ostr << std::endl;
 
-    os_sprintf(globalElem, _(" using %10d elements out of  %10d.\n"), iMemUsed, iMemTotal);
+    os_sprintf(globalElem, strSize, _(" using %10d elements out of  %10d.\n"), iMemUsed, iMemTotal);
     ostr << std::endl << globalElem;
 
-    os_sprintf(globalVariable, _(" and   %10d variables out of %10d.\n"), lstGlobal.size(), nbMaxVar);
+    os_sprintf(globalVariable, strSize, _(" and   %10d variables out of %10d.\n"), lstGlobal.size(), nbMaxVar);
     ostr << globalVariable;
 }
 
index c8fed5f..81933a8 100644 (file)
@@ -1257,19 +1257,19 @@ void ConfigVariable::whereErrorToString(std::ostringstream &ostr)
             if (where.m_name == "execstr")
             {
                 isExecstr = true;
-                os_sprintf(csTmp, strExecStr.c_str(), where.m_line);
+                os_sprintf(csTmp, bsiz, strExecStr.c_str(), where.m_line);
                 ostr << csTmp << std::endl;
                 continue;
             }
             else if (where.m_name == "exec")
             {
-                os_sprintf(csTmp, strExecFile.c_str(), where.m_line);
+                os_sprintf(csTmp, bsiz, strExecFile.c_str(), where.m_line);
                 ostr << csTmp << where.m_file_name << std::endl;
                 continue;
             }
             else
             {
-                os_sprintf(csTmp, strAtLine.c_str(), where.m_line);
+                os_sprintf(csTmp, bsiz, strAtLine.c_str(), where.m_line);
                 ostr << csTmp;
             }
         }
index bf9acce..28c9b02 100644 (file)
@@ -119,8 +119,8 @@ char* computeSCIHOME(void)
     }
 
     /* Set SCIHOME environment variable */
-    os_sprintf(USERPATHSCILAB, "%s%s%s", USERHOMESYSTEM, DIR_SEPARATOR, BASEDIR);
-    os_sprintf(SCIHOMEPATH, "%s%s%s", USERPATHSCILAB, DIR_SEPARATOR, SCI_VERSION_STRING);
+    os_sprintf(USERPATHSCILAB, PATH_MAX, "%s%s%s", USERHOMESYSTEM, DIR_SEPARATOR, BASEDIR);
+    os_sprintf(SCIHOMEPATH, PATH_MAX * 2, "%s%s%s", USERPATHSCILAB, DIR_SEPARATOR, SCI_VERSION_STRING);
 
     /* creates directory if it does not exists */
     if (!isdir(SCIHOMEPATH))
index 98ab9e9..594321a 100644 (file)
@@ -108,7 +108,7 @@ char* computeTMPDIR()
         char tmp_dir[PATH_MAX + FILENAME_MAX + 1];
         static char bufenv[PATH_MAX + 16];
         char *TmpDir = NULL;
-        os_sprintf(tmp_dir, "%sSCI_TMP_%d_", tmpDirDefault, _getpid());
+        os_sprintf(tmp_dir, PATH_MAX + FILENAME_MAX + 1, "%sSCI_TMP_%d_", tmpDirDefault, _getpid());
         if (CreateDirectoryA(tmp_dir, NULL) == FALSE)
         {
             DWORD attribs = GetFileAttributesA(tmp_dir);
@@ -121,7 +121,7 @@ char* computeTMPDIR()
 #ifdef _DEBUG
                 {
                     char MsgErr[1024];
-                    os_sprintf(MsgErr, _("Impossible to create : %s"), tmp_dir);
+                    os_sprintf(MsgErr, 1024, _("Impossible to create : %s"), tmp_dir);
                     MessageBoxA(NULL, MsgErr, _("Error"), MB_ICONERROR);
                     exit(1);
                 }
@@ -135,7 +135,7 @@ char* computeTMPDIR()
             }
         }
 
-        os_sprintf(bufenv, "TMPDIR=%s", tmp_dir);
+        os_sprintf(bufenv, PATH_MAX + 16, "TMPDIR=%s", tmp_dir);
         _putenv(bufenv);
 
         return os_strdup(tmp_dir);
index ea1755a..4e68246 100644 (file)
@@ -576,11 +576,7 @@ Callable::ReturnValue DynamicFunction::Init()
             /* Build the full path to the library */
             int iPathToLibLen = (strlen(pstScilabPath) + strlen(pstModulesPath) + strlen(m_stModule.c_str()) + strlen("/") + strlen(pstLTDir) + strlen(m_libName.c_str()) + 1);
             char* pstPathToLib = (char*)MALLOC(iPathToLibLen * sizeof(char));
-#ifdef _MSC_VER
             os_sprintf(pstPathToLib, iPathToLibLen, "%s%s%s/%s%s", pstScilabPath, pstModulesPath, m_stModule.c_str(), pstLTDir, m_libName.c_str());
-#else
-            os_sprintf(pstPathToLib, "%s%s%s/%s%s", pstScilabPath, pstModulesPath, m_stModule.c_str(), pstLTDir, m_libName.c_str());
-#endif
             FREE(pstScilabPath);
             hLib = LoadDynLibrary(pstPathToLib);
 
index 7ba5646..20a0e46 100644 (file)
@@ -54,7 +54,7 @@ Library::~Library()
 bool Library::toString(std::ostringstream& ostr)
 {
     char output[1024] = {0};
-    os_sprintf(output, _("Functions files location : %s.\n"), m_path.c_str());
+    os_sprintf(output, 1024, _("Functions files location : %s.\n"), m_path.c_str());
 
     ostr << output << std::endl;
 
@@ -89,7 +89,7 @@ bool Library::extract(const std::string & name, InternalType *& out)
     if (out == NULL)
     {
         char szError[bsiz];
-        os_sprintf(szError, _("Unknown field : %s.\n"), name.c_str());
+        os_sprintf(szError, bsiz, _("Unknown field : %s.\n"), name.c_str());
         throw std::string(szError);
     }
 
index 4ae2075..cdb60b0 100644 (file)
@@ -85,13 +85,13 @@ types::Function::ReturnValue Overload::call(const std::string& _stOverloadingFun
             char pstError2[512];
             if (_isOperator)
             {
-                os_sprintf(pstError2, _("check or define function %s for overloading.\n"), _stOverloadingFunctionName.c_str());
-                os_sprintf(pstError1, "%s%s", _("Undefined operation for the given operands.\n"), pstError2);
+                os_sprintf(pstError2, 512, _("check or define function %s for overloading.\n"), _stOverloadingFunctionName.c_str());
+                os_sprintf(pstError1, 512, "%s%s", _("Undefined operation for the given operands.\n"), pstError2);
             }
             else
             {
-                os_sprintf(pstError2, _("  check arguments or define function %s for overloading.\n"), _stOverloadingFunctionName.c_str());
-                os_sprintf(pstError1, "%s%s", _("Function not defined for given argument type(s),\n"), pstError2);
+                os_sprintf(pstError2, 512, _("  check arguments or define function %s for overloading.\n"), _stOverloadingFunctionName.c_str());
+                os_sprintf(pstError1, 512, "%s%s", _("Function not defined for given argument type(s),\n"), pstError2);
             }
 
             ast::InternalError ie(pstError1);
@@ -145,7 +145,7 @@ std::string Overload::getNameFromOper(const int _oper)
 {
     switch (_oper)
     {
-        /* standard operators */
+            /* standard operators */
         case ast::OpExp::plus :
             return "a";
         case ast::OpExp::unaryMinus :
@@ -159,7 +159,7 @@ std::string Overload::getNameFromOper(const int _oper)
             return "l";
         case ast::OpExp::power :
             return "p";
-        /* dot operators */
+            /* dot operators */
         case ast::OpExp::dottimes :
             return "x";
         case ast::OpExp::dotrdivide :
@@ -168,14 +168,14 @@ std::string Overload::getNameFromOper(const int _oper)
             return "q";
         case ast::OpExp::dotpower :
             return "j";
-        /* Kron operators */
+            /* Kron operators */
         case ast::OpExp::krontimes :
             return "k";
         case ast::OpExp::kronrdivide :
             return "y";
         case ast::OpExp::kronldivide :
             return "z";
-        /* Control Operators ??? */
+            /* Control Operators ??? */
         case ast::OpExp::controltimes :
             return "u";
         case ast::OpExp::controlrdivide :
index 872b60d..ad71e7b 100644 (file)
@@ -1026,7 +1026,7 @@ Polynom* Polynom::insert(typed_list* _pArgs, InternalType* _pSource)
     if (p->getVariableName() != getVariableName())
     {
         char szError[512];
-        os_sprintf(szError, _("Input arguments should have the same formal variable name.\n"));
+        os_sprintf(szError, 512, _("Input arguments should have the same formal variable name.\n"));
         throw ast::InternalError(szError);
     }
 
index 00dd6ef..ef3d5ac 100644 (file)
@@ -103,7 +103,7 @@ double* SinglePoly::allocData(int _iSize)
             m_pRealData = NULL;
             m_pImgData = NULL;
             char message[bsiz];
-            os_sprintf(message, _("Can not allocate negative size (%d).\n"),  _iSize);
+            os_sprintf(message, bsiz, _("Can not allocate negative size (%d).\n"),  _iSize);
             throw ast::InternalError(message);
         }
         else
@@ -114,7 +114,7 @@ double* SinglePoly::allocData(int _iSize)
     catch (std::bad_alloc &/*e*/)
     {
         char message[bsiz];
-        os_sprintf(message, _("Can not allocate %.2f MB memory.\n"),  (double) (_iSize * sizeof(double)) / 1.e6);
+        os_sprintf(message, bsiz, _("Can not allocate %.2f MB memory.\n"),  (double) (_iSize * sizeof(double)) / 1.e6);
         throw ast::InternalError(message);
     }
 
index c0a733f..c6e2886 100644 (file)
@@ -544,7 +544,7 @@ char* String::copyValue(char* _pstData)
     catch (std::bad_alloc & /*e*/)
     {
         char message[bsiz];
-        os_sprintf(message, _("Can not allocate data.\n"));
+        os_sprintf(message, bsiz, _("Can not allocate data.\n"));
         throw ast::InternalError(message);
     }
 
@@ -623,7 +623,7 @@ char** String::allocData(int _iSize)
     catch (std::bad_alloc & /*e*/)
     {
         char message[bsiz];
-        os_sprintf(message, _("Can not allocate %.2f MB memory.\n"), (double)(_iSize * sizeof(char*)) / 1.e6);
+        os_sprintf(message, bsiz, _("Can not allocate %.2f MB memory.\n"), (double)(_iSize * sizeof(char*)) / 1.e6);
         throw ast::InternalError(message);
     }
     return pStr;
index 7965aad..6526cf6 100644 (file)
@@ -143,7 +143,7 @@ bool Struct::extract(const std::string & name, InternalType *& out)
     else
     {
         char szError[bsiz];
-        os_sprintf(szError, _("Unknown field : %s.\n"), name.c_str());
+        os_sprintf(szError, bsiz, _("Unknown field : %s.\n"), name.c_str());
         throw std::string(szError);
     }
 
@@ -175,7 +175,7 @@ bool Struct::invoke(typed_list & in, optional_list & opt, int _iRetCount, typed_
                 else
                 {
                     char szError[bsiz];
-                    os_sprintf(szError, _("Field \"%s\" does not exists\n"), stField.c_str());
+                    os_sprintf(szError, bsiz, _("Field \"%s\" does not exists\n"), stField.c_str());
                     throw ast::InternalError(szError, 999, e.getLocation());
                 }
             }
index 62719e2..377371b 100644 (file)
@@ -243,17 +243,17 @@ void addDoubleValue(std::ostringstream * _postr, double _dblVal, DoubleFormat *
         }
     }
 
-    os_sprintf(pstSign, "%s%s%s", pBlank, pSign, pBlank);
+    os_sprintf(pstSign, 32, "%s%s%s", pBlank, pSign, pBlank);
 
     if (ISNAN(_dblVal))
     {
         //NaN
-        os_sprintf(pstOutput, "%s%*s", pstSign, _pDF->iPrec, "Nan");
+        os_sprintf(pstOutput, 32, "%s%*s", pstSign, _pDF->iPrec, "Nan");
     }
     else if (!finite(_dblVal))
     {
         //Inf
-        os_sprintf(pstOutput, "%s%*s", pstSign, _pDF->iPrec, "Inf");
+        os_sprintf(pstOutput, 32, "%s%*s", pstSign, _pDF->iPrec, "Inf");
     }
     else if (_pDF->bExp)
     {
@@ -277,11 +277,11 @@ void addDoubleValue(std::ostringstream * _postr, double _dblVal, DoubleFormat *
 
         if (_pDF->bPrintPoint)
         {
-            os_sprintf(pstFormat, "%s%%#d.%%0%ddD%%+.02d", pstSign, _pDF->iPrec);
+            os_sprintf(pstFormat, 32, "%s%%#d.%%0%ddD%%+.02d", pstSign, _pDF->iPrec);
         }
         else
         {
-            os_sprintf(pstFormat, "%s%%d%%0%ddD%%+.02d", pstSign, _pDF->iPrec);
+            os_sprintf(pstFormat, 32, "%s%%d%%0%ddD%%+.02d", pstSign, _pDF->iPrec);
         }
 
         if ((int)std::round(dblDec) != (int)dblDec)
@@ -297,25 +297,25 @@ void addDoubleValue(std::ostringstream * _postr, double _dblVal, DoubleFormat *
             dblDec = d1;
         }
 
-        os_sprintf(pstOutput, pstFormat, (int)dblEnt, (int)dblDec, (int)dblTemp);
+        os_sprintf(pstOutput, 32, pstFormat, (int)dblEnt, (int)dblDec, (int)dblTemp);
     }
     else if ((_pDF->bPrintOne == true) || (isEqual(fabs(_dblVal), 1)) == false)
     {
         //do not print if _bPrintOne == false && _dblVal == 1
         if (_pDF->bPrintPoint)
         {
-            os_sprintf(pstFormat, "%s%%#-%d.%df", pstSign, _pDF->iWidth - 1, _pDF->iPrec);
+            os_sprintf(pstFormat, 32, "%s%%#-%d.%df", pstSign, _pDF->iWidth - 1, _pDF->iPrec);
         }
         else
         {
-            os_sprintf(pstFormat, "%s%%-%d.%df", pstSign, _pDF->iWidth - 2, _pDF->iPrec);  //-2 no point needed
+            os_sprintf(pstFormat, 32, "%s%%-%d.%df", pstSign, _pDF->iWidth - 2, _pDF->iPrec);  //-2 no point needed
         }
 
-        os_sprintf(pstOutput, pstFormat, fabs(_dblVal));
+        os_sprintf(pstOutput, 32, pstFormat, fabs(_dblVal));
     }
     else if (strlen(pstSign) != 0)
     {
-        os_sprintf(pstOutput, "%s", pstSign);
+        os_sprintf(pstOutput, 32, "%s", pstSign);
     }
 
     *_postr << pstOutput;
index 479cdfc..1663b63 100644 (file)
@@ -62,7 +62,7 @@ double getIndex(InternalType* val)
 {
     switch (val->getType())
     {
-        //scalar
+            //scalar
         case InternalType::ScilabDouble:
         {
             return getIndex(val->getAs<Double>());
@@ -669,7 +669,7 @@ int checkIndexesArguments(InternalType* _pRef, typed_list* _pArgsIn, typed_list*
                 if (pCurrentArg->get(j) >= INT_MAX)
                 {
                     char szError[bsiz];
-                    os_sprintf(szError, _("variable size exceeded : less than %d expected.\n"), INT_MAX);
+                    os_sprintf(szError, bsiz, _("variable size exceeded : less than %d expected.\n"), INT_MAX);
                     throw ast::InternalError(szError);
                 }
 
@@ -689,7 +689,7 @@ int checkIndexesArguments(InternalType* _pRef, typed_list* _pArgsIn, typed_list*
         else
         {
             char szError[bsiz];
-            os_sprintf(szError, _("Invalid index.\n"));
+            os_sprintf(szError, bsiz, _("Invalid index.\n"));
 
             delete[] _piMaxDim;
             delete[] _piCountDim;
index c61dd03..60f5e89 100644 (file)
@@ -68,7 +68,7 @@ static int findMatchingPrefixSuffix(const char* string, const char* find, BOOL s
         movingPointerOnFindCopy[0] = '\0';
         //Check if the cutted tmpfind match with the suffix of string that has adequat length
         pointerOnString = (char*)(string + stringLength - 1 - strlen(pointerOnFindCopy));
-        if ( !strnicmp(pointerOnFindCopy, pointerOnString, strlen(pointerOnFindCopy)) )
+        if ( !os_strnicmp(pointerOnFindCopy, pointerOnString, strlen(pointerOnFindCopy)) )
         {
             FREE(pointerOnFindCopy);
             pointerOnFindCopy = NULL;
index cdeefa5..262cba3 100644 (file)
@@ -25,7 +25,7 @@ char **completion_generic(char **dictionary, int sizedictionary,
     {
         if (dictionary[i])
         {
-            if ( strnicmp(dictionary[i], somechars, strlen(somechars)) == 0)
+            if ( os_strnicmp(dictionary[i], somechars, strlen(somechars)) == 0)
             {
                 nbElements++;
                 /* +1 in MALLOC because a NULL element is inserted at the end of the array */
index e4d9e4f..50a7ed7 100644 (file)
@@ -109,16 +109,16 @@ static char *getCommandByFileExtension(char *File, char *FileExtension)
 
     if (FileExtension)
     {
-        if ( (stricmp(FileExtension, BIN_EXTENSION_FILE) == 0) ||
-                (stricmp(FileExtension, SAV_EXTENSION_FILE) == 0) ||
-                (stricmp(FileExtension, SOD_EXTENSION_FILE) == 0))
+        if ( (os_stricmp(FileExtension, BIN_EXTENSION_FILE) == 0) ||
+                (os_stricmp(FileExtension, SAV_EXTENSION_FILE) == 0) ||
+                (os_stricmp(FileExtension, SOD_EXTENSION_FILE) == 0))
         {
             command = buildCommand(FORMAT_BIN_SCE_EXTENSION_FILES, File);
         }
-        else if ( (stricmp(FileExtension, COS_EXTENSION_FILE) == 0) ||
-                  (stricmp(FileExtension, COSF_EXTENSION_FILE) == 0) ||
-                  (stricmp(FileExtension, ZCOS_EXTENSION_FILE) == 0) ||
-                  (stricmp(FileExtension, XCOS_EXTENSION_FILE) == 0))
+        else if ( (os_stricmp(FileExtension, COS_EXTENSION_FILE) == 0) ||
+                  (os_stricmp(FileExtension, COSF_EXTENSION_FILE) == 0) ||
+                  (os_stricmp(FileExtension, ZCOS_EXTENSION_FILE) == 0) ||
+                  (os_stricmp(FileExtension, XCOS_EXTENSION_FILE) == 0))
         {
             if (with_module("xcos"))
             {
@@ -129,15 +129,15 @@ static char *getCommandByFileExtension(char *File, char *FileExtension)
                 command = os_strdup(XCOS_NOT_INSTALLED);
             }
         }
-        else if (stricmp(FileExtension, SCI_EXTENSION_FILE) == 0)
+        else if (os_stricmp(FileExtension, SCI_EXTENSION_FILE) == 0)
         {
             command = buildCommand(FORMAT_SCI_EXTENSION_FILES, File);
         }
-        else if ( (stricmp(FileExtension, SCE_EXTENSION_FILE) == 0) || (stricmp(FileExtension, TST_EXTENSION_FILE) == 0) || (stricmp(FileExtension, DEM_EXTENSION_FILE) == 0) )
+        else if ( (os_stricmp(FileExtension, SCE_EXTENSION_FILE) == 0) || (os_stricmp(FileExtension, TST_EXTENSION_FILE) == 0) || (os_stricmp(FileExtension, DEM_EXTENSION_FILE) == 0) )
         {
             command = buildCommand(FORMAT_SCE_TST_EXTENSION_FILES, File);
         }
-        else if (stricmp(FileExtension, SCG_EXTENSION_FILE) == 0)
+        else if (os_stricmp(FileExtension, SCG_EXTENSION_FILE) == 0)
         {
             command = buildCommand(FORMAT_SCG_EXTENSION_FILES, File);
         }
index 61d4170..80273ac 100644 (file)
@@ -42,11 +42,11 @@ types::Function::ReturnValue sci_intppty(types::typed_list &in, int _iRetCount,
         }
 
         types::String* pMode = in[1]->getAs<types::String>();
-        if (stricmp(pMode->get(0), "add") == 0)
+        if (os_stricmp(pMode->get(0), "add") == 0)
         {
             bAdd = true;
         }
-        else if (stricmp(pMode->get(0), "remove") == 0)
+        else if (os_stricmp(pMode->get(0), "remove") == 0)
         {
             bAdd = false;
         }
index 3dbd8aa..9ed65ff 100644 (file)
@@ -46,7 +46,7 @@ void InitializePreferences(int useCWD)
     // Set history
     if (prefs->historyEnable)
     {
-        if (!stricmp(prefs->historyEnable, "true"))
+        if (!os_stricmp(prefs->historyEnable, "true"))
         {
             if (prefs->historyFile && prefs->historyLines)
             {
@@ -69,7 +69,7 @@ void InitializePreferences(int useCWD)
     // Set lines
     if (prefs->adaptToDisplay && prefs->columnsToDisplay && prefs->linesToDisplay)
     {
-        if (stricmp(prefs->adaptToDisplay, "true"))
+        if (os_stricmp(prefs->adaptToDisplay, "true"))
         {
             // it is not true so ...
             int lines = (int)atof(prefs->linesToDisplay);
@@ -82,14 +82,14 @@ void InitializePreferences(int useCWD)
     // Set current directory
     if (!useCWD && prefs->startup_dir_use)
     {
-        if (stricmp(prefs->startup_dir_use, "current"))
+        if (os_stricmp(prefs->startup_dir_use, "current"))
         {
             // Not in cwd
-            if (stricmp(prefs->startup_dir_use, "previous") == 0 && prefs->startup_dir_previous && *prefs->startup_dir_previous)
+            if (os_stricmp(prefs->startup_dir_use, "previous") == 0 && prefs->startup_dir_previous && *prefs->startup_dir_previous)
             {
                 scichdir((char*)prefs->startup_dir_previous);
             }
-            else if (stricmp(prefs->startup_dir_use, "default") == 0 && prefs->startup_dir_default && *prefs->startup_dir_default)
+            else if (os_stricmp(prefs->startup_dir_use, "default") == 0 && prefs->startup_dir_default && *prefs->startup_dir_default)
             {
                 scichdir((char*)prefs->startup_dir_default);
             }
index 2845d63..4e89182 100644 (file)
@@ -145,7 +145,7 @@ static BOOL AppendModules(char *xmlfilename)
         /* Don't care about line return / empty line */
         xmlKeepBlanksDefault(0);
         /* check if the XML file has been encoded with utf8 (unicode) or not */
-        if (stricmp("utf-8", encoding) == 0)
+        if (os_stricmp("utf-8", encoding) == 0)
         {
             xmlDocPtr doc = NULL;
             xmlXPathContextPtr xpathCtxt = NULL;
@@ -200,7 +200,7 @@ static BOOL AppendModules(char *xmlfilename)
                         {
                             /* we found the tag activate */
                             const char *str = (const char*)attrib->children->content;
-                            if (stricmp(str, "yes") == 0 || strcmp(str, "1") == 0)
+                            if (os_stricmp(str, "yes") == 0 || strcmp(str, "1") == 0)
                             {
                                 activate = 1;
                             }
index 06fdf94..2f44d26 100644 (file)
@@ -27,6 +27,7 @@
 #include "getshortpathname.h"
 #include "charEncoding.h"
 #include "version.h"
+#include "os_string.h"
 /*--------------------------------------------------------------------------*/
 BOOL getversionmodule(const char* _pstModule,
                       int *sci_version_major,
@@ -61,7 +62,7 @@ BOOL getversionmodule(const char* _pstModule,
             xmlKeepBlanksDefault(0);
 
             /* check if the XML file has been encoded with utf8 (unicode) or not */
-            if (stricmp("utf-8", encoding) == 0)
+            if (os_stricmp("utf-8", encoding) == 0)
             {
                 xmlDocPtr doc = NULL;
                 xmlXPathContextPtr xpathCtxt = NULL;
index 3d0d6da..edd2a69 100644 (file)
@@ -24,7 +24,7 @@ void saveCWDInPreferences()
 
     if (values)
     {
-        if (values[0] && stricmp(values[0], "previous") == 0)
+        if (values[0] && os_stricmp(values[0], "previous") == 0)
         {
             int err;
             char * cwd = scigetcwd(&err);
index 10da8a7..5866e88 100644 (file)
@@ -718,11 +718,11 @@ void* scilabReadAndStore(void* param)
                 }
                 else if (commandsize > 1 && command[0] == 'p' && command[1] == ' ')
                 {
-                        std::string s("disp(");
-                        s += command + 2;
-                        s += ")";
-                        tmpCommand = os_strdup(s.data());
-                        disableDebug = true;
+                    std::string s("disp(");
+                    s += command + 2;
+                    s += ")";
+                    tmpCommand = os_strdup(s.data());
+                    disableDebug = true;
                 }
                 else if (commandsize > 6 && strncmp(command, "print ", 6) == 0)
                 {
@@ -736,11 +736,7 @@ void* scilabReadAndStore(void* param)
                 {
                     int iLen = (int)strlen(command) + (int)strlen("debug ") + 1;
                     tmpCommand = (char*)MALLOC(sizeof(char) * iLen);
-#ifdef _MSC_VER
                     os_sprintf(tmpCommand, iLen, "%s %s", "debug", command);
-#else
-                    os_sprintf(tmpCommand, "%s %s", "debug", command);
-#endif
                     disableDebug = true;
                 }
 
index 0a42da6..c1d4445 100644 (file)
@@ -100,7 +100,7 @@ int StaticRunner::launch()
 
             //print msg about recursion limit and trigger an error
             char sz[1024];
-            os_sprintf(sz, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
+            os_sprintf(sz, 1024, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
             throw ast::InternalError(sz);
         }
     }
index d7e8d6d..39e86a9 100644 (file)
@@ -184,7 +184,6 @@ void CoverModule::getMacros(const std::string & path, const std::string & module
             }
         }
     }
-    FREE(libFile);
 }
 
 void CoverModule::getBuiltins(const std::vector<std::pair<std::string, std::string>> & paths_mods)
@@ -274,7 +273,7 @@ bool CoverModule::getStringFromXPath(const char * filePath, const char * xpquery
         return false;
     }
 
-    if (!doc->encoding || stricmp((const char *)doc->encoding, "utf-8") != 0)
+    if (!doc->encoding || os_stricmp((const char *)doc->encoding, "utf-8") != 0)
     {
         xmlFreeDoc(doc);
         return false;
index 52759c8..9d91ac2 100644 (file)
@@ -571,7 +571,7 @@ types::Function::ReturnValue sci_bvode(types::typed_list &in, int _iRetCount, ty
         DifferentialEquation::removeDifferentialEquationFunctions();
 
         char szError[bsiz];
-        os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "bvode", "bvode");
+        os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "bvode", "bvode");
         os << szError;
         throw ast::InternalError(os.str());
     }
index 446f267..09cef37 100644 (file)
@@ -343,7 +343,7 @@ types::Function::ReturnValue sci_daskr(types::typed_list &in, int _iRetCount, ty
 
             if (bOK == false)
             {
-                const char* pst = pStr->get(0);
+                char* pst = pStr->get(0);
                 Scierror(50, _("%s: Subroutine not found: %s\n"), "daskr", pst);
                 FREE(pst);
                 DifferentialEquation::removeDifferentialEquationFunctions();
@@ -850,8 +850,8 @@ types::Function::ReturnValue sci_daskr(types::typed_list &in, int _iRetCount, ty
 
         LENWP = pDblX0->getRows() * pDblX0->getRows();
         rworksize += (maxord + 5) * pDblX0->getRows() + 3 * ng
-            + (maxl + 3 + std::min(1, maxl - kmp)) * pDblX0->getRows()
-            + (maxl + 3) * maxl + 1 + LENWP;
+                     + (maxl + 3 + std::min(1, maxl - kmp)) * pDblX0->getRows()
+                     + (maxl + 3) * maxl + 1 + LENWP;
     }
 
     if (info[15] == 1)
@@ -1092,7 +1092,7 @@ types::Function::ReturnValue sci_daskr(types::typed_list &in, int _iRetCount, ty
             if (bCatch)
             {
                 char szError[bsiz];
-                os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "daskr", "ddaskr");
+                os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "daskr", "ddaskr");
                 os << szError;
                 throw ast::InternalError(os.str());
             }
index 30276f6..7d63ffd 100644 (file)
@@ -781,7 +781,7 @@ types::Function::ReturnValue sci_dasrt(types::typed_list &in, int _iRetCount, ty
             if (bCatch)
             {
                 char szError[bsiz];
-                os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "dasrt", "ddasrt");
+                os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "dasrt", "ddasrt");
                 os << szError;
                 throw ast::InternalError(os.str());
             }
index 82d2571..35345ec 100644 (file)
@@ -716,7 +716,7 @@ types::Function::ReturnValue sci_dassl(types::typed_list &in, int _iRetCount, ty
             if (bCatch)
             {
                 char szError[bsiz];
-                os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "dassl", "dassl");
+                os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "dassl", "dassl");
                 os << szError;
                 throw ast::InternalError(os.str());
             }
index 50589b4..7467993 100644 (file)
@@ -189,7 +189,7 @@ types::Function::ReturnValue sci_feval(types::typed_list &in, int _iRetCount, ty
                 delete pDblOut;
 
                 char szError[bsiz];
-                os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "feval", "execFevalF");
+                os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "feval", "execFevalF");
                 os << szError;
                 throw ast::InternalError(os.str());
             }
index 8cbebf4..0bf77d0 100644 (file)
@@ -685,7 +685,7 @@ types::Function::ReturnValue sci_impl(types::typed_list &in, int _iRetCount, typ
             if (bCatch)
             {
                 char szError[bsiz];
-                os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "impl", "lsodi");
+                os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "impl", "lsodi");
                 os << szError;
                 throw ast::InternalError(os.str());
             }
index 6d80c17..540d898 100644 (file)
@@ -254,7 +254,7 @@ types::Function::ReturnValue sci_int2d(types::typed_list &in, int _iRetCount, ty
     if (bCatch)
     {
         char szError[bsiz];
-        os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "int2d", "twodq");
+        os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "int2d", "twodq");
         os << szError;
         throw ast::InternalError(os.str());
     }
index 56714ef..14160be 100644 (file)
@@ -332,7 +332,7 @@ types::Function::ReturnValue sci_int3d(types::typed_list &in, int _iRetCount, ty
     if (bCatch)
     {
         char szError[bsiz];
-        os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "int3d", "dcutet");
+        os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "int3d", "dcutet");
         os << szError;
         throw ast::InternalError(os.str());
     }
index 9549cc4..77aee77 100644 (file)
@@ -250,7 +250,7 @@ types::Function::ReturnValue sci_intg(types::typed_list &in, int _iRetCount, typ
     if (bCatch)
     {
         char szError[bsiz];
-        os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "intg", "dqags");
+        os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "intg", "dqags");
         os << szError;
         throw ast::InternalError(os.str());
     }
index 005fc78..e466c92 100644 (file)
@@ -1136,7 +1136,7 @@ types::Function::ReturnValue sci_ode(types::typed_list &in, int _iRetCount, type
                 if (bCatch)
                 {
                     char szError[bsiz];
-                    os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "ode", strMeth.c_str());
+                    os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "ode", strMeth.c_str());
                     os << szError;
                     throw ast::InternalError(os.str());
                 }
@@ -1356,7 +1356,7 @@ types::Function::ReturnValue sci_ode(types::typed_list &in, int _iRetCount, type
                 if (bCatch)
                 {
                     char szError[bsiz];
-                    os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "ode", strMeth.c_str());
+                    os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "ode", strMeth.c_str());
                     os << szError;
                     throw ast::InternalError(os.str());
                 }
index 6c0c33b..672b5e7 100644 (file)
@@ -1130,7 +1130,7 @@ types::Function::ReturnValue sci_odedc(types::typed_list &in, int _iRetCount, ty
                     }
 
                     char szError[bsiz];
-                    os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "odedc", "tright");
+                    os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "odedc", "tright");
                     os << szError;
                     throw ast::InternalError(os.str());
                 }
@@ -1247,7 +1247,7 @@ types::Function::ReturnValue sci_odedc(types::typed_list &in, int _iRetCount, ty
                     if (bCatch)
                     {
                         char szError[bsiz];
-                        os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "odedc", strMeth.c_str());
+                        os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "odedc", strMeth.c_str());
                         os << szError;
                         throw ast::InternalError(os.str());
                     }
@@ -1442,7 +1442,7 @@ types::Function::ReturnValue sci_odedc(types::typed_list &in, int _iRetCount, ty
                 if (bCatch)
                 {
                     char szError[bsiz];
-                    os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "odedc", strMeth.c_str());
+                    os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "odedc", strMeth.c_str());
                     os << szError;
                     throw ast::InternalError(os.str());
                 }
@@ -1496,7 +1496,7 @@ types::Function::ReturnValue sci_odedc(types::typed_list &in, int _iRetCount, ty
                     }
 
                     char szError[bsiz];
-                    os_sprintf(szError, _("%s: An error occured in '%s' subroutine.\n"), "odedc", tright);
+                    os_sprintf(szError, bsiz, _("%s: An error occured in '%s' subroutine.\n"), "odedc", tright);
                     os << szError;
                     throw ast::InternalError(os.str());
                 }
index 4a2b729..6a139f9 100644 (file)
@@ -159,9 +159,7 @@ int Sci_dlopen(const char* _pstDynLibPath)
     }
 #else
     {
-        char* pstDynLibPath = wide_string_to_UTF8(_pstDynLibPath);
-        hLib = LoadDynLibrary (pstDynLibPath);
-        FREE(pstDynLibPath);
+        hLib = LoadDynLibrary (_pstDynLibPath);
     }
 #endif
 
index 85e3f9d..18aa4dc 100644 (file)
@@ -29,6 +29,7 @@
 #include "freeArrayOfString.h"
 #include "charEncoding.h"
 #include "expandPathVariable.h"
+#include "os_string.h"
 /*--------------------------------------------------------------------------*/
 static char *getFilenameWithExtension(char* fullFilename);
 static int returnCopyFileResultOnStack(int ierr, char *fname , void* pvApiCtx);
@@ -290,7 +291,7 @@ static int returnCopyFileResultOnStack(int ierr, char *fname, void* pvApiCtx)
             Scierror(999, _("%s: Memory allocation error.\n"), fname);
             return 0;
         }
-        
+
         strcpy(sciError, "");
     }
 #else
index e49cb5d..3cfc9de 100644 (file)
@@ -29,6 +29,7 @@
 #include "freeArrayOfString.h"
 #include "charEncoding.h"
 #include "expandPathVariable.h"
+#include "os_string.h"
 /*--------------------------------------------------------------------------*/
 static char* getFilenameWithExtensionForMove(char*  fullFilename);
 static int returnMoveFileResultOnStack(int ierr, char *fname, void* pvApiCtx);
@@ -254,7 +255,7 @@ static int returnMoveFileResultOnStack(int ierr, char *fname, void* pvApiCtx)
             Scierror(999, _("%s: Memory allocation error.\n"), fname);
             return 0;
         }
-        
+
         strcpy(sciError, "");
     }
 #else
index e4f037b..a1a04b1 100644 (file)
@@ -55,7 +55,7 @@ types::Function::ReturnValue sci_mclose(types::typed_list &in, int _iRetCount, t
                 }
                 iRet = mclose(iFileID);
             }
-            else if (stricmp(pS->get(0), "all") == 0)
+            else if (os_stricmp(pS->get(0), "all") == 0)
             {
                 iRet = mcloseAll();
             }
index d417f37..b3b2b17 100644 (file)
@@ -31,7 +31,7 @@ extern "C"
 /*--------------------------------------------------------------------------*/
 types::Function::ReturnValue sci_mget(types::typed_list &in, int _iRetCount, types::typed_list &out)
 {
-    char* pstType   = "l";//default type value : long
+    const char* pstType = "l";//default type value : long
     int iSize       = 0;
     int iFile       = -1; //default file : last opened file
     int iErr        = 0;
@@ -85,7 +85,6 @@ types::Function::ReturnValue sci_mget(types::typed_list &in, int _iRetCount, typ
     {
         case 0: // stderr
         case 6: // stdout
-            FREE(pstType);
             Scierror(999, _("%s: Wrong file descriptor: %d.\n"), "mget", iFile);
             return types::Function::Error;
     }
@@ -94,7 +93,6 @@ types::Function::ReturnValue sci_mget(types::typed_list &in, int _iRetCount, typ
     // file opened with fortran open function
     if (pFile == NULL || pFile->getFileType() == 1)
     {
-        FREE(pstType);
         Scierror(999, _("%s: Wrong file descriptor: %d.\n"), "mget", iFile);
         return types::Function::Error;
     }
index 6c54eac..f317dc7 100644 (file)
@@ -33,7 +33,7 @@ types::Function::ReturnValue sci_mopen(types::typed_list &in, int _iRetCount, ty
     int iErr                = 0;
     int iID                 = 0;
     char* pstFilename       = NULL;
-    char* pstMode           = "rb";
+    const char* pstMode     = "rb";
     int iSwap               = 0;
 
     //check output parameters
index 2c9d864..c8513f6 100644 (file)
@@ -32,7 +32,7 @@ extern "C"
 /*--------------------------------------------------------------------------*/
 types::Function::ReturnValue sci_mput(types::typed_list &in, int _iRetCount, types::typed_list &out)
 {
-    char* pstType   = "l";//default type value : long
+    char* pstType   = (char*)"l";//default type value : long
     int iSize       = 0;
     int iFile       = -1; //default file : last opened file
     double* pData   = NULL;
index 22e67b0..a44af37 100644 (file)
 #include "fullpath.h"
 #include "os_string.h"
 /*--------------------------------------------------------------------------*/
-static int CopyFileFunction_others(wchar_t *DestinationFilename, wchar_t *SourceFilename);
-static int CopyDirectoryFunction_others(wchar_t *DestinationDirectory, wchar_t *SourceDirectory);
+static int CopyFileFunction_others(char* DestinationFilename, char* SourceFilename);
+static int CopyDirectoryFunction_others(char* DestinationDirectory, char* SourceDirectory);
 static int RecursiveCopyDirectory(char *DestinationDir, char *SourceDir);
 /*--------------------------------------------------------------------------*/
-int CopyFileFunction(wchar_t *DestinationFilename, wchar_t *SourceFilename)
+int CopyFileFunction(char* DestinationFilename, char* SourceFilename)
 {
-    if (os_wcsicmp(DestinationFilename, SourceFilename) == 0)
+    if (os_stricmp(DestinationFilename, SourceFilename) == 0)
     {
         return EPERM;
     }
     return CopyFileFunction_others(DestinationFilename, SourceFilename);
 }
 /*--------------------------------------------------------------------------*/
-int CopyDirectoryFunction(wchar_t *DestinationDirectory, wchar_t *SourceDirectory)
+int CopyDirectoryFunction(char* DestinationDirectory, char* SourceDirectory)
 {
     /* remove last file separator if it does not exists */
-    if ( (SourceDirectory[wcslen(SourceDirectory) - 1] == L'\\') ||
-            (SourceDirectory[wcslen(SourceDirectory) - 1] == L'/') )
+    if ( (SourceDirectory[strlen(SourceDirectory) - 1] == '\\') ||
+            (SourceDirectory[strlen(SourceDirectory) - 1] == '/') )
     {
-        SourceDirectory[wcslen(SourceDirectory) - 1] = L'\0';
+        SourceDirectory[strlen(SourceDirectory) - 1] = '\0';
     }
 
     /* remove last file separator if it does not exists */
-    if ( (DestinationDirectory[wcslen(DestinationDirectory) - 1] == L'\\') ||
-            (DestinationDirectory[wcslen(DestinationDirectory) - 1] == L'/') )
+    if ( (DestinationDirectory[strlen(DestinationDirectory) - 1] == '\\') ||
+            (DestinationDirectory[strlen(DestinationDirectory) - 1] == '/') )
     {
-        DestinationDirectory[wcslen(DestinationDirectory) - 1] = L'\0';
+        DestinationDirectory[strlen(DestinationDirectory) - 1] = '\0';
     }
 
     return CopyDirectoryFunction_others(DestinationDirectory, SourceDirectory);
@@ -66,10 +66,10 @@ int CopyDirectoryFunction(wchar_t *DestinationDirectory, wchar_t *SourceDirector
 }
 /*--------------------------------------------------------------------------*/
 /* Copy file with all attributes  */
-static int CopyFileFunction_others(wchar_t *DestinationFilename, wchar_t *SourceFilename)
+static int CopyFileFunction_others(char* DestinationFilename, char* SourceFilename)
 {
-    char *pStrDest = wide_string_to_UTF8(DestinationFilename);
-    char *pStrSrc = wide_string_to_UTF8(SourceFilename);
+    char *pStrDest = DestinationFilename;
+    char *pStrSrc = SourceFilename;
 
     char strDestFullPath[PATH_MAX * 2 + 1];
     char strSrcFullPath[PATH_MAX * 2 + 1];
@@ -139,16 +139,6 @@ static int CopyFileFunction_others(wchar_t *DestinationFilename, wchar_t *Source
 
     fchmod (dfd, st.st_mode & 0777);
     close (sfd);
-    if (pStrDest)
-    {
-        FREE(pStrDest);
-        pStrDest = NULL;
-    }
-    if (pStrSrc)
-    {
-        FREE(pStrSrc);
-        pStrSrc = NULL;
-    }
     return 0;
 
 err:
@@ -162,63 +152,39 @@ err:
         unlink (pStrDest);
     }
 
-    if (pStrDest)
-    {
-        FREE(pStrDest);
-        pStrDest = NULL;
-    }
-    if (pStrSrc)
-    {
-        FREE(pStrSrc);
-        pStrSrc = NULL;
-    }
     return status;
 }
 /*--------------------------------------------------------------------------*/
-static int CopyDirectoryFunction_others(wchar_t *DestinationDirectory, wchar_t *SourceDirectory)
+static int CopyDirectoryFunction_others(char* DestinationDirectory, char* SourceDirectory)
 {
-    char *pStrDest = wide_string_to_UTF8(DestinationDirectory);
-    char *pStrSrc = wide_string_to_UTF8(SourceDirectory);
+    char *pStrDest = DestinationDirectory;
+    char *pStrSrc = SourceDirectory;
 
     int ierr = 0;
 
     /* we check directory source exists */
     if (!isdir(pStrSrc))
     {
-        if (pStrDest)
-        {
-            FREE(pStrDest);
-            pStrDest = NULL;
-        }
-        FREE(pStrSrc);
         return ENOTDIR;
     }
 
     /* we check destination directory exists */
     if (!isdir(pStrDest))
     {
-        if (FileExistW(DestinationDirectory))
+        if (FileExist(pStrDest))
         {
-            FREE(pStrDest);
-            FREE(pStrSrc);
             return ENOTDIR;
         }
         else
         {
-            if (!createdirectoryW(DestinationDirectory))
+            if (!createdirectory(pStrDest))
             {
-                FREE(pStrDest);
-                FREE(pStrSrc);
                 return ENOTDIR;
             }
         }
     }
 
     ierr = RecursiveCopyDirectory(pStrDest, pStrSrc);
-
-    FREE(pStrDest);
-    FREE(pStrSrc);
-
     if (ierr)
     {
         return errno;
@@ -286,13 +252,7 @@ static int RecursiveCopyDirectory(char *DestinationDir, char *SourceDir)
         }
         else
         {
-            wchar_t* wcfileDest = to_wide_string(filenameDST);
-            wchar_t* wcfileSrc = to_wide_string(filenameSRC);
-
-            int ierr = CopyFileFunction_others(wcfileDest,  wcfileSrc);
-            FREE(wcfileDest);
-            FREE(wcfileSrc);
-
+            int ierr = CopyFileFunction_others(filenameDST,  filenameSRC);
             if (ierr)
             {
                 FREE(filenameDST);
index 9ac4e9b..13d87c8 100644 (file)
@@ -28,7 +28,7 @@ static int CopyDirectoryFunction_windows(char* DestinationDirectory, char* Sourc
 /*--------------------------------------------------------------------------*/
 int CopyFileFunction(char* DestinationFilename, char* SourceFilename)
 {
-    if (stricmp(DestinationFilename, SourceFilename) == 0)
+    if (os_stricmp(DestinationFilename, SourceFilename) == 0)
     {
         SetLastError(ERROR_ACCESS_DENIED);
         return 1;
@@ -54,7 +54,7 @@ int CopyDirectoryFunction(char* DestinationDirectory, char* SourceDirectory)
         DestinationDirectory[dstlen - 1] = '\0';
     }
 
-    if (stricmp(DestinationDirectory, SourceDirectory) == 0)
+    if (os_stricmp(DestinationDirectory, SourceDirectory) == 0)
     {
         SetLastError(ERROR_ACCESS_DENIED);
         return 1;
index 3b4779d..8a069a6 100644 (file)
 #include "isdir.h"
 #include "splitpath.h"
 #include "scicurdir.h"
+#include "os_string.h"
+#ifndef _MSC_VER
+#define MAX_PATH PATH_MAX
+#endif
 /*--------------------------------------------------------------------------*/
 #define DIRMODE 0777
 /*--------------------------------------------------------------------------*/
@@ -37,12 +41,18 @@ BOOL createdirectory(const char *path)
     {
         if (!isdir(path))
         {
+#ifndef _MCS_VER
+            if (mkdir(path, DIRMODE) == 0)
+            {
+                bOK = TRUE;
+            }
+#else
             char path_out[MAX_PATH];
             char drv[MAX_PATH];
             char dir[MAX_PATH];
             splitpath(path, TRUE, drv, dir, NULL, NULL);
 
-            strcpy(path_out, drv);
+            os_strcpy(path_out, drv);
             strcat(path_out, dir);
 
             //if there is no path_out, get current dir as reference.
@@ -56,7 +66,7 @@ BOOL createdirectory(const char *path)
                 }
 
                 cur = scigetcwd(&err);
-                strcpy(path_out, cur);
+                os_strcpy(path_out, cur);
                 FREE(cur);
             }
 
@@ -64,8 +74,10 @@ BOOL createdirectory(const char *path)
             {
                 bOK = TRUE;
             }
+#endif // _MCS_VER
+
         }
     }
     return bOK;
 }
-/*--------------------------------------------------------------------------*/
\ No newline at end of file
+/*--------------------------------------------------------------------------*/
index d7d924d..f604d25 100644 (file)
@@ -122,7 +122,7 @@ int getProxyValues(char **proxyHost, long *proxyPort, char **proxyUserPwd)
         return 0;
     }
 
-    if (stricmp(values[0]/*enabled*/, "true") == 0)
+    if (os_stricmp(values[0]/*enabled*/, "true") == 0)
     {
         const unsigned int ulen = (const unsigned int)strlen(values[3]);
         const unsigned int plen = (const unsigned int)strlen(values[4]);
index c20f1c1..efc644f 100644 (file)
@@ -28,7 +28,7 @@
 #include "Sciwarning.h"
 /*--------------------------------------------------------------------------*/
 #ifndef _MSC_VER
-static BOOL find_spec( char *filename , char *filespec);
+static BOOL find_spec(const char *filename , const char *filespec);
 #endif
 /*--------------------------------------------------------------------------*/
 #ifdef _MSC_VER
@@ -138,7 +138,7 @@ char **findfiles(const char *path, const char *filespec, int *sizeListReturned,
  * @param filename the filename
  * @param filespec the mask
  */
-static BOOL find_spec( char *filename , char *filespec)
+static BOOL find_spec(const char *filename , const char *filespec)
 {
     char *any = NULL;
 
index 35c733e..aed1ff1 100644 (file)
@@ -45,20 +45,9 @@ int scichdir(const char *path)
         {
             sciprint(_("Can't go to directory %s: %s\n"), path, strerror(errno));
         }
-        if (path)
-        {
-            FREE(path);
-            path = NULL;
-        }
         return 1;
     }
 
-    if (path)
-    {
-        FREE(path);
-        path = NULL;
-    }
-
 #else
     if (_chdir(path) )
     {
index 31b2be2..9edb8d7 100644 (file)
@@ -111,7 +111,7 @@ types::Function::ReturnValue sci_exec(types::typed_list &in, int _iRetCount, typ
         {
             //errcatch
             types::String* pS = in[1]->getAs<types::String>();
-            if (stricmp(pS->get(0), "errcatch") == 0)
+            if (os_stricmp(pS->get(0), "errcatch") == 0)
             {
                 bErrCatch = true;
             }
@@ -314,7 +314,7 @@ types::Function::ReturnValue sci_exec(types::typed_list &in, int _iRetCount, typ
 
                 //print msg about recursion limit and trigger an error
                 char sz[1024];
-                os_sprintf(sz, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
+                os_sprintf(sz, 1024, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
                 throw ast::InternalError(sz);
             }
         }
@@ -418,7 +418,7 @@ types::Function::ReturnValue sci_exec(types::typed_list &in, int _iRetCount, typ
 
                     //print msg about recursion limit and trigger an error
                     char sz[1024];
-                    os_sprintf(sz, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
+                    os_sprintf(sz, 1024, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
                     throw ast::InternalError(sz);
                 }
             }
index b715c37..b40ccdf 100644 (file)
@@ -64,7 +64,7 @@ types::Function::ReturnValue sci_execstr(types::typed_list &in, int _iRetCount,
         }
 
         types::String* pS = in[1]->getAs<types::String>();
-        if (stricmp(pS->get(0), "errcatch") == 0)
+        if (os_stricmp(pS->get(0), "errcatch") == 0)
         {
             bErrCatch = true;
         }
@@ -86,11 +86,11 @@ types::Function::ReturnValue sci_execstr(types::typed_list &in, int _iRetCount,
             return types::Function::Error;
         }
 
-        if (stricmp(in[2]->getAs<types::String>()->get(0), MUTE_FLAG) == 0)
+        if (os_stricmp(in[2]->getAs<types::String>()->get(0), MUTE_FLAG) == 0)
         {
             bMute = true;
         }
-        else if (stricmp(in[2]->getAs<types::String>()->get(0), NO_MUTE_FLAG) == 0)
+        else if (os_stricmp(in[2]->getAs<types::String>()->get(0), NO_MUTE_FLAG) == 0)
         {
             bMute = false;
         }
@@ -227,7 +227,7 @@ types::Function::ReturnValue sci_execstr(types::typed_list &in, int _iRetCount,
 
             //print msg about recursion limit and trigger an error
             char sz[1024];
-            os_sprintf(sz, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
+            os_sprintf(sz, 1024, _("Recursion limit reached (%d).\n"), ConfigVariable::getRecursionLimit());
             throw ast::InternalError(sz);
         }
     }
index a631d23..1b9478e 100644 (file)
@@ -120,7 +120,7 @@ bool FuncManager::AppendModules()
     /* Don't care about line return / empty line */
     xmlKeepBlanksDefault(0);
     /* check if the XML file has been encoded with utf8 (unicode) or not */
-    if (stricmp("utf-8", encoding) == 0)
+    if (os_stricmp("utf-8", encoding) == 0)
     {
         xmlDocPtr doc;
         xmlXPathContextPtr xpathCtxt = NULL;
@@ -165,7 +165,7 @@ bool FuncManager::AppendModules()
                     {
                         /* we found the tag activate */
                         const char *str = (const char*)attrib->children->content;
-                        if (stricmp(str, "yes") == 0 || strcmp(str, "1") == 0)
+                        if (os_stricmp(str, "yes") == 0 || strcmp(str, "1") == 0)
                         {
                             activate = 1;
                         }
index d0dcb02..298ab7a 100644 (file)
@@ -76,11 +76,11 @@ int sci_light(scilabEnv env, int nin, scilabVar* in, int nopt, scilabOpt opt, in
                 return 0;
             }
 
-            if (stricmp(str, "on") == 0)
+            if (os_stricmp(str, "on") == 0)
             {
                 visible = 1;
             }
-            else if (stricmp(str, "off") == 0)
+            else if (os_stricmp(str, "off") == 0)
             {
                 visible = 0;
             }
@@ -96,11 +96,11 @@ int sci_light(scilabEnv env, int nin, scilabVar* in, int nopt, scilabOpt opt, in
                 return 0;
             }
 
-            if (stricmp(str, "directional") == 0)
+            if (os_stricmp(str, "directional") == 0)
             {
                 type = 0;
             }
-            else if (stricmp(str, "point") == 0)
+            else if (os_stricmp(str, "point") == 0)
             {
                 type = 1;
             }
index fe947f1..129c093 100644 (file)
@@ -341,16 +341,16 @@ int sci_set(char *fname, void *pvApiCtx)
             return 1;
         }
 
-        if ((pstProperty[0] == 'd' || pstProperty[0] == 'D') && stricmp("data", pstProperty) == 0)
+        if ((pstProperty[0] == 'd' || pstProperty[0] == 'D') && os_stricmp("data", pstProperty) == 0)
         {
             //send to datamodel
             isData = 1;
         }
 
-        if (stricmp(pstProperty, "user_data") == 0 ||
-                stricmp(pstProperty, "userdata") == 0 ||
-                stricmp(pstProperty, "display_function_data") == 0 ||
-                stricmp(pstProperty, "data") == 0)
+        if (os_stricmp(pstProperty, "user_data") == 0 ||
+                os_stricmp(pstProperty, "userdata") == 0 ||
+                os_stricmp(pstProperty, "display_function_data") == 0 ||
+                os_stricmp(pstProperty, "data") == 0)
         {
             /* in this case set_user_data_property
             * directly uses the  third position in the stack
@@ -385,8 +385,8 @@ int sci_set(char *fname, void *pvApiCtx)
                 case sci_strings :
                     if (strcmp(pstProperty, "tics_labels") != 0 && strcmp(pstProperty, "auto_ticks") != 0 && strcmp(pstProperty, "tight_limits") != 0 &&
                             strcmp(pstProperty, "axes_visible") != 0 && strcmp(pstProperty, "axes_reverse") != 0 &&
-                            strcmp(pstProperty, "text") != 0 && stricmp(pstProperty, "string") != 0 &&
-                            stricmp(pstProperty, "tooltipstring") != 0 && stricmp(pstProperty, "ticks_format") != 0) /* Added for uicontrols */
+                            strcmp(pstProperty, "text") != 0 && os_stricmp(pstProperty, "string") != 0 &&
+                            os_stricmp(pstProperty, "tooltipstring") != 0 && os_stricmp(pstProperty, "ticks_format") != 0) /* Added for uicontrols */
                     {
                         if (isScalar(pvApiCtx, piAddr3) == 0)
                         {
index 8e4c940..d98ab33 100644 (file)
@@ -59,27 +59,27 @@ int tryGetBooleanValueFromStack(void* _pvData, int _iType, int _iRows, int _iCol
 {
     if (_iType == sci_strings)
     {
-        if (stricmp((char*)_pvData, "on") == 0)
+        if (os_stricmp((char*)_pvData, "on") == 0)
         {
             return TRUE;
         }
-        if (stricmp((char*)_pvData, "off") == 0)
+        if (os_stricmp((char*)_pvData, "off") == 0)
         {
             return FALSE;
         }
-        if (stricmp((char*)_pvData, "1") == 0)
+        if (os_stricmp((char*)_pvData, "1") == 0)
         {
             return TRUE;
         }
-        if (stricmp((char*)_pvData, "0") == 0)
+        if (os_stricmp((char*)_pvData, "0") == 0)
         {
             return FALSE;
         }
-        if (stricmp((char*)_pvData, "T") == 0)
+        if (os_stricmp((char*)_pvData, "T") == 0)
         {
             return TRUE;
         }
-        if (stricmp((char*)_pvData, "F") == 0)
+        if (os_stricmp((char*)_pvData, "F") == 0)
         {
             return FALSE;
         }
index b615e43..5231f3b 100644 (file)
@@ -43,7 +43,7 @@ static unsigned int setGetHashTableHash(void * key)
 /*--------------------------------------------------------------------------*/
 static int setGetHashTableEqualKeys(void * k1, void * k2)
 {
-    if (stricmp((char *)k1, (char *)k2) == 0)
+    if (os_stricmp((char *)k1, (char *)k2) == 0)
     {
         return 1;
     }
index 8e69a89..6704e55 100644 (file)
@@ -42,15 +42,15 @@ int set_alignment_property(void* _pvCtx, int iObjUID, void* _pvData, int valueTy
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "left") == 0)
+    if (os_stricmp((char*)_pvData, "left") == 0)
     {
         alignment = 0;
     }
-    else if (stricmp((char*)_pvData, "center") == 0)
+    else if (os_stricmp((char*)_pvData, "center") == 0)
     {
         alignment = 1;
     }
-    else if (stricmp((char*)_pvData, "right") == 0)
+    else if (os_stricmp((char*)_pvData, "right") == 0)
     {
         alignment = 2;
     }
index 1ab53ec..596a409 100644 (file)
@@ -44,23 +44,23 @@ int set_anti_aliasing_property(void* _pvCtx, int iObjUID, void* _pvData, int val
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "off") == 0)
+    if (os_stricmp((char*)_pvData, "off") == 0)
     {
         quality = 0;
     }
-    else if (stricmp((char*)_pvData, "2x") == 0)
+    else if (os_stricmp((char*)_pvData, "2x") == 0)
     {
         quality = 1;
     }
-    else if (stricmp((char*)_pvData, "4x") == 0)
+    else if (os_stricmp((char*)_pvData, "4x") == 0)
     {
         quality = 2;
     }
-    else if (stricmp((char*)_pvData, "8x") == 0)
+    else if (os_stricmp((char*)_pvData, "8x") == 0)
     {
         quality = 3;
     }
-    else if (stricmp((char*)_pvData, "16x") == 0)
+    else if (os_stricmp((char*)_pvData, "16x") == 0)
     {
         quality = 4;
     }
index 17f2dc1..9587c7e 100644 (file)
@@ -42,11 +42,11 @@ int set_arc_drawing_method_property(void* _pvCtx, int iObjUID, void* _pvData, in
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "nurbs") == 0)
+    if (os_stricmp((char*)_pvData, "nurbs") == 0)
     {
         arcDrawingMethod = 0;
     }
-    else if (stricmp((char*)_pvData, "lines") == 0)
+    else if (os_stricmp((char*)_pvData, "lines") == 0)
     {
         arcDrawingMethod = 1;
     }
index 8707d9e..721fa3a 100644 (file)
@@ -316,11 +316,11 @@ int createCommonBevelBorder(void* _pvCtx, int* _piAddrList, int _iObjUID, int _i
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp(pstType, "raised") == 0)
+    if (os_stricmp(pstType, "raised") == 0)
     {
         iType = 0;
     }
-    else if (stricmp(pstType, "lowered") == 0)
+    else if (os_stricmp(pstType, "lowered") == 0)
     {
         iType = 1;
     }
@@ -466,11 +466,11 @@ int createEtchedBorder(void* _pvCtx, int* _piAddrList, int _iObjUID)
             return SET_PROPERTY_ERROR;
         }
 
-        if (stricmp(pstType, "raised") == 0)
+        if (os_stricmp(pstType, "raised") == 0)
         {
             iType = 0;
         }
-        else if (stricmp(pstType, "lowered") == 0)
+        else if (os_stricmp(pstType, "lowered") == 0)
         {
             iType = 1;
         }
@@ -631,23 +631,23 @@ int createTitledBorder(void* _pvCtx, int* _piAddrList, int _iObjUID)
             return SET_PROPERTY_ERROR;
         }
 
-        if (stricmp(pstJustification, "leading") == 0)
+        if (os_stricmp(pstJustification, "leading") == 0)
         {
             iJustification = 0;
         }
-        else if (stricmp(pstJustification, "left") == 0)
+        else if (os_stricmp(pstJustification, "left") == 0)
         {
             iJustification = 1;
         }
-        else if (stricmp(pstJustification, "center") == 0)
+        else if (os_stricmp(pstJustification, "center") == 0)
         {
             iJustification = 2;
         }
-        else if (stricmp(pstJustification, "right") == 0)
+        else if (os_stricmp(pstJustification, "right") == 0)
         {
             iJustification = 3;
         }
-        else if (stricmp(pstJustification, "trailing") == 0)
+        else if (os_stricmp(pstJustification, "trailing") == 0)
         {
             iJustification = 4;
         }
@@ -666,27 +666,27 @@ int createTitledBorder(void* _pvCtx, int* _piAddrList, int _iObjUID)
             return SET_PROPERTY_ERROR;
         }
 
-        if (stricmp(pstPosition, "top") == 0)
+        if (os_stricmp(pstPosition, "top") == 0)
         {
             iPosition = 0;
         }
-        else if (stricmp(pstPosition, "above_top") == 0)
+        else if (os_stricmp(pstPosition, "above_top") == 0)
         {
             iPosition = 1;
         }
-        else if (stricmp(pstPosition, "below_top") == 0)
+        else if (os_stricmp(pstPosition, "below_top") == 0)
         {
             iPosition = 2;
         }
-        else if (stricmp(pstPosition, "bottom") == 0)
+        else if (os_stricmp(pstPosition, "bottom") == 0)
         {
             iPosition = 3;
         }
-        else if (stricmp(pstPosition, "above_bottom") == 0)
+        else if (os_stricmp(pstPosition, "above_bottom") == 0)
         {
             iPosition = 4;
         }
-        else if (stricmp(pstPosition, "below_bottom") == 0)
+        else if (os_stricmp(pstPosition, "below_bottom") == 0)
         {
             iPosition = 5;
         }
index 7d07381..bc3bdf3 100644 (file)
@@ -60,23 +60,23 @@ int set_box_property(void* _pvCtx, int iObjUID, void* _pvData, int valueType, in
     {
         int boxType;
 
-        if (stricmp((char*)_pvData, "off") == 0)
+        if (os_stricmp((char*)_pvData, "off") == 0)
         {
             boxType = 0;
         }
-        else if (stricmp((char*)_pvData, "on") == 0)
+        else if (os_stricmp((char*)_pvData, "on") == 0)
         {
             boxType = 1;
         }
-        else if (stricmp((char*)_pvData, "hidden_axes") == 0)
+        else if (os_stricmp((char*)_pvData, "hidden_axes") == 0)
         {
             boxType = 2;
         }
-        else if (stricmp((char*)_pvData, "back_half") == 0)
+        else if (os_stricmp((char*)_pvData, "back_half") == 0)
         {
             boxType = 3;
         }
-        else if (stricmp((char*)_pvData, "hidden_axis") == 0)
+        else if (os_stricmp((char*)_pvData, "hidden_axis") == 0)
         {
             Sciwarning(_("WARNING !!!\nIn '%s' property: '%s' is deprecated use '%s' instead.\n"), "box", "hidden_axis", "hidden_axes");
             boxType = 2;
@@ -104,11 +104,11 @@ int set_box_property(void* _pvCtx, int iObjUID, void* _pvData, int valueType, in
     {
         int box;
 
-        if (stricmp((char*)_pvData, "on") == 0)
+        if (os_stricmp((char*)_pvData, "on") == 0)
         {
             box = 1;
         }
-        else if (stricmp((char*)_pvData, "off") == 0)
+        else if (os_stricmp((char*)_pvData, "off") == 0)
         {
             box = 0;
         }
index ac427df..146e0e0 100644 (file)
@@ -45,11 +45,11 @@ int set_cdata_mapping_property(void* _pvCtx, int iObjUID, void* _pvData, int val
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "scaled") == 0)
+    if (os_stricmp((char*)_pvData, "scaled") == 0)
     {
         cdataMapping = 0;
     }
-    else if (stricmp((char*)_pvData, "direct") == 0)
+    else if (os_stricmp((char*)_pvData, "direct") == 0)
     {
         cdataMapping = 1;
     }
index d065511..70b90af 100644 (file)
@@ -44,15 +44,15 @@ int set_clip_state_property(void* _pvCtx, int iObjUID, void* _pvData, int valueT
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "clipgrf") == 0)
+    if (os_stricmp((char*)_pvData, "clipgrf") == 0)
     {
         clipState = 1;
     }
-    else if (stricmp((char*)_pvData, "off") == 0)
+    else if (os_stricmp((char*)_pvData, "off") == 0)
     {
         clipState = 0;
     }
-    else if (stricmp((char*)_pvData, "on") == 0)
+    else if (os_stricmp((char*)_pvData, "on") == 0)
     {
         clipState = 2;
     }
index 8d64f66..49d52e9 100644 (file)
@@ -105,23 +105,23 @@ int set_constraints_property(void* _pvCtx, int iObjUID, void* _pvData, int value
             }
 
             //convert string value to enum
-            if (stricmp(pstPos, "center") == 0)
+            if (os_stricmp(pstPos, "center") == 0)
             {
                 iPos = BORDER_CENTER;
             }
-            else if (stricmp(pstPos, "bottom") == 0)
+            else if (os_stricmp(pstPos, "bottom") == 0)
             {
                 iPos = BORDER_BOTTOM;
             }
-            else if (stricmp(pstPos, "top") == 0)
+            else if (os_stricmp(pstPos, "top") == 0)
             {
                 iPos = BORDER_TOP;
             }
-            else if (stricmp(pstPos, "left") == 0)
+            else if (os_stricmp(pstPos, "left") == 0)
             {
                 iPos = BORDER_LEFT;
             }
-            else if (stricmp(pstPos, "right") == 0)
+            else if (os_stricmp(pstPos, "right") == 0)
             {
                 iPos = BORDER_RIGHT;
             }
@@ -232,19 +232,19 @@ int set_constraints_property(void* _pvCtx, int iObjUID, void* _pvData, int value
             }
 
             //convert string value to enum
-            if (stricmp(pstFill, "none") == 0)
+            if (os_stricmp(pstFill, "none") == 0)
             {
                 iFill = FILL_NONE;
             }
-            else if (stricmp(pstFill, "horizontal") == 0)
+            else if (os_stricmp(pstFill, "horizontal") == 0)
             {
                 iFill = FILL_HORIZONTAL;
             }
-            else if (stricmp(pstFill, "vertical") == 0)
+            else if (os_stricmp(pstFill, "vertical") == 0)
             {
                 iFill = FILL_VERTICAL;
             }
-            else if (stricmp(pstFill, "both") == 0)
+            else if (os_stricmp(pstFill, "both") == 0)
             {
                 iFill = FILL_BOTH;
             }
@@ -269,39 +269,39 @@ int set_constraints_property(void* _pvCtx, int iObjUID, void* _pvData, int value
             }
 
             //convert string value to enum
-            if (stricmp(pstAnchor, "center") == 0)
+            if (os_stricmp(pstAnchor, "center") == 0)
             {
                 iAnchor = ANCHOR_CENTER;
             }
-            else if (stricmp(pstAnchor, "upper") == 0)
+            else if (os_stricmp(pstAnchor, "upper") == 0)
             {
                 iAnchor = ANCHOR_UPPER;
             }
-            else if (stricmp(pstAnchor, "lower") == 0)
+            else if (os_stricmp(pstAnchor, "lower") == 0)
             {
                 iAnchor = ANCHOR_LOWER;
             }
-            else if (stricmp(pstAnchor, "right") == 0)
+            else if (os_stricmp(pstAnchor, "right") == 0)
             {
                 iAnchor = ANCHOR_RIGHT;
             }
-            else if (stricmp(pstAnchor, "left") == 0)
+            else if (os_stricmp(pstAnchor, "left") == 0)
             {
                 iAnchor = ANCHOR_LEFT;
             }
-            else if (stricmp(pstAnchor, "upper_right") == 0)
+            else if (os_stricmp(pstAnchor, "upper_right") == 0)
             {
                 iAnchor = ANCHOR_UPPER_RIGHT;
             }
-            else if (stricmp(pstAnchor, "upper_left") == 0)
+            else if (os_stricmp(pstAnchor, "upper_left") == 0)
             {
                 iAnchor = ANCHOR_UPPER_LEFT;
             }
-            else if (stricmp(pstAnchor, "lower_right") == 0)
+            else if (os_stricmp(pstAnchor, "lower_right") == 0)
             {
                 iAnchor = ANCHOR_LOWER_RIGHT;
             }
-            else if (stricmp(pstAnchor, "lower_left") == 0)
+            else if (os_stricmp(pstAnchor, "lower_left") == 0)
             {
                 iAnchor = ANCHOR_LOWER_LEFT;
             }
index 334cf25..678bda8 100644 (file)
@@ -47,11 +47,11 @@ int set_data_mapping_property(void* _pvCtx, int iObjUID, void* _pvData, int valu
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "scaled") == 0)
+    if (os_stricmp((char*)_pvData, "scaled") == 0)
     {
         dataMapping = 0;
     }
-    else if (stricmp((char*)_pvData, "direct") == 0)
+    else if (os_stricmp((char*)_pvData, "direct") == 0)
     {
         dataMapping = 1;
     }
index bb1be18..da00b1e 100644 (file)
@@ -37,12 +37,12 @@ int set_figure_style_property(void* _pvCtx, int iObjUID, void* _pvData, int valu
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "old") == 0)
+    if (os_stricmp((char*)_pvData, "old") == 0)
     {
         Scierror(999, _("Old graphic mode is no longer available. Please refer to the set help page.\n"));
         return SET_PROPERTY_ERROR;
     }
-    else if (stricmp((char*)_pvData, "new") == 0)
+    else if (os_stricmp((char*)_pvData, "new") == 0)
     {
         /* graphic mode must be new */
         /* nothing to do */
index 9f7b52f..e9632f7 100644 (file)
@@ -41,11 +41,11 @@ int set_grid_position_property(void* _pvCtx, int iObjUID, void* _pvData, int val
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "foreground") == 0)
+    if (os_stricmp((char*)_pvData, "foreground") == 0)
     {
         position = 1;
     }
-    else if (stricmp((char*)_pvData, "background") == 0)
+    else if (os_stricmp((char*)_pvData, "background") == 0)
     {
         position = 0;
     }
index 80defad..dc2f231 100644 (file)
@@ -51,55 +51,55 @@ int set_image_type_property(void* _pvCtx, int iObjUID, void* _pvData, int valueT
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "rgb") == 0)
+    if (os_stricmp((char*)_pvData, "rgb") == 0)
     {
         imagetype = (int)MATPLOT_RGB;
     }
-    else if (stricmp((char*)_pvData, "rgba") == 0)
+    else if (os_stricmp((char*)_pvData, "rgba") == 0)
     {
         imagetype = (int)MATPLOT_RGBA;
     }
-    else if (stricmp((char*)_pvData, "argb") == 0)
+    else if (os_stricmp((char*)_pvData, "argb") == 0)
     {
         imagetype = (int)MATPLOT_ARGB;
     }
-    else if (stricmp((char*)_pvData, "gray") == 0)
+    else if (os_stricmp((char*)_pvData, "gray") == 0)
     {
         imagetype = (int)MATPLOT_GRAY;
     }
-    else if (stricmp((char*)_pvData, "index") == 0)
+    else if (os_stricmp((char*)_pvData, "index") == 0)
     {
         imagetype = (int)MATPLOT_INDEX;
     }
-    else if (stricmp((char*)_pvData, "red") == 0)
+    else if (os_stricmp((char*)_pvData, "red") == 0)
     {
         imagetype = (int)MATPLOT_RED;
     }
-    else if (stricmp((char*)_pvData, "green") == 0)
+    else if (os_stricmp((char*)_pvData, "green") == 0)
     {
         imagetype = (int)MATPLOT_GREEN;
     }
-    else if (stricmp((char*)_pvData, "blue") == 0)
+    else if (os_stricmp((char*)_pvData, "blue") == 0)
     {
         imagetype = (int)MATPLOT_BLUE;
     }
-    else if (stricmp((char*)_pvData, "rgb332") == 0)
+    else if (os_stricmp((char*)_pvData, "rgb332") == 0)
     {
         imagetype = (int)MATPLOT_RGB_332;
     }
-    else if (stricmp((char*)_pvData, "rgb444") == 0)
+    else if (os_stricmp((char*)_pvData, "rgb444") == 0)
     {
         imagetype = (int)MATPLOT_RGB_444;
     }
-    else if (stricmp((char*)_pvData, "rgba4444") == 0)
+    else if (os_stricmp((char*)_pvData, "rgba4444") == 0)
     {
         imagetype = (int)MATPLOT_RGBA_4444;
     }
-    else if (stricmp((char*)_pvData, "rgb555") == 0)
+    else if (os_stricmp((char*)_pvData, "rgb555") == 0)
     {
         imagetype = (int)MATPLOT_RGB_555;
     }
-    else if (stricmp((char*)_pvData, "rgba5551") == 0)
+    else if (os_stricmp((char*)_pvData, "rgba5551") == 0)
     {
         imagetype = (int)MATPLOT_RGBA_5551;
     }
index b7b3246..e5808e5 100644 (file)
@@ -54,19 +54,19 @@ int set_layout_property(void* _pvCtx, int iObjUID, void* _pvData, int valueType,
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "none") == 0)
+    if (os_stricmp((char*)_pvData, "none") == 0)
     {
         layout = LAYOUT_NONE;
     }
-    else if (stricmp((char*)_pvData, "gridbag") == 0)
+    else if (os_stricmp((char*)_pvData, "gridbag") == 0)
     {
         layout = LAYOUT_GRIDBAG;
     }
-    else if (stricmp((char*)_pvData, "grid") == 0)
+    else if (os_stricmp((char*)_pvData, "grid") == 0)
     {
         layout = LAYOUT_GRID;
     }
-    else if (stricmp((char*)_pvData, "border") == 0)
+    else if (os_stricmp((char*)_pvData, "border") == 0)
     {
         layout = LAYOUT_BORDER;
     }
index d075e50..7034d6f 100644 (file)
@@ -36,11 +36,11 @@ int set_light_type_property(void* _pvCtx, int iObjUID, void* _pvData, int valueT
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "directional") == 0)
+    if (os_stricmp((char*)_pvData, "directional") == 0)
     {
         val = 0;
     }
-    else if (stricmp((char*)_pvData, "point") == 0)
+    else if (os_stricmp((char*)_pvData, "point") == 0)
     {
         val = 1;
     }
index 3744608..37f7230 100644 (file)
@@ -44,11 +44,11 @@ int set_mark_size_unit_property(void* _pvCtx, int iObjUID, void* _pvData, int va
     }
 
     /* 0 : point, 1 : tabulated */
-    if (stricmp((char*)_pvData, "point") == 0)
+    if (os_stricmp((char*)_pvData, "point") == 0)
     {
         markSizeUnit = 0;
     }
-    else if (stricmp((char*)_pvData, "tabulated") == 0)
+    else if (os_stricmp((char*)_pvData, "tabulated") == 0)
     {
         markSizeUnit = 1;
     }
index 4a290b4..b057e1c 100644 (file)
@@ -34,11 +34,11 @@ int set_menubar_property(void* _pvCtx, int iObjUID, void* _pvData, int valueType
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "none") == 0)
+    if (os_stricmp((char*)_pvData, "none") == 0)
     {
         menu = NONE;
     }
-    else if (stricmp((char*)_pvData, "figure") == 0)
+    else if (os_stricmp((char*)_pvData, "figure") == 0)
     {
         menu = FIGURE;
     }
index 6e68108..44f1ccb 100644 (file)
@@ -42,11 +42,11 @@ int set_rotation_style_property(void* _pvCtx, int iObjUID, void* _pvData, int va
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "unary") == 0)
+    if (os_stricmp((char*)_pvData, "unary") == 0)
     {
         rotationStyle = 0;
     }
-    else if (stricmp((char*)_pvData, "multiple") == 0)
+    else if (os_stricmp((char*)_pvData, "multiple") == 0)
     {
         rotationStyle = 1;
     }
index df4124f..5c77dd8 100644 (file)
@@ -59,19 +59,19 @@ int set_title_position_property(void* _pvCtx, int iObjUID, void* _pvData, int va
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "top") == 0)
+    if (os_stricmp((char*)_pvData, "top") == 0)
     {
         pos = TITLE_TOP;
     }
-    else if (stricmp((char*)_pvData, "left") == 0)
+    else if (os_stricmp((char*)_pvData, "left") == 0)
     {
         pos = TITLE_LEFT;
     }
-    else if (stricmp((char*)_pvData, "bottom") == 0)
+    else if (os_stricmp((char*)_pvData, "bottom") == 0)
     {
         pos = TITLE_BOTTOM;
     }
-    else if (stricmp((char*)_pvData, "right") == 0)
+    else if (os_stricmp((char*)_pvData, "right") == 0)
     {
         pos = TITLE_RIGHT;
     }
index eded3be..6ef43b8 100644 (file)
@@ -47,17 +47,17 @@ int set_text_box_mode_property(void* _pvCtx, int iObjUID, void* _pvData, int val
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "off") == 0)
+    if (os_stricmp((char*)_pvData, "off") == 0)
     {
         autoSize = 1;
         textBoxMode = 0;
     }
-    else if (stricmp((char*)_pvData, "centered") == 0)
+    else if (os_stricmp((char*)_pvData, "centered") == 0)
     {
         autoSize = 1;
         textBoxMode = 1;
     }
-    else if (stricmp((char*)_pvData, "filled") == 0)
+    else if (os_stricmp((char*)_pvData, "filled") == 0)
     {
         autoSize = 0;
         textBoxMode = 2;
index 2cfdc2d..56e1126 100644 (file)
@@ -56,11 +56,11 @@ int set_tics_direction_property(void* _pvCtx, int iObjUID, void* _pvData, int va
 
     if (yNumberTicks == 1)
     {
-        if (stricmp((char*)_pvData, "top") == 0)
+        if (os_stricmp((char*)_pvData, "top") == 0)
         {
             ticksDirection = 0;
         }
-        else if (stricmp((char*)_pvData, "bottom") == 0)
+        else if (os_stricmp((char*)_pvData, "bottom") == 0)
         {
             ticksDirection = 1;
         }
@@ -72,11 +72,11 @@ int set_tics_direction_property(void* _pvCtx, int iObjUID, void* _pvData, int va
     }
     else
     {
-        if (stricmp((char*)_pvData, "left") == 0)
+        if (os_stricmp((char*)_pvData, "left") == 0)
         {
             ticksDirection = 2;
         }
-        else if (stricmp((char*)_pvData, "right") == 0)
+        else if (os_stricmp((char*)_pvData, "right") == 0)
         {
             ticksDirection = 3;
         }
index 094dada..707823f 100644 (file)
@@ -47,9 +47,9 @@ int set_tics_style_property(void* _pvCtx, int iObjUID, void* _pvData, int valueT
         return SET_PROPERTY_ERROR;
     }
 
-    if (   stricmp((char*)_pvData, "v") != 0 &&
-            stricmp((char*)_pvData, "r") != 0 &&
-            stricmp((char*)_pvData, "i") != 0)
+    if (   os_stricmp((char*)_pvData, "v") != 0 &&
+            os_stricmp((char*)_pvData, "r") != 0 &&
+            os_stricmp((char*)_pvData, "i") != 0)
     {
         Scierror(999, _("Wrong value for '%s' property: Must be in the set {%s}.\n"), "tics_style", "v, r, i");
         return SET_PROPERTY_ERROR;
index 1d262a1..64e4186 100644 (file)
@@ -34,11 +34,11 @@ int set_toolbar_property(void* _pvCtx, int iObjUID, void* _pvData, int valueType
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "none") == 0)
+    if (os_stricmp((char*)_pvData, "none") == 0)
     {
         tool = NONE;
     }
-    else if (stricmp((char*)_pvData, "figure") == 0)
+    else if (os_stricmp((char*)_pvData, "figure") == 0)
     {
         tool = FIGURE;
     }
index b10de1a..fdd9a17 100644 (file)
@@ -43,11 +43,11 @@ int set_view_property(void* _pvCtx, int iObjUID, void* _pvData, int valueType, i
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "2d") == 0)
+    if (os_stricmp((char*)_pvData, "2d") == 0)
     {
         viewType = 0;
     }
-    else if (stricmp((char*)_pvData, "3d") == 0)
+    else if (os_stricmp((char*)_pvData, "3d") == 0)
     {
         viewType = 1;
     }
index b504f98..401f391 100644 (file)
@@ -43,19 +43,19 @@ int set_x_location_property(void* _pvCtx, int iObjUID, void* _pvData, int valueT
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "bottom") == 0)
+    if (os_stricmp((char*)_pvData, "bottom") == 0)
     {
         axisLocation = 0;
     }
-    else if (stricmp((char*)_pvData, "top") == 0)
+    else if (os_stricmp((char*)_pvData, "top") == 0)
     {
         axisLocation = 1;
     }
-    else if (stricmp((char*)_pvData, "middle") == 0)
+    else if (os_stricmp((char*)_pvData, "middle") == 0)
     {
         axisLocation = 2;
     }
-    else if (stricmp((char*)_pvData, "origin") == 0)
+    else if (os_stricmp((char*)_pvData, "origin") == 0)
     {
         axisLocation = 3;
     }
index 746fe45..074daee 100644 (file)
@@ -43,19 +43,19 @@ int set_y_location_property(void* _pvCtx, int iObjUID, void* _pvData, int valueT
         return SET_PROPERTY_ERROR;
     }
 
-    if (stricmp((char*)_pvData, "left") == 0)
+    if (os_stricmp((char*)_pvData, "left") == 0)
     {
         axisLocation = 4;
     }
-    else if (stricmp((char*)_pvData, "right") == 0)
+    else if (os_stricmp((char*)_pvData, "right") == 0)
     {
         axisLocation = 5;
     }
-    else if (stricmp((char*)_pvData, "middle") == 0)
+    else if (os_stricmp((char*)_pvData, "middle") == 0)
     {
         axisLocation = 2;
     }
-    else if (stricmp((char*)_pvData, "origin") == 0)
+    else if (os_stricmp((char*)_pvData, "origin") == 0)
     {
         axisLocation = 3;
     }
index a160dc6..a76bb5f 100644 (file)
@@ -1619,7 +1619,7 @@ void name2rgb(char* color, double* _pdblRGB)
     int colorSize2 = sizeof(colorRGB) / (sizeof(int) * 3);
     for (i = 0 ; i < colorSize ; i++)
     {
-        if (stricmp(colorName[i], color) == 0)
+        if (os_stricmp(colorName[i], color) == 0)
         {
             _pdblRGB[0] = (double)colorRGB[i][0];
             _pdblRGB[1] = (double)colorRGB[i][1];
index f6ee833..e56e994 100644 (file)
@@ -186,18 +186,18 @@ int sci_figure(char * fname, void* pvApiCtx)
                 return 1;
             }
 
-            if (stricmp(pstProName, "dockable") != 0 &&
-                    stricmp(pstProName, "toolbar") != 0 &&
-                    stricmp(pstProName, "menubar") != 0 &&
-                    stricmp(pstProName, "default_axes") != 0 &&
-                    stricmp(pstProName, "visible") != 0 &&
-                    stricmp(pstProName, "figure_size") != 0 &&
-                    stricmp(pstProName, "axes_size") != 0 &&
-                    stricmp(pstProName, "position") != 0 &&
-                    stricmp(pstProName, "menubar_visible") != 0 &&
-                    stricmp(pstProName, "toolbar_visible") != 0 &&
-                    stricmp(pstProName, "resize") != 0 &&
-                    stricmp(pstProName, "infobar_visible") != 0)
+            if (os_stricmp(pstProName, "dockable") != 0 &&
+                    os_stricmp(pstProName, "toolbar") != 0 &&
+                    os_stricmp(pstProName, "menubar") != 0 &&
+                    os_stricmp(pstProName, "default_axes") != 0 &&
+                    os_stricmp(pstProName, "visible") != 0 &&
+                    os_stricmp(pstProName, "figure_size") != 0 &&
+                    os_stricmp(pstProName, "axes_size") != 0 &&
+                    os_stricmp(pstProName, "position") != 0 &&
+                    os_stricmp(pstProName, "menubar_visible") != 0 &&
+                    os_stricmp(pstProName, "toolbar_visible") != 0 &&
+                    os_stricmp(pstProName, "resize") != 0 &&
+                    os_stricmp(pstProName, "infobar_visible") != 0)
             {
                 freeAllocatedSingleString(pstProName);
                 continue;
@@ -212,7 +212,7 @@ int sci_figure(char * fname, void* pvApiCtx)
             }
 
             //check property value to compatibility
-            if (stricmp(pstProName, "dockable") == 0)
+            if (os_stricmp(pstProName, "dockable") == 0)
             {
                 bDockable = getStackArgumentAsBoolean(pvApiCtx, piAddrData);
                 if (bDockable == -1)
@@ -222,7 +222,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "toolbar") == 0)
+            else if (os_stricmp(pstProName, "toolbar") == 0)
             {
                 char* pstVal = NULL;
                 if (isStringType(pvApiCtx, piAddrData) == FALSE || isScalar(pvApiCtx, piAddrData) == FALSE)
@@ -233,11 +233,11 @@ int sci_figure(char * fname, void* pvApiCtx)
 
                 getAllocatedSingleString(pvApiCtx, piAddrData, &pstVal);
 
-                if (stricmp(pstVal, "none") == 0)
+                if (os_stricmp(pstVal, "none") == 0)
                 {
                     iToolbarType = 0;
                 }
-                else if (stricmp(pstVal, "figure") == 0)
+                else if (os_stricmp(pstVal, "figure") == 0)
                 {
                     iToolbarType = 1;
                 }
@@ -251,7 +251,7 @@ int sci_figure(char * fname, void* pvApiCtx)
 
                 freeAllocatedSingleString(pstVal);
             }
-            else if (stricmp(pstProName, "menubar") == 0)
+            else if (os_stricmp(pstProName, "menubar") == 0)
             {
                 char* pstVal = NULL;
                 if (isStringType(pvApiCtx, piAddrData) == FALSE || isScalar(pvApiCtx, piAddrData) == FALSE)
@@ -263,11 +263,11 @@ int sci_figure(char * fname, void* pvApiCtx)
 
                 getAllocatedSingleString(pvApiCtx, piAddrData, &pstVal);
 
-                if (stricmp(pstVal, "none") == 0)
+                if (os_stricmp(pstVal, "none") == 0)
                 {
                     iMenubarType = 0;
                 }
-                else if (stricmp(pstVal, "figure") == 0)
+                else if (os_stricmp(pstVal, "figure") == 0)
                 {
                     iMenubarType = 1;
                 }
@@ -281,7 +281,7 @@ int sci_figure(char * fname, void* pvApiCtx)
 
                 freeAllocatedSingleString(pstVal);
             }
-            else if (stricmp(pstProName, "default_axes") == 0)
+            else if (os_stricmp(pstProName, "default_axes") == 0)
             {
                 bDefaultAxes = getStackArgumentAsBoolean(pvApiCtx, piAddrData);
                 if (bDefaultAxes == -1)
@@ -291,7 +291,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "visible") == 0)
+            else if (os_stricmp(pstProName, "visible") == 0)
             {
                 bVisible = getStackArgumentAsBoolean(pvApiCtx, piAddrData);
                 if (bVisible == -1)
@@ -301,7 +301,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "figure_size") == 0)
+            else if (os_stricmp(pstProName, "figure_size") == 0)
             {
                 int iRows = 0;
                 int iCols = 0;
@@ -318,7 +318,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "axes_size") == 0)
+            else if (os_stricmp(pstProName, "axes_size") == 0)
             {
                 int iRows = 0;
                 int iCols = 0;
@@ -335,7 +335,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "position") == 0)
+            else if (os_stricmp(pstProName, "position") == 0)
             {
                 int iRows = 0;
                 int iCols = 0;
@@ -376,7 +376,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "resize") == 0)
+            else if (os_stricmp(pstProName, "resize") == 0)
             {
                 bResize = getStackArgumentAsBoolean(pvApiCtx, piAddrData);
                 if (bResize == -1)
@@ -386,7 +386,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "menubar_visible") == 0)
+            else if (os_stricmp(pstProName, "menubar_visible") == 0)
             {
                 bMenuBar = getStackArgumentAsBoolean(pvApiCtx, piAddrData);
                 if (bMenuBar == -1)
@@ -396,7 +396,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "toolbar_visible") == 0)
+            else if (os_stricmp(pstProName, "toolbar_visible") == 0)
             {
                 bToolBar = getStackArgumentAsBoolean(pvApiCtx, piAddrData);
                 if (bToolBar == -1)
@@ -406,7 +406,7 @@ int sci_figure(char * fname, void* pvApiCtx)
                     return 1;
                 }
             }
-            else if (stricmp(pstProName, "infobar_visible") == 0)
+            else if (os_stricmp(pstProName, "infobar_visible") == 0)
             {
                 bInfoBar = getStackArgumentAsBoolean(pvApiCtx, piAddrData);
                 if (bInfoBar == -1)
@@ -451,18 +451,18 @@ int sci_figure(char * fname, void* pvApiCtx)
         }
 
         if (bDoCreation && (
-                    stricmp(pstProName, "dockable") == 0 ||
-                    stricmp(pstProName, "toolbar") == 0 ||
-                    stricmp(pstProName, "menubar") == 0 ||
-                    stricmp(pstProName, "default_axes") == 0 ||
-                    stricmp(pstProName, "visible") == 0 ||
-                    stricmp(pstProName, "figure_size") == 0 ||
-                    stricmp(pstProName, "axes_size") == 0 ||
-                    stricmp(pstProName, "position") == 0 ||
-                    stricmp(pstProName, "resize") == 0 ||
-                    stricmp(pstProName, "menubar_visible") == 0 ||
-                    stricmp(pstProName, "toolbar_visible") == 0 ||
-                    stricmp(pstProName, "infobar_visible") == 0))
+                    os_stricmp(pstProName, "dockable") == 0 ||
+                    os_stricmp(pstProName, "toolbar") == 0 ||
+                    os_stricmp(pstProName, "menubar") == 0 ||
+                    os_stricmp(pstProName, "default_axes") == 0 ||
+                    os_stricmp(pstProName, "visible") == 0 ||
+                    os_stricmp(pstProName, "figure_size") == 0 ||
+                    os_stricmp(pstProName, "axes_size") == 0 ||
+                    os_stricmp(pstProName, "position") == 0 ||
+                    os_stricmp(pstProName, "resize") == 0 ||
+                    os_stricmp(pstProName, "menubar_visible") == 0 ||
+                    os_stricmp(pstProName, "toolbar_visible") == 0 ||
+                    os_stricmp(pstProName, "infobar_visible") == 0))
         {
             // Already set creating new figure
             // but let the set_ function fail if figure already exists
@@ -481,7 +481,7 @@ int sci_figure(char * fname, void* pvApiCtx)
 
         getVarType(pvApiCtx, piAddrData, &iType);
 
-        if ((strcmp(pstProName, "user_data") == 0) || (stricmp(pstProName, "userdata") == 0))
+        if ((strcmp(pstProName, "user_data") == 0) || (os_stricmp(pstProName, "userdata") == 0))
         {
             /* in this case set_user_data_property
              * directly uses the  third position in the stack
@@ -508,8 +508,8 @@ int sci_figure(char * fname, void* pvApiCtx)
                 case sci_strings :
                     if (   strcmp(pstProName, "tics_labels") != 0 && strcmp(pstProName, "auto_ticks") != 0 &&
                             strcmp(pstProName, "axes_visible") != 0 && strcmp(pstProName, "axes_reverse") != 0 &&
-                            strcmp(pstProName, "text") != 0 && stricmp(pstProName, "string") != 0 &&
-                            stricmp(pstProName, "tooltipstring") != 0) /* Added for uicontrols */
+                            strcmp(pstProName, "text") != 0 && os_stricmp(pstProName, "string") != 0 &&
+                            os_stricmp(pstProName, "tooltipstring") != 0) /* Added for uicontrols */
                     {
                         if (getAllocatedSingleString(pvApiCtx, piAddrData, (char**)&_pvData))
                         {
@@ -543,7 +543,7 @@ int sci_figure(char * fname, void* pvApiCtx)
         // * add it to colormap => performed by callSetProperty
         // * set background to index => performed by callSetProperty
         // * copy value into axes background property
-        if (stricmp(pstProName, "backgroundcolor") == 0 && iAxes > 0)
+        if (os_stricmp(pstProName, "backgroundcolor") == 0 && iAxes > 0)
         {
             int iBackground = 0;
             int *piBackground = &iBackground;
@@ -633,7 +633,7 @@ int getStackArgumentAsBoolean(void* _pvCtx, int* _piAddr)
             char* pst = NULL;
             getAllocatedSingleString(_pvCtx, _piAddr, &pst);
 
-            if (stricmp(pst, "on") == 0)
+            if (os_stricmp(pst, "on") == 0)
             {
                 ret = TRUE;
             }
index c03ac3a..ee8502f 100644 (file)
@@ -263,7 +263,7 @@ int sci_messagebox(char *fname, void* pvApiCtx)
     /* Modal ? */
     if (modalOptionAdr != NULL)
     {
-        setMessageBoxModal(messageBoxID, !stricmp(modalOptionAdr[0], "modal"));
+        setMessageBoxModal(messageBoxID, !os_stricmp(modalOptionAdr[0], "modal"));
         freeAllocatedMatrixOfString(nbRow, nbCol, modalOptionAdr);
     }
     else
index 97446d0..aa0c433 100644 (file)
@@ -427,7 +427,7 @@ int sci_uicontrol(char *fname, void* pvApiCtx)
                 {
                     if (strlen(propertyName) <= strlen(propertiesNames[k]))
                     {
-                        if (strnicmp(propertyName, propertiesNames[k], strlen(propertyName)) == 0)
+                        if (os_strnicmp(propertyName, propertiesNames[k], strlen(propertyName)) == 0)
                         {
                             propertiesValuesIndices[k] = inputIndex + 1;    /* Position of value for property */
                             found = 1;
index 95e21d6..446d178 100644 (file)
@@ -164,12 +164,12 @@ int sci_uimenu(char *fname, void *pvApiCtx)
                 return 1;
             }
 
-            if (stricmp(propertyName, "parent") == 0)
+            if (os_stricmp(propertyName, "parent") == 0)
             {
                 parentDefined = TRUE;
             }
 
-            isUserDataProperty = (stricmp(propertyName, "user_data") == 0) || (stricmp(propertyName, "userdata") == 0);
+            isUserDataProperty = (os_stricmp(propertyName, "user_data") == 0) || (os_stricmp(propertyName, "userdata") == 0);
         }
 
         sciErr = getVarAddressFromPosition(pvApiCtx, iPropertyValuePositionIndex, &piAddrValue);
index a24e159..a44a6aa 100644 (file)
@@ -86,7 +86,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return iRet;
                         }
 
-                        compVar = stricmp(pstData, "upper left");
+                        compVar = os_stricmp(pstData, "upper left");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 0);
@@ -96,7 +96,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return 0;
                         }
 
-                        compVar = stricmp(pstData, "upper right");
+                        compVar = os_stricmp(pstData, "upper right");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 1);
@@ -106,7 +106,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return 0;
                         }
 
-                        compVar = stricmp(pstData, "lower left");
+                        compVar = os_stricmp(pstData, "lower left");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 2);
@@ -116,7 +116,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return 0;
                         }
 
-                        compVar = stricmp(pstData, "lower right");
+                        compVar = os_stricmp(pstData, "lower right");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 3);
@@ -126,7 +126,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return 0;
                         }
 
-                        compVar = stricmp(pstData, "left");
+                        compVar = os_stricmp(pstData, "left");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 4);
@@ -136,7 +136,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return 0;
                         }
 
-                        compVar = stricmp(pstData, "right");
+                        compVar = os_stricmp(pstData, "right");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 5);
@@ -146,7 +146,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return 0;
                         }
 
-                        compVar = stricmp(pstData, "upper");
+                        compVar = os_stricmp(pstData, "upper");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 6);
@@ -156,7 +156,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return 0;
                         }
 
-                        compVar = stricmp(pstData, "lower");
+                        compVar = os_stricmp(pstData, "lower");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 7);
@@ -166,7 +166,7 @@ int sci_datatip_set_orient(char *fname, void* pvApiCtx)
                             return 0;
                         }
 
-                        compVar = stricmp(pstData, "automatic");
+                        compVar = os_stricmp(pstData, "automatic");
                         if (compVar == 0)
                         {
                             DatatipOrientation::datatipSetOrientation(getScilabJavaVM(), iDatatipUID, (char*)pstData, 8);
index 3b9f83a..8354bfb 100644 (file)
 
 int isModalOption(char *option)
 {
-    return (!stricmp(option, "modal") || !stricmp(option, "non-modal"));
+    return (!os_stricmp(option, "modal") || !os_stricmp(option, "non-modal"));
 }
 
 /*--------------------------------------------------------------------------*/
 
 int isIconName(char *name)
 {
-    return (stricmp(name, "scilab")
-            || stricmp(name, "error")
-            || stricmp(name, "hourglass")
-            || stricmp(name, "info")
-            || stricmp(name, "passwd")
-            || stricmp(name, "question")
-            || stricmp(name, "warning"));
+    return (os_stricmp(name, "scilab")
+            || os_stricmp(name, "error")
+            || os_stricmp(name, "hourglass")
+            || os_stricmp(name, "info")
+            || os_stricmp(name, "passwd")
+            || os_stricmp(name, "question")
+            || os_stricmp(name, "warning"));
 }
 
 /*--------------------------------------------------------------------------*/
index 2bd930e..2827893 100644 (file)
@@ -22,7 +22,7 @@ void* GetScreenProperty(void* _pvCtx, char *propertyName)
 
     void* flag = NULL;
 
-    if (!stricmp(propertyName, "screensize_px"))
+    if (!os_stricmp(propertyName, "screensize_px"))
     {
         value[0] = 1.0;
         value[1] = 1.0;
@@ -36,7 +36,7 @@ void* GetScreenProperty(void* _pvCtx, char *propertyName)
         return flag;
 
     }
-    else if (!stricmp(propertyName, "screensize_mm"))
+    else if (!os_stricmp(propertyName, "screensize_mm"))
     {
         value[0] = 0.0;
         value[1] = 0.0;
@@ -49,7 +49,7 @@ void* GetScreenProperty(void* _pvCtx, char *propertyName)
 
         return flag;
     }
-    else if (!stricmp(propertyName, "screensize_cm"))
+    else if (!os_stricmp(propertyName, "screensize_cm"))
     {
         value[0] = 0.0;
         value[1] = 0.0;
@@ -62,7 +62,7 @@ void* GetScreenProperty(void* _pvCtx, char *propertyName)
 
         return flag;
     }
-    else if (!stricmp(propertyName, "screensize_in"))
+    else if (!os_stricmp(propertyName, "screensize_in"))
     {
         value[0] = 0.0;
         value[1] = 0.0;
@@ -75,7 +75,7 @@ void* GetScreenProperty(void* _pvCtx, char *propertyName)
 
         return flag;
     }
-    else if (!stricmp(propertyName, "screensize_pt"))
+    else if (!os_stricmp(propertyName, "screensize_pt"))
     {
         value[0] = 0.0;
         value[1] = 0.0;
@@ -88,7 +88,7 @@ void* GetScreenProperty(void* _pvCtx, char *propertyName)
 
         return flag;
     }
-    else if (!stricmp(propertyName, "screensize_norm"))
+    else if (!os_stricmp(propertyName, "screensize_norm"))
     {
         value[0] = 0.0;
         value[1] = 0.0;
@@ -101,7 +101,7 @@ void* GetScreenProperty(void* _pvCtx, char *propertyName)
 
         return flag;
     }
-    else if (!stricmp(propertyName, "screendepth"))
+    else if (!os_stricmp(propertyName, "screendepth"))
     {
         value[0] = CallScilabBridge::getScreenDepth(getScilabJavaVM());
 
index 685534b..22fd561 100644 (file)
@@ -38,9 +38,9 @@ int SetUicontrolFontAngle(void* _pvCtx, int iObjUID, void* _pvData, int valueTyp
 
     fontAngle = (char*)_pvData;
 
-    if (stricmp(fontAngle, "normal") != 0
-            && stricmp(fontAngle, "italic") != 0
-            && stricmp(fontAngle, "oblique") != 0)
+    if (os_stricmp(fontAngle, "normal") != 0
+            && os_stricmp(fontAngle, "italic") != 0
+            && os_stricmp(fontAngle, "oblique") != 0)
     {
         /* Wrong string format */
         Scierror(999, const_cast<char*>(_("Wrong value for '%s' property: '%s', '%s' or '%s' expected.\n")), "FontAngle", "normal", "italic", "oblique");
index bac3bd7..262e6a6 100644 (file)
@@ -38,10 +38,10 @@ int SetUicontrolFontWeight(void* _pvCtx, int iObjUID, void* _pvData, int valueTy
 
     fontWeight = (char*)_pvData;
 
-    if (stricmp(fontWeight, "light") != 0
-            && stricmp(fontWeight, "normal") != 0
-            && stricmp(fontWeight, "demi") != 0
-            && stricmp(fontWeight, "bold") != 0)
+    if (os_stricmp(fontWeight, "light") != 0
+            && os_stricmp(fontWeight, "normal") != 0
+            && os_stricmp(fontWeight, "demi") != 0
+            && os_stricmp(fontWeight, "bold") != 0)
     {
         /* Wrong string format */
         Scierror(999, const_cast<char*>(_("Wrong value for '%s' property: '%s', '%s', '%s' or '%s' expected.\n")), "FontWeight", "light", "normal", "demi", "bold");
index c449ddd..b90bd9c 100644 (file)
@@ -38,9 +38,9 @@ int SetUicontrolHorizontalAlignment(void* _pvCtx, int iObjUID, void* _pvData, in
 
     alignment = (char*)_pvData;
 
-    if (stricmp(alignment, "left") != 0
-            && stricmp(alignment, "center") != 0
-            && stricmp(alignment, "right") != 0)
+    if (os_stricmp(alignment, "left") != 0
+            && os_stricmp(alignment, "center") != 0
+            && os_stricmp(alignment, "right") != 0)
     {
         /* Wrong string format */
         Scierror(999, const_cast<char*>(_("Wrong value for '%s' property: '%s', '%s' or '%s' expected.\n")), "HorizontalAlignment", "left", "center", "right");
index 653776d..ae9fc1b 100644 (file)
@@ -40,13 +40,13 @@ int SetUicontrolRelief(void* _pvCtx, int iObjUID, void* _pvData, int valueType,
 
     relief = (char*)_pvData;
 
-    if (stricmp(relief, "flat") != 0
-            && stricmp(relief, "groove") != 0
-            && stricmp(relief, "raised") != 0
-            && stricmp(relief, "ridge") != 0
-            && stricmp(relief, "solid") != 0
-            && stricmp(relief, "sunken") != 0
-            && stricmp(relief, "default") != 0)
+    if (os_stricmp(relief, "flat") != 0
+            && os_stricmp(relief, "groove") != 0
+            && os_stricmp(relief, "raised") != 0
+            && os_stricmp(relief, "ridge") != 0
+            && os_stricmp(relief, "solid") != 0
+            && os_stricmp(relief, "sunken") != 0
+            && os_stricmp(relief, "default") != 0)
     {
         /* Wrong string format */
         Scierror(999, const_cast<char*>(_("Wrong type for '%s' property: '%s', '%s', '%s', '%s', '%s', '%s' or '%s' expected.\n")), "Relief", "flat", "groove", "raised", "ridge", "solid", "sunken", "default");
index 37cc31b..dda60db 100644 (file)
@@ -44,11 +44,11 @@ int SetUicontrolUnits(void* _pvCtx, int iObjUID, void* _pvData, int valueType, i
 
         units = (char*)_pvData;
 
-        if (stricmp(units, "points") != 0
-                && stricmp(units, "normalized") != 0
-                && stricmp(units, "inches") != 0
-                && stricmp(units, "centimeters") != 0
-                && stricmp(units, "pixels") != 0)
+        if (os_stricmp(units, "points") != 0
+                && os_stricmp(units, "normalized") != 0
+                && os_stricmp(units, "inches") != 0
+                && os_stricmp(units, "centimeters") != 0
+                && os_stricmp(units, "pixels") != 0)
         {
             /* Wrong string value */
             Scierror(999, const_cast<char*>(_("Wrong value for '%s' property: '%s', '%s', '%s', '%s' or '%s' expected.\n")), "Units", "points", "normalized", "inches", "centimeters", "pixels");
index 67bd65c..a373390 100644 (file)
@@ -38,7 +38,7 @@ int SetUicontrolVerticalAlignment(void* _pvCtx, int iObjUID, void* _pvData, int
 
     alignment = (char*)_pvData;
 
-    if (stricmp(alignment, "top") != 0
+    if (os_stricmp(alignment, "top") != 0
             && strcmp(alignment, "middle") != 0
             && strcmp(alignment, "bottom") != 0)
     {
index 05ec8f4..8c5d4ba 100644 (file)
@@ -72,6 +72,7 @@ types::Function::ReturnValue sci_genlib(types::typed_list &in, int _iRetCount, t
     std::vector<std::string> success_files;
     std::vector<std::string> funcs;
 
+    int size = PATH_MAX + FILENAME_MAX;
     char pstParseFile[PATH_MAX + FILENAME_MAX];
     char pstVerbose[65535];
 
@@ -177,11 +178,11 @@ types::Function::ReturnValue sci_genlib(types::typed_list &in, int _iRetCount, t
         delete pS;
     }
 
-    os_sprintf(pstParseFile, "%slib", pstParsePath);
+    os_sprintf(pstParseFile, size, "%slib", pstParsePath);
 
     if (bVerbose)
     {
-        os_sprintf(pstVerbose, _("-- Creation of [%s] (Macros) --\n"), pstLibName);
+        os_sprintf(pstVerbose, 65535, _("-- Creation of [%s] (Macros) --\n"), pstLibName);
 
         //save current prompt mode
         int oldVal = ConfigVariable::getPromptMode();
@@ -205,7 +206,7 @@ types::Function::ReturnValue sci_genlib(types::typed_list &in, int _iRetCount, t
 
     if (pWriter == NULL)
     {
-        os_sprintf(pstVerbose, _("%s: Cannot open file ''%s''.\n"), "genlib", pstParseFile);
+        os_sprintf(pstVerbose, 65535, _("%s: Cannot open file ''%s''.\n"), "genlib", pstParseFile);
         scilabWrite(pstVerbose);
 
         out.push_back(new types::Bool(0));
@@ -276,7 +277,7 @@ types::Function::ReturnValue sci_genlib(types::typed_list &in, int _iRetCount, t
                     std::string strErr(parser.getErrorMessage());
 
                     char errmsg[256];
-                    os_sprintf(errmsg, _("%s: Error in file %s.\n"), "genlib", stFullPath.data());
+                    os_sprintf(errmsg, 256, _("%s: Error in file %s.\n"), "genlib", stFullPath.data());
                     strErr += errmsg;
 
                     Scierror(999, strErr.data());
@@ -315,7 +316,7 @@ types::Function::ReturnValue sci_genlib(types::typed_list &in, int _iRetCount, t
                     {
                         if (AddMacroToXML(pWriter, name, pstPathBin, s_md5) == false)
                         {
-                            os_sprintf(pstVerbose, _("%s: Warning: %s information cannot be added to file %s. File ignored\n"), "genlib", pFD->getSymbol().getName().c_str(), pstPath[k]);
+                            os_sprintf(pstVerbose, 65535, _("%s: Warning: %s information cannot be added to file %s. File ignored\n"), "genlib", pFD->getSymbol().getName().c_str(), pstPath[k]);
                             scilabWrite(pstVerbose);
                         }
 
@@ -506,7 +507,7 @@ bool AddMacroToXML(xmlTextWriterPtr _pWriter, const std::string& name, const std
     {
         return false;
     }
-    
+
     //Add attribute "file"
     iLen = xmlTextWriterWriteAttribute(_pWriter, (xmlChar*)"file", (xmlChar*)file.data());
     if (iLen < 0)
index f4d83a2..dab56c5 100644 (file)
@@ -120,7 +120,7 @@ int parseLibFile(const std::string& _stXML, MacroInfoList& info, std::string& li
     /* Don't care about line return / empty line */
     xmlKeepBlanksDefault(0);
     /* check if the XML file has been encoded with utf8 (unicode) or not */
-    if (stricmp("utf-8", encoding))
+    if (os_stricmp("utf-8", encoding))
     {
         free(encoding);
         return NULL;
index 6264bf2..05348f5 100644 (file)
@@ -188,7 +188,7 @@ static JavaVM *SearchCreatedJavaVMPath(void)
 }
 
 /*--------------------------------------------------------------------------*/
-JavaVM *FindCreatedJavaVM(char *SCILAB_PATH)
+JavaVM *FindCreatedJavaVM(const char *SCILAB_PATH)
 {
     JavaVM *jvm = NULL;
 
index c6b15dc..0e71589 100644 (file)
@@ -23,6 +23,7 @@
 #include "os_string.h"
 #include "strsubst.h"
 #include "getos.h"
+#include "os_string.h"
 #include "getshortpathname.h"
 #include "BOOL.h"
 #include "getScilabPreference.h"
@@ -39,7 +40,7 @@ JavaVMOption * getJvmOptions(char *SCI_PATH, char *filename_xml_conf, int *size_
         /* Don't care about line return / empty line */
         xmlKeepBlanksDefault(0);
         /* check if the XML file has been encoded with utf8 (unicode) or not */
-        if (stricmp("utf-8", encoding) == 0)
+        if (os_stricmp("utf-8", encoding) == 0)
         {
             xmlDocPtr doc = NULL;
             xmlXPathContextPtr xpathCtxt = NULL;
index ce9a4ab..f2819ec 100644 (file)
@@ -55,7 +55,7 @@ BOOL LoadClasspath(char *xmlfilename)
         /* Don't care about line return / empty line */
         xmlKeepBlanksDefault(0);
         /* check if the XML file has been encoded with utf8 (unicode) or not */
-        if ( stricmp("utf-8", encoding) == 0 )
+        if ( os_stricmp("utf-8", encoding) == 0 )
         {
             xmlXPathContextPtr xpathCtxt = NULL;
             xmlXPathObjectPtr xpathObj = NULL;
@@ -118,13 +118,13 @@ BOOL LoadClasspath(char *xmlfilename)
                             load = (char*)attrib->children->content;
 
                             /* By default, it is startup */
-                            if (stricmp(load, "background") == 0)
+                            if (os_stricmp(load, "background") == 0)
                             {
                                 eLoad = BACKGROUND;
                             }
                             else
                             {
-                                if (stricmp(load, "onuse") == 0)
+                                if (os_stricmp(load, "onuse") == 0)
                                 {
                                     eLoad = ONUSE;
                                 }
index bf7ec2f..1eb5832 100644 (file)
@@ -35,7 +35,7 @@ BOOL LoadLibrarypath(char *xmlfilename)
         /* Don't care about line return / empty line */
         xmlKeepBlanksDefault(0);
         /* check if the XML file has been encoded with utf8 (unicode) or not */
-        if ( stricmp("utf-8", encoding) == 0 )
+        if ( os_stricmp("utf-8", encoding) == 0 )
         {
             xmlDocPtr doc = NULL;
             xmlXPathContextPtr xpathCtxt = NULL;
index 8f0332a..294654a 100644 (file)
@@ -28,7 +28,6 @@ LOCALIZATION_C_SOURCES += \
 endif
 
 LOCALIZATION_CPP_SOURCES = \
-    src/cpp/localization.cpp \
     src/cpp/UTF8.cpp
 
 GATEWAY_C_SOURCES = \
index d7b5147..3384c11 100644 (file)
@@ -196,8 +196,7 @@ am__libscilocalization_algo_la_SOURCES_DIST =  \
        src/c/getLcidString.c src/c/charEncoding.c \
        src/c/setdefaultlanguage.c src/jni/Messages_wrap.c \
        src/jni/LocaleToLCID_wrap.c src/jni/setdefaultlanguage_wrap.c \
-       src/c/getLocaleInfo_Apple.c src/cpp/localization.cpp \
-       src/cpp/UTF8.cpp
+       src/c/getLocaleInfo_Apple.c src/cpp/UTF8.cpp
 am__dirstamp = $(am__leading_dot)dirstamp
 @NEED_JAVA_TRUE@am__objects_1 = src/jni/libscilocalization_algo_la-Messages_wrap.lo \
 @NEED_JAVA_TRUE@       src/jni/libscilocalization_algo_la-LocaleToLCID_wrap.lo \
@@ -210,8 +209,7 @@ am__objects_3 =  \
        src/c/libscilocalization_algo_la-charEncoding.lo \
        src/c/libscilocalization_algo_la-setdefaultlanguage.lo \
        $(am__objects_1) $(am__objects_2)
-am__objects_4 = src/cpp/libscilocalization_algo_la-localization.lo \
-       src/cpp/libscilocalization_algo_la-UTF8.lo
+am__objects_4 = src/cpp/libscilocalization_algo_la-UTF8.lo
 am_libscilocalization_algo_la_OBJECTS = $(am__objects_3) \
        $(am__objects_4)
 libscilocalization_algo_la_OBJECTS =  \
@@ -618,7 +616,6 @@ LOCALIZATION_C_SOURCES = src/c/InitializeLocalization.c \
        src/c/charEncoding.c src/c/setdefaultlanguage.c \
        $(am__append_1) $(am__append_2)
 LOCALIZATION_CPP_SOURCES = \
-    src/cpp/localization.cpp \
     src/cpp/UTF8.cpp
 
 GATEWAY_C_SOURCES = \
@@ -686,7 +683,6 @@ libscilocalization_la_sci_gateway_DATA = sci_gateway/localization_gateway.xml
 ####localization : include files ####
 libscilocalization_la_includedir = $(pkgincludedir)
 libscilocalization_la_include_HEADERS = includes/localization.h \
-includes/localization.hxx \
 includes/dynlib_localization.h \
 includes/setgetlanguage.h \
 includes/charEncoding.h
@@ -888,8 +884,6 @@ src/cpp/$(am__dirstamp):
 src/cpp/$(DEPDIR)/$(am__dirstamp):
        @$(MKDIR_P) src/cpp/$(DEPDIR)
        @: > src/cpp/$(DEPDIR)/$(am__dirstamp)
-src/cpp/libscilocalization_algo_la-localization.lo:  \
-       src/cpp/$(am__dirstamp) src/cpp/$(DEPDIR)/$(am__dirstamp)
 src/cpp/libscilocalization_algo_la-UTF8.lo: src/cpp/$(am__dirstamp) \
        src/cpp/$(DEPDIR)/$(am__dirstamp)
 
@@ -962,7 +956,6 @@ distclean-compile:
 @AMDEP_TRUE@@am__include@ @am__quote@src/c/$(DEPDIR)/libscilocalization_algo_la-setdefaultlanguage.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/c/$(DEPDIR)/libscilocalization_algo_la-setgetlanguage.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/cpp/$(DEPDIR)/libscilocalization_algo_la-UTF8.Plo@am__quote@
-@AMDEP_TRUE@@am__include@ @am__quote@src/cpp/$(DEPDIR)/libscilocalization_algo_la-localization.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/jni/$(DEPDIR)/libscilocalization_algo_la-LocaleToLCID_wrap.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/jni/$(DEPDIR)/libscilocalization_algo_la-Messages_wrap.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/jni/$(DEPDIR)/libscilocalization_algo_la-setdefaultlanguage_wrap.Plo@am__quote@
@@ -1092,13 +1085,6 @@ sci_gateway/c/libscilocalization_la-sci_gettext.lo: sci_gateway/c/sci_gettext.c
 @AMDEP_TRUE@@am__fastdepCXX_FALSE@     DEPDIR=$(DEPDIR) $(CXXDEPMODE) $(depcomp) @AMDEPBACKSLASH@
 @am__fastdepCXX_FALSE@ $(AM_V_CXX@am__nodep@)$(LTCXXCOMPILE) -c -o $@ $<
 
-src/cpp/libscilocalization_algo_la-localization.lo: src/cpp/localization.cpp
-@am__fastdepCXX_TRUE@  $(AM_V_CXX)$(LIBTOOL) $(AM_V_lt) --tag=CXX $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CXX) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(libscilocalization_algo_la_CPPFLAGS) $(CPPFLAGS) $(AM_CXXFLAGS) $(CXXFLAGS) -MT src/cpp/libscilocalization_algo_la-localization.lo -MD -MP -MF src/cpp/$(DEPDIR)/libscilocalization_algo_la-localization.Tpo -c -o src/cpp/libscilocalization_algo_la-localization.lo `test -f 'src/cpp/localization.cpp' || echo '$(srcdir)/'`src/cpp/localization.cpp
-@am__fastdepCXX_TRUE@  $(AM_V_at)$(am__mv) src/cpp/$(DEPDIR)/libscilocalization_algo_la-localization.Tpo src/cpp/$(DEPDIR)/libscilocalization_algo_la-localization.Plo
-@AMDEP_TRUE@@am__fastdepCXX_FALSE@     $(AM_V_CXX)source='src/cpp/localization.cpp' object='src/cpp/libscilocalization_algo_la-localization.lo' libtool=yes @AMDEPBACKSLASH@
-@AMDEP_TRUE@@am__fastdepCXX_FALSE@     DEPDIR=$(DEPDIR) $(CXXDEPMODE) $(depcomp) @AMDEPBACKSLASH@
-@am__fastdepCXX_FALSE@ $(AM_V_CXX@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CXX $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CXX) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(libscilocalization_algo_la_CPPFLAGS) $(CPPFLAGS) $(AM_CXXFLAGS) $(CXXFLAGS) -c -o src/cpp/libscilocalization_algo_la-localization.lo `test -f 'src/cpp/localization.cpp' || echo '$(srcdir)/'`src/cpp/localization.cpp
-
 src/cpp/libscilocalization_algo_la-UTF8.lo: src/cpp/UTF8.cpp
 @am__fastdepCXX_TRUE@  $(AM_V_CXX)$(LIBTOOL) $(AM_V_lt) --tag=CXX $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CXX) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(libscilocalization_algo_la_CPPFLAGS) $(CPPFLAGS) $(AM_CXXFLAGS) $(CXXFLAGS) -MT src/cpp/libscilocalization_algo_la-UTF8.lo -MD -MP -MF src/cpp/$(DEPDIR)/libscilocalization_algo_la-UTF8.Tpo -c -o src/cpp/libscilocalization_algo_la-UTF8.lo `test -f 'src/cpp/UTF8.cpp' || echo '$(srcdir)/'`src/cpp/UTF8.cpp
 @am__fastdepCXX_TRUE@  $(AM_V_at)$(am__mv) src/cpp/$(DEPDIR)/libscilocalization_algo_la-UTF8.Tpo src/cpp/$(DEPDIR)/libscilocalization_algo_la-UTF8.Plo
index b1c4fb2..55ac3b3 100644 (file)
@@ -141,7 +141,7 @@ static int sci_diary_no_rhs(char *fname, void* pvApiCtx)
     if (Lhs == 2)
     {
         int nb_diary_filenames = 0;
-        char **diary_filenames = getDiaryFilenames(&nb_diary_filenames);
+        const char** diary_filenames = getDiaryFilenames(&nb_diary_filenames);
 
         if ((diary_filenames) && (nb_diary_filenames > 0))
         {
@@ -155,7 +155,7 @@ static int sci_diary_no_rhs(char *fname, void* pvApiCtx)
 
             LhsVar(2) = Rhs + 2;
 
-            freeArrayOfString(diary_filenames, nb_diary_filenames);
+            FREE(diary_filenames);
             nb_diary_filenames = 0;
         }
         else
@@ -173,7 +173,7 @@ static int sci_diary_no_rhs(char *fname, void* pvApiCtx)
                 LhsVar(2) = Rhs + 2;
                 if (diary_filenames)
                 {
-                    freeArrayOfString(diary_filenames, nb_diary_filenames);
+                    FREE(diary_filenames);
                     nb_diary_filenames = 0;
                 }
             }
@@ -269,7 +269,7 @@ static int sci_diary_one_rhs(char *fname, void* pvApiCtx)
 
                 if (Lhs == 2)
                 {
-                    char* filenameUsed = getDiaryFilename((int)dID);
+                    const char* filenameUsed = getDiaryFilename((int)dID);
                     sciErr = createMatrixOfString(pvApiCtx, Rhs + 2, 1, 1, &filenameUsed);
                     if (sciErr.iErr)
                     {
@@ -279,7 +279,6 @@ static int sci_diary_one_rhs(char *fname, void* pvApiCtx)
                     }
 
                     LhsVar(2) = Rhs + 2;
-                    FREE(filenameUsed);
                 }
             }
             else // diary(filename) exists (close diary)
@@ -1422,7 +1421,7 @@ static int AppendByFilenames(char *fname, void* pvApiCtx,
 
         if (Lhs == 2)
         {
-            char* filenameUsed = getDiaryFilename((int)dID);
+            const char* filenameUsed = getDiaryFilename((int)dID);
             sciErr = createMatrixOfString(pvApiCtx, Rhs + 2, 1, 1, &filenameUsed);
             if (sciErr.iErr)
             {
@@ -1432,7 +1431,6 @@ static int AppendByFilenames(char *fname, void* pvApiCtx,
             }
 
             LhsVar(2) = Rhs + 2;
-            freeArrayOfString(&filenameUsed, 1);
         }
         PutLhsVar();
     }
@@ -1486,7 +1484,7 @@ static int NewByFilenames(char *fname, void* pvApiCtx,
 
         if (Lhs == 2)
         {
-            char* filenameUsed = getDiaryFilename((int)dID);
+            const char* filenameUsed = getDiaryFilename((int)dID);
             sciErr = createMatrixOfString(pvApiCtx, Rhs + 2, 1, 1, &filenameUsed);
             if (sciErr.iErr)
             {
@@ -1496,7 +1494,6 @@ static int NewByFilenames(char *fname, void* pvApiCtx,
             }
 
             LhsVar(2) = Rhs + 2;
-            FREE(filenameUsed);
         }
         PutLhsVar();
     }
index 0605d62..22622bf 100644 (file)
@@ -14,6 +14,7 @@
 #include "DiaryList.hxx"
 #include "diary.h"
 #include "sci_malloc.h"
+#include "os_string.h"
 /*--------------------------------------------------------------------------*/
 static DiaryList *SCIDIARY = NULL;
 /*--------------------------------------------------------------------------*/
@@ -38,24 +39,19 @@ static int destroyDiaryManager(void)
     return 1;
 }
 /*--------------------------------------------------------------------------*/
-char* getDiaryFilename(int _Id)
+const char* getDiaryFilename(int _Id)
 {
-    char* filename = NULL;
     if (SCIDIARY)
     {
         if (SCIDIARY->getFilename(_Id).compare(""))
         {
-            filename = (char*)MALLOC(sizeof(char) * (SCIDIARY->getFilename(_Id).length() + 1));
-            if (filename)
-            {
-                strcpy(filename, SCIDIARY->getFilename(_Id).c_str());
-            }
+            return SCIDIARY->getFilename(_Id).c_str();
         }
     }
-    return filename;
+    return nullptr;
 }
 /*--------------------------------------------------------------------------*/
-char **getDiaryFilenames(int *array_size)
+const char** getDiaryFilenames(int *array_size)
 {
     *array_size = 0;
     if (SCIDIARY)
@@ -64,18 +60,17 @@ char **getDiaryFilenames(int *array_size)
         *array_size = (int)stringFilenames.size();
         if (array_size > 0)
         {
-            char **filenames = (char **) MALLOC (sizeof(char*) * (*array_size));
+            const char **filenames = (const char **) MALLOC (sizeof(char*) * (*array_size));
             int i = 0;
-            for (const auto& filename : stringFilenames)
+            for (const auto & filename : stringFilenames)
             {
-                filenames[i] = (char*)MALLOC(sizeof(char) * (filename.length() + 1));
-                strcpy(filenames[i], filename.data());
+                filenames[i] = filename.data();
                 ++i;
             }
             return filenames;
         }
     }
-    return NULL;
+    return nullptr;
 }
 /*--------------------------------------------------------------------------*/
 int *getDiaryIDs(int *array_size)
index 9c47ba8..874963b 100644 (file)
@@ -25,14 +25,14 @@ extern "C"
 * @param[in] _Id
 * @return filename
 */
-OUTPUT_STREAM_IMPEXP char* getDiaryFilename(int _Id);
+OUTPUT_STREAM_IMPEXP const char* getDiaryFilename(int _Id);
 
 /**
 * get all filenames in manager
 * @param[out] size of returned array
 * @return filenames
 */
-OUTPUT_STREAM_IMPEXP char** getDiaryFilenames(int *array_size);
+OUTPUT_STREAM_IMPEXP const char** getDiaryFilenames(int *array_size);
 
 /**
 * get all IDs in manager
index 5693318..5ba047f 100644 (file)
@@ -232,7 +232,7 @@ void getDocAndCtxt(xmlDocPtr * doc, xmlXPathContextPtr * xpathCtxt)
         return;
     }
 
-    if (stricmp((*doc)->encoding, "utf-8"))
+    if (os_stricmp((*doc)->encoding, "utf-8"))
     {
         xmlFreeDoc(*doc);
         *doc = NULL;
index cca33e7..aee5e15 100644 (file)
@@ -18,6 +18,7 @@
 #include <sstream>
 #include <string>
 
+#include <string.h>
 #include "scilabWrite.hxx"
 
 #include "LoggerView.hxx"
index 3e6199f..2bd2b62 100644 (file)
@@ -15,6 +15,7 @@
 
 extern "C"
 {
+#include "os_string.h"
 #include "sci_malloc.h"
 #include "charEncoding.h"
 }
index d57c3c8..78bcedb 100644 (file)
@@ -175,8 +175,7 @@ am__installdirs = "$(DESTDIR)$(pkglibdir)" \
 LTLIBRARIES = $(noinst_LTLIBRARIES) $(pkglib_LTLIBRARIES)
 libscistring_algo_la_LIBADD =
 am__dirstamp = $(am__leading_dot)dirstamp
-am__objects_1 = src/c/libscistring_algo_la-convstr.lo \
-       src/c/libscistring_algo_la-men_Sutils.lo \
+am__objects_1 = src/c/libscistring_algo_la-men_Sutils.lo \
        src/c/libscistring_algo_la-tokens.lo \
        src/c/libscistring_algo_la-strsplit.lo \
        src/c/libscistring_algo_la-partfunction.lo \
@@ -631,7 +630,6 @@ STRING_CPP_SOURCES = \
     src/cpp/os_wtoi.cpp
 
 STRING_C_SOURCES = \
-    src/c/convstr.c \
     src/c/men_Sutils.c \
     src/c/tokens.c \
     src/c/strsplit.c \
@@ -765,7 +763,6 @@ libscistring_la_sci_gateway_DATA = sci_gateway/string_gateway.xml
 libscistring_la_includedir = $(pkgincludedir)
 libscistring_la_include_HEADERS = \
 includes/complex_array.h \
-includes/convstr.h \
 includes/cvstr.h \
 includes/dynlib_string_gw.h \
 includes/dynlib_string.h \
@@ -941,8 +938,6 @@ src/c/$(am__dirstamp):
 src/c/$(DEPDIR)/$(am__dirstamp):
        @$(MKDIR_P) src/c/$(DEPDIR)
        @: > src/c/$(DEPDIR)/$(am__dirstamp)
-src/c/libscistring_algo_la-convstr.lo: src/c/$(am__dirstamp) \
-       src/c/$(DEPDIR)/$(am__dirstamp)
 src/c/libscistring_algo_la-men_Sutils.lo: src/c/$(am__dirstamp) \
        src/c/$(DEPDIR)/$(am__dirstamp)
 src/c/libscistring_algo_la-tokens.lo: src/c/$(am__dirstamp) \
@@ -1146,7 +1141,6 @@ distclean-compile:
 @AMDEP_TRUE@@am__include@ @am__quote@sci_gateway/cpp/$(DEPDIR)/libscistring_la-string_gw.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/c/$(DEPDIR)/libscistring_algo_la-StringConvert.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/c/$(DEPDIR)/libscistring_algo_la-complex_array.Plo@am__quote@
-@AMDEP_TRUE@@am__include@ @am__quote@src/c/$(DEPDIR)/libscistring_algo_la-convstr.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/c/$(DEPDIR)/libscistring_algo_la-cvstr.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/c/$(DEPDIR)/libscistring_algo_la-getfastcode.Plo@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@src/c/$(DEPDIR)/libscistring_algo_la-isalphanum.Plo@am__quote@
@@ -1197,13 +1191,6 @@ distclean-compile:
 @AMDEP_TRUE@@am__fastdepCC_FALSE@      DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
 @am__fastdepCC_FALSE@  $(AM_V_CC@am__nodep@)$(LTCOMPILE) -c -o $@ $<
 
-src/c/libscistring_algo_la-convstr.lo: src/c/convstr.c
-@am__fastdepCC_TRUE@   $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(libscistring_algo_la_CPPFLAGS) $(CPPFLAGS) $(libscistring_algo_la_CFLAGS) $(CFLAGS) -MT src/c/libscistring_algo_la-convstr.lo -MD -MP -MF src/c/$(DEPDIR)/libscistring_algo_la-convstr.Tpo -c -o src/c/libscistring_algo_la-convstr.lo `test -f 'src/c/convstr.c' || echo '$(srcdir)/'`src/c/convstr.c
-@am__fastdepCC_TRUE@   $(AM_V_at)$(am__mv) src/c/$(DEPDIR)/libscistring_algo_la-convstr.Tpo src/c/$(DEPDIR)/libscistring_algo_la-convstr.Plo
-@AMDEP_TRUE@@am__fastdepCC_FALSE@      $(AM_V_CC)source='src/c/convstr.c' object='src/c/libscistring_algo_la-convstr.lo' libtool=yes @AMDEPBACKSLASH@
-@AMDEP_TRUE@@am__fastdepCC_FALSE@      DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
-@am__fastdepCC_FALSE@  $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(libscistring_algo_la_CPPFLAGS) $(CPPFLAGS) $(libscistring_algo_la_CFLAGS) $(CFLAGS) -c -o src/c/libscistring_algo_la-convstr.lo `test -f 'src/c/convstr.c' || echo '$(srcdir)/'`src/c/convstr.c
-
 src/c/libscistring_algo_la-men_Sutils.lo: src/c/men_Sutils.c
 @am__fastdepCC_TRUE@   $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(libscistring_algo_la_CPPFLAGS) $(CPPFLAGS) $(libscistring_algo_la_CFLAGS) $(CFLAGS) -MT src/c/libscistring_algo_la-men_Sutils.lo -MD -MP -MF src/c/$(DEPDIR)/libscistring_algo_la-men_Sutils.Tpo -c -o src/c/libscistring_algo_la-men_Sutils.lo `test -f 'src/c/men_Sutils.c' || echo '$(srcdir)/'`src/c/men_Sutils.c
 @am__fastdepCC_TRUE@   $(AM_V_at)$(am__mv) src/c/$(DEPDIR)/libscistring_algo_la-men_Sutils.Tpo src/c/$(DEPDIR)/libscistring_algo_la-men_Sutils.Plo
index a35ed0b..7400faa 100644 (file)
 #define os_swprintf     swprintf_s
 #define os_sprintf      sprintf_s
 #define os_wcsicmp      _wcsicmp
-#define stricmp         _stricmp
-#define strnicmp        _strnicmp
-#define wcsicmp         _wcsicmp
-#define wcsnicmp        _wcsnicmp
+#define os_stricmp      _stricmp
+#define os_strnicmp     _strnicmp
+#define os_wcsicmp      _wcsicmp
+#define os_wcsnicmp     _wcsnicmp
 #define os_strcpy       strcpy_s
 #define os_splitpath    _splitpath_s
 #define os_wsplitpath   _wsplitpath_s
@@ -49,12 +49,12 @@ wchar_t *_sciwcsdup(const wchar_t *_pwcsSource);
 
 #define os_strdup       strdup
 #define os_swprintf     swprintf
-#define os_sprintf      sprintf
+#define os_sprintf      snprintf
+#define os_wcsicmp      wcscasecmp
+#define os_stricmp      strcasecmp
+#define os_strnicmp     strncasecmp
 #define os_wcsicmp      wcscasecmp
-#define stricmp         strcasecmp
-#define strnicmp        strncasecmp
-#define wcsicmp         wcscasecmp
-#define wcsnicmp        wcsncasecmp
+#define os_wcsnicmp     wcsncasecmp
 #define os_strcpy       strcpy
 #define os_splitpath    _splitpath
 #define os_wsplitpath   _wsplitpath
@@ -67,7 +67,7 @@ wchar_t *_sciwcsdup(const wchar_t *_pwcsSource);
 #define os_wcsdup       _sciwcsdup
 #define os_strdup       strdup
 #define os_swprintf     swprintf
-#define os_sprintf      sprintf
+#define os_sprintf      snprintf
 
 #include <stdlib.h>
 #include <wchar.h>
@@ -103,10 +103,10 @@ static inline int macOSwcscasecmp(const wchar_t *_pwcsS1, const wchar_t *_pwcsS2
 }
 
 #define os_wcsicmp      macOSwcscasecmp
-#define stricmp         strcasecmp
-#define strnicmp        strncasecmp
-#define wcsicmp         wcscasecmp
-#define wcsnicmp        wcsncasecmp
+#define os_stricmp      strcasecmp
+#define os_strnicmp     strncasecmp
+#define os_wcsicmp      wcscasecmp
+#define os_wcsnicmp     wcsncasecmp
 #define os_strcpy       strcpy
 #define os_splitpath    _splitpath
 #define os_wsplitpath   _wsplitpath
index d020214..b0c12ee 100644 (file)
@@ -23,6 +23,7 @@ extern "C"
 #include "localization.h"
 #include "Scierror.h"
 #include "os_string.h"
+#include "os_wcstok.h"
 #include <stdio.h>
 }
 
@@ -86,11 +87,7 @@ types::Function::ReturnValue sci_strtok(types::typed_list &in, int _iRetCount, t
     }
     else
     {
-#ifndef _MSC_VER
-        pstToken = strtok(pstString, pstSeps, &pstState);
-#else
-        pstToken = strtok_s(pstString, pstSeps, &pstState);
-#endif
+        pstToken = os_strtok(pstString, pstSeps, &pstState);
     }
 
     pOutString  = new types::String(dims, dimsArray);
index 7c8691b..4dd3d64 100644 (file)
 
 char* os_strtok(char *_pstData, const char* _pstDelim, char** _pstState)
 {
-#ifndef _MSC_VER
-    return strtok(_pstData, _pstDelim, _pstState);
-#else
     return strtok(_pstData, _pstDelim);
-#endif
 }
 
 wchar_t *os_wcstok(wchar_t *_pwstData, const wchar_t *_pwstDelim, wchar_t** _pswtState)
index ce8f204..b23bfa6 100644 (file)
 #define ComplexScilab "%i"
 #define ComplexI "i"
 /* ========================================================================== */
-#ifndef _MSC_VER
-#ifndef strnicmp
-#define strnicmp strncasecmp
-#endif
-#else
-#define stricmp _stricmp
-#endif
-#ifdef _MSC_VER
-#undef strnicmp
-#define strnicmp _strnicmp
-#endif
-/* ========================================================================== */
 static int ParseNumber(const char* tx);
 static stringToComplexError ParseComplexValue(const char *tx, BOOL bConvertByNAN, double *real, double *imag);
 static char* midstring(const char *tx, size_t pos, int nb);
@@ -286,27 +274,27 @@ static stringToComplexError ParseComplexValue(const char *tx, BOOL bConvertByNAN
         if (lnum <= 1)
         {
             /* manages special cases nan + nani, ... */
-            if (strnicmp(modifiedTxt, NanString, strlen(NanString)) == 0)
+            if (os_strnicmp(modifiedTxt, NanString, strlen(NanString)) == 0)
             {
                 lnum = strlen(NanString);
             }
-            else if (strnicmp(modifiedTxt, InfString, strlen(InfString)) == 0)
+            else if (os_strnicmp(modifiedTxt, InfString, strlen(InfString)) == 0)
             {
                 lnum = strlen(InfString);
             }
-            else if (strnicmp(modifiedTxt, NegInfString, strlen(NegInfString)) == 0)
+            else if (os_strnicmp(modifiedTxt, NegInfString, strlen(NegInfString)) == 0)
             {
                 lnum = strlen(NegInfString);
             }
-            else if (strnicmp(modifiedTxt, PosInfString, strlen(PosInfString)) == 0)
+            else if (os_strnicmp(modifiedTxt, PosInfString, strlen(PosInfString)) == 0)
             {
                 lnum = strlen(PosInfString);
             }
-            else if (strnicmp(modifiedTxt, NegNanString, strlen(NegNanString)) == 0)
+            else if (os_strnicmp(modifiedTxt, NegNanString, strlen(NegNanString)) == 0)
             {
                 lnum = strlen(NegNanString);
             }
-            else if (strnicmp(modifiedTxt, PosNanString, strlen(PosNanString)) == 0)
+            else if (os_strnicmp(modifiedTxt, PosNanString, strlen(PosNanString)) == 0)
             {
                 lnum = strlen(PosNanString);
             }
index ebc33ed..df8b5f8 100644 (file)
 #include "core_math.h"
 #include "sci_malloc.h"
 #include "os_string.h"
-#ifndef _MSC_VER
-#ifndef stricmp
-#define stricmp strcasecmp
-#endif
-#else
-#define stricmp _stricmp
-#endif
 /* ========================================================================== */
 #define DEFAULT_DOUBLE_MAX_DIGIT_FORMAT "%lg"
 /* ========================================================================== */
@@ -71,42 +64,42 @@ double stringToDouble(const char *pSTR, BOOL bConvertByNAN, stringToDoubleError
     *ierr = STRINGTODOUBLE_ERROR;
     if (pSTR)
     {
-        if ((stricmp(pSTR, NanString) == 0) || (stricmp(pSTR, NegNanString) == 0) ||
-                (stricmp(pSTR, PosNanString) == 0) || (stricmp(pSTR, ScilabPosNanString) == 0) ||
-                (stricmp(pSTR, ScilabNanString) == 0) || (stricmp(pSTR, ScilabNegNanString) == 0))
+        if ((os_stricmp(pSTR, NanString) == 0) || (os_stricmp(pSTR, NegNanString) == 0) ||
+                (os_stricmp(pSTR, PosNanString) == 0) || (os_stricmp(pSTR, ScilabPosNanString) == 0) ||
+                (os_stricmp(pSTR, ScilabNanString) == 0) || (os_stricmp(pSTR, ScilabNegNanString) == 0))
         {
             dValue = returnNAN();
         }
-        else if ((stricmp(pSTR, InfString) == 0) || (stricmp(pSTR, PosInfString) == 0) ||
-                 (stricmp(pSTR, ScilabInfString) == 0) || (stricmp(pSTR, ScilabPosInfString) == 0))
+        else if ((os_stricmp(pSTR, InfString) == 0) || (os_stricmp(pSTR, PosInfString) == 0) ||
+                 (os_stricmp(pSTR, ScilabInfString) == 0) || (os_stricmp(pSTR, ScilabPosInfString) == 0))
         {
             dValue = returnINF(TRUE);
         }
-        else if ((stricmp(pSTR, NegInfString) == 0) || (stricmp(pSTR, ScilabNegInfString) == 0))
+        else if ((os_stricmp(pSTR, NegInfString) == 0) || (os_stricmp(pSTR, ScilabNegInfString) == 0))
         {
             dValue = returnINF(FALSE);
         }
-        else if ((stricmp(pSTR, ScilabPiString) == 0) || (stricmp(pSTR, ScilabPosPiString) == 0))
+        else if ((os_stricmp(pSTR, ScilabPiString) == 0) || (os_stricmp(pSTR, ScilabPosPiString) == 0))
         {
             dValue = M_PI;
         }
-        else if (stricmp(pSTR, ScilabNegPiString) == 0)
+        else if (os_stricmp(pSTR, ScilabNegPiString) == 0)
         {
             dValue = -M_PI;
         }
-        else if ((stricmp(pSTR, ScilabEpsString) == 0) || (stricmp(pSTR, ScilabPosEpsString) == 0))
+        else if ((os_stricmp(pSTR, ScilabEpsString) == 0) || (os_stricmp(pSTR, ScilabPosEpsString) == 0))
         {
             dValue = EPSILON;
         }
-        else if (stricmp(pSTR, ScilabNegEpsString) == 0)
+        else if (os_stricmp(pSTR, ScilabNegEpsString) == 0)
         {
             dValue = -EPSILON;
         }
-        else if ((stricmp(pSTR, ScilabEString) == 0) || (stricmp(pSTR, ScilabPosEString) == 0))
+        else if ((os_stricmp(pSTR, ScilabEString) == 0) || (os_stricmp(pSTR, ScilabPosEString) == 0))
         {
             dValue = exp(1);
         }
-        else if (stricmp(pSTR, ScilabNegEString) == 0)
+        else if (os_stricmp(pSTR, ScilabNegEString) == 0)
         {
             dValue = -exp(1);
         }
index 9b73e04..7579645 100644 (file)
@@ -52,7 +52,7 @@ int * stringsCompare(char** Input_String_One, int dim_One, char** Input_String_T
 
             if (dostricmp)
             {
-                returnedValues[i] = sign(stricmp(Input_String_One[i], Input_String_Two[j]));
+                returnedValues[i] = sign(os_stricmp(Input_String_One[i], Input_String_Two[j]));
             }
             else
             {
index f12c347..0dc35c6 100644 (file)
@@ -43,7 +43,7 @@ char *stristr(const char *psz, const char *tofind)
                 ptr = ptr2;
             }
 
-            if (!strnicmp(ptr, tofind, strlen(tofind)))
+            if (!os_strnicmp(ptr, tofind, strlen(tofind)))
             {
                 return (char *) ptr;
             }
index 9daf5ca..d4c7593 100644 (file)
@@ -107,12 +107,13 @@ wchar_t **wide_strsplit(wchar_t * wcstringToSplit, double *indices, int sizeIndi
 
 char** strsplit(const char* stringToSplit, double *indices, int sizeIndices, strsplit_error *ierr)
 {
+    int i = 0;
     wchar_t* w = to_wide_string(stringToSplit);
     wchar_t** o = wide_strsplit(w, indices, sizeIndices, ierr);
     if (*ierr == STRSPLIT_NO_ERROR)
     {
         char** output = (char**)MALLOC(sizeof(char*) * (sizeIndices + 1));
-        for (int i = 0; i < sizeIndices + 1; ++i)
+        for (i = 0; i < sizeIndices + 1; ++i)
         {
             output[i] = wide_string_to_UTF8(o[i]);
         }
index f7fbf64..bed538d 100644 (file)
@@ -70,7 +70,7 @@ types::Function::ReturnValue sci_mcisendstring(types::typed_list &in, int _iRetC
 
         if (mciGetErrorStringA(err, errtxt, 128) == FALSE)
         {
-            os_sprintf(errtxt, "%s", "Unknown MCI error");
+            os_sprintf(errtxt, 128, "%s", "Unknown MCI error");
         }
 
         out3 = errtxt;
index 7ece070..1869c87 100644 (file)
@@ -133,7 +133,7 @@ void CreateScilabConsole(int ShowBanner)
         printf(line);
         strcpy(line, "                     Scilab Enterprises\n");
         printf(line);
-        strcpy(line, "         Copyright (c) 2011-2015 (Scilab Enterprises)\n");
+        strcpy(line, "         Copyright (c) 2011-2016 (Scilab Enterprises)\n");
         printf(line);
         strcpy(line, "               Copyright (c) 1989-2012 (INRIA)\n");
         printf(line);
index 8249b97..339e182 100644 (file)
@@ -25,9 +25,7 @@ extern "C"
 #include "expandPathVariable.h"
 #include "sci_malloc.h"
 #include "localization.h"
-#ifdef _MSC_VER
 #include "os_string.h"
-#endif
 }
 
 using namespace org_modules_xml;