summaryrefslogtreecommitdiff
path: root/modules/development_tools/src
diff options
context:
space:
mode:
authorShashank2017-05-29 12:40:26 +0530
committerShashank2017-05-29 12:40:26 +0530
commit0345245e860375a32c9a437c4a9d9cae807134e9 (patch)
treead51ecbfa7bcd3cc5f09834f1bb8c08feaa526a4 /modules/development_tools/src
downloadscilab_for_xcos_on_cloud-0345245e860375a32c9a437c4a9d9cae807134e9.tar.gz
scilab_for_xcos_on_cloud-0345245e860375a32c9a437c4a9d9cae807134e9.tar.bz2
scilab_for_xcos_on_cloud-0345245e860375a32c9a437c4a9d9cae807134e9.zip
CMSCOPE changed
Diffstat (limited to 'modules/development_tools/src')
-rwxr-xr-xmodules/development_tools/src/fake/Makefile.am2
-rwxr-xr-xmodules/development_tools/src/fake/Makefile.in599
-rwxr-xr-xmodules/development_tools/src/perl/check_makefileam.pl276
-rwxr-xr-xmodules/development_tools/src/perl/xml2test/gateway_code_license.txt11
-rwxr-xr-xmodules/development_tools/src/perl/xml2test/includes.txt7
-rwxr-xr-xmodules/development_tools/src/perl/xml2test/scilab_code_license.txt8
-rwxr-xr-xmodules/development_tools/src/perl/xml2test/xml2test.pl526
7 files changed, 1429 insertions, 0 deletions
diff --git a/modules/development_tools/src/fake/Makefile.am b/modules/development_tools/src/fake/Makefile.am
new file mode 100755
index 000000000..ac9d3bf65
--- /dev/null
+++ b/modules/development_tools/src/fake/Makefile.am
@@ -0,0 +1,2 @@
+### This is an empty file declared to avoid a warning with autoconf
+# for YASP \ No newline at end of file
diff --git a/modules/development_tools/src/fake/Makefile.in b/modules/development_tools/src/fake/Makefile.in
new file mode 100755
index 000000000..530bb35ef
--- /dev/null
+++ b/modules/development_tools/src/fake/Makefile.in
@@ -0,0 +1,599 @@
+# Makefile.in generated by automake 1.14.1 from Makefile.am.
+# @configure_input@
+
+# Copyright (C) 1994-2013 Free Software Foundation, Inc.
+
+# This Makefile.in is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
+# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
+# PARTICULAR PURPOSE.
+
+@SET_MAKE@
+VPATH = @srcdir@
+am__is_gnu_make = test -n '$(MAKEFILE_LIST)' && test -n '$(MAKELEVEL)'
+am__make_running_with_option = \
+ case $${target_option-} in \
+ ?) ;; \
+ *) echo "am__make_running_with_option: internal error: invalid" \
+ "target option '$${target_option-}' specified" >&2; \
+ exit 1;; \
+ esac; \
+ has_opt=no; \
+ sane_makeflags=$$MAKEFLAGS; \
+ if $(am__is_gnu_make); then \
+ sane_makeflags=$$MFLAGS; \
+ else \
+ case $$MAKEFLAGS in \
+ *\\[\ \ ]*) \
+ bs=\\; \
+ sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
+ | sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \
+ esac; \
+ fi; \
+ skip_next=no; \
+ strip_trailopt () \
+ { \
+ flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
+ }; \
+ for flg in $$sane_makeflags; do \
+ test $$skip_next = yes && { skip_next=no; continue; }; \
+ case $$flg in \
+ *=*|--*) continue;; \
+ -*I) strip_trailopt 'I'; skip_next=yes;; \
+ -*I?*) strip_trailopt 'I';; \
+ -*O) strip_trailopt 'O'; skip_next=yes;; \
+ -*O?*) strip_trailopt 'O';; \
+ -*l) strip_trailopt 'l'; skip_next=yes;; \
+ -*l?*) strip_trailopt 'l';; \
+ -[dEDm]) skip_next=yes;; \
+ -[JT]) skip_next=yes;; \
+ esac; \
+ case $$flg in \
+ *$$target_option*) has_opt=yes; break;; \
+ esac; \
+ done; \
+ test $$has_opt = yes
+am__make_dryrun = (target_option=n; $(am__make_running_with_option))
+am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
+pkgdatadir = $(datadir)/@PACKAGE@
+pkgincludedir = $(includedir)/@PACKAGE@
+pkglibdir = $(libdir)/@PACKAGE@
+pkglibexecdir = $(libexecdir)/@PACKAGE@
+am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
+install_sh_DATA = $(install_sh) -c -m 644
+install_sh_PROGRAM = $(install_sh) -c
+install_sh_SCRIPT = $(install_sh) -c
+INSTALL_HEADER = $(INSTALL_DATA)
+transform = $(program_transform_name)
+NORMAL_INSTALL = :
+PRE_INSTALL = :
+POST_INSTALL = :
+NORMAL_UNINSTALL = :
+PRE_UNINSTALL = :
+POST_UNINSTALL = :
+build_triplet = @build@
+host_triplet = @host@
+subdir = modules/development_tools/src/fake
+DIST_COMMON = $(srcdir)/Makefile.in $(srcdir)/Makefile.am \
+ $(top_srcdir)/config/mkinstalldirs
+ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
+am__aclocal_m4_deps = $(top_srcdir)/m4/backtrace.m4 \
+ $(top_srcdir)/m4/compiler.m4 $(top_srcdir)/m4/curl.m4 \
+ $(top_srcdir)/m4/docbook.m4 $(top_srcdir)/m4/doxygen.m4 \
+ $(top_srcdir)/m4/fftw.m4 $(top_srcdir)/m4/fortran.m4 \
+ $(top_srcdir)/m4/giws.m4 $(top_srcdir)/m4/hdf5.m4 \
+ $(top_srcdir)/m4/intel_compiler.m4 \
+ $(top_srcdir)/m4/java-thirdparty.m4 $(top_srcdir)/m4/java.m4 \
+ $(top_srcdir)/m4/largefile.m4 $(top_srcdir)/m4/lib-ld.m4 \
+ $(top_srcdir)/m4/libsmath.m4 $(top_srcdir)/m4/libtool.m4 \
+ $(top_srcdir)/m4/libxml2.m4 $(top_srcdir)/m4/ltoptions.m4 \
+ $(top_srcdir)/m4/ltsugar.m4 $(top_srcdir)/m4/ltversion.m4 \
+ $(top_srcdir)/m4/lt~obsolete.m4 $(top_srcdir)/m4/macosx.m4 \
+ $(top_srcdir)/m4/mpi.m4 $(top_srcdir)/m4/ocaml.m4 \
+ $(top_srcdir)/m4/pcre.m4 $(top_srcdir)/m4/pkg.m4 \
+ $(top_srcdir)/m4/relocatable.m4 $(top_srcdir)/m4/swig.m4 \
+ $(top_srcdir)/m4/symlinks.m4 $(top_srcdir)/m4/tcltk.m4 \
+ $(top_srcdir)/m4/umfpack.m4 $(top_srcdir)/configure.ac
+am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
+ $(ACLOCAL_M4)
+mkinstalldirs = $(SHELL) $(top_srcdir)/config/mkinstalldirs
+CONFIG_HEADER = $(top_builddir)/modules/core/includes/machine.h
+CONFIG_CLEAN_FILES =
+CONFIG_CLEAN_VPATH_FILES =
+AM_V_P = $(am__v_P_@AM_V@)
+am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
+am__v_P_0 = false
+am__v_P_1 = :
+AM_V_GEN = $(am__v_GEN_@AM_V@)
+am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
+am__v_GEN_0 = @echo " GEN " $@;
+am__v_GEN_1 =
+AM_V_at = $(am__v_at_@AM_V@)
+am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
+am__v_at_0 = @
+am__v_at_1 =
+SOURCES =
+DIST_SOURCES =
+am__can_run_installinfo = \
+ case $$AM_UPDATE_INFO_DIR in \
+ n|no|NO) false;; \
+ *) (install-info --version) >/dev/null 2>&1;; \
+ esac
+am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
+DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
+ACLOCAL = @ACLOCAL@
+ALL_LINGUAS = @ALL_LINGUAS@
+ALL_LINGUAS_DOC = @ALL_LINGUAS_DOC@
+AMTAR = @AMTAR@
+AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
+ANT = @ANT@
+ANTLR = @ANTLR@
+AR = @AR@
+ARPACK_LIBS = @ARPACK_LIBS@
+ASM3 = @ASM3@
+AUTOCONF = @AUTOCONF@
+AUTOHEADER = @AUTOHEADER@
+AUTOMAKE = @AUTOMAKE@
+AVALON_FRAMEWORK = @AVALON_FRAMEWORK@
+AWK = @AWK@
+BATIK = @BATIK@
+BLAS_LIBS = @BLAS_LIBS@
+CC = @CC@
+CCACHE = @CCACHE@
+CCDEPMODE = @CCDEPMODE@
+CFLAGS = @CFLAGS@
+CHECKSTYLE = @CHECKSTYLE@
+COBERTURA = @COBERTURA@
+COMMONS_BEANUTILS = @COMMONS_BEANUTILS@
+COMMONS_IO = @COMMONS_IO@
+COMMONS_LOGGING = @COMMONS_LOGGING@
+CPP = @CPP@
+CPPFLAGS = @CPPFLAGS@
+CURL_CFLAGS = @CURL_CFLAGS@
+CURL_CONFIG = @CURL_CONFIG@
+CURL_LIBS = @CURL_LIBS@
+CURL_VERSION = @CURL_VERSION@
+CXX = @CXX@
+CXXCPP = @CXXCPP@
+CXXDEPMODE = @CXXDEPMODE@
+CXXFLAGS = @CXXFLAGS@
+CYGPATH_W = @CYGPATH_W@
+DEFS = @DEFS@
+DEMOTOOLS_ENABLE = @DEMOTOOLS_ENABLE@
+DEPDIR = @DEPDIR@
+DLLTOOL = @DLLTOOL@
+DOCBOOK_ROOT = @DOCBOOK_ROOT@
+DOXYGEN_BIN = @DOXYGEN_BIN@
+DSYMUTIL = @DSYMUTIL@
+DUMPBIN = @DUMPBIN@
+ECHO_C = @ECHO_C@
+ECHO_N = @ECHO_N@
+ECHO_T = @ECHO_T@
+ECJ = @ECJ@
+EGREP = @EGREP@
+EXEEXT = @EXEEXT@
+F77 = @F77@
+FFLAGS = @FFLAGS@
+FFTW3_LIB = @FFTW3_LIB@
+FFTW_ENABLE = @FFTW_ENABLE@
+FGREP = @FGREP@
+FLEXDOCK = @FLEXDOCK@
+FLIBS = @FLIBS@
+FOP = @FOP@
+FREEHEP_GRAPHICS2D = @FREEHEP_GRAPHICS2D@
+FREEHEP_GRAPHICSIO = @FREEHEP_GRAPHICSIO@
+FREEHEP_GRAPHICSIO_EMF = @FREEHEP_GRAPHICSIO_EMF@
+FREEHEP_IO = @FREEHEP_IO@
+FREEHEP_UTIL = @FREEHEP_UTIL@
+GENHTML = @GENHTML@
+GETTEXT_MACRO_VERSION = @GETTEXT_MACRO_VERSION@
+GIWS_BIN = @GIWS_BIN@
+GLUEGEN2_RT = @GLUEGEN2_RT@
+GMSGFMT = @GMSGFMT@
+GMSGFMT_015 = @GMSGFMT_015@
+GRAPHICS_ENABLE = @GRAPHICS_ENABLE@
+GREP = @GREP@
+GUI_ENABLE = @GUI_ENABLE@
+HDF5_CFLAGS = @HDF5_CFLAGS@
+HDF5_LIBS = @HDF5_LIBS@
+HELP_ENABLE = @HELP_ENABLE@
+INSTALL = @INSTALL@
+INSTALL_DATA = @INSTALL_DATA@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_SCRIPT = @INSTALL_SCRIPT@
+INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
+INTLLIBS = @INTLLIBS@
+INTL_MACOSX_LIBS = @INTL_MACOSX_LIBS@
+JAR = @JAR@
+JAVA = @JAVA@
+JAVAC = @JAVAC@
+JAVAC_DEBUG = @JAVAC_DEBUG@
+JAVADOC = @JAVADOC@
+JAVAH = @JAVAH@
+JAVASCI_ENABLE = @JAVASCI_ENABLE@
+JAVA_ENABLE = @JAVA_ENABLE@
+JAVA_G = @JAVA_G@
+JAVA_HOME = @JAVA_HOME@
+JAVA_JNI_INCLUDE = @JAVA_JNI_INCLUDE@
+JAVA_JNI_LIBS = @JAVA_JNI_LIBS@
+JDB = @JDB@
+JEUCLID_CORE = @JEUCLID_CORE@
+JGRAPHX = @JGRAPHX@
+JHALL = @JHALL@
+JLATEXMATH = @JLATEXMATH@
+JLATEXMATH_FOP = @JLATEXMATH_FOP@
+JOGL2 = @JOGL2@
+JROSETTA_API = @JROSETTA_API@
+JROSETTA_ENGINE = @JROSETTA_ENGINE@
+JUNIT4 = @JUNIT4@
+LAPACK_LIBS = @LAPACK_LIBS@
+LCOV = @LCOV@
+LD = @LD@
+LDFLAGS = @LDFLAGS@
+LIBICONV = @LIBICONV@
+LIBINTL = @LIBINTL@
+LIBM = @LIBM@
+LIBOBJS = @LIBOBJS@
+LIBS = @LIBS@
+LIBTOOL = @LIBTOOL@
+LIPO = @LIPO@
+LN_S = @LN_S@
+LOGGING_LEVEL = @LOGGING_LEVEL@
+LOOKS = @LOOKS@
+LTLIBICONV = @LTLIBICONV@
+LTLIBINTL = @LTLIBINTL@
+LTLIBOBJS = @LTLIBOBJS@
+MAINT = @MAINT@
+MAKEINFO = @MAKEINFO@
+MANIFEST_TOOL = @MANIFEST_TOOL@
+MATIO_CFLAGS = @MATIO_CFLAGS@
+MATIO_ENABLE = @MATIO_ENABLE@
+MATIO_LIBS = @MATIO_LIBS@
+MKDIR_P = @MKDIR_P@
+MPI_ENABLE = @MPI_ENABLE@
+MSGCAT = @MSGCAT@
+MSGFMT = @MSGFMT@
+MSGFMT_015 = @MSGFMT_015@
+MSGMERGE = @MSGMERGE@
+NM = @NM@
+NMEDIT = @NMEDIT@
+OBJDUMP = @OBJDUMP@
+OBJEXT = @OBJEXT@
+OCAMLC = @OCAMLC@
+OCAMLDEP = @OCAMLDEP@
+OCAMLLEX = @OCAMLLEX@
+OCAMLOPT = @OCAMLOPT@
+OCAMLYACC = @OCAMLYACC@
+OPENMPI_CC = @OPENMPI_CC@
+OPENMPI_CFLAGS = @OPENMPI_CFLAGS@
+OPENMPI_CXX = @OPENMPI_CXX@
+OPENMPI_CXXFLAGS = @OPENMPI_CXXFLAGS@
+OPENMPI_LIBS = @OPENMPI_LIBS@
+OPENMP_CFLAGS = @OPENMP_CFLAGS@
+OPENMP_CXXFLAGS = @OPENMP_CXXFLAGS@
+OPENMP_ENABLE = @OPENMP_ENABLE@
+OPENMP_LIBS = @OPENMP_LIBS@
+OTOOL = @OTOOL@
+OTOOL64 = @OTOOL64@
+PACKAGE = @PACKAGE@
+PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
+PACKAGE_NAME = @PACKAGE_NAME@
+PACKAGE_STRING = @PACKAGE_STRING@
+PACKAGE_TARNAME = @PACKAGE_TARNAME@
+PACKAGE_URL = @PACKAGE_URL@
+PACKAGE_VERSION = @PACKAGE_VERSION@
+PATH_SEPARATOR = @PATH_SEPARATOR@
+PCRE_CFLAGS = @PCRE_CFLAGS@
+PCRE_CONFIG = @PCRE_CONFIG@
+PCRE_LIBS = @PCRE_LIBS@
+PCRE_VERSION = @PCRE_VERSION@
+PKG_CONFIG = @PKG_CONFIG@
+POSUB = @POSUB@
+POW_LIB = @POW_LIB@
+PYTHON = @PYTHON@
+RANLIB = @RANLIB@
+RELOCATABLE = @RELOCATABLE@
+RT_LIB = @RT_LIB@
+SAXON = @SAXON@
+SCILAB_BINARY_VERSION = @SCILAB_BINARY_VERSION@
+SCILAB_LIBRARY_VERSION = @SCILAB_LIBRARY_VERSION@
+SCILAB_VERSION_MAINTENANCE = @SCILAB_VERSION_MAINTENANCE@
+SCILAB_VERSION_MAJOR = @SCILAB_VERSION_MAJOR@
+SCILAB_VERSION_MINOR = @SCILAB_VERSION_MINOR@
+SCIRENDERER = @SCIRENDERER@
+SCIRENDERER_CP = @SCIRENDERER_CP@
+SCI_CFLAGS = @SCI_CFLAGS@
+SCI_CXXFLAGS = @SCI_CXXFLAGS@
+SCI_FFLAGS = @SCI_FFLAGS@
+SCI_LDFLAGS = @SCI_LDFLAGS@
+SED = @SED@
+SET_MAKE = @SET_MAKE@
+SET_RELOCATABLE = @SET_RELOCATABLE@
+SHELL = @SHELL@
+SKINLF = @SKINLF@
+SPLINT = @SPLINT@
+STRIP = @STRIP@
+SWIG_BIN = @SWIG_BIN@
+SWIG_JAVA = @SWIG_JAVA@
+SWIG_RUNTIME_LIBS_DIR = @SWIG_RUNTIME_LIBS_DIR@
+SWIG_SCILAB = @SWIG_SCILAB@
+TCLTK_LIBS = @TCLTK_LIBS@
+TCL_INC_PATH = @TCL_INC_PATH@
+TK_INC_PATH = @TK_INC_PATH@
+UMFPACK_CFLAGS = @UMFPACK_CFLAGS@
+UMFPACK_ENABLE = @UMFPACK_ENABLE@
+UMFPACK_LIB = @UMFPACK_LIB@
+USE_NLS = @USE_NLS@
+VERSION = @VERSION@
+WITH_OCAML = @WITH_OCAML@
+WITH_TKSCI = @WITH_TKSCI@
+XCOS_ENABLE = @XCOS_ENABLE@
+XGETTEXT = @XGETTEXT@
+XGETTEXT_015 = @XGETTEXT_015@
+XGETTEXT_EXTRA_OPTIONS = @XGETTEXT_EXTRA_OPTIONS@
+XMKMF = @XMKMF@
+XMLGRAPHICS_COMMONS = @XMLGRAPHICS_COMMONS@
+XML_APIS_EXT = @XML_APIS_EXT@
+XML_CONFIG = @XML_CONFIG@
+XML_FLAGS = @XML_FLAGS@
+XML_LIBS = @XML_LIBS@
+XML_VERSION = @XML_VERSION@
+X_CFLAGS = @X_CFLAGS@
+X_EXTRA_LIBS = @X_EXTRA_LIBS@
+X_LIBS = @X_LIBS@
+X_PRE_LIBS = @X_PRE_LIBS@
+abs_builddir = @abs_builddir@
+abs_srcdir = @abs_srcdir@
+abs_top_builddir = @abs_top_builddir@
+abs_top_srcdir = @abs_top_srcdir@
+ac_ct_AR = @ac_ct_AR@
+ac_ct_CC = @ac_ct_CC@
+ac_ct_CXX = @ac_ct_CXX@
+ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
+ac_ct_F77 = @ac_ct_F77@
+am__include = @am__include@
+am__leading_dot = @am__leading_dot@
+am__quote = @am__quote@
+am__tar = @am__tar@
+am__untar = @am__untar@
+bindir = @bindir@
+build = @build@
+build_alias = @build_alias@
+build_cpu = @build_cpu@
+build_os = @build_os@
+build_vendor = @build_vendor@
+builddir = @builddir@
+cxx_present = @cxx_present@
+datadir = @datadir@
+datarootdir = @datarootdir@
+docdir = @docdir@
+dvidir = @dvidir@
+exec_prefix = @exec_prefix@
+host = @host@
+host_alias = @host_alias@
+host_cpu = @host_cpu@
+host_os = @host_os@
+host_vendor = @host_vendor@
+htmldir = @htmldir@
+includedir = @includedir@
+infodir = @infodir@
+install_sh = @install_sh@
+libdir = @libdir@
+libexecdir = @libexecdir@
+localedir = @localedir@
+localstatedir = @localstatedir@
+mandir = @mandir@
+mkdir_p = @mkdir_p@
+oldincludedir = @oldincludedir@
+pdfdir = @pdfdir@
+prefix = @prefix@
+program_transform_name = @program_transform_name@
+psdir = @psdir@
+sbindir = @sbindir@
+sharedstatedir = @sharedstatedir@
+srcdir = @srcdir@
+sysconfdir = @sysconfdir@
+target_alias = @target_alias@
+top_build_prefix = @top_build_prefix@
+top_builddir = @top_builddir@
+top_srcdir = @top_srcdir@
+all: all-am
+
+.SUFFIXES:
+$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am $(am__configure_deps)
+ @for dep in $?; do \
+ case '$(am__configure_deps)' in \
+ *$$dep*) \
+ ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \
+ && { if test -f $@; then exit 0; else break; fi; }; \
+ exit 1;; \
+ esac; \
+ done; \
+ echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign modules/development_tools/src/fake/Makefile'; \
+ $(am__cd) $(top_srcdir) && \
+ $(AUTOMAKE) --foreign modules/development_tools/src/fake/Makefile
+.PRECIOUS: Makefile
+Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
+ @case '$?' in \
+ *config.status*) \
+ cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \
+ *) \
+ echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe)'; \
+ cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe);; \
+ esac;
+
+$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
+ cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+
+$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps)
+ cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps)
+ cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+$(am__aclocal_m4_deps):
+
+mostlyclean-libtool:
+ -rm -f *.lo
+
+clean-libtool:
+ -rm -rf .libs _libs
+tags TAGS:
+
+ctags CTAGS:
+
+cscope cscopelist:
+
+
+distdir: $(DISTFILES)
+ @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
+ topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
+ list='$(DISTFILES)'; \
+ dist_files=`for file in $$list; do echo $$file; done | \
+ sed -e "s|^$$srcdirstrip/||;t" \
+ -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
+ case $$dist_files in \
+ */*) $(MKDIR_P) `echo "$$dist_files" | \
+ sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
+ sort -u` ;; \
+ esac; \
+ for file in $$dist_files; do \
+ if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
+ if test -d $$d/$$file; then \
+ dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
+ if test -d "$(distdir)/$$file"; then \
+ find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
+ fi; \
+ if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
+ cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
+ find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
+ fi; \
+ cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
+ else \
+ test -f "$(distdir)/$$file" \
+ || cp -p $$d/$$file "$(distdir)/$$file" \
+ || exit 1; \
+ fi; \
+ done
+check-am: all-am
+check: check-am
+all-am: Makefile
+installdirs:
+install: install-am
+install-exec: install-exec-am
+install-data: install-data-am
+uninstall: uninstall-am
+
+install-am: all-am
+ @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
+
+installcheck: installcheck-am
+install-strip:
+ if test -z '$(STRIP)'; then \
+ $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
+ install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
+ install; \
+ else \
+ $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
+ install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
+ "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
+ fi
+mostlyclean-generic:
+
+clean-generic:
+
+distclean-generic:
+ -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
+ -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
+
+maintainer-clean-generic:
+ @echo "This command is intended for maintainers to use"
+ @echo "it deletes files that may require special tools to rebuild."
+clean: clean-am
+
+clean-am: clean-generic clean-libtool mostlyclean-am
+
+distclean: distclean-am
+ -rm -f Makefile
+distclean-am: clean-am distclean-generic
+
+dvi: dvi-am
+
+dvi-am:
+
+html: html-am
+
+html-am:
+
+info: info-am
+
+info-am:
+
+install-data-am:
+
+install-dvi: install-dvi-am
+
+install-dvi-am:
+
+install-exec-am:
+
+install-html: install-html-am
+
+install-html-am:
+
+install-info: install-info-am
+
+install-info-am:
+
+install-man:
+
+install-pdf: install-pdf-am
+
+install-pdf-am:
+
+install-ps: install-ps-am
+
+install-ps-am:
+
+installcheck-am:
+
+maintainer-clean: maintainer-clean-am
+ -rm -f Makefile
+maintainer-clean-am: distclean-am maintainer-clean-generic
+
+mostlyclean: mostlyclean-am
+
+mostlyclean-am: mostlyclean-generic mostlyclean-libtool
+
+pdf: pdf-am
+
+pdf-am:
+
+ps: ps-am
+
+ps-am:
+
+uninstall-am:
+
+.MAKE: install-am install-strip
+
+.PHONY: all all-am check check-am clean clean-generic clean-libtool \
+ cscopelist-am ctags-am distclean distclean-generic \
+ distclean-libtool distdir dvi dvi-am html html-am info info-am \
+ install install-am install-data install-data-am install-dvi \
+ install-dvi-am install-exec install-exec-am install-html \
+ install-html-am install-info install-info-am install-man \
+ install-pdf install-pdf-am install-ps install-ps-am \
+ install-strip installcheck installcheck-am installdirs \
+ maintainer-clean maintainer-clean-generic mostlyclean \
+ mostlyclean-generic mostlyclean-libtool pdf pdf-am ps ps-am \
+ tags-am uninstall uninstall-am
+
+
+### This is an empty file declared to avoid a warning with autoconf
+# for YASP
+# Tell versions [3.59,3.63) of GNU make to not export all variables.
+# Otherwise a system limit (for SysV at least) may be exceeded.
+.NOEXPORT:
diff --git a/modules/development_tools/src/perl/check_makefileam.pl b/modules/development_tools/src/perl/check_makefileam.pl
new file mode 100755
index 000000000..ffe045d84
--- /dev/null
+++ b/modules/development_tools/src/perl/check_makefileam.pl
@@ -0,0 +1,276 @@
+#!/usr/bin/perl
+
+# Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+# Copyright (C) 2008 - INRIA - Pierre MARECHAL <pierre.marechal@inria.fr>
+#
+# This file must be used under the terms of the CeCILL.
+# This source file is licensed as described in the file COPYING, which
+# you should have received as part of this distribution. The terms
+# are also available at
+# http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
+
+use strict;
+use Cwd;
+use File::Basename;
+
+# Current directory
+my $directory = getcwd();
+
+if( dirname($0) ne '.' )
+{
+ $directory .= '/'.dirname($0);
+}
+
+if( dirname($0) =~ m/^\// )
+{
+ $directory = dirname($0);
+}
+
+# modules dir path
+my $sci_modules_dir = $directory;
+$sci_modules_dir =~ s/\/development_tools\/src\/perl//g;
+
+# Module list
+my %modules = get_module_list();
+
+foreach my $module (sort keys %modules)
+{
+ print $module;
+
+ my $nb_pb = 0;
+
+ my %list_makefile_headers = get_makefileam_list($module,'HEADERS');
+ my %list_real_headers = get_real_list($module,'HEADERS');
+
+ my $nb_makefile_headers = 0;
+ my $nb_real_headers = 0;
+
+ my $error_list = '';
+
+
+ foreach my $file (sort keys %list_makefile_headers)
+ {
+ $nb_makefile_headers++;
+
+ if( ! -e $sci_modules_dir.'/'.$module.'/'.$file )
+ {
+ $nb_pb++;
+ $error_list .= sprintf("\t".'% 3d - %s doesn\'t exist'."\n",$nb_pb,$file);
+ }
+ }
+
+ foreach my $file (sort keys %list_real_headers)
+ {
+ $nb_real_headers++;
+
+ if( ! exists( $list_makefile_headers{$file} ) )
+ {
+ $nb_pb++;
+ $error_list .= sprintf("\t".'% 3d - %s is not listed in the Makefile.am file'."\n",$nb_pb,$file);
+ }
+ }
+
+ if( $nb_pb == 0 )
+ {
+ for( my $i = length($module) ; $i <= 30 ; $i++ )
+ {
+ print ' ';
+ }
+ print 'OK';
+ printf(' [ % 4d include file(s) ]'."\n",$nb_makefile_headers);
+ }
+ else
+ {
+ print "\n".$error_list;
+ }
+}
+
+# ==============================================================================
+# get_makefileam_list
+# ==============================================================================
+
+sub get_makefileam_list()
+{
+ my $module = $_[0];
+
+ my $list_start = 0;
+ my @file_list_string;
+ my %list;
+
+ my $nb_blocs = 0;
+
+ unless( chdir($sci_modules_dir.'/'.$module) )
+ {
+ print $module.' : The directory '.$sci_modules_dir.'/'.$module.' doesn\'t exist or read access denied'."\n";
+ exit;
+ }
+
+ # Ouverture du fichier Makefile.am pour en extraire le bloc d'include
+ # ==========================================================================
+
+ unless( open(MAKEFILEAM,'Makefile.am') )
+ {
+ print $module.' : Makefile.am file doesn\'t exist or read access denied'."\n";
+ exit;
+ }
+
+ while(<MAKEFILEAM>)
+ {
+ # suppression du \n
+ chomp($_);
+
+ # Suppression des espaces en début et fin de chaîne
+ $_ =~ s/^\s+//;
+ $_ =~ s/\s+$//;
+
+ # Début de la list
+
+ if($_ =~ m/lib(.*)include_HEADERS/ )
+ {
+ $nb_blocs++;
+ $file_list_string[$nb_blocs] = '';
+ $list_start = 1;
+ }
+
+ # Traitement de la liste
+ if( $list_start == 1 )
+ {
+ $file_list_string[$nb_blocs] .= $_;
+
+ if( index($_,' \\') == -1 )
+ {
+ $list_start = 0;
+ }
+ }
+ }
+
+ close(MAKEFILEAM);
+
+ # parcours des blocs
+ # ==========================================================================
+
+ for( my $i=1 ; $i <= $nb_blocs ; $i++ )
+ {
+ # traitement du bloc d'include
+ # ======================================================================
+
+ # suppression des parties inutiles
+ # ================================
+
+ $file_list_string[$i] =~ s/\\/ /g;
+
+ # Suppression des espaces en début et fin de chaîne
+ my $rep = index( $file_list_string[$i] , '=' );
+ substr($file_list_string[$i],0,$rep+1) = '';
+
+ # Suppression des espaces en début et fin de chaîne
+ $file_list_string[$i] =~ s/^\s+//;
+ $file_list_string[$i] =~ s/\s+$//;
+
+ # Séparation des fichiers
+ my @files = split(/[[:blank:]]+/,$file_list_string[$i]);
+
+ foreach my $file (@files)
+ {
+ $list{$file} = 1;
+ }
+ }
+
+ return %list;
+}
+
+# ==============================================================================
+# get_real_list
+# ==============================================================================
+
+sub get_real_list()
+{
+ my $module = $_[0];
+
+ my $list_start = 0;
+ my $file_list_string = '';
+
+ my %list;
+
+ unless( chdir($sci_modules_dir.'/'.$module) )
+ {
+ print $module.' : The directory '.$sci_modules_dir.'/'.$module.' doesn\'t exist or read access denied'."\n";
+ exit;
+ }
+
+ my @files = <includes/*>;
+
+ foreach my $file (@files)
+ {
+ $list{$file} = 1;
+ }
+
+ return %list;
+}
+
+# ==============================================================================
+# get_module_list
+# ==============================================================================
+
+sub get_module_list
+{
+ my %list;
+
+ unless( chdir($sci_modules_dir) )
+ {
+ print 'The directory '.$sci_modules_dir.' doesn\'t exist or read access denied'."\n";
+ exit;
+ }
+
+ my @candidates = <*>;
+
+ foreach my $candidate (@candidates)
+ {
+ if( -e $sci_modules_dir.'/'.$candidate.'/Makefile.am' )
+ {
+ $list{$candidate} = 1;
+ }
+ }
+
+ return %list;
+}
+
+# ==============================================================================
+# search
+# ==============================================================================
+
+sub search
+{
+ my $dir = $_[0];
+ my $module = $_[1];
+
+ my $dirToPrint;
+ my @list_dir;
+
+ my $current_directory;
+ my $previous_directory = getcwd();
+
+ chdir($dir);
+
+ @list_dir = <*>;
+
+ foreach my $list_dir (@list_dir)
+ {
+ $current_directory = getcwd();
+
+ if( (-d $list_dir) && ($list_dir ne '.svn') )
+ {
+ search($current_directory.'/'.$list_dir,$module);
+ }
+
+ if( -f $list_dir )
+ {
+ my $file = $current_directory.'/'.$list_dir;
+ substr($file,0,length($sci_modules_dir.'/'.$module.'/')) = '';
+
+ print LIST $file.' ';
+ }
+ }
+
+ chdir($previous_directory);
+}
diff --git a/modules/development_tools/src/perl/xml2test/gateway_code_license.txt b/modules/development_tools/src/perl/xml2test/gateway_code_license.txt
new file mode 100755
index 000000000..2ea0ad338
--- /dev/null
+++ b/modules/development_tools/src/perl/xml2test/gateway_code_license.txt
@@ -0,0 +1,11 @@
+/*
+ * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ * Copyright (C) 2009-2010 - DIGITEO - Scilab Consortium Operational Team
+ *
+ * This file must be used under the terms of the CeCILL.
+ * This source file is licensed as described in the file COPYING, which
+ * you should have received as part of this distribution. The terms
+ * are also available at
+ * http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
+ *
+ */
diff --git a/modules/development_tools/src/perl/xml2test/includes.txt b/modules/development_tools/src/perl/xml2test/includes.txt
new file mode 100755
index 000000000..982531974
--- /dev/null
+++ b/modules/development_tools/src/perl/xml2test/includes.txt
@@ -0,0 +1,7 @@
+
+#include "stack-c.h"
+#include "Scierror.h"
+#include "localization.h"
+#include "sciprint.h"
+#include "api_scilab.h"
+#include "MALLOC.h"
diff --git a/modules/development_tools/src/perl/xml2test/scilab_code_license.txt b/modules/development_tools/src/perl/xml2test/scilab_code_license.txt
new file mode 100755
index 000000000..4aee5394f
--- /dev/null
+++ b/modules/development_tools/src/perl/xml2test/scilab_code_license.txt
@@ -0,0 +1,8 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2009-2010 - DIGITEO - Scilab Consortium Operational Team
+//
+// This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- CLI SHELL MODE -->
diff --git a/modules/development_tools/src/perl/xml2test/xml2test.pl b/modules/development_tools/src/perl/xml2test/xml2test.pl
new file mode 100755
index 000000000..3b481986a
--- /dev/null
+++ b/modules/development_tools/src/perl/xml2test/xml2test.pl
@@ -0,0 +1,526 @@
+#!/usr/bin/perl
+
+# Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+# Copyright (C) 2009-2010 - DIGITEO - Pierre MARECHAL <pierre.marechal@scilab.org>
+#
+# This file must be used under the terms of the CeCILL.
+# This source file is licensed as described in the file COPYING, which
+# you should have received as part of this distribution. The terms
+# are also available at
+# http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
+
+use strict;
+use Cwd;
+use File::Basename;
+use XML::Simple;
+
+# perl script directory
+# ------------------------------------------------
+
+my $directory = getcwd();
+
+if( dirname($0) ne '.' )
+{
+ $directory .= '/'.dirname($0);
+ $directory =~ s/\/\.\//\//g;
+}
+
+if( dirname($0) =~ m/^\// )
+{
+ $directory = dirname($0);
+}
+
+# SCI & modules paths
+# ------------------------------------------------
+
+my $SCI = $directory;
+$SCI =~ s/\/modules\/development_tools\/src\/perl\/xml2test//g;
+
+my $sci_modules_dir = $SCI.'/modules';
+
+
+# Managed languages
+# ------------------------------------------------
+my %languages;
+$languages{'en_US'} = 1;
+
+
+# Module list
+# ------------------------------------------------
+my %modules;
+if( $ARGV[0] ne '' )
+{
+ $modules{$ARGV[0]} = 1;
+}
+else
+{
+ %modules = get_module_list();
+}
+
+# modules dir path
+# ------------------------------------------------
+
+my %valid_tags;
+$valid_tags{'File_gateway'} = 1;
+$valid_tags{'File_scilab'} = 1;
+$valid_tags{'Lib_name'} = 1;
+$valid_tags{'Func_list'} = 1;
+
+# # XML list
+# ------------------------------------------------
+my %xmllist;
+
+
+
+# ==============================================================================
+# First step : get the XML list
+# ==============================================================================
+
+foreach my $module (sort keys %modules)
+{
+ foreach my $language (sort keys %languages)
+ {
+ my $this_directory = $sci_modules_dir.'/'.$module.'/help/'.$language;
+
+ if( -d $this_directory )
+ {
+ get_xml_list($this_directory,$module);
+ }
+ }
+}
+
+# ==============================================================================
+# Second step : parse each XML file
+# ==============================================================================
+
+my $xmllist_size = 0;
+
+foreach my $xmlfile (sort keys %xmllist)
+{
+ $xmllist_size++;
+}
+
+my $count = 0;
+
+foreach my $xmlfile (sort keys %xmllist)
+{
+ $count++;
+ my $module = $xmllist{$xmlfile};
+
+ my $xmlfile_print = 'SCI/modules'.substr($xmlfile,length($sci_modules_dir));
+ printf('%04d/%04d - %s'."\n",$count,$xmllist_size,$xmlfile_print);
+ my %tags = get_tag_values($xmlfile);
+
+ # Check found tags
+ # ==========================================================================
+
+ foreach my $tag (sort keys %valid_tags)
+ {
+ if( (! exists($tags{$tag}) ) || ($tags{$tag} eq '') )
+ {
+ print "\t".'ERROR : Tag "'.$tag.'" has not been found in the file "'.$xmlfile.'"'."\n";
+ exit(0);
+ }
+
+ if( $tag eq 'File_gateway' )
+ {
+ unless( $tags{$tag} =~ m/^SCI(.)*\.(c|cpp)$/ )
+ {
+ print "\t".'ERROR : Value of the tag "'.$tag.'" found in the file "'.$xmlfile.'" is not valid'."\n";
+ exit(0);
+ }
+ }
+
+ if( $tag eq 'File_scilab' )
+ {
+ unless( $tags{$tag} =~ m/^SCI(.)*\.(tst)$/ )
+ {
+ print "\t".'ERROR : Value of the tag "'.$tag.'" found in the file "'.$xmlfile.'" is not valid'."\n";
+ exit(0);
+ }
+ }
+ }
+
+ # Get the test content
+ # ==========================================================================
+
+ $tags{'scilab_code'} = get_scilab_code($xmlfile);
+
+ if( $tags{'scilab_code'} eq '' )
+ {
+ print "\t".'ERROR : The scilab code has not been found in the file "'.$xmlfile.'"'."\n";
+ exit(0);
+ }
+
+ # Get the gateway content
+ # ==========================================================================
+
+ $tags{'gateway_code'} = get_gateway_code($xmlfile);
+
+ if( $tags{'gateway_code'} eq '' )
+ {
+ print "\t".'ERROR : The gateway code has not been found in the file "'.$xmlfile.'"'."\n";
+ exit(0);
+ }
+
+ # write the gateway code
+ # ==========================================================================
+
+ my $gateway_file = $tags{'File_gateway'};
+ $gateway_file = $SCI . substr($gateway_file,3);
+ write_gateway_code($gateway_file,\%tags);
+ print "\t".'The file "'.$gateway_file.'" code has been created'."\n";
+
+
+ # write the scilab code
+ # ==========================================================================
+
+ my $scilab_file = $tags{'File_scilab'};
+ $scilab_file = $SCI . substr($scilab_file,3);
+ write_scilab_code($scilab_file,\%tags);
+ print "\t".'The file "'.$scilab_file.'" code has been created'."\n";
+
+}
+
+
+
+# ==============================================================================
+# get_module_list
+# ==============================================================================
+
+sub get_module_list
+{
+ my %list;
+
+ unless( chdir($sci_modules_dir) )
+ {
+ print 'The directory '.$sci_modules_dir.' doesn\'t exist or read access denied'."\n";
+ del_tmp_file();
+ exit(0);
+ }
+
+ my @candidates = <*>;
+
+ foreach my $candidate (@candidates)
+ {
+ if( -e $sci_modules_dir.'/'.$candidate.'/help' )
+ {
+ $list{$candidate} = 1;
+ }
+ }
+
+ return %list;
+}
+
+# ==============================================================================
+# get_xml_list
+# ==============================================================================
+
+sub get_xml_list
+{
+ my $dir = $_[0];
+ my $module = $_[1];
+
+ my @list_dir;
+
+ my $current_directory;
+
+ # On enregistre le répertoire dans lequel on se situe à l'entrée de la fonction
+ my $previous_directory = getcwd();
+
+ chdir($dir);
+
+ @list_dir = <*>;
+
+ foreach my $list_dir (@list_dir)
+ {
+ $current_directory = getcwd();
+
+ if( (-d $list_dir) && ( ! ($list_dir =~ m/^scilab_[a-z][a-z]_[A-Z][A-Z]_help$/ )) )
+ {
+ get_xml_list($current_directory.'/'.$list_dir,$module);
+ }
+
+ if( (-f $list_dir)
+ && ($list_dir =~ m/\.xml$/)
+ && ($list_dir ne 'master.xml')
+ && ($list_dir ne 'master_help.xml') )
+ {
+ unless( open(XMLFILE,$list_dir) )
+ {
+ die 'get_xml_list: The file "'.$current_directory.'/'.$list_dir.'" cannot be opened'."\n";
+ }
+
+ while(<XMLFILE>)
+ {
+ $_ =~ s/^\s+//;
+ $_ =~ s/\s+$//;
+
+ if( $_ =~ /^<!--File_gateway:\s(.)+-->$/ )
+ {
+ $xmllist{$current_directory.'/'.$list_dir} = $module;
+ last;
+ }
+ }
+
+ close(XMLFILE);
+ }
+ }
+
+ chdir($previous_directory);
+}
+
+# ==============================================================================
+# get_tag_values
+# ==============================================================================
+
+sub get_tag_values
+{
+ my $xmlfile = $_[0];
+ my %tags;
+
+ unless( open(XMLFILE,$xmlfile) )
+ {
+ die 'get_tag_values: The file "'.$xmlfile.'" cannot be opened'."\n";
+ }
+
+ while(<XMLFILE>)
+ {
+ $_ =~ s/^\s+//;
+ $_ =~ s/\s+$//;
+
+ if( $_ =~ /^<!--[A-Z][a-z_]*:\s(.)+-->$/ )
+ {
+ $_ =~ s/<!--//;
+ $_ =~ s/-->//;
+ $_ =~ s/^\s+//;
+ $_ =~ s/\s+$//;
+
+ my $start = index($_,':');
+ my $tag = substr($_,0,$start);
+
+ if( ! exists($valid_tags{$tag}) )
+ {
+ next;
+ }
+
+ my $value = substr($_,$start+1);
+ $value =~ s/^\s+//;
+ $value =~ s/\s+$//;
+
+ $tags{$tag} = $value;
+ }
+ }
+
+ close(XMLFILE);
+
+ return %tags;
+}
+
+# ==============================================================================
+# get_gateway_code
+# ==============================================================================
+
+sub get_gateway_code
+{
+ my $xmltree = XMLin($_[0]); # $_[0] : path absolu du fichier XML
+
+ my $refsections = $xmltree->{'refsection'};
+ my @fields = @$refsections;
+
+ foreach my $field (@fields)
+ {
+ if( (exists($field->{'programlisting'}->{'role'}) ) &&
+ ($field->{'programlisting'}->{'role'} eq 'code_gateway') )
+ {
+ $field->{'programlisting'}->{'content'} =~ s/\s+\n/\n/g;
+ return $field->{'programlisting'}->{'content'}."\n";
+ }
+ }
+
+ return '';
+}
+
+# ==============================================================================
+# get_scilab_code
+# ==============================================================================
+
+sub get_scilab_code
+{
+ my $xmltree = XMLin($_[0]); # $_[0] : path absolu du fichier XML
+
+ my $refsections = $xmltree->{'refsection'};
+ my @fields = @$refsections;
+
+ foreach my $field (@fields)
+ {
+ if((exists($field->{'programlisting'}->{'role'}) )
+ && ($field->{'programlisting'}->{'role'} eq 'code_scilab'))
+ {
+ my $scilab_code = $field->{'programlisting'}->{'content'}."\n";
+ $scilab_code =~ s/\s+\n/\n/g;
+ $scilab_code =~ s/then(\s)+error\((\s)*\"failed\"(\s)*\)(\s)*[;,](\s)*end/then pause;end/g;
+ return $scilab_code;
+ }
+ }
+
+ return '';
+}
+
+# ==============================================================================
+# write_gateway_code
+# ==============================================================================
+
+sub write_gateway_code
+{
+ my $fileout = $_[0];
+ my $tagsref = $_[1];
+ my %tags = %$tagsref;
+
+ unless( open(FILEOUT,'> '.$fileout) )
+ {
+ print "\t".'Le fichier "'.$fileout.'" n\'a pu être ouvert en écriture'."\n";
+ exit(0);
+ }
+
+ # Ecriture de l'entête
+ # ==========================================================================
+
+ unless( open(LICENSE,$directory.'/gateway_code_license.txt') )
+ {
+ print "\t".'Le fichier "'.$directory.'/gateway_code_license.txt" n\'a pu être ouvert en lecture'."\n";
+ exit(0);
+ }
+
+ while(<LICENSE>)
+ {
+ print FILEOUT $_;
+ }
+
+ close(LICENSE);
+
+ # Ecriture des includes
+ # ==========================================================================
+
+ unless( open(INCLUDES,$directory.'/includes.txt') )
+ {
+ print "\t".'Le fichier "'.$directory.'/includes.txt" n\'a pu être ouvert en lecture'."\n";
+ exit(0);
+ }
+
+ while(<INCLUDES>)
+ {
+ print FILEOUT $_;
+ }
+
+ close(INCLUDES);
+
+ # Ecriture du code
+ # ==========================================================================
+ $tags{'gateway_code'} =~ s/\s+\n/\n/g;
+ print FILEOUT $tags{'gateway_code'};
+
+ # Fermeture du fichier de sortie
+ # ==========================================================================
+ close(FILEOUT);
+}
+
+# ==============================================================================
+# write_scilab_code
+# ==============================================================================
+
+sub write_scilab_code
+{
+ my $fileout = $_[0];
+ my $tagsref = $_[1];
+ my %tags = %$tagsref;
+
+ # TMPDIR management
+ # ==========================================================================
+
+ my $TMPDIR = basename($fileout);
+ $TMPDIR =~ s/\.tst$//g;
+ $TMPDIR = 'pathconvert(TMPDIR+"/'.$TMPDIR.'")';
+
+ # table management (ilib_build 2nd input argument)
+ # ==========================================================================
+
+ my @functions = split(/,/,$tags{'Func_list'});
+
+ my $table_str = '[';
+
+ for( my $i=0 ; $i<length(@functions) ; $i++ )
+ {
+ if( $i > 0)
+ {
+ $table_str .= ';';
+ }
+
+ $table_str .= '"'.$functions[$i].'","'.$functions[$i].'"';
+ }
+
+ $table_str .= ']';
+
+
+ # C file management
+ # ==========================================================================
+
+ my $cfile = 'SCI+"'.substr($tags{'File_gateway'},3).'"';
+
+ my $cfiletmpdir = basename($fileout);
+ $cfiletmpdir =~ s/\.tst$//g;
+ $cfiletmpdir = 'pathconvert(TMPDIR+"/'.$cfiletmpdir.'/'.basename(substr($tags{'File_gateway'},3)).'",%F)';
+
+ # Open the fileout file
+ # ==========================================================================
+
+ unless( open(FILEOUT,'> '.$fileout) )
+ {
+ print "\t".'Le fichier "'.$fileout.'" n\'a pu être ouvert en écriture'."\n";
+ exit(0);
+ }
+
+ # Ecriture de l'entête
+ # ==========================================================================
+
+ unless( open(LICENSE,$directory.'/scilab_code_license.txt') )
+ {
+ print "\t".'Le fichier "'.$directory.'/scilab_code_license.txt" n\'a pu être ouvert en lecture'."\n";
+ exit(0);
+ }
+
+ while(<LICENSE>)
+ {
+ print FILEOUT $_;
+ }
+
+ close(LICENSE);
+
+ # Ecriture de la ligne ilib_build
+ # ==========================================================================
+
+ print FILEOUT 'ilib_verbose(0);'."\n";
+ print FILEOUT 'mkdir('.$TMPDIR.');'."\n";
+ print FILEOUT 'cd('.$TMPDIR.');'."\n";
+ print FILEOUT 'copyfile('.$cfile.','.$cfiletmpdir.');'."\n";
+ print FILEOUT 'cflags = "-I"+SCI+"/modules/localization/includes";'."\n";
+
+ print FILEOUT 'ilib_build(';
+ print FILEOUT '"'.$tags{'Lib_name'}.'",'; # lib_name
+ print FILEOUT $table_str.','; # table
+ print FILEOUT '"'.basename(substr($tags{'File_gateway'},3)).'",'; # files
+ print FILEOUT '[],'; # libs
+ print FILEOUT '"",'; # makename
+ print FILEOUT '"",'; # ldflags
+ print FILEOUT 'cflags);'."\n"; # cflags
+
+ print FILEOUT 'exec("loader.sce");'."\n";
+
+ # Ecriture du code
+ # ==========================================================================
+ print FILEOUT $tags{'scilab_code'};
+
+ # Fermeture du fichier de sortie
+ # ==========================================================================
+ close(FILEOUT);
+}