home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3469 < prev    next >
Encoding:
Internet Message Format  |  1991-06-08  |  10.3 KB
  1. From: guido@cwi.nl (Guido van Rossum)
  2. Newsgroups: alt.sources
  3. Subject: STDWIN 0.9.6 patches, part 4/5
  4. Message-ID: <3650@charon.cwi.nl>
  5. Date: 7 Jun 91 13:32:07 GMT
  6.  
  7. Archive-name: stdwin0.9.6/patch4
  8.  
  9. *** 0.9.5/Ports/x11/event.c    Thu Oct 18 13:58:41 1990
  10. --- stdwin/Ports/x11/event.c    Tue May 28 23:04:26 1991
  11. ***************
  12. *** 98,106 ****
  13.       for (;;) {
  14.           if (_w_close_this != NULL) {
  15.               /* WM_DELETE_WINDOW detected */
  16. !             ep->type = WE_COMMAND;
  17.               ep->window = _w_close_this;
  18. -             ep->u.command = WC_CLOSE;
  19.               _w_close_this = NULL;
  20.               break;
  21.           }
  22. --- 98,105 ----
  23.       for (;;) {
  24.           if (_w_close_this != NULL) {
  25.               /* WM_DELETE_WINDOW detected */
  26. !             ep->type = WE_CLOSE;
  27.               ep->window = _w_close_this;
  28.               _w_close_this = NULL;
  29.               break;
  30.           }
  31. *** 0.9.5/Ports/x11/general.c    Thu Feb 28 10:42:43 1991
  32. --- stdwin/Ports/x11/general.c    Mon Apr 15 22:36:37 1991
  33. ***************
  34. *** 133,141 ****
  35. --- 133,143 ----
  36.   {"-iconmask",        ".iconMask",        XrmoptionSepArg, NULL},
  37.   
  38.   {"-menubackground",    ".menuBackground",    XrmoptionSepArg, NULL},
  39. + {"-menubg",        ".menuBackground",    XrmoptionSepArg, NULL},
  40.   {"-menufont",        ".menuFont",        XrmoptionSepArg, NULL},
  41.   {"-menufn",        ".menuFont",        XrmoptionSepArg, NULL},
  42.   {"-menuforeground",    ".menuForeground",    XrmoptionSepArg, NULL},
  43. + {"-menufg",        ".menuForeground",    XrmoptionSepArg, NULL},
  44.   
  45.   {"-reversevideo",    ".reverse",        XrmoptionNoArg,  "on"},
  46.   {"-rv",            ".reverse",        XrmoptionNoArg,  "on"},
  47. ***************
  48. *** 214,220 ****
  49. --- 216,224 ----
  50.       
  51.       if ((value= getoption(db, "debugLevel", "DebugLevel")) != NULL) {
  52.           _wtracelevel= _wdebuglevel= atoi(value);
  53. + #ifndef SYSV
  54.           setlinebuf(stderr);
  55. + #endif
  56.           _wwarning("wargs: -debuglevel %d", _wdebuglevel, value);
  57.       }
  58.       
  59. ***************
  60. *** 340,345 ****
  61. --- 344,353 ----
  62.       /* Initialize font list */
  63.       
  64.       _winitfonts();
  65. + 
  66. +     /* Initialize colors */
  67. + 
  68. +     _w_initcolors();
  69.       
  70.   #ifdef PIPEHACK
  71.       /* Create the pipe used to communicate wungetevent calls
  72. ***************
  73. *** 482,488 ****
  74.       int def;
  75.   {
  76.       register char *value;
  77. !     static struct flags {
  78.           char *name;
  79.           int value;
  80.       };
  81. --- 490,496 ----
  82.       int def;
  83.   {
  84.       register char *value;
  85. !     struct flags {
  86.           char *name;
  87.           int value;
  88.       };
  89. *** 0.9.5/Ports/x11/llevent.c    Thu Oct 18 13:58:43 1990
  90. --- stdwin/Ports/x11/llevent.c    Tue May 28 23:03:37 1991
  91. ***************
  92. *** 276,282 ****
  93.               if (!isdclick)
  94.                   _w_bs.clicks= 0;
  95.               ++_w_bs.clicks;
  96. !             _w_bs.mask= e->state / Button1Mask; /* XXX */
  97.               _w_bs.button= e->button;
  98.               _w_bs.time= e->time;
  99.               _w_bs.win= win;
  100. --- 276,282 ----
  101.               if (!isdclick)
  102.                   _w_bs.clicks= 0;
  103.               ++_w_bs.clicks;
  104. !             _w_bs.mask= e->state;
  105.               _w_bs.button= e->button;
  106.               _w_bs.time= e->time;
  107.               _w_bs.win= win;
  108. ***************
  109. *** 312,318 ****
  110.               _w_bs_changed= TRUE;
  111.           }
  112.           else {
  113. !             _w_bs.mask= e->state / Button1Mask; /* XXX */
  114.               _w_bs.x= e->x;
  115.               _w_bs.y= e->y;
  116.               _w_bs.time= e->time;
  117. --- 312,318 ----
  118.               _w_bs_changed= TRUE;
  119.           }
  120.           else {
  121. !             _w_bs.mask= e->state;
  122.               _w_bs.x= e->x;
  123.               _w_bs.y= e->y;
  124.               _w_bs.time= e->time;
  125. *** 0.9.5/Ports/x11/menu.c    Thu Oct 18 13:58:44 1990
  126. --- stdwin/Ports/x11/menu.c    Tue May 28 23:04:00 1991
  127. ***************
  128. *** 224,230 ****
  129.       int i;
  130.       int x;
  131.       int y;
  132. !     
  133.       _wmenusetup();
  134.       x= titledist;
  135.       y= baseline - 1 + (win->mbar.height - lineheight) / 2;
  136. --- 224,232 ----
  137.       int i;
  138.       int x;
  139.       int y;
  140. ! 
  141. !     if (win->mbar.wid == None)
  142. !         return;
  143.       _wmenusetup();
  144.       x= titledist;
  145.       y= baseline - 1 + (win->mbar.height - lineheight) / 2;
  146. ***************
  147. *** 440,447 ****
  148.           XFlush(_wd); /* Show it right now */
  149.           if (it >= 0) {
  150.               if (mp->id == 0) {
  151. !                 ep->type= WE_COMMAND;
  152. !                 ep->u.command= WC_CLOSE;
  153.                   ep->window= win;
  154.               }
  155.               else {
  156. --- 442,448 ----
  157.           XFlush(_wd); /* Show it right now */
  158.           if (it >= 0) {
  159.               if (mp->id == 0) {
  160. !                 ep->type= WE_CLOSE;
  161.                   ep->window= win;
  162.               }
  163.               else {
  164. *** 0.9.5/Ports/x11/scroll.c    Thu Oct 18 13:58:44 1990
  165. --- stdwin/Ports/x11/scroll.c    Wed Apr  3 22:13:53 1991
  166. ***************
  167. *** 22,27 ****
  168. --- 22,29 ----
  169.   _wdrawhbar(win)
  170.       WINDOW *win;
  171.   {
  172. +     if (win->hbar.wid == None)
  173. +         return;
  174.       _wdebug(3, "draw hbar");
  175.       XClearWindow(_wd, win->hbar.wid);
  176.       if (win->doc.width > win->wi.width) {
  177. ***************
  178. *** 38,43 ****
  179. --- 40,47 ----
  180.   _wdrawvbar(win)
  181.       WINDOW *win;
  182.   {
  183. +     if (win->vbar.wid == None)
  184. +         return;
  185.       _wdebug(3, "draw vbar");
  186.       XClearWindow(_wd, win->vbar.wid);
  187.       if (win->doc.height > win->wi.height) {
  188. *** 0.9.5/Ports/x11/selection.c    Sun Oct 21 13:02:31 1990
  189. --- stdwin/Ports/x11/selection.c    Wed Apr  3 22:14:11 1991
  190. ***************
  191. *** 22,27 ****
  192. --- 22,31 ----
  193.   #include "x11.h"
  194.   #include "llevent.h" /* For _w_lasttime; */
  195.   
  196. + #ifdef _IBMR2
  197. + #include <sys/select.h>
  198. + #endif
  199. + 
  200.   
  201.   #ifndef AMOEBA
  202.   
  203. *** 0.9.5/Ports/x11/window.c    Thu Feb 28 10:42:44 1991
  204. --- stdwin/Ports/x11/window.c    Tue May 28 23:02:48 1991
  205. ***************
  206. *** 14,22 ****
  207.   #define TMARGIN        18
  208.   #define RMARGIN        0
  209.   #define BMARGIN        16
  210. - #define IMARGIN        2
  211.   
  212.   
  213.   /* Event masks */
  214.   
  215.   /* Mask for 'wo' */
  216. --- 14,32 ----
  217.   #define TMARGIN        18
  218.   #define RMARGIN        0
  219.   #define BMARGIN        16
  220.   
  221. + #define IMARGIN        5    /* Extra left/right margin in inner window */
  222.   
  223. + 
  224. + /* Size of outer window border */
  225. + 
  226. + #define OBORDER        2
  227. + 
  228. + 
  229. + /* XXX IMARGIN and OBORDER should be settable with properties and command
  230. +    line options.  Maybe the other margins as well. */
  231. + 
  232. + 
  233.   /* Event masks */
  234.   
  235.   /* Mask for 'wo' */
  236. ***************
  237. *** 37,47 ****
  238.       
  239.   /* Private globals */
  240.   
  241. ! static int def_h, def_v;
  242. ! static int def_width, def_height;
  243.   
  244. ! #define DEF_WIDTH (def_width > 0 ? def_width : 80*wcharwidth('n'))
  245. ! #define DEF_HEIGHT (def_height > 0 ? def_height : 22*wlineheight())
  246.   
  247.   
  248.   /* WINDOW list.
  249. --- 47,60 ----
  250.       
  251.   /* Private globals */
  252.   
  253. ! static int def_h = 0, def_v = 0;
  254. ! static int def_width = 0, def_height = 0;
  255. ! static int def_hbar = 0;
  256. ! static int def_vbar = 1;
  257. ! static int def_mbar = 1;
  258.   
  259. ! #define DEF_WIDTH (def_width > 0 ? def_width : 40*wtextwidth("in", 2))
  260. ! #define DEF_HEIGHT (def_height > 0 ? def_height : 24*wlineheight())
  261.   
  262.   
  263.   /* WINDOW list.
  264. ***************
  265. *** 48,55 ****
  266.      Each WINDOW must be registered here, so it can be found back
  267.      by _whichwin */
  268.   
  269. ! static WINDOW **winlist;
  270. ! static int nwins;
  271.   
  272.   
  273.   /* Find a WINDOW pointer, given a Window.
  274. --- 61,68 ----
  275.      Each WINDOW must be registered here, so it can be found back
  276.      by _whichwin */
  277.   
  278. ! static WINDOW **winlist = 0;
  279. ! static int nwins = 0;
  280.   
  281.   
  282.   /* Find a WINDOW pointer, given a Window.
  283. ***************
  284. *** 62,71 ****
  285.   {
  286.       register int i;
  287.       
  288. !     for (i= nwins; --i >= 0; ) {
  289. !         register WINDOW *win= winlist[i];
  290.           register int j;
  291. !         for (j= NSUBS; --j >= 0; ) {
  292.               if (w == win->subw[j].wid)
  293.                   return win;
  294.           }
  295. --- 75,84 ----
  296.   {
  297.       register int i;
  298.       
  299. !     for (i = nwins; --i >= 0; ) {
  300. !         register WINDOW *win = winlist[i];
  301.           register int j;
  302. !         for (j = NSUBS; --j >= 0; ) {
  303.               if (w == win->subw[j].wid)
  304.                   return win;
  305.           }
  306. ***************
  307. *** 88,93 ****
  308. --- 101,107 ----
  309.   
  310.   /* Set the max size of windows created later (ignored for now) */
  311.   
  312. + /*ARGSUSED*/
  313.   void
  314.   wsetmaxwinsize(width, height)
  315.       int width, height;
  316. ***************
  317. *** 101,120 ****
  318.   wsetdefwinsize(width, height)
  319.       int width, height;
  320.   {
  321. !     if (width <= 0)
  322. !         def_width= 0;
  323. !     else {
  324. !         CLIPMAX(width, WidthOfScreen(_ws) - 40 - LMARGIN - RMARGIN);
  325. !         CLIPMIN(width, 40);
  326. !         def_width= width;
  327. !     }
  328. !     if (height <= 0)
  329. !         def_height= 0;
  330. !     else {
  331. !         CLIPMAX(height, HeightOfScreen(_ws) - 40 - TMARGIN - BMARGIN);
  332. !         CLIPMIN(height, 40);
  333. !         def_height= height;
  334. !     }
  335.   }
  336.   
  337.   void
  338. --- 115,122 ----
  339.   wsetdefwinsize(width, height)
  340.       int width, height;
  341.   {
  342. !     def_width = width;
  343. !     def_height = height;
  344.   }
  345.   
  346.   void
  347. ***************
  348. *** 132,141 ****
  349.   wsetdefwinpos(h, v)
  350.       int h, v;
  351.   {
  352. !     CLIPMIN(h, 0);
  353. !     CLIPMIN(v, 0);
  354. !     def_h= h;
  355. !     def_v= v;
  356.   }
  357.   
  358.   void
  359. --- 134,141 ----
  360.   wsetdefwinpos(h, v)
  361.       int h, v;
  362.   {
  363. !     def_h = h;
  364. !     def_v = v;
  365.   }
  366.   
  367.   void
  368. ***************
  369. *** 147,152 ****
  370. --- 147,171 ----
  371.   }
  372.   
  373.   
  374. + /* Set the scroll bar options */
  375. + 
  376. + void
  377. + wsetdefscrollbars(need_hbar, need_vbar)
  378. +     int need_hbar, need_vbar;
  379. + {
  380. +     def_hbar = need_hbar;
  381. +     def_vbar = need_vbar;
  382. + }
  383. + 
  384. + void
  385. + wgetdefscrollbars(phbar, pvbar)
  386. +     int *phbar, *pvbar;
  387. + {
  388. +     *phbar = def_hbar;
  389. +     *pvbar = def_vbar;
  390. + }
  391. + 
  392. + 
  393.   /* Read a Bitmap from a file and convert it to a Pixmap.
  394.      XXX Actually I don't convert it to a Pixmap; this may mean that perhaps
  395.      you won't be able to set an icon on a color display, depending
  396. ***************
  397. *** 165,171 ****
  398.       unsigned int width, height;
  399.       int xhot, yhot;
  400.       Pixmap bitmap;
  401. !     int err= XReadBitmapFile(_wd, RootWindowOfScreen(_ws), filename,
  402.           &width, &height, &bitmap, &xhot, &yhot);
  403.       if (err != BitmapSuccess) {
  404.           _wwarning("can't read bitmap file %s, error code %d",
  405. --- 184,190 ----
  406.       unsigned int width, height;
  407.       int xhot, yhot;
  408.       Pixmap bitmap;
  409. !     int err = XReadBitmapFile(_wd, RootWindowOfScreen(_ws), filename,
  410.           &width, &height, &bitmap, &xhot, &yhot);
  411.       if (err != BitmapSuccess) {
  412.           _wwarning("can't read bitmap file %s, error code %d",
  413. ***************
  414. *** 176,181 ****
  415. --- 195,204 ----
  416.   }
  417.   
  418.   
  419. + /* Forward */
  420. + static bool _wmakesubwins _ARGS((WINDOW *win));
  421. + 
  422. + 
  423.   /* Open a WINDOW.
  424.      Some defaults should only be used for the first window opened,
  425.      e.g., window geometry (otherwise all windows would overlay each other!)
  426. ***************
  427. *** 189,206 ****
  428.       static bool used_defaults;
  429.       WINDOW *win;
  430.       XSizeHints sizehints;
  431.       
  432.       /* Allocate zeroed storage for the WINDOW structure
  433.          and fill in the easy non-zero values */
  434. !     win= (WINDOW*) calloc(sizeof(WINDOW), 1);
  435.       if (win == NULL) {
  436.           _werror("wopen: can't alloc storage for window");
  437.           return NULL;
  438.       }
  439. !     win->drawproc= drawproc;
  440. !     win->careth= win->caretv= -1;
  441. !     win->attr= wattr;
  442. !     
  443.       /* Parse user-specified geometry default.
  444.          This overrides what the application specified.
  445.          Note that the x and y stored internally are exclusive or borders,
  446. --- 212,253 ----
  447.       static bool used_defaults;
  448.       WINDOW *win;
  449.       XSizeHints sizehints;
  450. +     char *geom;
  451.       
  452.       /* Allocate zeroed storage for the WINDOW structure
  453.          and fill in the easy non-zero values */
  454. !     win = (WINDOW*) calloc(sizeof(WINDOW), 1);
  455.       if (win == NULL) {
  456.           _werror("wopen: can't alloc storage for window");
  457.           return NULL;
  458.       }
  459. !     win->drawproc = drawproc;
  460. !     win->careth = win->caretv = -1;
  461. !     win->attr = wattr;
  462. !     win->tmargin = def_mbar ? TMARGIN : 0;
  463. !
  464.