[BACK]Return to ifplot.h CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / plot

Annotation of OpenXM_contrib2/asir2000/plot/ifplot.h, Revision 1.12

1.2       noro        1: /*
                      2:  * Copyright (c) 1994-2000 FUJITSU LABORATORIES LIMITED
                      3:  * All rights reserved.
                      4:  *
                      5:  * FUJITSU LABORATORIES LIMITED ("FLL") hereby grants you a limited,
                      6:  * non-exclusive and royalty-free license to use, copy, modify and
                      7:  * redistribute, solely for non-commercial and non-profit purposes, the
                      8:  * computer program, "Risa/Asir" ("SOFTWARE"), subject to the terms and
                      9:  * conditions of this Agreement. For the avoidance of doubt, you acquire
                     10:  * only a limited right to use the SOFTWARE hereunder, and FLL or any
                     11:  * third party developer retains all rights, including but not limited to
                     12:  * copyrights, in and to the SOFTWARE.
                     13:  *
                     14:  * (1) FLL does not grant you a license in any way for commercial
                     15:  * purposes. You may use the SOFTWARE only for non-commercial and
                     16:  * non-profit purposes only, such as academic, research and internal
                     17:  * business use.
                     18:  * (2) The SOFTWARE is protected by the Copyright Law of Japan and
                     19:  * international copyright treaties. If you make copies of the SOFTWARE,
                     20:  * with or without modification, as permitted hereunder, you shall affix
                     21:  * to all such copies of the SOFTWARE the above copyright notice.
                     22:  * (3) An explicit reference to this SOFTWARE and its copyright owner
                     23:  * shall be made on your publication or presentation in any form of the
                     24:  * results obtained by use of the SOFTWARE.
                     25:  * (4) In the event that you modify the SOFTWARE, you shall notify FLL by
1.3       noro       26:  * e-mail at risa-admin@sec.flab.fujitsu.co.jp of the detailed specification
1.2       noro       27:  * for such modification or the source code of the modified part of the
                     28:  * SOFTWARE.
                     29:  *
                     30:  * THE SOFTWARE IS PROVIDED AS IS WITHOUT ANY WARRANTY OF ANY KIND. FLL
                     31:  * MAKES ABSOLUTELY NO WARRANTIES, EXPRESSED, IMPLIED OR STATUTORY, AND
                     32:  * EXPRESSLY DISCLAIMS ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS
                     33:  * FOR A PARTICULAR PURPOSE OR NONINFRINGEMENT OF THIRD PARTIES'
                     34:  * RIGHTS. NO FLL DEALER, AGENT, EMPLOYEES IS AUTHORIZED TO MAKE ANY
                     35:  * MODIFICATIONS, EXTENSIONS, OR ADDITIONS TO THIS WARRANTY.
                     36:  * UNDER NO CIRCUMSTANCES AND UNDER NO LEGAL THEORY, TORT, CONTRACT,
                     37:  * OR OTHERWISE, SHALL FLL BE LIABLE TO YOU OR ANY OTHER PERSON FOR ANY
                     38:  * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, PUNITIVE OR CONSEQUENTIAL
                     39:  * DAMAGES OF ANY CHARACTER, INCLUDING, WITHOUT LIMITATION, DAMAGES
                     40:  * ARISING OUT OF OR RELATING TO THE SOFTWARE OR THIS AGREEMENT, DAMAGES
                     41:  * FOR LOSS OF GOODWILL, WORK STOPPAGE, OR LOSS OF DATA, OR FOR ANY
                     42:  * DAMAGES, EVEN IF FLL SHALL HAVE BEEN INFORMED OF THE POSSIBILITY OF
                     43:  * SUCH DAMAGES, OR FOR ANY CLAIM BY ANY OTHER PARTY. EVEN IF A PART
                     44:  * OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY
                     45:  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
                     46:  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
                     47:  *
1.12    ! noro       48:  * $OpenXM: OpenXM_contrib2/asir2000/plot/ifplot.h,v 1.11 2002/08/02 08:59:47 noro Exp $
1.2       noro       49: */
1.7       noro       50: #if defined(VISUAL)
1.4       noro       51: /* for Visual C++ */
                     52: #include <windows.h>
