version 1.20, 2002/07/30 03:54:36 |
version 1.28, 2007/01/30 00:28:26 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/plot/ox_plot_xevent.c,v 1.19 2002/07/29 03:08:16 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/plot/ox_plot_xevent.c,v 1.27 2006/11/09 15:54:35 saito Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "parse.h" |
#include "parse.h" |
|
|
#include <X11/Xaw/MenuButton.h> |
#include <X11/Xaw/MenuButton.h> |
#include <X11/Xaw/Paned.h> |
#include <X11/Xaw/Paned.h> |
|
|
|
static void Quit(); |
|
static void print_canvas(Widget w, struct canvas *can, XtPointer calldata); |
|
static void output_to_printer(Widget w, struct canvas *can, XtPointer calldata); |
|
static void print_canvas_to_file(Widget w, struct canvas *can, XtPointer calldata); |
|
static void printing_method(Widget w, struct canvas *can, XtPointer calldata); |
|
|
|
static Atom wm_delete_window; |
|
|
|
void SetWM_Proto(Widget w) |
|
{ |
|
XtOverrideTranslations(w, |
|
XtParseTranslationTable("<Message>WM_PROTOCOLS: quit()")); |
|
XSetWMProtocols(display,XtWindow(w),&wm_delete_window,1); |
|
} |
|
|
|
static void quit(Widget w, XEvent *ev, String *params,Cardinal *nparams) |
|
{ |
|
XBell(display,0); |
|
} |
|
|
/* XXX : these lines are in plotg.c, but ld says they are not defined */ |
/* XXX : these lines are in plotg.c, but ld says they are not defined */ |
#if __DARWIN__ |
#if __DARWIN__ |
int stream; |
int stream; |
Line 82 struct canvas *current_can; |
|
Line 102 struct canvas *current_can; |
|
#endif |
#endif |
|
|
static char *dname; |
static char *dname; |
static int remotes; |
|
static int depth,scrn; |
static int depth,scrn; |
|
|
extern JMP_BUF ox_env; |
extern JMP_BUF ox_env; |
Line 172 XButtonEvent *ev; |
|
Line 191 XButtonEvent *ev; |
|
case Button1: |
case Button1: |
e.x = ev->x; e.y = ev->y; |
e.x = ev->x; e.y = ev->y; |
draw_frame0(can->window,spos,e); |
draw_frame0(can->window,spos,e); |
if ( !busy && can->mode != MODE_INTERACTIVE ) { |
if ( !busy |
|
&& can->mode != MODE_INTERACTIVE |
|
&& can->mode != MODE_POLARPLOT) { |
if ( can->mode == MODE_PLOT ) |
if ( can->mode == MODE_PLOT ) |
plot_resize(can,spos,e); |
plot_resize(can,spos,e); |
else |
else |
|
|
create_popup(can->shell,"warning",s,&warnshell,&warndialog); |
create_popup(can->shell,"warning",s,&warnshell,&warndialog); |
XawDialogAddButton(warndialog,"dismiss",popdown_warning,warnshell); |
XawDialogAddButton(warndialog,"dismiss",popdown_warning,warnshell); |
XtPopup(warnshell,XtGrabNone); |
XtPopup(warnshell,XtGrabNone); |
|
SetWM_Proto(warnshell); |
} |
} |
|
|
void popdown_warning(w,client,call) |
void popdown_warning(w,client,call) |
Line 511 XtPointer calldata; |
|
Line 533 XtPointer calldata; |
|
create_popup(can->shell,"formula",buf,&fshell,&fdialog); |
create_popup(can->shell,"formula",buf,&fshell,&fdialog); |
XawDialogAddButton(fdialog,"dismiss",popdown_formula,w); |
XawDialogAddButton(fdialog,"dismiss",popdown_formula,w); |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
|
SetWM_Proto(fshell); |
} |
} |
|
|
void popdown_formula(w,fbutton,call) |
void popdown_formula(w,fbutton,call) |
Line 535 struct canvas *can; |
|
Line 558 struct canvas *can; |
|
int i,width,height; |
int i,width,height; |
Arg arg[6]; |
Arg arg[6]; |
char buf[BUFSIZ]; |
char buf[BUFSIZ]; |
static void print_canvas(); |
|
|
|
width = can->width; height = can->height; |
width = can->width; height = can->height; |
|
|
sprintf(buf,"%s : %d/%d", can->wname?can->wname:"Plot", |
sprintf(buf,"%s : %d", can->wname?can->wname:"Plot",can->index); |
remotes,can->index); |
|
XtSetArg(arg[0],XtNiconName,buf); |
XtSetArg(arg[0],XtNiconName,buf); |
can->shell = |
can->shell = |
XtCreatePopupShell("shell",topLevelShellWidgetClass,toplevel,arg,1); |
XtCreatePopupShell("shell",topLevelShellWidgetClass,toplevel,arg,1); |
Line 632 struct canvas *can; |
|
Line 653 struct canvas *can; |
|
if ( can->mode != MODE_IFPLOT || !qpcheck((Obj)can->formula) ) |
if ( can->mode != MODE_IFPLOT || !qpcheck((Obj)can->formula) ) |
XtSetSensitive(precise,False); |
XtSetSensitive(precise,False); |
XtPopup(can->shell,XtGrabNone); |
XtPopup(can->shell,XtGrabNone); |
|
SetWM_Proto(can->shell); |
window = can->window = XtWindow(canvas); |
window = can->window = XtWindow(canvas); |
pix = can->pix = XCreatePixmap(display,window,width,height,depth); |
pix = can->pix = XCreatePixmap(display,window,width,height,depth); |
XFillRectangle(display,pix,clearGC,0,0,width,height); |
XFillRectangle(display,pix,clearGC,0,0,width,height); |
Line 677 static XtResource resources[] = { |
|
Line 698 static XtResource resources[] = { |
|
offset(DashPixel),XtRPixel,(XtPointer)&dashPixel}, |
offset(DashPixel),XtRPixel,(XtPointer)&dashPixel}, |
}; |
}; |
|
|
|
static XtActionsRec actions_table[] = { |
|
{"quit",Quit}, |
|
}; |
|
|
|
static void Quit(Widget w, XEvent *ev, String *params,Cardinal *nparams) |
|
{ |
|
XBell(XtDisplay(w),0); |
|
} |
|
|
int init_plot_display(argc,argv) |
int init_plot_display(argc,argv) |
int argc; |
int argc; |
char **argv; |
char **argv; |
|
|
dname = *av; |
dname = *av; |
XtToolkitInitialize(); |
XtToolkitInitialize(); |
app_con = XtCreateApplicationContext(); |
app_con = XtCreateApplicationContext(); |
|
XtAppAddActions(app_con,actions_table, XtNumber(actions_table)); |
display = XtOpenDisplay(app_con,dname,"plot","Plot", |
display = XtOpenDisplay(app_con,dname,"plot","Plot", |
options,XtNumber(options),&argc,argv); |
options,XtNumber(options),&argc,argv); |
if ( !display ) { |
if ( !display ) { |
|
|
depth = DefaultDepth(display,scrn); |
depth = DefaultDepth(display,scrn); |
rootwin = RootWindow(display,scrn); |
rootwin = RootWindow(display,scrn); |
|
|
|
/* for handling DELETE message */ |
|
wm_delete_window = XInternAtom(display,"WM_DELETE_WINDOW",False); |
|
XtOverrideTranslations(toplevel, |
|
XtParseTranslationTable("<Message>WM_PROTOCOLS: quit()")); |
|
|
if ( reverse ) { |
if ( reverse ) { |
tmp = forePixel; forePixel = backPixel; backPixel = tmp; |
tmp = forePixel; forePixel = backPixel; backPixel = tmp; |
} |
} |
Line 807 copy_to_canvas(can) |
|
Line 843 copy_to_canvas(can) |
|
struct canvas *can; |
struct canvas *can; |
{ |
{ |
if ( display ) { |
if ( display ) { |
XCopyArea(display,can->pix,can->window, |
if ( can->color ) { |
drawGC,0,0,can->width,can->height,0,0); |
set_drawcolor(can->color); |
|
XCopyArea(display,can->pix,can->window, |
|
cdrawGC,0,0,can->width,can->height,0,0); |
|
} else |
|
XCopyArea(display,can->pix,can->window, |
|
drawGC,0,0,can->width,can->height,0,0); |
pline(display,can,can->window); |
pline(display,can,can->window); |
XFlush(display); |
XFlush(display); |
} |
} |
Line 923 static void print_canvas(w,can,calldata) |
|
Line 964 static void print_canvas(w,can,calldata) |
|
Widget entry; |
Widget entry; |
int i; |
int i; |
Arg arg[1]; |
Arg arg[1]; |
static void output_to_printer(); |
|
static void print_canvas_to_file(); |
|
static void printing_method(); |
|
|
|
W = w; |
W = w; |
Can = can; |
Can = can; |
Line 935 static void print_canvas(w,can,calldata) |
|
Line 973 static void print_canvas(w,can,calldata) |
|
XawDialogAddButton(fdialog,"method",printing_method,w); |
XawDialogAddButton(fdialog,"method",printing_method,w); |
XawDialogAddButton(fdialog,"dismiss",cancel_output_to_file,w); |
XawDialogAddButton(fdialog,"dismiss",cancel_output_to_file,w); |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
|
SetWM_Proto(fshell); |
} |
} |
|
|
static void set_printing_method(Widget w,XtPointer number,XtPointer call_data) { |
static void set_printing_method(Widget w,XtPointer number,XtPointer call_data) { |
Line 969 static void printing_method(w,can,calldata) |
|
Line 1008 static void printing_method(w,can,calldata) |
|
XawDialogAddButton(fdialog,Printing_methods[i],set_printing_method,(XtPointer) i); |
XawDialogAddButton(fdialog,Printing_methods[i],set_printing_method,(XtPointer) i); |
} |
} |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
|
SetWM_Proto(fshell); |
} |
} |
static void print_canvas_to_file(w,can,calldata) |
static void print_canvas_to_file(w,can,calldata) |
Widget w; |
Widget w; |
Line 997 static void print_canvas_to_file(w,can,calldata) |
|
Line 1037 static void print_canvas_to_file(w,can,calldata) |
|
XawDialogAddButton(fdialog,"cancel",cancel_output_to_file,w); |
XawDialogAddButton(fdialog,"cancel",cancel_output_to_file,w); |
PrintDialog = fdialog; |
PrintDialog = fdialog; |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
|
SetWM_Proto(fshell); |
} |
} |
static void output_to_printer(w,can,calldata) |
static void output_to_printer(w,can,calldata) |
Widget w; |
Widget w; |
Line 1025 static void output_to_printer(w,can,calldata) |
|
Line 1066 static void output_to_printer(w,can,calldata) |
|
XawDialogAddButton(fdialog,"cancel",cancel_output_to_file,w); |
XawDialogAddButton(fdialog,"cancel",cancel_output_to_file,w); |
PrintDialog_lp = fdialog; |
PrintDialog_lp = fdialog; |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
XtSetSensitive(w,False); XtPopup(fshell,XtGrabNone); |
|
SetWM_Proto(fshell); |
} |
} |
|
|
static void cancel_output_to_file(w,fbutton,call) |
static void cancel_output_to_file(w,fbutton,call) |
Line 1133 static void output_to_ps_printer(w,fbutton,call) |
|
Line 1175 static void output_to_ps_printer(w,fbutton,call) |
|
/* test sequence |
/* test sequence |
ox_launch(0,"ox_plot"); |
ox_launch(0,"ox_plot"); |
ifplot(x^2-y^3); |
ifplot(x^2-y^3); |
drawcircle(0,0,100,0,0); |
drawcircle(0,0,100,0xff000,0); |
*/ |
*/ |
static int getColorSizeOfImageForPS(int xsize,int ysize,XImage *image, |
static int getColorSizeOfImageForPS(int xsize,int ysize,XImage *image, |
struct xcolorForPS **tableOfxcolorForPS); |
struct xcolorForPS **tableOfxcolorForPS); |
Line 1142 static void generate_psfile(can,fp) |
|
Line 1184 static void generate_psfile(can,fp) |
|
struct canvas *can; |
struct canvas *can; |
FILE *fp; |
FILE *fp; |
{ |
{ |
|
#if 0 |
int x,y; |
int x,y; |
XImage *image; |
XImage *image; |
int color[1]; |
int color[1]; |
Line 1166 static void generate_psfile(can,fp) |
|
Line 1209 static void generate_psfile(can,fp) |
|
method_is_not_available(); |
method_is_not_available(); |
} |
} |
fflush(NULL); |
fflush(NULL); |
|
#endif |
} |
} |
|
|
static void method_is_not_available() { |
static void method_is_not_available() { |