All-extern.h File Reference

#include "scirun.h"
#include "sciquit.h"

Include dependency graph for All-extern.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Defines
#define	__PARAMS(paramlist)   ()
Functions
int	C2F (scilab) __PARAMS((int *nostartup))
int	C2F (scilines) __PARAMS((int *nl
void	C2F (setfbutn) __PARAMS((char *name
int	C2F (inisci) __PARAMS((int *
int int int *int Scierror	__PARAMS ((int iv, char *fmt,...))
int	C2F (deletewin) __PARAMS((integer *number))
void SGDeleteWindow	__PARAMS ((Widget w, XEvent *event, String *params, Cardinal *num_params))
void ChangeBandF	__PARAMS ((int win_num, Pixel fg, Pixel bg))
int	C2F (delbtn) __PARAMS((integer *win_num
void AddMenu	__PARAMS ((integer *win_num, char *button_name, char **entries, integer *ne, integer *typ, char *fname, integer *ierr))
int	C2F (addmen) __PARAMS((integer *win_num
int	C2F (setmen) __PARAMS((integer *win_num
int	C2F (unsmen) __PARAMS((integer *win_num
void SetXsciOn	__PARAMS ((void))
int	C2F (xscion) __PARAMS((int *i))
void DisplayInit	__PARAMS ((char *string, Display **dpy, Widget *toplevel))
int Xorgetchar	__PARAMS ((int interrupt))
int	C2F (sxevents) __PARAMS((void))
void popup_choice_panel	__PARAMS ((Widget tool))
void create_color_panel	__PARAMS ((Widget form, Widget cancel))
void cancel_color_popup	__PARAMS ((Widget w, XtPointer dum1, XtPointer dum2))
void FileG1	__PARAMS ((Widget w, XtPointer closure, caddr_t call_data))
void getMenuBut0	__PARAMS ((Widget *w))
void MenuFixCurrentWin	__PARAMS ((int ivalue))
void CreateCommandPanel	__PARAMS ((Widget parent))
void write_scilab	__PARAMS ((char *s))
void DisableWindowResize	__PARAMS ((Widget w))
void bell	__PARAMS ((int volume))
char *concat	__PARAMS ((char *s1, char *s2))
XtEventHandler UseMessage	__PARAMS ((Widget w, Widget child, XClientMessageEvent *e))
void UpdateFileLabel	__PARAMS ((char *string))
void UpdateLineLabel	__PARAMS ((Cardinal line))
void UpdateMessageWindow	__PARAMS ((char *format, char *arg))
void AddNewMenu	__PARAMS ((Widget parent, Widget drawbox))
int panel_set_value	__PARAMS ((Widget widg, char *val))
char *panel_get_value	__PARAMS ((Widget widg))
void paste_panel_key	__PARAMS ((Widget w, XKeyEvent *event))
void file_msg	__PARAMS ((char *format, char *arg1))
void clear_file_message	__PARAMS ((Widget w, XButtonEvent *ev))
int emptyname	__PARAMS ((char *name))
int emptyname_msg	__PARAMS ((char *name, char *msg))
int change_directory	__PARAMS ((char *path))
void set_temp_wf_cursor	__PARAMS ((Cursor cursor))
void parseuserpath	__PARAMS ((char *path, char *longpath))
int exec_file	__PARAMS ((char *dir, char *file))
void ok_prep	__PARAMS ((char *filemask, char *dirname, char *title, int flag, int *err))
void popup_file_panel	__PARAMS ((Widget w, char *))
void init_msg	__PARAMS ((Widget tool, Widget vert_w, int ch, char *filename))
void update_cur_filename	__PARAMS ((char *newname))
void put_msg	__PARAMS ((char *,...))
void FOpAddInfoHandler	__PARAMS ((Widget widget, char *message))
void setup_sizes	__PARAMS ((int new_canv_wd, int new_canv_ht))
Variables
int int *	nc
void int *	rep
int char *	button_name
int char *	button_name
int char integer *	entries
int char integer integer *	ptrentries
int char integer integer integer *	ne
int char integer integer integer integer *	typ
int char integer integer integer integer char *	fname
int char integer integer integer integer char integer *	ierr
int char *	button_name
int char integer *	entries
int char integer integer *	ptrentries
int char integer integer integer *	ne
int char integer integer integer integer *	ierr
int char *	button_name
int char integer *	entries
int char integer integer *	ptrentries
int char integer integer integer *	ne
int char integer integer integer integer *	ierr

---

Define Documentation

#define __PARAMS

(

paramlist

)

()

Definition at line 7 of file All-extern.h.

---

Function Documentation

void setup_sizes __PARAMS

(

(int new_canv_wd, int new_canv_ht)

)

void FOpAddInfoHandler __PARAMS

(

(Widget widget, char *message)

)

void put_msg __PARAMS

(

(char *,...)

)

void update_cur_filename __PARAMS

(

(char *newname)

)

void init_msg __PARAMS

(

(Widget tool, Widget vert_w, int ch, char *filename)

)

void popup_file_panel __PARAMS

(

(Widget w, char *)

)

void ok_prep __PARAMS

(

(char *filemask, char *dirname, char *title, int flag, int *err)

)

int exec_file __PARAMS

(

(char *dir, char *file)

)

void parseuserpath __PARAMS

(

(char *path, char *longpath)

)

void set_temp_wf_cursor __PARAMS

(

(Cursor cursor)

)

int change_directory __PARAMS

(

(char *path)

)

int emptyname_msg __PARAMS

(

(char *name, char *msg)

)

int emptyname __PARAMS

(

(char *name)

)

void clear_file_message __PARAMS

(

(Widget w, XButtonEvent *ev)

)

void file_msg __PARAMS

(

(char *format, char *arg1)

)

void paste_panel_key __PARAMS

(

(Widget w, XKeyEvent *event)

)

char* panel_get_value __PARAMS

(

(Widget widg)

)

int panel_set_value __PARAMS

(

(Widget widg, char *val)

)

void AddNewMenu __PARAMS

(

(Widget parent, Widget drawbox)

)

void UpdateMessageWindow __PARAMS

(

(char *format, char *arg)

)

void UpdateLineLabel __PARAMS

(

(Cardinal line)

)

void UpdateFileLabel __PARAMS

(

(char *string)

)

Definition at line 12 of file fileio.c.

{
  char buf[128];
  int n=1;
  int lnchar=0,ntok=-1;
  int length = strlen(string)+1;

  if (string != 0)
        { 
    sscanf(string,"%*[ \t\n]%n",&lnchar);
    while ( n != 0 && n != EOF && lnchar <= length  )
                { 
                        int nchar1=0,nchar2=0;
                        ntok++;
                        n= sscanf(&(string[lnchar]),"%[^ \n\t]%n%*[ \t\n]%n",buf,&nchar1,&nchar2);
                        lnchar += (nchar2 <= nchar1) ? nchar1 : nchar2 ;
                }

    return(ntok);
  }
  return(FAIL);
}

XtEventHandler UseMessage __PARAMS

(

(Widget w, Widget child, XClientMessageEvent *e)

)

char* concat __PARAMS

(

(char *s1, char *s2)

)

void bell __PARAMS

(

(int volume)

)

void DisableWindowResize __PARAMS

(

(Widget w)

)

void write_scilab __PARAMS

(

(char *s)

)

void CreateCommandPanel __PARAMS

(

(Widget parent)

)

void MenuFixCurrentWin __PARAMS

(

(int ivalue)

)

void getMenuBut0 __PARAMS

(

(Widget *w)

)

void FileG1 __PARAMS

(

(Widget w, XtPointer closure, caddr_t call_data)

)

void cancel_color_popup __PARAMS

(

(Widget w, XtPointer dum1, XtPointer dum2)

)

void create_color_panel __PARAMS

(

(Widget form, Widget cancel)

)

void popup_choice_panel __PARAMS

(

(Widget tool)

)

int Xorgetchar __PARAMS

(

(int interrupt)

)

void DisplayInit __PARAMS

(

(char *string, Display **dpy, Widget *toplevel)

)

void SetXsciOn __PARAMS

(

(void)

)

void AddMenu __PARAMS

(

(integer *win_num, char *button_name, char **entries, integer *ne, integer *typ, char *fname, integer *ierr)

)

void ChangeBandF __PARAMS

(

(int win_num, Pixel fg, Pixel bg)

)

void SGDeleteWindow __PARAMS

(

(Widget w, XEvent *event, String *params, Cardinal *num_params)

)

int int int* int Scierror __PARAMS

(

(int iv, char *fmt,...)

)

int C2F

(

sxevents

)

int C2F

(

xscion

)

Definition at line 15 of file sci_mscanf.c.

References args, buf, C2F, CheckRhs, cstk, data, do_xxscanf(), err, GetRhsVar, iflag, interrupt, istk, len, m1, MAXSCAN, MAXSTR, MEM_LACK, MISMATCH, n1, Nbvars, Rhs, StringConvert(), and xscion().

{
        static char String[MAXSTR];
        static int l1, m1, n1, len= MAXSTR-1,iarg,maxrow,nrow,rowcount,ncol;
        int args,retval,retval_s,lline,status,iflag,err,n_count;
        int interrupt=0;
        entry *data;
        rec_entry buf[MAXSCAN];
        sfdir  type[MAXSCAN],type_s[MAXSCAN];

        Nbvars = 0;
        CheckRhs(1,2);
        if (Rhs==2) 
        {
                GetRhsVar(1,"i",&m1,&n1,&l1);
                if (m1*n1 != 1) 
                {
                        Scierror(999,"Error: in scanf: incorrect first argument\r\n");
                        return 0;
                }
                iarg=2;
                maxrow=*istk(l1);
        }
        else 
        {
                iarg=1;
                maxrow=1;
        }

        GetRhsVar(iarg,"c",&m1,&n1,&l1); 
        n_count=StringConvert(cstk(l1))+1;  /* conversion */

        C2F(xscion)(&iflag);

        if (n_count>1) 
        {
                Scierror(999,"Error: in scanf: format cannot include \\n \r\n");
                return 0;
        }

        nrow=maxrow; 
        rowcount = -1; /* number-1 of result lines already got */
        while (1)
        {
                rowcount++;
                if ((maxrow >= 0) && (rowcount >= maxrow)) break;

                /* get a line */
                C2F(xscion)(&iflag);
                C2F(zzledt)(String,&len,&lline,&status,&interrupt,&iflag,strlen(String));

                if(status != 0) 
                {
                        Scierror(999,"Error: in scanf\r\n");
                        return 0;
                }

                if (lline == 0) {String[0] = ' ';lline=1;}
                args = Rhs; /* args set to Rhs on entry */
                if (do_xxscanf("scanf",(FILE *) 0,cstk(l1),&args,String,&retval,buf,type) < 0) return 0;

                if ( retval == EOF)
                {
                        /* 
                        Scierror(999,"Error: in %s: end of file reached\r\n",fname);
                        return 0;
                        */
                }

                if ((err=Store_Scan(&nrow,&ncol,type_s,type,&retval,&retval_s,buf,&data,rowcount,args)) <0 )
                {
                        switch (err)
                        {
                        case MISMATCH:
                                if (maxrow>=0)
                                {
                                        Free_Scan(rowcount,ncol,type_s,&data);
                                        Scierror(999,"Error: in fscanf: data mismatch\r\n");
                                        return 0;
                                }
                                break;

                        case MEM_LACK:
                                Free_Scan(rowcount,ncol,type_s,&data);
                                Scierror(999,"Error: in scanf: cannot allocate more memory \r\n");
                                return 0;
                                break;
                        }

                        if (err ==MISMATCH) break;
                }
        } /*  while (1) */

        /* create Scilab variables with each column of data */
        err=Sci_Store(rowcount,ncol,data,type_s,retval_s);
        Free_Scan(rowcount,ncol,type_s,&data);
        if (err==MEM_LACK) { Scierror(999,"Error: in sscanf: cannot allocate more memory \r\n");}
        return 0;
} 

Here is the call graph for this function:

int C2F

(

unsmen

)

int C2F

(

setmen

)

int C2F

(

addmen

)

int C2F

(

delbtn

)

int C2F

(

deletewin

)

int C2F

(

inisci

)

void C2F

(

setfbutn

)

int C2F

(

scilines

)

int C2F

(

scilab

)

---

Variable Documentation

int char* button_name

Definition at line 34 of file All-extern.h.

int char* button_name

Definition at line 33 of file All-extern.h.

int char* button_name

Definition at line 32 of file All-extern.h.

int char* button_name

Definition at line 30 of file All-extern.h.

int char integer* entries

Definition at line 34 of file All-extern.h.

Referenced by adjust_arginfo(), count_args(), create_menu(), do_p1_head(), enddcl(), entry_goto(), entrypt(), fix_entry_returns(), mkfunct(), procinit(), putentries(), startproc(), test_menu(), and type_fixup().

int char integer* entries

Definition at line 33 of file All-extern.h.

int char integer* entries

Definition at line 32 of file All-extern.h.

int char integer integer integer integer char* fname

Definition at line 32 of file All-extern.h.

int char integer integer integer integer* ierr

Definition at line 34 of file All-extern.h.

int char integer integer integer integer* ierr

Definition at line 33 of file All-extern.h.

int char integer integer integer integer char integer* ierr

Definition at line 32 of file All-extern.h.

int int* nc

Definition at line 17 of file All-extern.h.

int char integer integer integer* ne

Definition at line 34 of file All-extern.h.

int char integer integer integer* ne

Definition at line 33 of file All-extern.h.

int char integer integer integer* ne

Definition at line 32 of file All-extern.h.

Referenced by initgraphic(), n_elt(), pak_object_info(), PLD_strstr(), Rot3D(), sci_object_walk(), test_menu(), and Zoom().

int char integer integer* ptrentries

Definition at line 34 of file All-extern.h.

int char integer integer* ptrentries

Definition at line 33 of file All-extern.h.

int char integer integer* ptrentries

Definition at line 32 of file All-extern.h.

void int* rep

Definition at line 18 of file All-extern.h.

Referenced by ActionNotify(), C2F(), CopyWait(), cre_listsmat_from_str(), cre_listsparse_from_ptr(), cre_smat_from_str(), cre_sparse_from_ptr(), ExposePrintdialogWindow(), GetFileWindow(), GetFuncPtr(), iswarningon(), Load(), mexEvalString(), playsound(), prtdlg(), rhs_opt_find(), Save(), Sci_dlopen(), sci_xclick(), SciChoice(), SciChoiceI(), scilab_timer_check(), ScilabMenuAction(), ScilabPsToEps(), ScilabPsToTeX(), SelMenu(), SendReport(), setfschur(), setfydot2(), setgshsel(), setgzhsel(), setschsel(), setzchsel(), withgtk(), withgui(), withjavasci(), withmodelicac(), withmsdos(), withpvm(), withscicos(), withtk(), xchoices(), xdialg(), xdialg1(), xgetfile(), xmatdg(), xmdial(), and xmsg().

int char integer integer integer integer* typ

Definition at line 32 of file All-extern.h.

---