1.1       noro       53: #else
                     54: #include <sys/types.h>
                     55: #include <X11/Xlib.h>
                     56: #include <X11/Xutil.h>
                     57: #include <X11/Xatom.h>
                     58: #include <X11/Intrinsic.h>
                     59: #include <X11/StringDefs.h>
                     60: #include <X11/Shell.h>
                     61: #include <X11/Xaw/Form.h>
                     62: #include <X11/Xaw/Command.h>
                     63: #include <X11/Xaw/Label.h>
                     64: #include <X11/Xaw/Simple.h>
                     65: #include <X11/Xaw/Dialog.h>
                     66: #include <X11/Xaw/Box.h>
                     67: #ifndef OLDX11
                     68: #include <X11/Xaw/Toggle.h>
                     69: #include <X11/Xaw/Scrollbar.h>
                     70: #else
                     71: #include <X11/Xaw/Scroll.h>
                     72: #define toggleWidgetClass commandWidgetClass
                     73: #define XtPointer pointer
                     74: #define XawDialogAddButton XtDialogAddButton
                     75: #define XawScrollbarSetThumb XtScrollBarSetThumb
                     76: #endif
                     77: #endif
                     78:
                     79: #define C_IFPLOT C_PRIV
                     80: #define C_BMPLOT C_PRIV+1
                     81: #define C_CLEAR C_PRIV+2
                     82: #define C_PMFLUSH C_PRIV+3
                     83: #define C_CONPLOT C_PRIV+4
                     84: #define C_PLOTOVER C_PRIV+5
                     85: #define C_PLOT C_PRIV+6
                     86: #define C_APLOT C_PRIV+7
                     87: #define C_DRAWCIRCLE C_PRIV+8
                     88:
1.5       noro       89: #define MAXCANVAS 64
1.1       noro       90: #define MAXGC 16
1.11      noro       91: #define DEFAULTPOLARSTEP 400
1.1       noro       92: #define DEFAULTWIDTH 400
                     93: #define DEFAULTHEIGHT 400
                     94:
                     95: #define MODE_IFPLOT 0
                     96: #define MODE_CONPLOT 1
                     97: #define MODE_PLOT 2
1.4       noro       98: #define MODE_INTERACTIVE 3
1.11      noro       99: #define MODE_POLARPLOT 4
1.1       noro      100:
                    101: #define DIR_X 0
                    102: #define DIR_Y 1
                    103: #define DIR_Z 2
                    104:
1.7       noro      105: #if defined(VISUAL)
1.4       noro      106: /* for Visual C++ */
                    107: #define XC(a) ((a).x)
                    108: #define YC(a) ((a).y)
                    109: #define DISPLAY int
1.8       noro      110: #define WINDOW void *
1.4       noro      111: #define CURSOR int
                    112: #define DRAWABLE HDC
                    113:
                    114: /* XXX : use GC argument as the color */
                    115: #define DRAWPOINT(d,p,g,x,y) SetPixel(p,x,y,0)
                    116:
                    117: #define DRAWLINE(d,p,g,x,y,u,v) MoveToEx(p,x,y,&oldpos); LineTo(p,u,v)
1.5       noro      118: #define DRAWSTRING(d,p,g,x,y,s,l) TextOut(p,x,y,s,l)
                    119: /* #define TEXTWIDTH(f,s,l) */
1.1       noro      120: #else
1.4       noro      121: /* for UNIX */
1.1       noro      122: #define POINT XPoint
                    123: #define XC(a) ((a).x)
                    124: #define YC(a) ((a).y)
                    125: #define DRAWPOINT(d,p,g,x,y) (count_and_flush(),XDrawPoint(d,p,g,x,y))
                    126: #define DRAWLINE(d,p,g,x,y,u,v) XDrawLine(d,p,g,x,y,u,v)
                    127: #define DRAWSTRING(d,p,g,x,y,s,l) XDrawString(d,p,g,x,y,s,l)
                    128: #define TEXTWIDTH(f,s,l) XTextWidth(f,s,l)
                    129: #define DISPLAY Display
                    130: #define WINDOW Window
                    131: #define CURSOR Cursor
                    132: #define DRAWABLE Drawable
                    133: #endif
                    134:
                    135: struct pa {
                    136:        int length;
                    137:        POINT *pos;
                    138: };
                    139:
1.4       noro      140: typedef struct RealVect {
                    141:        int len;
                    142:        int body[1];
                    143: } RealVect;
                    144:
                    145: #define MKRVECT2(v,x,y)\
                    146: ((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+sizeof(int)),\
                    147:  (v)->len=2,(v)->body[0]=(x),(v)->body[1]=(y))
1.5       noro      148: #define MKRVECT3(v,x,y,z)\
                    149: ((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+2*sizeof(int)),\
                    150:  (v)->len=3,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z))
                    151: #define MKRVECT4(v,x,y,z,u)\
1.4       noro      152: ((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+3*sizeof(int)),\
1.5       noro      153:  (v)->len=4,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z),(v)->body[3]=(u))
1.12    ! noro      154: #define MKRVECT5(v,x,y,z,u,w)\
        !           155: ((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+4*sizeof(int)),\
        !           156:  (v)->len=4,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z),(v)->body[3]=(u),(v)->body[4]=(w))
1.5       noro      157:
                    158: #define RV_POINT 1
                    159: #define RV_LINE 2
                    160: #define RV_ARC 3
