ccmatrix1.cc File Reference

#include <iostream>
#include "ccmatrix.h"
#include <stdio.h>
#include <string.h>
#include "stack-c.h"

Include dependency graph for ccmatrix1.cc:

Go to the source code of this file.

Data Structures
class	SciError
Functions
int	SendScilabJob (char *)
void	cc_test ()
Variables
static char	buf [256]

---

Function Documentation

void cc_test

(

)

Definition at line 72 of file ccmatrix1.cc.

References A, and B.

Referenced by MAIN__().

{
  CMatrix A("a","ones(2,2)");
  CMatrix B("b","8");
  A.plus(B);
  A.scijob("disp(%s);");
  A.scijob("%s=rand(2,2)");
  A.print();
  A.inv();
  A.print();
}

Here is the caller graph for this function:

int SendScilabJob

(

char *

)

Definition at line 17 of file SendScilabJobs.c.

Referenced by CMatrix::CMatrix(), deuxieme_exemple(), example1(), example2(), CMatrix::inv(), my_job(), my_ode_job(), my_plot(), CMatrix::plus(), premier_exemple(), CMatrix::scijob(), send_scilab_job(), and SendScilabJobs().

{
        int retCode = -1;
        int lencommand=0;
        static char *command=NULL;
        
        char ScirunCommand[]="Err=execstr(TMP_EXEC_STRING,\"errcatch\",\"n\");quit;";
        char ClearTmpVariables[]="clear TMP_EXEC_STRING;clear Err;quit;";
        
        lencommand=strlen(job);
        command=MALLOC(sizeof(char)*(lencommand+1));

        if (command)
        {
                /* clear prev. Err , TMP_EXEC_STRING scilab variables */
                C2F(scirun)(ClearTmpVariables,strlen(ClearTmpVariables));

                strcpy(command,job);
                SetLastJob(command);

                /* Creation Variable temporaire dans Scilab */
                if (!C2F(cwritechain)("TMP_EXEC_STRING",&lencommand,(char*)command,(int)strlen("TMP_EXEC_STRING"),(int)strlen(command)) )
                {
                        /* Probleme */
                        fprintf(stderr,"Error : SendScilabJob (1) 'TMP_EXEC_STRING'.\n");
                        retCode = -1;

                        if (command) {FREE(command);command=NULL;}
                        return retCode;
                }
                else
                {
                        int m=0,n=0,lp=0;

                        C2F(scirun)(ScirunCommand,strlen(ScirunCommand));

                        /* get error code from scilab */

                        if ( ! C2F(cmatptr)("Err", &m, &n, &lp,strlen("Err")))
                        {
                                fprintf(stderr,"Error : SendScilabJob (2) 'Err'.\n");
                                retCode = -2;
                        }
                        else
                        {
                                if (m*n == 1)
                                {
                                        double code = -1;
                                        ReadMatrix("Err", &m, &n, &code);
                                        retCode = (int) code ;
                                }
                                else 
                                {
                                        fprintf(stderr,"Error : SendScilabJob (3) 'Err'.\n");   
                                        retCode = -3;
                                }
                        }

                        /* clear prev. Err , TMP_EXEC_STRING scilab variables */
                        C2F(scirun)(ClearTmpVariables,strlen(ClearTmpVariables));
                }
                if (command) {FREE(command);command=NULL;}
        }
        else
        {
                fprintf(stderr,"Error : SendScilabJob (4) 'command' MALLOC.\n");
                retCode = -4;
        }

        return retCode;
}

Here is the caller graph for this function:

---

Variable Documentation

char buf[256] [static]

Definition at line 19 of file ccmatrix1.cc.

Referenced by __PARAMS(), _XawTextMBToWC(), _XawTextSearch(), bang(), bouncexy(), BuildEvent(), C2F(), changedtype(), ClassInitialize(), ClassPartInitialize(), CMatrix::CMatrix(), cmscope(), comlen(), comm_union_name(), create_argv(), createblklist(), cscope(), ctrl_key(), dataname(), DebugGW(), DebugGW1(), displaynumbers(), displaynumbersGif(), displaynumbersPos(), displaynumbersXfig(), DisplayText(), do_osc(), do_p1_charp(), do_p1_fortran(), do_string(), do_xxscanf(), DoExtension(), DoInsert(), dsort(), equiv_name(), errmsg(), Evaluate(), ExecuteCommand(), ExploreMenu(), ExposeMessageWindow(), ExposeMessageWindow1(), f__icvt(), f_inqu(), f_open(), gdImageCreateFromGif(), GetBitmapInfo(), GetCode_(), getcomp(), getenv_(), getenvc(), getpath(), getsci(), getscihome(), gettmpdir(), GetVal(), HandleToolkitErrors(), InsertNewCRs(), int_objfscanf(), intgetscicosvarsc(), intscicosimc(), CMatrix::inv(), ioseta(), key_pressed(), key_released(), Len(), lit_name(), LoadGraphMacros(), LoadMacros(), loadwave(), LWZReadByte_(), main(), mexprintf(), mexPrintf(), mixed_type(), Multiply(), mxArrayToString(), MyStrncpy(), new_arg_length(), newentry(), nextdata(), opconv_fudge(), OpenIM(), parse(), CMatrix::plus(), putpower(), readnextline(), run(), savewave(), sci_plot3d(), sci_xclick(), sci_xget(), sci_xlfont(), sci_xpoly(), sci_xset(), sci_xstringl(), sci_xtitle(), SciChMenu(), SciDelMenu(), scig_click_handler_sci(), scig_deletegwin_handler_sci(), CMatrix::scijob(), sciprint_nd(), scipvmstart(), SciSetMenu(), Search(), SelMenu(), SendGraphMacro(), SendMacro(), set_tmp_names(), setbound(), SetFunction(), SetResourceByName(), SetSci(), settmpdir(), string_num(), StripOutOldCRs(), temp_name(), to_upper(), TransposeCharacters(), trimunder(), unparseputc(), user_label(), warni(), wininfo(), WriteArgCheck(), WriteCallRest(), WriteVariableOutput(), wrt_E(), wrt_F(), and x_rsne().

---