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

Diff for /OpenXM_contrib2/asir2000/plot/ox_plot_xevent.c between version 1.18 and 1.24

version 1.18, 2002/07/20 02:28:08 version 1.24, 2004/03/01 05:48:24
Line 45 
Line 45 
  * 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.17 2002/07/12 00:14:40 takayama Exp $   * $OpenXM: OpenXM_contrib2/asir2000/plot/ox_plot_xevent.c,v 1.23 2004/03/01 01:23:37 noro Exp $
 */  */
 #include "ca.h"  #include "ca.h"
 #include "parse.h"  #include "parse.h"
Line 55 
Line 55 
 #include <X11/Xaw/MenuButton.h>  #include <X11/Xaw/MenuButton.h>
 #include <X11/Xaw/Paned.h>  #include <X11/Xaw/Paned.h>
   
   static void Quit();
   
   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 72  XFontStruct *sffs;
Line 88  XFontStruct *sffs;
 #endif  #endif
   
 struct canvas *canvas[MAXCANVAS];  struct canvas *canvas[MAXCANVAS];
   struct canvas *closed_canvas[MAXCANVAS];
 struct canvas *current_can;  struct canvas *current_can;
 #endif /* __DARWIN__ */  #endif /* __DARWIN__ */
   
Line 81  struct canvas *current_can;
Line 98  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 171  XButtonEvent *ev;
Line 187  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
Line 359  search_active_canvas()
Line 377  search_active_canvas()
         return -1;          return -1;
 }  }
   
   void popup_canvas(index)
   {
           clear_pixmap(canvas[index]);
           XtPopup(canvas[index]->shell,XtGrabNone);
           copy_to_canvas(canvas[index]);
   }
   
 void destroy_canvas(w,can,calldata)  void destroy_canvas(w,can,calldata)
 Widget w;  Widget w;
Line 367  struct canvas *can;
Line 390  struct canvas *can;
 XtPointer calldata;  XtPointer calldata;
 {  {
         XtPopdown(can->shell);          XtPopdown(can->shell);
         XtDestroyWidget(can->shell);  /*      XtDestroyWidget(can->shell); */
         XFlush(display);          XFlush(display);
         if ( can == current_can ) {          if ( can == current_can ) {
                 reset_busy(can); current_can = 0;                  reset_busy(can); current_can = 0;
         }          }
           if ( closed_canvas[can->index] )
                   XtDestroyWidget(closed_canvas[can->index]->shell);
           closed_canvas[can->index] = can;
         canvas[can->index] = 0;          canvas[can->index] = 0;
 }  }
   
Line 480  char *s;
Line 506  char *s;
         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 502  XtPointer calldata;
Line 529  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 530  struct canvas *can;
Line 558  struct canvas *can;
   
         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 623  struct canvas *can;
Line 650  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 668  static XtResource resources[] = {
Line 695  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;
Line 683  char **argv;
Line 719  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 ) {
Line 701  char **argv;
Line 738  char **argv;
         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 926  static void print_canvas(w,can,calldata)
Line 968  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 960  static void printing_method(w,can,calldata)
Line 1003  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 988  static void print_canvas_to_file(w,can,calldata)
Line 1032  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 1016  static void output_to_printer(w,can,calldata)
Line 1061  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)
Legend:
Removed from v.1.18  
changed lines
  Added in v.1.24
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>