1.4       noro      161:
1.1       noro      162: struct canvas {
                    163:        int index;
1.7       noro      164: #if defined(VISUAL)
1.4       noro      165: /* for Visual C++ */
                    166:        void *window; /* pointer to CMainFrame */
                    167:        HWND hwnd; /* handle to the canvas window */
                    168:        HDC pix; /* shadow DC on memory */
                    169:        char *prefix;
                    170:        int percentage;
                    171:        struct canvas *real_can;
1.1       noro      172: #else
                    173:        Widget shell,xcoord,ycoord,xdone,ydone,level,wideb,preciseb,noaxisb;
                    174:        Window window;
                    175:        Pixmap pix;
                    176: #endif
                    177:        char *wname;
                    178:        char mode;
                    179:        char wide;
                    180:        char precise;
                    181:        char noaxis;
                    182:        V vx,vy;
                    183:        P formula;
                    184:        int width,height;
                    185:        double xmin,xmax;
                    186:        double ymin,ymax;
                    187:        double zmin,zmax;
                    188:        int nzstep;
                    189:        Q qxmin,qxmax;
                    190:        Q qymin,qymax;
                    191:        struct pa *pa;
1.4       noro      192:        /* to register the history in the interactive mode */
                    193:        NODE history;
1.1       noro      194: };
                    195:
                    196: extern struct canvas *canvas[];
1.10      noro      197: extern struct canvas *closed_canvas[];
1.1       noro      198: extern struct canvas *current_can;
                    199:
                    200: extern VL CO;
                    201: extern int stream;
                    202:
                    203: extern DISPLAY *display;
                    204: extern CURSOR normalcur,runningcur,errorcur;
                    205:
1.4       noro      206: #if defined(VISUAL)
                    207: extern POINT start_point,end_point;
                    208: extern SIZE cansize;
                    209: #else
1.1       noro      210: extern Window rootwin;
1.6       noro      211: extern GC drawGC,dashGC,hlGC,scaleGC,clearGC,xorGC,colorGC,cdrawGC;
1.1       noro      212: extern XFontStruct *sffs;
1.8       noro      213: #endif
1.9       takayama  214:
                    215: struct xcolorForPS {
                    216:   unsigned long pixel;
                    217:   double r,g,b;
                    218:   int print;
                    219: };
1.8       noro      220:
                    221: /* prototypes */
                    222: void calc(double **tab,struct canvas *can,int nox);
                    223: double usubstrp(P p,double r);
                    224: void qcalc(char **tab,struct canvas *can);
                    225: void sturmseq(VL vl,P p,VECT *rp);
                    226: void seproot(VECT s,int min,int max,int *ar);
                    227: int numch(VECT s,Q n,Q a0);
                    228: void usubstqp(P p,Q r,Q *v);
                    229: void plotcalc(struct canvas *can);
                    230: int open_canvas(NODE arg);
                    231: int plot(NODE arg);
                    232: int memory_plot(NODE arg,LIST *bytes);
                    233: int plotover(NODE arg);
                    234: int drawcircle(NODE arg);
                    235: int draw_obj(NODE arg);
                    236: int clear_canvas(NODE arg);
                    237: int arrayplot(NODE arg);
                    238: void ifplot_resize(struct canvas *can,POINT spos,POINT epos);
                    239: void plot_resize(struct canvas *can,POINT spos,POINT epos);
                    240: void ifplotmain(struct canvas *can);
                    241: void qifplotmain(struct canvas *can);
                    242: void if_print(DISPLAY *display,double **tab,struct canvas *can);
                    243: void memory_if_print(double **tab,struct canvas *can,BYTEARRAY *bytes);
                    244: void con_print(DISPLAY *display,double **tab,struct canvas *can);
                    245: void memory_con_print(double **tab,struct canvas *can,BYTEARRAY *bytes);
                    246: void qif_print(DISPLAY *display,char **tab,struct canvas *can);
                    247: void plot_print(DISPLAY *display,struct canvas *can);
                    248: void draw_point(DISPLAY *display,struct canvas *can,int x,int y,int color);
                    249: void draw_line(DISPLAY *display,struct canvas *can,int x,int y,int u,int v,int color);
                    250: void pline(DISPLAY *display,struct canvas *can,DRAWABLE d);
                    251: double adjust_scale(double e,double w);
                    252: void initmarker(struct canvas *can,char *message);
                    253: void marker(struct canvas *can,int dir,int p);
                    254: void define_cursor(WINDOW w,CURSOR cur);
                    255: void count_and_flush();
                    256: void flush();
                    257:
                    258: #if defined(VISUAL)
                    259: int search_canvas();
                    260: int search_active_canvas();
                    261: void create_canvas(struct canvas *can);
                    262: void destroy_canvas(struct canvas *can);
                    263: void clear_pixmap(struct canvas *can);
                    264: void alloc_pixmap(struct canvas *can);
                    265: void copy_to_canvas(struct canvas *can);
                    266: void copy_subimage(struct canvas *subcan,struct canvas *can,POINT pos);
                    267: void draw_wideframe(struct canvas *can,DRAWABLE d);
                    268: void create_brushes();
                    269: void draw_frame0(DRAWABLE d,POINT spos,POINT epos);
                    270:
                    271: void reset_current_computation();
                    272: void set_selection();
                    273: void reset_selection();
                    274: void set_busy();
                    275: void reset_busy();
1.1       noro      276: #endif

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