home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / x / volume18 / x11fix16 / part02 < prev    next >
Encoding:
Text File  |  1992-08-02  |  50.4 KB  |  1,786 lines
  1. Newsgroups: comp.sources.x
  2. Path: uunet!paladin.american.edu!darwin.sura.net!mips!msi!dcmartin
  3. From: Bob Scheifler <rws@expo.lcs.mit.edu>
  4. Subject: v18i079: X11R5 public fix #16, Part02/03
  5. Message-ID: <1992Aug3.143856.29904@msi.com>
  6. Originator: dcmartin@fascet
  7. Sender: dcmartin@msi.com (David C. Martin - Moderator)
  8. Organization: Molecular Simulations, Inc.
  9. References: <csx-18i078-X11-fix16@uunet.UU.NET>
  10. Date: Mon, 3 Aug 1992 14:38:56 GMT
  11. Approved: dcmartin@msi.com
  12. Lines: 1772
  13.  
  14. Submitted-by: Bob Scheifler <rws@expo.lcs.mit.edu>
  15. Posting-number: Volume 18, Issue 79
  16. Archive-name: X11-fix16/part02
  17.  
  18. #!/bin/sh
  19. # this is part.02 (part 2 of a multipart archive)
  20. # do not concatenate these parts, unpack them in order with /bin/sh
  21. # file fix-16 continued
  22. #
  23. if test ! -r _shar_seq_.tmp; then
  24.     echo 'Please unpack part 1 first!'
  25.     exit 1
  26. fi
  27. (read Scheck
  28.  if test "$Scheck" != 2; then
  29.     echo Please unpack part "$Scheck" next!
  30.     exit 1
  31.  else
  32.     exit 0
  33.  fi
  34. ) < _shar_seq_.tmp || exit 1
  35. if test ! -f _shar_wnt_.tmp; then
  36.     echo 'x - still skipping fix-16'
  37. else
  38. echo 'x - continuing file fix-16'
  39. sed 's/^X//' << 'SHAR_EOF' >> 'fix-16' &&
  40. !         XFree(prop);
  41. X          return(False);
  42. +     }
  43. X      strncpy(version, prop, nitems);
  44. X      version[nitems] = '\0';
  45. X      XFree(prop);
  46. ***************
  47. *** 271,276 ****
  48. --- 273,279 ----
  49. X      }
  50. X      if((imstyle = (XIMStyles *)Xmalloc(sizeof(XIMStyles))) == NULL) {
  51. X          _Ximp_SetupFree(version, NULL, NULL, NULL, NULL, NULL, NULL);
  52. +         XFree((XPointer)prop_long);
  53. X          return(False);
  54. X      }
  55. X      if((imstyle->supported_styles =
  56. ***************
  57. *** 277,282 ****
  58. --- 280,286 ----
  59. X          (XIMStyle *)Xmalloc(sizeof(XIMStyle) * nitems)) == NULL) {
  60. X          Xfree(imstyle);
  61. X          _Ximp_SetupFree(version, NULL, NULL, NULL, NULL, NULL, NULL);
  62. +         XFree((XPointer)prop_long);
  63. X          return(False);
  64. X      }
  65. X      for(i=0; i < nitems; i++) {
  66. ***************
  67. *** 295,300 ****
  68. --- 299,305 ----
  69. X      }
  70. X      if((keylist = (Ximp_KeyList *)Xmalloc(sizeof(Ximp_KeyList))) == NULL) {
  71. X          _Ximp_SetupFree(version, imstyle, NULL, NULL, NULL, NULL, NULL);
  72. +         XFree((XPointer)prop_int);
  73. X          return(False);
  74. X      }
  75. X      count = nitems / 3;
  76. ***************
  77. *** 301,306 ****
  78. --- 306,312 ----
  79. X      if((keylist->keys_list = (Ximp_Key *)Xmalloc(sizeof(Ximp_Key) * count)) == NULL) {
  80. X          Xfree(keylist);
  81. X          _Ximp_SetupFree(version, imstyle, NULL, NULL, NULL, NULL, NULL);
  82. +         XFree((XPointer)prop_int);
  83. X          return(False);
  84. X      }
  85. X      for(i=0,n=0; n < count; n++) {
  86. ***************
  87. *** 321,326 ****
  88. --- 327,333 ----
  89. X      }
  90. X      if((server_name = (char *)Xmalloc((sizeof(char) * nitems + 1))) == NULL) {
  91. X          _Ximp_SetupFree(version, imstyle, keylist, NULL, NULL, NULL, NULL);
  92. +         XFree(prop);
  93. X          return(False);
  94. X      }
  95. X      strncpy(server_name, prop, nitems);
  96. ***************
  97. *** 337,342 ****
  98. --- 344,350 ----
  99. X      }
  100. X      if((server_vl = (char *)Xmalloc((sizeof(char) * nitems + 1))) == NULL) {
  101. X          _Ximp_SetupFree(version, imstyle, keylist, server_name, NULL, NULL, NULL);
  102. +         XFree(prop);
  103. X          return(False);
  104. X      }
  105. X      strncpy(server_vl, prop, nitems);
  106. ***************
  107. *** 353,358 ****
  108. --- 361,367 ----
  109. X      }
  110. X      if((vendor_name = (char *)Xmalloc((sizeof(char) * nitems + 1))) == NULL) {
  111. X          _Ximp_SetupFree(version, imstyle, keylist, server_name, NULL, NULL, NULL);
  112. +         XFree(prop);
  113. X          return(False);
  114. X      }
  115. X      strncpy(vendor_name, prop, nitems);
  116. ***************
  117. *** 369,380 ****
  118. X      }
  119. X      if((ext_list = (Atom *)Xmalloc((sizeof(Atom) * (nitems + 1)))) == NULL) {
  120. X          _Ximp_SetupFree(version, imstyle, keylist, server_name, server_vl, vendor_name, NULL);
  121. X          return(False);
  122. X      }
  123. X      for(i=0; i < nitems; i++)
  124. X          ext_list[i] = prop_int[i];
  125. X      ext_list[nitems] = NULL;
  126. !     if(prop_int) XFree((XPointer)prop_int);
  127. X  
  128. X      im->ximp_impart->fe_window        = fe_window_id;
  129. X      Protocol_ID                 = XInternAtom(dpy, _XIMP_PROTOCOL, False);
  130. --- 378,392 ----
  131. X      }
  132. X      if((ext_list = (Atom *)Xmalloc((sizeof(Atom) * (nitems + 1)))) == NULL) {
  133. X          _Ximp_SetupFree(version, imstyle, keylist, server_name, server_vl, vendor_name, NULL);
  134. +         if( prop_int )
  135. +             XFree((XPointer)prop_int);
  136. X          return(False);
  137. X      }
  138. X      for(i=0; i < nitems; i++)
  139. X          ext_list[i] = prop_int[i];
  140. X      ext_list[nitems] = NULL;
  141. !     if( prop_int )
  142. !         XFree((XPointer)prop_int);
  143. X  
  144. X      im->ximp_impart->fe_window        = fe_window_id;
  145. X      Protocol_ID                 = XInternAtom(dpy, _XIMP_PROTOCOL, False);
  146. ***************
  147. *** 403,414 ****
  148. --- 415,436 ----
  149. X  
  150. X      if(Ximp_Xim_List == (Ximp_XIM *)NULL){
  151. X          Ximp_Xim_List = (Ximp_XIM *)Xmalloc(sizeof(Ximp_XIM));
  152. +         if( Ximp_Xim_List == NULL ) {
  153. +             _Ximp_SetupFree(version, imstyle, keylist, server_name, server_vl, vendor_name, NULL);
  154. +             return( False );
  155. +         }
  156. X          Ximp_Xim_List[0] = im;
  157. X          Ximp_Xim_count = 1;
  158. X      }
  159. X      else {
  160. +         Ximp_XIM    *ximp_xim;
  161. + 
  162. X          n = 0;
  163. X          for(i=0; i < Ximp_Xim_count; i++) {
  164. +             if( Ximp_Xim_List[i] == im ) {
  165. +                 n = 1;
  166. +                 break;
  167. +             }
  168. X              if(Ximp_Xim_List[i] == NULL) {
  169. X                  Ximp_Xim_List[i] = im;
  170. X                  n = 1;
  171. ***************
  172. *** 416,424 ****
  173. X              }
  174. X          }
  175. X          if(n == 0) {
  176. !             Ximp_Xim_List = (Ximp_XIM *)Xrealloc(Ximp_Xim_List, ((i + 1) * sizeof(Ximp_XIM)));
  177. !             Ximp_Xim_List[i-1] = im;
  178. !             Ximp_Xim_count = i;
  179. X          }
  180. X      }
  181. X  
  182. --- 438,451 ----
  183. X              }
  184. X          }
  185. X          if(n == 0) {
  186. !             ximp_xim = (Ximp_XIM *)Xrealloc(Ximp_Xim_List, ((i + 1) * sizeof(Ximp_XIM)));
  187. !             if( ximp_xim == NULL ) {
  188. !                 _Ximp_SetupFree(version, imstyle, keylist, server_name, server_vl, vendor_name, NULL);
  189. !                 return( False );
  190. !             }
  191. !             Ximp_Xim_List = ximp_xim;
  192. !             Ximp_Xim_List[Ximp_Xim_count] = im;
  193. !             Ximp_Xim_count++;
  194. X          }
  195. X      }
  196. X  
  197. ***************
  198. *** 473,479 ****
  199. X      Ximp_XIC    pic;
  200. X  
  201. X      for(i = 0; i < Ximp_Xim_count; i++) {
  202. !         pim = Ximp_Xim_List[i];
  203. X          for(pic = (Ximp_XIC)pim->core.ic_chain; pic; pic = (Ximp_XIC)pic->core.next) {
  204. X              if(pic->ximp_icpart->icid == icid)
  205. X                  return(pic);
  206. --- 500,507 ----
  207. X      Ximp_XIC    pic;
  208. X  
  209. X      for(i = 0; i < Ximp_Xim_count; i++) {
  210. !         if( (pim = Ximp_Xim_List[i]) == NULL )
  211. !             continue;
  212. X          for(pic = (Ximp_XIC)pim->core.ic_chain; pic; pic = (Ximp_XIC)pic->core.next) {
  213. X              if(pic->ximp_icpart->icid == icid)
  214. X                  return(pic);
  215. ***************
  216. *** 499,505 ****
  217. X                  + p->count_styles * sizeof(XIMStyle))) == NULL)
  218. X          return(False);
  219. X      (*p_style)->count_styles = p->count_styles;
  220. !     (*p_style)->supported_styles = (XIMStyle *)(*p_style + sizeof(XIMStyles));
  221. X      for(i=0; i < (int)p->count_styles; i++) {
  222. X          (*p_style)->supported_styles[i] = p->supported_styles[i];
  223. X      }
  224. --- 527,533 ----
  225. X                  + p->count_styles * sizeof(XIMStyle))) == NULL)
  226. X          return(False);
  227. X      (*p_style)->count_styles = p->count_styles;
  228. !     (*p_style)->supported_styles = (XIMStyle *)((char *)*p_style + sizeof(XIMStyles));
  229. X      for(i=0; i < (int)p->count_styles; i++) {
  230. X          (*p_style)->supported_styles[i] = p->supported_styles[i];
  231. X      }
  232. *** /tmp/d13824    Sat Aug  1 11:07:39 1992
  233. --- mit/lib/X/Ximp/XimpLkup.c    Sat Aug  1 11:07:34 1992
  234. ***************
  235. *** 1,4 ****
  236. ! /* $XConsortium: XimpLkup.c,v 1.7 92/04/14 13:29:28 rws Exp $ */
  237. X  /******************************************************************
  238. X  
  239. X                Copyright 1991, 1992 by Sony Corporation
  240. --- 1,4 ----
  241. ! /* $XConsortium: XimpLkup.c,v 1.8 92/07/29 10:16:17 rws Exp $ */
  242. X  /******************************************************************
  243. X  
  244. X                Copyright 1991, 1992 by Sony Corporation
  245. ***************
  246. *** 43,61 ****
  247. X  
  248. X  #include "Ximplc.h"
  249. X  
  250. - #ifdef XIMP_SIGNAL
  251. - #include <sys/signal.h>
  252. - #endif /* XIMP_SIGNAL */
  253. - 
  254. - static int     _time_flag = 0;
  255. - #ifdef XIMP_SIGNAL
  256. - static int
  257. - _time_out()
  258. -     {
  259. -     _time_flag = 1;
  260. -     }
  261. - #endif /* XIMP_SIGNAL */
  262. - 
  263. X  extern Ximp_XIC        _Ximp_LookupXIC();
  264. X  extern Atom        _Ximp_Protocol_id();
  265. X  extern Bool         _Ximp_XimFilter_Client();
  266. --- 43,48 ----
  267. ***************
  268. *** 72,121 ****
  269. X  static void        _Ximp_CallCallback();
  270. X  extern void        _Ximp_ProcError();
  271. X  
  272. ! typedef struct {
  273. !     Atom type;
  274. !     ICID icid;
  275. !     Window owner;
  276. ! } XimpResetPredArgRec, *XimpResetPredArg;
  277. X  
  278. ! static Bool
  279. ! #if NeedFunctionPrototypes
  280. ! _Ximp_ResetPredicate(
  281. !     Display *d,
  282. !     XEvent *ev,
  283. !     XPointer arg0)
  284. ! #else
  285. ! _Ximp_ResetPredicate(d, ev, arg0)
  286. X  Display *d;
  287. X  XEvent *ev;
  288. X  XPointer arg0;
  289. - #endif
  290. X  {
  291. !     XimpResetPredArg arg = (XimpResetPredArg) arg0 ;
  292. X  
  293. !     if (ev->type == ClientMessage) {
  294. !         if (ev->xclient.message_type == arg->type) {
  295. !             if ((ev->xclient.format == 32) &&
  296. !                 (ev->xclient.data.l[1] == arg->icid)) {
  297. !                 switch (ev->xclient.data.l[0]) {
  298. !                 case XIMP_RESET_RETURN:
  299. !                 case XIMP_ERROR:
  300. !                 case XIMP_PREEDITDONE:
  301. !                 case XIMP_PREEDITDRAW:
  302. !                 case XIMP_PREEDITDRAW_CM:
  303. !                 case XIMP_STATUSDONE:
  304. !                 case XIMP_STATUSDRAW:
  305. !                 case XIMP_STATUSDRAW_CM:
  306. !                     return(True);
  307. !                 }
  308. !             }
  309. !         }
  310. !     } else if (ev->type == DestroyNotify) {
  311. !         if (ev->xdestroywindow.window == arg->owner) {
  312. !             return(True);
  313. !         }
  314. X      }
  315. !     return(False);
  316. X  }
  317. X  
  318. X  static unsigned char *
  319. --- 59,113 ----
  320. X  static void        _Ximp_CallCallback();
  321. X  extern void        _Ximp_ProcError();
  322. X  
  323. ! Bool
  324. ! _XimpIfEvent( ic, event, predicate, arg )
  325. ! Ximp_XIC    ic;
  326. ! XEvent        *event;
  327. ! Bool        (*predicate)(
  328. ! #if NeedNestedPrototypes
  329. !     Display*,
  330. !     XEvent*,
  331. !     char*
  332. ! #endif
  333. ! );
  334. ! char        *arg;
  335. ! {
  336. !     XIfEvent( ic->core.im->core.display, event, predicate, arg );
  337. !     if( event->type == DestroyNotify ) {
  338. !     XPutBackEvent( ic->core.im->core.display, event );
  339. !     return( False );
  340. !     }
  341. !     else if( event->type == ClientMessage  &&  event->xclient.format == 32  &&
  342. !          event->xclient.data.l[0] == XIMP_ERROR ) {
  343. !     _Ximp_ProcError( ic, ic->core.im->core.display, NULL, event );
  344. !     return( False );
  345. !     }
  346. !     return( True );
  347. ! }
  348. X  
  349. ! 
  350. ! Bool
  351. ! _Ximp_CMPredicate(d, ev, arg0)
  352. X  Display *d;
  353. X  XEvent *ev;
  354. X  XPointer arg0;
  355. X  {
  356. !     XimpCMPredicateArg arg = (XimpCMPredicateArg)arg0;
  357. X  
  358. !     if( ev->type == ClientMessage ) {
  359. !     if( ev->xclient.message_type == arg->type  &&
  360. !         ev->xclient.format == 32 ) {
  361. !         if( arg->icid == 0  ||  (ev->xclient.data.l[1] == arg->icid) )
  362. !         if( ev->xclient.data.l[0] == arg->protocol  ||
  363. !             ev->xclient.data.l[0] == XIMP_ERROR )
  364. !             return(True);
  365. X      }
  366. !     } else if( ev->type == DestroyNotify) {
  367. !     if( ev->xdestroywindow.window == arg->owner ) {
  368. !         return( True );
  369. !     }
  370. !     }
  371. !     return( False );
  372. X  }
  373. X  
  374. X  static unsigned char *
  375. ***************
  376. *** 122,199 ****
  377. X  _Ximp_Reset(ic)
  378. X      Ximp_XIC     ic;
  379. X  {
  380. !     XEvent         Message;
  381. !     XEvent         event;
  382. !     XimpResetPredArgRec Arg;
  383. X  
  384. !     if(ic->ximp_icpart->icid) {
  385. !         /* ClientMessage Send */
  386. !         _Ximp_IM_SendMessage(ic, XIMP_RESET, NULL, NULL, NULL);
  387. X  
  388. ! #ifdef XIMP_SIGNAL
  389. !         signal(SIGALRM, _time_out);
  390. !         alarm(XIMP_TIME_OUT);
  391. ! #endif /* XIMP_SIGNAL */
  392. !         Arg.type = ((Ximp_XIM)ic->core.im)->ximp_impart->improtocol_id;
  393. !         Arg.icid = ic->ximp_icpart->icid;
  394. !         Arg.owner = ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window;
  395. !         while(_time_flag != 1) {
  396. !             if( (XCheckIfEvent(ic->core.im->core.display, &event, _Ximp_ResetPredicate, (XPointer)&Arg)) == False) {
  397. ! #ifdef XIMP_SIGNAL
  398. !                 sleep(1);
  399. ! #endif /* XIMP_SIGNAL */
  400. !                 continue;
  401. !                 }
  402. !             if (event.type == ClientMessage) {
  403. !                 switch (event.xclient.data.l[0]) {
  404. !                 case XIMP_RESET_RETURN:
  405. !                     {
  406. !                         int rval;
  407. !                         Atom actual_type_return;
  408. !                         int actual_format_return;
  409. !                         unsigned long nitems_return, bytes_after_return;
  410. !                         unsigned char *p = NULL;
  411. ! #ifdef XIMP_SIGNAL
  412. !                         alarm(0);
  413. ! #endif /* XIMP_SIGNAL */
  414. !                         ic->ximp_icpart->icid = (ICID)event.xclient.data.l[1];
  415. !                         rval = XGetWindowProperty(ic->core.im->core.display,
  416. !                                     ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window,
  417. !                                     (Atom)event.xclient.data.l[2], 0, 1024, True,
  418. !                                     AnyPropertyType, &actual_type_return,
  419. !                                     &actual_format_return, &nitems_return,
  420. !                                     &bytes_after_return, &p);
  421. !                         return(p);
  422. !                         }
  423. !                 case XIMP_ERROR:
  424. !                     _Ximp_ProcError (ic->core.im->core.display,
  425. !                              NULL, &event);
  426. !                     _time_flag = 0;
  427. !                     return(NULL);
  428. !                 case XIMP_PREEDITDONE:
  429. !                 case XIMP_PREEDITDRAW:
  430. !                 case XIMP_PREEDITDRAW_CM:
  431. !                 case XIMP_PREEDITDRAW_TINY:
  432. !                 case XIMP_STATUSDONE:
  433. !                 case XIMP_STATUSDRAW:
  434. !                 case XIMP_STATUSDRAW_CM:
  435. !                     _Ximp_CallCallback (ic->core.im->core.display, event.xclient.window, &event);
  436. !                     break;
  437. !                     }
  438. !                 }
  439. !             else {
  440. ! #ifdef XIMP_SIGNAL
  441. !                 alarm(0);
  442. ! #endif /* XIMP_SIGNAL */
  443. !                 _Ximp_ProcError (ic->core.im->core.display,
  444. !                              NULL, &event);
  445. !                 _time_flag = 0;
  446. !                 return(NULL);
  447. !                 }
  448. !             }
  449. !         _time_flag = 0;
  450. !         }
  451. !     return((unsigned char *)NULL);
  452. X  }
  453. X  
  454. X  #define XIMP_MAXBUF 1024
  455. --- 114,149 ----
  456. X  _Ximp_Reset(ic)
  457. X      Ximp_XIC     ic;
  458. X  {
  459. !     XEvent            Message;
  460. !     XEvent            event;
  461. !     XimpCMPredicateArgRec    Arg;
  462. !     int                rval;
  463. !     Atom            actual_type_return;
  464. !     int                actual_format_return;
  465. !     unsigned long        nitems_return, bytes_after_return;
  466. !     unsigned char        *p = NULL;
  467. X  
  468. !     if(ic->ximp_icpart->icid) {
  469. !     /* ClientMessage Send */
  470. !     _Ximp_IM_SendMessage(ic, XIMP_RESET, NULL, NULL, NULL);
  471. X  
  472. !     Arg.type = ((Ximp_XIM)ic->core.im)->ximp_impart->improtocol_id;
  473. !     Arg.owner = ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window;
  474. !     Arg.protocol = XIMP_RESET_RETURN;
  475. !     Arg.icid = ic->ximp_icpart->icid;
  476. !     if( !_XimpIfEvent( ic, &event, _Ximp_CMPredicate, (XPointer)&Arg ) )
  477. !         return( NULL );
  478. ! 
  479. !     ic->ximp_icpart->icid =(ICID)event.xclient.data.l[1];
  480. !     rval = XGetWindowProperty( ic->core.im->core.display,
  481. !             ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window,
  482. !             (Atom)event.xclient.data.l[2], 0, 1024, True,
  483. !             AnyPropertyType, &actual_type_return,
  484. !             &actual_format_return, &nitems_return,
  485. !             &bytes_after_return, &p );
  486. !     return( p );
  487. !     }
  488. !     return( (unsigned char *)NULL );
  489. X  }
  490. X  
  491. X  #define XIMP_MAXBUF 1024
  492. ***************
  493. *** 207,213 ****
  494. X      unsigned char *ct = _Ximp_Reset(ic);
  495. X  
  496. X      if (!ct) return(NULL);
  497. !     mb = Xmalloc(length);
  498. X      _Ximp_cttombs(ic->core.im->core.lcd, ct, strlen((char *)ct), mb, &length, NULL);
  499. X      mb[length] = '\0';
  500. X      return(mb);
  501. --- 157,163 ----
  502. X      unsigned char *ct = _Ximp_Reset(ic);
  503. X  
  504. X      if (!ct) return(NULL);
  505. !     mb = Xmalloc(length+1);
  506. X      _Ximp_cttombs(ic->core.im->core.lcd, ct, strlen((char *)ct), mb, &length, NULL);
  507. X      mb[length] = '\0';
  508. X      return(mb);
  509. ***************
  510. *** 222,228 ****
  511. X      unsigned char *ct = _Ximp_Reset(ic);
  512. X  
  513. X      if (!ct) return(NULL);
  514. !     wc = (wchar_t *)Xmalloc(length * sizeof(wchar_t));
  515. X      _Ximp_cttowcs(ic->core.im->core.lcd, ct, strlen((char *)ct), wc, &length, NULL);
  516. X      wc[length] = (wchar_t)0;
  517. X      return(wc);
  518. --- 172,178 ----
  519. X      unsigned char *ct = _Ximp_Reset(ic);
  520. X  
  521. X      if (!ct) return(NULL);
  522. !     wc = (wchar_t *)Xmalloc((length + 1) * sizeof(wchar_t));
  523. X      _Ximp_cttowcs(ic->core.im->core.lcd, ct, strlen((char *)ct), wc, &length, NULL);
  524. X      wc[length] = (wchar_t)0;
  525. X      return(wc);
  526. ***************
  527. *** 399,405 ****
  528. X      extern Ximp_XIM    *Ximp_Xim_List;
  529. X  
  530. X      for(i = 0; i < Ximp_Xim_count; i++) {
  531. !         pim = Ximp_Xim_List[i];
  532. X          for (pic = (Ximp_XIC)pim->core.ic_chain;
  533. X              pic; pic = (Ximp_XIC)pic->core.next) {
  534. X              if(pic->core.focus_window == window &&
  535. --- 349,356 ----
  536. X      extern Ximp_XIM    *Ximp_Xim_List;
  537. X  
  538. X      for(i = 0; i < Ximp_Xim_count; i++) {
  539. !         if( (pim = Ximp_Xim_List[i]) == NULL )
  540. !             continue;
  541. X          for (pic = (Ximp_XIC)pim->core.ic_chain;
  542. X              pic; pic = (Ximp_XIC)pic->core.next) {
  543. X              if(pic->core.focus_window == window &&
  544. ***************
  545. *** 484,615 ****
  546. X          NULL);
  547. X      _Ximp_IM_SendMessage(ic, XIMP_BEGIN, NULL, NULL, NULL);
  548. X      XFlush(ic->core.im->core.display);
  549. X      return(True);
  550. X  }
  551. X  
  552. - 
  553. - typedef struct {
  554. -     Atom type;
  555. -     Window owner;
  556. - } XimpCreatePredArgRec, *XimpCreatePredArg;
  557. - 
  558. - static Bool
  559. - _Ximp_CreatePredicate(d, ev, arg0)
  560. - Display *d;
  561. - XEvent *ev;
  562. - XPointer arg0;
  563. - {
  564. -     XimpCreatePredArg arg = (XimpCreatePredArg) arg0;
  565. - 
  566. -     if (ev->type == ClientMessage) {
  567. -         if (ev->xclient.message_type == arg->type) {
  568. -             if (ev->xclient.format == 32) {
  569. -                 switch (ev->xclient.data.l[0]) {
  570. -                 case XIMP_CREATE_RETURN:
  571. -                 case XIMP_ERROR:
  572. -                     return(True);
  573. -                 }
  574. -             }
  575. -         }
  576. -     } else if (ev->type == DestroyNotify) {
  577. -         if (ev->xdestroywindow.window == arg->owner) {
  578. -             return(True);
  579. -         }
  580. -     }
  581. -     return(False);
  582. - }
  583. - 
  584. X  Bool
  585. X  _Ximp_SetOpenXIMP(ic, mode)
  586. X      Ximp_XIC    ic;
  587. X      int        mode;
  588. X  {
  589. !     unsigned long     mask;
  590. !     XEvent         event;
  591. !     XimpCreatePredArgRec Arg;
  592. X  
  593. !     if(mode == XIMP_CREATE_IC) {  /* XCretaeIC() */
  594. !         if(!(ic->ximp_icpart->value_mask & XIMP_CLIENT_WIN)) {
  595. !             ic->core.client_window = XCreateSimpleWindow(
  596. !                 ic->core.im->core.display,
  597. !                 DefaultRootWindow(ic->core.im->core.display),
  598. !                 0, 0, 1, 1, 1, 0, 0);
  599. !         }
  600. X      }
  601. X  
  602. !     if(!(ic->ximp_icpart->proto_mask & XIMP_FOCUS_WIN_MASK)) {
  603. !         ic->core.focus_window = ic->core.client_window;
  604. !     }
  605. X      
  606. !     /* Property Data Set */
  607. !     XChangeProperty(ic->core.im->core.display, ic->core.client_window,
  608. !             ((Ximp_XIM)ic->core.im)->ximp_impart->version_id,
  609. !             XA_STRING, 8, PropModeReplace,
  610. !             (unsigned char *)XIMP_PROTOCOL_VERSION, strlen(XIMP_PROTOCOL_VERSION));
  611. !     XFlush(ic->core.im->core.display);
  612. X  
  613. !     mask = ic->ximp_icpart->proto_mask;
  614. !     _Ximp_SetFocusWindow(ic);
  615. !     mask |= XIMP_FOCUS_WIN_MASK;
  616. !     if(!(   (ic->core.input_style & XIMPreeditCallbacks)
  617. !          || (ic->core.input_style & XIMPreeditNone) ) ) { 
  618. !         if(mask & XIMP_PROP_PREEDIT)
  619. !             _Ximp_SetPreeditAtr(ic);
  620. !         if(mask & XIMP_PROP_PREFONT)
  621. !             _Ximp_SetPreeditFont(ic);
  622. !         }
  623. !     else {
  624. !         mask &= ~(XIMP_PROP_PREEDIT | XIMP_PROP_PREFONT);
  625. !         }
  626. !     if(!(   (ic->core.input_style & XIMStatusCallbacks)
  627. !          || (ic->core.input_style & XIMStatusNone) ) ) { 
  628. !         if(mask & XIMP_PROP_STATUS)
  629. !             _Ximp_SetStatusAtr(ic);
  630. !         if(mask & XIMP_PROP_STSFONT)
  631. !             _Ximp_SetStatusFont(ic);
  632. !         }
  633. !     else {
  634. !         mask &= ~(XIMP_PROP_STATUS | XIMP_PROP_STSFONT);
  635. !         }
  636. X  
  637. !     /* ClientMessage Send */
  638. !     _Ximp_IM_SendMessage(ic, XIMP_CREATE, ic->core.input_style, mask, NULL);
  639. X  
  640. ! #ifdef XIMP_SIGNAL
  641. !     signal(SIGALRM, _time_out);
  642. !     alarm(XIMP_TIME_OUT);
  643. ! #endif /* XIMP_SIGNAL */
  644. !     Arg.type = ((Ximp_XIM)ic->core.im)->ximp_impart->improtocol_id;
  645. !     Arg.owner = ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window;
  646. !     while(_time_flag != 1) {
  647. !         if( (XCheckIfEvent(ic->core.im->core.display, &event, _Ximp_CreatePredicate, (XPointer)&Arg)) == False) {
  648. ! #ifdef XIMP_SIGNAL
  649. !             sleep(1);
  650. ! #endif /* XIMP_SIGNAL */
  651. !             continue;
  652. !             }
  653. !         if(event.type == ClientMessage &&
  654. !            event.xclient.data.l[0] == XIMP_CREATE_RETURN) {
  655. ! #ifdef XIMP_SIGNAL
  656. !             alarm(0);
  657. ! #endif /* XIMP_SIGNAL */
  658. !             ic->ximp_icpart->icid = (ICID)event.xclient.data.l[1];
  659. !             _Ximp_A_CreateExtension(ic);
  660. !             _time_flag = 0;
  661. !             return(True);
  662. !             }
  663. !         else {
  664. ! #ifdef XIMP_SIGNAL
  665. !             alarm(0);
  666. ! #endif /* XIMP_SIGNAL */
  667. !             _Ximp_ProcError (ic->core.im->core.display, NULL, &event);
  668. !             _time_flag = 0;
  669. !             /* return(False); */
  670. !             continue;
  671. !             }
  672. !         }
  673. !     _time_flag = 0;
  674. !     return(False);
  675. X  }
  676. X  
  677. X  void
  678. --- 435,537 ----
  679. X          NULL);
  680. X      _Ximp_IM_SendMessage(ic, XIMP_BEGIN, NULL, NULL, NULL);
  681. X      XFlush(ic->core.im->core.display);
  682. +     _Ximp_CallRestartCallbackExtension( ic );
  683. X      return(True);
  684. X  }
  685. X  
  686. X  Bool
  687. X  _Ximp_SetOpenXIMP(ic, mode)
  688. X      Ximp_XIC    ic;
  689. X      int        mode;
  690. X  {
  691. !     unsigned long    mask;
  692. !     XEvent        event;
  693. !     XimpCMPredicateArgRec    Arg;
  694. X  
  695. !     if(mode == XIMP_CREATE_IC) {  /* XCretaeIC() */
  696. !     if(!(ic->ximp_icpart->value_mask & XIMP_CLIENT_WIN)) {
  697. !         ic->core.client_window = XCreateSimpleWindow(
  698. !         ic->core.im->core.display,
  699. !         DefaultRootWindow(ic->core.im->core.display),
  700. !         0, 0, 1, 1, 1, 0, 0);
  701. X      }
  702. +     }
  703. X  
  704. !     if(!(ic->ximp_icpart->proto_mask & XIMP_FOCUS_WIN_MASK)) {
  705. !     ic->core.focus_window = ic->core.client_window;
  706. !     }
  707. X      
  708. !     /* Property Data Set */
  709. !     XChangeProperty(ic->core.im->core.display, ic->core.client_window,
  710. !             ((Ximp_XIM)ic->core.im)->ximp_impart->version_id,
  711. !             XA_STRING, 8, PropModeReplace,
  712. !             (unsigned char *)XIMP_PROTOCOL_VERSION, strlen(XIMP_PROTOCOL_VERSION));
  713. !     XFlush(ic->core.im->core.display);
  714. X  
  715. !     mask = ic->ximp_icpart->proto_mask;
  716. !     _Ximp_SetFocusWindow(ic);
  717. !     mask |= XIMP_FOCUS_WIN_MASK;
  718. !     if(!(   (ic->core.input_style & XIMPreeditCallbacks)
  719. !      || (ic->core.input_style & XIMPreeditNone) ) ) { 
  720. !         if(mask & XIMP_PROP_PREEDIT)
  721. !             _Ximp_SetPreeditAtr(ic);
  722. !         if(mask & XIMP_PROP_PREFONT)
  723. !             _Ximp_SetPreeditFont(ic);
  724. !     }
  725. !     else {
  726. !     mask &= ~(XIMP_PROP_PREEDIT | XIMP_PROP_PREFONT);
  727. !     }
  728. !     if(!(   (ic->core.input_style & XIMStatusCallbacks)
  729. !      || (ic->core.input_style & XIMStatusNone) ) ) { 
  730. !     if(mask & XIMP_PROP_STATUS)
  731. !         _Ximp_SetStatusAtr(ic);
  732. !     if(mask & XIMP_PROP_STSFONT)
  733. !         _Ximp_SetStatusFont(ic);
  734. !     }
  735. !     else {
  736. !     mask &= ~(XIMP_PROP_STATUS | XIMP_PROP_STSFONT);
  737. !     }
  738. X  
  739. !     /* ClientMessage Send */
  740. !     _Ximp_IM_SendMessage(ic, XIMP_CREATE, ic->core.input_style, mask, NULL);
  741. X  
  742. !     Arg.type = ((Ximp_XIM)ic->core.im)->ximp_impart->improtocol_id;
  743. !     Arg.owner = ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window;
  744. !     Arg.protocol = XIMP_CREATE_RETURN;
  745. !     Arg.icid = 0;
  746. !     if( _XimpIfEvent( ic, &event, _Ximp_CMPredicate, (XPointer)&Arg ) ) {
  747. !     ic->ximp_icpart->icid = (ICID)event.xclient.data.l[1];
  748. !     _Ximp_A_CreateExtension(ic);
  749. !     return(True);
  750. !     }
  751. !     else {
  752. !     XDeleteProperty( ic->core.im->core.display,
  753. !             ic->core.client_window,
  754. !             ((Ximp_XIM)ic->core.im)->ximp_impart->focus_win_id );
  755. !     if( !((ic->core.input_style & XIMPreeditCallbacks)  ||
  756. !         (ic->core.input_style & XIMPreeditNone)) ) { 
  757. !         if( mask & XIMP_PROP_PREEDIT )
  758. !         XDeleteProperty( ic->core.im->core.display,
  759. !              ic->core.client_window,
  760. !             ((Ximp_XIM)ic->core.im)->ximp_impart->preedit_atr_id );
  761. !         if( mask & XIMP_PROP_PREFONT )
  762. !         XDeleteProperty( ic->core.im->core.display,
  763. !             ic->core.client_window,
  764. !             ((Ximp_XIM)ic->core.im)->ximp_impart->preeditfont_id );
  765. !     }
  766. !     if( !((ic->core.input_style & XIMStatusCallbacks)  ||
  767. !         (ic->core.input_style & XIMStatusNone)) ) { 
  768. !         if( mask & XIMP_PROP_STATUS )
  769. !         XDeleteProperty( ic->core.im->core.display,
  770. !             ic->core.client_window,
  771. !             ((Ximp_XIM)ic->core.im)->ximp_impart->status_atr_id );
  772. !         if( mask & XIMP_PROP_STSFONT )
  773. !         XDeleteProperty( ic->core.im->core.display,
  774. !             ic->core.client_window,
  775. !             ((Ximp_XIM)ic->core.im)->ximp_impart->statusfont_id );
  776. !     }
  777. !     return( False );
  778. !     }
  779. X  }
  780. X  
  781. X  void
  782. ***************
  783. *** 622,628 ****
  784. X      ev->keycode = 0;
  785. X  }
  786. X  
  787. ! void
  788. X  _Ximp_ProcKeypress (d, w, ev, kev)
  789. X      Display            *d;
  790. X      Window            w;
  791. --- 544,550 ----
  792. X      ev->keycode = 0;
  793. X  }
  794. X  
  795. ! Bool
  796. X  _Ximp_ProcKeypress (d, w, ev, kev)
  797. X      Display            *d;
  798. X      Window            w;
  799. ***************
  800. *** 633,638 ****
  801. --- 555,562 ----
  802. X      Ximp_XIC         ic;
  803. X  
  804. X      icid = ev->data.l[1];
  805. +     if( (ic = _Ximp_LookupXIC(icid)) == NULL )
  806. +         return( False );
  807. X      kev->type = KeyPress;
  808. X      kev->serial = ev->serial;
  809. X      kev->send_event = False;
  810. ***************
  811. *** 648,657 ****
  812. X      kev->keycode = ev->data.l[2];
  813. X      kev->state = ev->data.l[3];
  814. X      kev->same_screen = True;
  815. -     ic = _Ximp_LookupXIC(icid);
  816. X      if(ic->ximp_icpart->input_mode) { /* ON : input_mode */
  817. X          ic->ximp_icpart->putback_key_event = True;
  818. X      }
  819. X  }
  820. X  
  821. X  static void
  822. --- 572,581 ----
  823. X      kev->keycode = ev->data.l[2];
  824. X      kev->state = ev->data.l[3];
  825. X      kev->same_screen = True;
  826. X      if(ic->ximp_icpart->input_mode) { /* ON : input_mode */
  827. X          ic->ximp_icpart->putback_key_event = True;
  828. X      }
  829. +     return( True );
  830. X  }
  831. X  
  832. X  static void
  833. ***************
  834. *** 677,683 ****
  835. X      unsigned long        dummy_mask;
  836. X  
  837. X      icid = ev->data.l[1];
  838. !     ic   = _Ximp_LookupXIC(icid);
  839. X  
  840. X      if(ic->ximp_icpart->input_mode) /* ON : input_mode */
  841. X          return;
  842. --- 601,608 ----
  843. X      unsigned long        dummy_mask;
  844. X  
  845. X      icid = ev->data.l[1];
  846. !     if( (ic = _Ximp_LookupXIC(icid)) == NULL )
  847. !         return;
  848. X  
  849. X      if(ic->ximp_icpart->input_mode) /* ON : input_mode */
  850. X          return;
  851. ***************
  852. *** 709,715 ****
  853. X      Ximp_XIC        ic;
  854. X  
  855. X      icid = ev->data.l[1];
  856. !     ic   = _Ximp_LookupXIC(icid);
  857. X      XSelectInput(d, ic->core.focus_window, ic->ximp_icpart->back_mask );
  858. X      XFlush(d);
  859. X      ic->ximp_icpart->input_mode = 0;
  860. --- 634,641 ----
  861. X      Ximp_XIC        ic;
  862. X  
  863. X      icid = ev->data.l[1];
  864. !     if( (ic = _Ximp_LookupXIC(icid)) == NULL )
  865. !         return;
  866. X      XSelectInput(d, ic->core.focus_window, ic->ximp_icpart->back_mask );
  867. X      XFlush(d);
  868. X      ic->ximp_icpart->input_mode = 0;
  869. ***************
  870. *** 735,741 ****
  871. X      }
  872. X      icid      = ev->data.l[1];
  873. X      read_prop = ev->data.l[2];
  874. !     ic   = _Ximp_LookupXIC(icid);
  875. X      rval = XGetWindowProperty( d,
  876. X                  ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window,
  877. X                  read_prop, 0, 1024, True,
  878. --- 661,668 ----
  879. X      }
  880. X      icid      = ev->data.l[1];
  881. X      read_prop = ev->data.l[2];
  882. !     if( (ic = _Ximp_LookupXIC(icid)) == NULL )
  883. !         return;
  884. X      rval = XGetWindowProperty( d,
  885. X                  ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window,
  886. X                  read_prop, 0, 1024, True,
  887. ***************
  888. *** 751,757 ****
  889. X  }
  890. X  
  891. X  void
  892. ! _Ximp_ProcError (d, w, ev)
  893. X      Display            *d;
  894. X      Window            w;
  895. X      XClientMessageEvent    *ev;
  896. --- 678,685 ----
  897. X  }
  898. X  
  899. X  void
  900. ! _Ximp_ProcError (ic0, d, w, ev)
  901. !     Ximp_XIC        ic0;
  902. X      Display            *d;
  903. X      Window            w;
  904. X      XClientMessageEvent    *ev;
  905. ***************
  906. *** 766,773 ****
  907. X       *    you should modify this routine.
  908. X       */
  909. X  
  910. !     icid = ev->data.l[1];
  911. !     ic   = _Ximp_LookupXIC(icid);
  912. X      if (ic->ximp_icpart->error.callback) {
  913. X          data[0] = ev->data.l[2];
  914. X          data[2] = ev->data.l[4];
  915. --- 694,706 ----
  916. X       *    you should modify this routine.
  917. X       */
  918. X  
  919. !     if( (icid = ev->data.l[1]) != 0 ) {
  920. !         if( (ic = _Ximp_LookupXIC(icid)) == NULL )
  921. !             return;
  922. !     }
  923. !     else if( (ic = ic0) == NULL )
  924. !         return;
  925. ! 
  926. X      if (ic->ximp_icpart->error.callback) {
  927. X          data[0] = ev->data.l[2];
  928. X          data[2] = ev->data.l[4];
  929. ***************
  930. *** 812,818 ****
  931. X      Ximp_XIC    ic;
  932. X  
  933. X      icid = ev->data.l[1];
  934. !     ic   = _Ximp_LookupXIC(icid);
  935. X      switch (ev->data.l[0]) {
  936. X          case XIMP_GEOMETRY:
  937. X              _Ximp_CallGeometryCallback (ic, ev);
  938. --- 745,752 ----
  939. X      Ximp_XIC    ic;
  940. X  
  941. X      icid = ev->data.l[1];
  942. !     if( (ic = _Ximp_LookupXIC(icid)) == NULL )
  943. !         return;
  944. X      switch (ev->data.l[0]) {
  945. X          case XIMP_GEOMETRY:
  946. X              _Ximp_CallGeometryCallback (ic, ev);
  947. ***************
  948. *** 866,873 ****
  949. X      if (ev->format == 32) {
  950. X          switch (ev->data.l[0]) {
  951. X          case XIMP_KEYPRESS:
  952. !             _Ximp_ProcKeypress (d, w, ev, &kev);
  953. !             XPutBackEvent(d, (XEvent *)&kev);
  954. X              break ;
  955. X          case XIMP_CREATE_RETURN:
  956. X              _Ximp_ProcCreateReturn (d, w, ev);
  957. --- 800,809 ----
  958. X      if (ev->format == 32) {
  959. X          switch (ev->data.l[0]) {
  960. X          case XIMP_KEYPRESS:
  961. !             if( _Ximp_ProcKeypress (d, w, ev, &kev) )
  962. !                 XPutBackEvent(d, (XEvent *)&kev);
  963. !             else
  964. !                 return( False );
  965. X              break ;
  966. X          case XIMP_CREATE_RETURN:
  967. X              _Ximp_ProcCreateReturn (d, w, ev);
  968. ***************
  969. *** 885,891 ****
  970. X              XPutBackEvent(d, (XEvent *)ev);
  971. X              break ;
  972. X          case XIMP_ERROR:
  973. !             _Ximp_ProcError (d, w, ev);
  974. X              break;
  975. X          case XIMP_GEOMETRY:
  976. X          case XIMP_PREEDITSTART:
  977. --- 821,827 ----
  978. X              XPutBackEvent(d, (XEvent *)ev);
  979. X              break ;
  980. X          case XIMP_ERROR:
  981. !             _Ximp_ProcError (NULL, d, w, ev);
  982. X              break;
  983. X          case XIMP_GEOMETRY:
  984. X          case XIMP_PREEDITSTART:
  985. ***************
  986. *** 947,952 ****
  987. --- 883,889 ----
  988. X          ximp_impart->fe_window = (Window)NULL;
  989. X          for(ic = Ximp_Xim_List[i]->core.ic_chain; ic; ic = ic->core.next) {
  990. X              ((Ximp_XIC)ic)->ximp_icpart->icid = NULL;
  991. +             _Ximp_CallDestroyCallbackExtension( ic );
  992. X              _XUnregisterFilter(d,
  993. X                         ic->core.focus_window,
  994. X                         _Ximp_XimFilter_Client,
  995. *** /tmp/d14114    Sat Aug  1 11:11:05 1992
  996. --- mit/lib/X/Ximp/Ximplc.h    Sat Aug  1 11:10:57 1992
  997. ***************
  998. *** 1,4 ****
  999. ! /* $XConsortium: Ximplc.h,v 1.5 92/04/14 13:30:42 rws Exp $ */
  1000. X  /*
  1001. X   * Copyright 1990, 1991, 1992 by TOSHIBA Corp.
  1002. X   * Copyright 1990, 1991, 1992 by SORD Computer Corp.
  1003. --- 1,4 ----
  1004. ! /* $XConsortium: Ximplc.h,v 1.6 92/07/29 10:16:27 rws Exp $ */
  1005. X  /*
  1006. X   * Copyright 1990, 1991, 1992 by TOSHIBA Corp.
  1007. X   * Copyright 1990, 1991, 1992 by SORD Computer Corp.
  1008. ***************
  1009. *** 72,77 ****
  1010. --- 72,80 ----
  1011. X  #include "XIMProto.h"
  1012. X  
  1013. X  #define USE_SJIS    True
  1014. + #ifdef SVR4
  1015. + #define FIX_EUC32    True
  1016. + #endif
  1017. X  
  1018. X  #define GL        0x00
  1019. X  #define GR        0x80
  1020. ***************
  1021. *** 354,359 ****
  1022. --- 357,364 ----
  1023. X       /* Extended Callback attribute */
  1024. X      Bool             use_lookup_choices;
  1025. X      ICExtLookupAttributes     lookup_attr;
  1026. +     XIMCallback         restart;
  1027. +     XIMCallback         destroy;
  1028. X  
  1029. X      void            *ictype;
  1030. X      } XICXimpRec;
  1031. ***************
  1032. *** 366,368 ****
  1033. --- 371,391 ----
  1034. X      XICCoreRec     core;
  1035. X      XICXimpRec    *ximp_icpart;
  1036. X      } Ximp_XICRec;
  1037. + 
  1038. + /*
  1039. +  * predicate argument
  1040. +  */
  1041. + typedef struct {
  1042. +     Atom    type;
  1043. +     Window    owner;
  1044. +     int    protocol;
  1045. +     ICID    icid;
  1046. + } XimpCMPredicateArgRec, *XimpCMPredicateArg;
  1047. + 
  1048. + typedef struct {
  1049. +     Atom    type;
  1050. +     Window    owner;
  1051. +     ICID    icid;
  1052. +     Window    window;
  1053. +     Atom    atom;
  1054. + } XimpPNPredicateArgRec, *XimpPNPredicateArg;
  1055. *** /tmp/d14313    Sat Aug  1 11:13:12 1992
  1056. --- mit/lib/X/Ximp/XimpExten.c    Sat Aug  1 11:13:05 1992
  1057. ***************
  1058. *** 1,33 ****
  1059. ! /* $XConsortium: XimpExten.c,v 1.5 92/04/14 13:29:00 rws Exp $ */
  1060. X  /******************************************************************
  1061. X  
  1062. X      Copyright 1991, 1992 by FUJITSU LIMITED.
  1063. X      Copyright 1991, 1992 by Sun Microsystems, Inc.
  1064. X  
  1065. X  Permission to use, copy, modify, distribute, and sell this software
  1066. X  and its documentation for any purpose is hereby granted without fee,
  1067. X  provided that the above copyright notice appear in all copies and that
  1068. X  both that copyright notice and this permission notice appear in
  1069. ! supporting documentation, and that the name of FUJITSU LIMITED or Sun
  1070. ! Microsystems, Inc.  not be used in advertising or publicity pertaining
  1071. ! to distribution of the software without specific, written prior
  1072. ! permission.  FUJITSU LIMITED and Sun Microsystems, Inc. make no
  1073. ! representations about the suitability of this software for any
  1074. ! purpose.  It is provided "as is" without express or implied warranty.
  1075. X  
  1076. ! FUJITSU LIMITED AND SUN MICROSYSTEMS, INC. DISCLAIMS ALL WARRANTIES
  1077. ! WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
  1078. ! MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL FUJITSU LIMITED AND SUN
  1079. ! MICROSYSTEMS, INC. BE LIABLE FOR ANY SPECIAL, INDIRECT OR
  1080. ! CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
  1081. ! USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
  1082. ! OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  1083. ! PERFORMANCE OF THIS SOFTWARE.
  1084. X  
  1085. X  Author: Takashi Fujiwara     FUJITSU LIMITED
  1086. -                fujiwara@a80.tech.yk.fujitsu.co.jp
  1087. X          Hideki Hiura         Sun Microsystems, Inc.
  1088. !                    hhiura@Sun.COM
  1089. X  ******************************************************************/
  1090. X  
  1091. X  #define NEED_EVENTS
  1092. --- 1,34 ----
  1093. ! /* $XConsortium: XimpExten.c,v 1.6 92/07/29 10:15:43 rws Exp $ */
  1094. X  /******************************************************************
  1095. X  
  1096. X      Copyright 1991, 1992 by FUJITSU LIMITED.
  1097. X      Copyright 1991, 1992 by Sun Microsystems, Inc.
  1098. +     Copyright 1991, 1992 by Sony Corporation
  1099. X  
  1100. X  Permission to use, copy, modify, distribute, and sell this software
  1101. X  and its documentation for any purpose is hereby granted without fee,
  1102. X  provided that the above copyright notice appear in all copies and that
  1103. X  both that copyright notice and this permission notice appear in
  1104. ! supporting documentation, and that the name of FUJITSU LIMITED, Sun
  1105. ! Microsystems, Inc. and Sony Corporation not be used in advertising
  1106. ! or publicity pertaining to distribution of the software without
  1107. ! specific, written prior permission. FUJITSU LIMITED, Sun Microsystems,
  1108. ! Inc. and Sony Corporation make no representations about the suitability
  1109. ! of this software for any purpose.  It is provided "as is" without
  1110. ! express or implied warranty.
  1111. X  
  1112. ! FUJITSU LIMITED, SUN MICROSYSTEMS, INC. AND SONY CORPORATION DISCLAIMS
  1113. ! ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED
  1114. ! WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL FUJITSU
  1115. ! LIMITED, SUN MICROSYSTEMS, INC. AND SONY CORPORATION BE LIABLE FOR
  1116. ! ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  1117. ! WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  1118. ! ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
  1119. ! OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  1120. X  
  1121. X  Author: Takashi Fujiwara     FUJITSU LIMITED
  1122. X          Hideki Hiura         Sun Microsystems, Inc.
  1123. !         Makoto Wakamatsu     Sony Corporation
  1124. X  ******************************************************************/
  1125. X  
  1126. X  #define NEED_EVENTS
  1127. ***************
  1128. *** 37,54 ****
  1129. X  #include "Xlcint.h"
  1130. X  #include "Ximplc.h"
  1131. X  
  1132. - #ifdef XIMP_SIGNAL
  1133. - #include <sys/signal.h>
  1134. - #endif /* XIMP_SIGNAL */
  1135. - static int    _time_flag = 0;
  1136. - #ifdef XIMP_SIGNAL
  1137. - static int
  1138. - _time_out()
  1139. -     {
  1140. -     _time_flag = 1;
  1141. -     }
  1142. - #endif /* XIMP_SIGNAL */
  1143. - 
  1144. X  #define        XIM_UNKNOWN_KEYSYM    0x77777777
  1145. X  #define        XIM_UNDETERMINED    0x77777776
  1146. X  
  1147. --- 38,43 ----
  1148. ***************
  1149. *** 144,149 ****
  1150. --- 133,140 ----
  1151. X  #define XNExtXimp_AuxProcessCallback    "XNExtXimp_AuxProcessCallback"
  1152. X  #define XNExtXimp_AuxDoneCallback       "XNExtXimp_AuxDoneCallback"
  1153. X  #define XNExtXimp_LookupBegin            "XNExtXimp_LookupBegin"
  1154. + #define XNExtXimp_RestartCallback    "XNExtXimp_RestartCallback"
  1155. + #define XNExtXimp_DestroyCallback    "XNExtXimp_DestroyCallback"
  1156. X  
  1157. X  /*
  1158. X   * Ximp properties for extented XIC attribute
  1159. ***************
  1160. *** 202,207 ****
  1161. --- 193,200 ----
  1162. X  Private int     ximp_ext_aux_draw_callback();
  1163. X  Private int     ximp_ext_aux_process_callback();
  1164. X  Private int     ximp_ext_aux_done_callback();
  1165. + Private int     ximp_ext_restart_callback();
  1166. + Private int     ximp_ext_destroy_callback();
  1167. X  Private int    nested_list();
  1168. X  
  1169. X  /* If you need to extend IC attributes, please add function here */
  1170. ***************
  1171. *** 228,233 ****
  1172. --- 221,228 ----
  1173. X      XNExtXimp_AuxProcessCallback, ximp_ext_aux_process_callback,
  1174. X      XNExtXimp_AuxDoneCallback, ximp_ext_aux_done_callback,
  1175. X      XNExtXimp_LookupBegin, ximp_ext_lookup_begin,
  1176. +     XNExtXimp_RestartCallback, ximp_ext_restart_callback,
  1177. +     XNExtXimp_DestroyCallback, ximp_ext_destroy_callback,
  1178. X      /*
  1179. X       * If you need to extend IC attributes, please add attribute/function
  1180. X       * here
  1181. ***************
  1182. *** 302,310 ****
  1183. X  
  1184. X  
  1185. X  typedef struct {
  1186. !     Atom message_type;
  1187. !     Atom ext_type;
  1188. !     Window owner;
  1189. X  } XimpConversionPredArgRec, *XimpConversionPredArg;
  1190. X  
  1191. X  Private Bool
  1192. --- 297,306 ----
  1193. X  
  1194. X  
  1195. X  typedef struct {
  1196. !     Atom    message_type;
  1197. !     Atom    ext_type;
  1198. !     Window    owner;
  1199. !     ICID    icid;
  1200. X  } XimpConversionPredArgRec, *XimpConversionPredArg;
  1201. X  
  1202. X  Private Bool
  1203. ***************
  1204. *** 323,344 ****
  1205. X  {
  1206. X      XimpConversionPredArg arg = (XimpConversionPredArg) arg0;
  1207. X  
  1208. !     if (ev->type == ClientMessage) {
  1209. !         if (ev->xclient.message_type == arg->message_type) {
  1210. !             if (ev->xclient.format == 32) {
  1211. !                 if(ev->xclient.data.l[0] == XIMP_ERROR)
  1212. !                     return(True);
  1213. !                 else if(ev->xclient.data.l[0] == XIMP_EXTENSION
  1214. !                      && ev->xclient.data.l[3] == arg->ext_type)
  1215. !                     return(True);
  1216. !             }
  1217. !         }
  1218. !     } else if (ev->type == DestroyNotify) {
  1219. !         if (ev->xdestroywindow.window == arg->owner) {
  1220. !             return(True);
  1221. !         }
  1222. X      }
  1223. !     return(False);
  1224. X  }
  1225. X  
  1226. X  Private int
  1227. --- 319,340 ----
  1228. X  {
  1229. X      XimpConversionPredArg arg = (XimpConversionPredArg) arg0;
  1230. X  
  1231. !     if( ev->type == ClientMessage ) {
  1232. !     if( ev->xclient.message_type == arg->message_type  &&
  1233. !         ev->xclient.format == 32  &&
  1234. !         ev->xclient.data.l[1] == arg->icid ) {
  1235. !         if( ev->xclient.data.l[0] == XIMP_ERROR )
  1236. !         return( True );
  1237. !         else if( ev->xclient.data.l[0] == XIMP_EXTENSION  &&
  1238. !              ev->xclient.data.l[2] == arg->ext_type )
  1239. !         return( True );
  1240. X      }
  1241. !     } else if( ev->type == DestroyNotify ) {
  1242. !     if( ev->xdestroywindow.window == arg->owner ) {
  1243. !         return( True );
  1244. !     }
  1245. !     }
  1246. !     return( False );
  1247. X  }
  1248. X  
  1249. X  Private int
  1250. ***************
  1251. *** 376,428 ****
  1252. X      return True;
  1253. X      break;
  1254. X      case XICOpGet:
  1255. !     if(ic->ximp_icpart->icid == NULL) {
  1256. !         if(((Ximp_XIM)ic->core.im)->ximp_impart->inputserver)
  1257. !             return (False);
  1258. !         *((long *) value) = (long)(ext_im->extension_conversion);
  1259. !         return (True);
  1260. !         }
  1261. !     _Ximp_IM_SendMessage(ic, XIMP_EXTENSION,
  1262. X               ext_im->extension_conversion_id,
  1263. X               False,    /* GetICVelues */
  1264. !              value);
  1265. ! #ifdef XIMP_SIGNAL
  1266. !     signal(SIGALRM, _time_out);
  1267. !     alarm(XIMP_TIME_OUT);
  1268. ! #endif /* XIMP_SIGNAL */
  1269. X      Arg.message_type = ((Ximp_XIM)ic->core.im)->ximp_impart->improtocol_id;
  1270. !     Arg.ext_type     = ext_im->extension_conversion_id;
  1271. X      Arg.owner = ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window;
  1272. !     while(_time_flag != 1) {
  1273. !         if( (XCheckIfEvent(ic->core.im->core.display, &event, ximp_ext_conversionPredicate, (XPointer)&Arg)) == False) {
  1274. ! #ifdef XIMP_SIGNAL
  1275. !             sleep(1);
  1276. ! #endif /* XIMP_SIGNAL */
  1277. !             continue;
  1278. !             }
  1279. !         if(event.type == ClientMessage &&
  1280. !            event.xclient.data.l[0] == XIMP_EXTENSION) {
  1281. ! #ifdef XIMP_SIGNAL
  1282. !             alarm(0);
  1283. ! #endif /* XIMP_SIGNAL */
  1284. !             ext_im->extension_conversion = (Bool)event.xclient.data.l[4];
  1285. !             *((long *) value) = (long)(ext_im->extension_conversion);
  1286. !             _time_flag = 0;
  1287. !             return(True);
  1288. !             }
  1289. !         else {
  1290. ! #ifdef XIMP_SIGNAL
  1291. !             alarm(0);
  1292. ! #endif /* XIMP_SIGNAL */
  1293. !             _Ximp_ProcError (ic->core.im->core.display, NULL, &event);
  1294. !             _time_flag = 0;
  1295. !             /* return(False); */
  1296. !             continue;
  1297. !             }
  1298. !         }
  1299. !     _time_flag = 0;
  1300. !     return(False);
  1301. !     break;
  1302. X      }
  1303. X      return (False);
  1304. X  }
  1305. --- 372,396 ----
  1306. X      return True;
  1307. X      break;
  1308. X      case XICOpGet:
  1309. !     if( ic->ximp_icpart->icid == NULL ) {
  1310. !         if(((Ximp_XIM)ic->core.im)->ximp_impart->inputserver)
  1311. !         return( False );
  1312. !         *((long *) value) = (long)(ext_im->extension_conversion);
  1313. !         return (True);
  1314. !     }
  1315. !     _Ximp_IM_SendMessage( ic, XIMP_EXTENSION,
  1316. X               ext_im->extension_conversion_id,
  1317. X               False,    /* GetICVelues */
  1318. !              value );
  1319. X      Arg.message_type = ((Ximp_XIM)ic->core.im)->ximp_impart->improtocol_id;
  1320. !     Arg.ext_type = ext_im->extension_conversion_id;
  1321. X      Arg.owner = ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window;
  1322. !     Arg.icid = ic->ximp_icpart->icid;
  1323. !     if( !_XimpIfEvent( ic, &event, ximp_ext_conversionPredicate, (XPointer)&Arg ) )
  1324. !         return( False );
  1325. !     ext_im->extension_conversion = (Bool)event.xclient.data.l[4];
  1326. !     *((long *) value) = (long)(ext_im->extension_conversion);
  1327. !     return( True );
  1328. X      }
  1329. X      return (False);
  1330. X  }
  1331. ***************
  1332. *** 714,719 ****
  1333. --- 682,733 ----
  1334. X      return (False);
  1335. X  }
  1336. X  
  1337. + Private int
  1338. + ximp_ext_restart_callback( ic, op, value )
  1339. + Ximp_XIC        ic;
  1340. + XICOp_t         op;
  1341. + long            value;
  1342. + {
  1343. +     switch( op ) {
  1344. +       case XICOpCreate:
  1345. +       case XICOpSet:
  1346. +     ic->ximp_icpart->restart.client_data = ((XIMCallback *)value)->client_data;
  1347. +     ic->ximp_icpart->restart.callback = ((XIMCallback *)value)->callback;
  1348. +     return( True );
  1349. +     break;
  1350. + 
  1351. +       case XICOpGet:
  1352. +     /*
  1353. +      * NOT surely implemented Yet. Need attention.
  1354. +      */
  1355. +     break;
  1356. +     }
  1357. +     return( False );
  1358. + }
  1359. + 
  1360. + Private int
  1361. + ximp_ext_destroy_callback( ic, op, value )
  1362. + Ximp_XIC        ic;
  1363. + XICOp_t         op;
  1364. + long            value;
  1365. + {
  1366. +     switch( op ) {
  1367. +       case XICOpCreate:
  1368. +       case XICOpSet:
  1369. +     ic->ximp_icpart->destroy.client_data = ((XIMCallback *)value)->client_data;
  1370. +     ic->ximp_icpart->destroy.callback = ((XIMCallback *)value)->callback;
  1371. +     return( True );
  1372. +     break;
  1373. + 
  1374. +       case XICOpGet:
  1375. +     /*
  1376. +      * NOT surely implemented Yet. Need attention.
  1377. +      */
  1378. +     break;
  1379. +     }
  1380. +     return( False );
  1381. + }
  1382. + 
  1383. X  static void _Ximp_Extlookupstart();
  1384. X  static void _Ximp_Extlookupdraw();
  1385. X  static void _Ximp_Extlookupprocess();
  1386. ***************
  1387. *** 1277,1283 ****
  1388. X  
  1389. X      icid = ev->data.l[1];
  1390. X      ext_id = ev->data.l[2];
  1391. !     ic = _Ximp_LookupXIC(icid);
  1392. X  
  1393. X      im_impart = ((Ximp_XIM)ic->core.im)->ximp_impart;
  1394. X      ext_im = (Ximp_ExtXIMRec *) im_impart->imtype;
  1395. --- 1291,1298 ----
  1396. X  
  1397. X      icid = ev->data.l[1];
  1398. X      ext_id = ev->data.l[2];
  1399. !     if( (ic = _Ximp_LookupXIC(icid)) == NULL )
  1400. !     return;
  1401. X  
  1402. X      im_impart = ((Ximp_XIM)ic->core.im)->ximp_impart;
  1403. X      ext_im = (Ximp_ExtXIMRec *) im_impart->imtype;
  1404. ***************
  1405. *** 1290,1293 ****
  1406. --- 1305,1333 ----
  1407. X      } else;
  1408. X      /* Add extension here */
  1409. X      return;
  1410. + }
  1411. + 
  1412. + 
  1413. + void
  1414. + _Ximp_CallRestartCallbackExtension( xic )
  1415. + Ximp_XIC        xic;
  1416. + {
  1417. +     register    XIMCallback    *cb;
  1418. + 
  1419. +     cb = &xic->ximp_icpart->restart;
  1420. +     if( cb->callback ) {
  1421. +     (*cb->callback)( xic, cb->client_data, NULL );
  1422. +     }
  1423. + }
  1424. + 
  1425. + void
  1426. + _Ximp_CallDestroyCallbackExtension( xic )
  1427. + Ximp_XIC        xic;
  1428. + {
  1429. +     register    XIMCallback    *cb;
  1430. + 
  1431. +     cb = &xic->ximp_icpart->destroy;
  1432. +     if( cb->callback ) {
  1433. +     (*cb->callback)( xic, cb->client_data, NULL );
  1434. +     }
  1435. X  }
  1436. *** /tmp/d14350    Sat Aug  1 11:13:38 1992
  1437. --- mit/lib/X/Ximp/XimpICG.c    Sat Aug  1 11:13:33 1992
  1438. ***************
  1439. *** 1,4 ****
  1440. ! /* $XConsortium: XimpICG.c,v 1.8 92/04/22 15:46:03 rws Exp $ */
  1441. X  /******************************************************************
  1442. X  
  1443. X      Copyright 1991, 1992 by FUJITSU LIMITED.
  1444. --- 1,4 ----
  1445. ! /* $XConsortium: XimpICG.c,v 1.9 92/07/29 10:15:56 rws Exp $ */
  1446. X  /******************************************************************
  1447. X  
  1448. X      Copyright 1991, 1992 by FUJITSU LIMITED.
  1449. ***************
  1450. *** 28,34 ****
  1451. X  
  1452. X  Author: Takashi Fujiwara     FUJITSU LIMITED
  1453. X          Hideki Hiura         Sun Microsystems, Inc.
  1454. !         Makoto Wakamatsu     Sony Corporaion
  1455. X  
  1456. X  ******************************************************************/
  1457. X  
  1458. --- 28,34 ----
  1459. X  
  1460. X  Author: Takashi Fujiwara     FUJITSU LIMITED
  1461. X          Hideki Hiura         Sun Microsystems, Inc.
  1462. !         Makoto Wakamatsu     Sony Corporation
  1463. X  
  1464. X  ******************************************************************/
  1465. X  
  1466. ***************
  1467. *** 40,51 ****
  1468. X  
  1469. X  #include "Ximplc.h"
  1470. X  
  1471. - #ifdef XIMP_SIGNAL
  1472. - #include <sys/signal.h>
  1473. - #endif /* XIMP_SIGNAL */
  1474. - 
  1475. X  extern char         *_Ximp_GetICValues();
  1476. X  extern Bool         _Ximp_GetICExtension();
  1477. X  
  1478. X  static Bool          _Ximp_PreGetAttributes();
  1479. X  static Bool          _Ximp_StatusGetAttributes();
  1480. --- 40,48 ----
  1481. X  
  1482. X  #include "Ximplc.h"
  1483. X  
  1484. X  extern char         *_Ximp_GetICValues();
  1485. X  extern Bool         _Ximp_GetICExtension();
  1486. + extern Bool        _Ximp_CMPredicate();
  1487. X  
  1488. X  static Bool          _Ximp_PreGetAttributes();
  1489. X  static Bool          _Ximp_StatusGetAttributes();
  1490. ***************
  1491. *** 629,658 ****
  1492. X      return(True);
  1493. X  }
  1494. X  
  1495. - static int     _time_flag = 0;
  1496. - 
  1497. - #ifdef XIMP_SIGNAL
  1498. - static int
  1499. - _time_out()
  1500. - {
  1501. -     _time_flag = 1;
  1502. - }
  1503. - #endif /* XIMP_SIGNAL */
  1504. - 
  1505. - static Bool Check_Message(display, event, arg)
  1506. -     Display *display;
  1507. -     XEvent  *event;
  1508. -     XPointer arg;
  1509. - {
  1510. -     if ( event->type == ClientMessage && 
  1511. -      event->xclient.message_type == 
  1512. -      ((Ximp_XIM)arg)->ximp_impart->improtocol_id )
  1513. -     return True;
  1514. -     else
  1515. -     return False;
  1516. - }
  1517. - 
  1518. - 
  1519. X  static XPointer
  1520. X  _Ximp_GetRequestIM(ic, mask, get_atom_id, atom_id)
  1521. X      Ximp_XIC     ic;
  1522. --- 626,631 ----
  1523. ***************
  1524. *** 659,708 ****
  1525. X      unsigned long     mask;
  1526. X      Atom         get_atom_id, atom_id;
  1527. X  {
  1528. !     XEvent         event;
  1529. !     Atom            actual_type_ret;
  1530. !     int        actual_format_ret;
  1531. !     unsigned long   nitems_ret;
  1532. !     unsigned long   bytes_after_ret;
  1533. !     unsigned char   *data;
  1534. X  
  1535. !     if(ic->ximp_icpart->icid == (ICID)NULL)
  1536. !         return(NULL);
  1537. !     if(!(ic->ximp_icpart->value_mask & XIMP_CLIENT_WIN))
  1538. !         return(NULL);
  1539. X  
  1540. !     _Ximp_IM_SendMessage(ic, XIMP_GETVALUE, mask, NULL, NULL);
  1541. ! #ifdef XIMP_SIGNAL
  1542. !     signal(SIGALRM, _time_out);
  1543. !     alarm(XIMP_TIME_OUT);
  1544. ! #endif /* XIMP_SIGNAL */
  1545. X  
  1546. !     while(_time_flag != 1) {
  1547. !         if (XCheckIfEvent(ic->core.im->core.display, &event, 
  1548. !             Check_Message, (XPointer)ic->core.im) ) {
  1549. ! #ifdef XIMP_SIGNAL
  1550. !             alarm(0);
  1551. ! #endif /* XIMP_SIGNAL */
  1552. !             break;
  1553. !         } else {
  1554. ! #ifdef XIMP_SIGNAL
  1555. !             sleep(1);
  1556. ! #endif /* XIMP_SIGNAL */
  1557. !             continue;
  1558. !         }
  1559. !     }
  1560. !     _time_flag = 0;
  1561. X  
  1562. !     if(event.xclient.data.l[0] != XIMP_GETVALUE_RETURN)
  1563. !         return(NULL);
  1564. ! 
  1565. !     XGetWindowProperty(ic->core.im->core.display,
  1566. !                ic->core.client_window,
  1567. !                get_atom_id, 0L, 1000000L, True, atom_id,
  1568. !                &actual_type_ret, &actual_format_ret, &nitems_ret,
  1569. !                &bytes_after_ret, &data);
  1570. ! 
  1571. !         if(actual_format_ret == 0 || nitems_ret == 0)
  1572. !         return(NULL);
  1573. !     return((XPointer)data);
  1574. X  }
  1575. --- 632,665 ----
  1576. X      unsigned long     mask;
  1577. X      Atom         get_atom_id, atom_id;
  1578. X  {
  1579. !     XEvent        event;
  1580. !     Atom            actual_type_ret;
  1581. !     int            actual_format_ret;
  1582. !     unsigned long    nitems_ret;
  1583. !     unsigned long    bytes_after_ret;
  1584. !     unsigned char    *data;
  1585. !     XimpCMPredicateArgRec    Arg;
  1586. X  
  1587. !     if(ic->ximp_icpart->icid == (ICID)NULL)
  1588. !     return(NULL);
  1589. !     if(!(ic->ximp_icpart->value_mask & XIMP_CLIENT_WIN))
  1590. !     return(NULL);
  1591. X  
  1592. !     _Ximp_IM_SendMessage(ic, XIMP_GETVALUE, mask, NULL, NULL);
  1593. !     Arg.type = ((Ximp_XIM)ic->core.im)->ximp_impart->improtocol_id;
  1594. !     Arg.owner = ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window;
  1595. !     Arg.protocol = XIMP_GETVALUE_RETURN;
  1596. !     Arg.icid = ic->ximp_icpart->icid;
  1597. !     if( !_XimpIfEvent( ic, &event, _Ximp_CMPredicate, (XPointer)&Arg ) )
  1598. !     return( NULL );
  1599. X  
  1600. !     XGetWindowProperty(ic->core.im->core.display,
  1601. !                ic->core.client_window,
  1602. !                get_atom_id, 0L, 1000000L, True, atom_id,
  1603. !                &actual_type_ret, &actual_format_ret, &nitems_ret,
  1604. !                &bytes_after_ret, &data);
  1605. X  
  1606. !     if(actual_format_ret == 0 || nitems_ret == 0)
  1607. !     return(NULL);
  1608. !     return((XPointer)data);
  1609. X  }
  1610. *** /tmp/d14390    Sat Aug  1 11:14:08 1992
  1611. --- mit/lib/X/Ximp/XimpICS.c    Sat Aug  1 11:13:58 1992
  1612. ***************
  1613. *** 1,8 ****
  1614. ! /* $XConsortium: XimpICS.c,v 1.3 92/04/14 13:29:14 rws Exp $ */
  1615. X  /******************************************************************
  1616. X  
  1617. X                Copyright 1991, 1992 by FUJITSU LIMITED
  1618. !               Copyright 1991, 1992 by Sony Corporaion
  1619. X  
  1620. X  Permission to use, copy, modify, distribute, and sell this software
  1621. X  and its documentation for any purpose is hereby granted without fee,
  1622. --- 1,8 ----
  1623. ! /* $XConsortium: XimpICS.c,v 1.4 92/07/29 10:16:04 rws Exp $ */
  1624. X  /******************************************************************
  1625. X  
  1626. X                Copyright 1991, 1992 by FUJITSU LIMITED
  1627. !               Copyright 1991, 1992 by Sony Corporation
  1628. X  
  1629. X  Permission to use, copy, modify, distribute, and sell this software
  1630. X  and its documentation for any purpose is hereby granted without fee,
  1631. ***************
  1632. *** 26,35 ****
  1633. X  OR PERFORMANCE OF THIS SOFTWARE.
  1634. X  
  1635. X    Author: Takashi Fujiwara     FUJITSU LIMITED 
  1636. !           Makoto Wakamatsu     Sony Corporaion
  1637. X  
  1638. X  ******************************************************************/
  1639. X  
  1640. X  #include "Xlibint.h"
  1641. X  #include "Xlcint.h"
  1642. X  
  1643. --- 26,36 ----
  1644. X  OR PERFORMANCE OF THIS SOFTWARE.
  1645. X  
  1646. X    Author: Takashi Fujiwara     FUJITSU LIMITED 
  1647. !           Makoto Wakamatsu     Sony Corporation
  1648. X  
  1649. X  ******************************************************************/
  1650. X  
  1651. + #define    NEED_EVENTS
  1652. X  #include "Xlibint.h"
  1653. X  #include "Xlcint.h"
  1654. X  
  1655. ***************
  1656. *** 51,56 ****
  1657. --- 52,128 ----
  1658. X  static Bool        _Ximp_PreSetAttributes();
  1659. X  static Bool        _Ximp_StatusSetAttributes();
  1660. X  
  1661. + 
  1662. + static Bool
  1663. + _Ximp_PNPredicate( d, ev, arg0 )
  1664. + Display        *d;
  1665. + XEvent        *ev;
  1666. + XPointer    arg0;
  1667. + {
  1668. +     XimpPNPredicateArg arg = (XimpPNPredicateArg)arg0;
  1669. + 
  1670. +     if( ev->type == PropertyNotify ) {
  1671. +     if( ev->xproperty.window == arg->window  &&
  1672. +         ev->xproperty.atom == arg->atom  &&
  1673. +         ev->xproperty.state == PropertyDelete ) {
  1674. +         return(True);
  1675. +     }
  1676. +     }
  1677. +     else if( ev->type == ClientMessage ) {
  1678. +     if( ev->xclient.message_type == arg->type  &&
  1679. +         ev->xclient.format == 32  &&
  1680. +         ev->xclient.data.l[1] == arg->icid  &&
  1681. +         ev->xclient.data.l[0] == XIMP_ERROR )
  1682. +         return( True );
  1683. +     }
  1684. +     else if( ev->type == DestroyNotify ) {
  1685. +     if( ev->xdestroywindow.window == arg->owner ) {
  1686. +         return( True );
  1687. +     }
  1688. +     }
  1689. +     return( False );
  1690. + }
  1691. + 
  1692. + Bool
  1693. + _XimpPNIfEvent( ic, atom )
  1694. + Ximp_XIC    ic;
  1695. + Atom        atom;
  1696. + {
  1697. +     XEvent            event;
  1698. +     XimpPNPredicateArgRec    Arg;    
  1699. + 
  1700. +     Arg.type = ((Ximp_XIM)ic->core.im)->ximp_impart->improtocol_id;
  1701. +     Arg.owner = ((Ximp_XIM)ic->core.im)->ximp_impart->fe_window;
  1702. +     Arg.icid = ic->ximp_icpart->icid;
  1703. +     Arg.window = ic->core.client_window;
  1704. +     Arg.atom = atom;
  1705. +     XIfEvent( ic->core.im->core.display, &event, _Ximp_PNPredicate, (XPointer)&Arg );
  1706. +     if( event.type != PropertyNotify ) {
  1707. +     XPutBackEvent( ic->core.im->core.display, &event );
  1708. +     XDeleteProperty( ic->core.im->core.display,
  1709. +              ic->core.client_window,
  1710. +              ((Ximp_XIM)ic->core.im)->ximp_impart->focus_win_id );
  1711. +     XDeleteProperty( ic->core.im->core.display,
  1712. +              ic->core.client_window,
  1713. +              ((Ximp_XIM)ic->core.im)->ximp_impart->preedit_atr_id );
  1714. +     XDeleteProperty( ic->core.im->core.display,
  1715. +              ic->core.client_window,
  1716. +              ((Ximp_XIM)ic->core.im)->ximp_impart->preeditfont_id );
  1717. +     XDeleteProperty( ic->core.im->core.display,
  1718. +              ic->core.client_window,
  1719. +              ((Ximp_XIM)ic->core.im)->ximp_impart->status_atr_id );
  1720. +     XDeleteProperty( ic->core.im->core.display,
  1721. +              ic->core.client_window,
  1722. +              ((Ximp_XIM)ic->core.im)->ximp_impart->statusfont_id );
  1723. +     if( event.type == DestroyNotify )
  1724. +         XPutBackEvent( ic->core.im->core.display, &event );
  1725. +     else
  1726. +         _Ximp_ProcError( ic, ic->core.im->core.display, NULL, &event );
  1727. +     return( False );
  1728. +     }
  1729. +     return( True );
  1730. + }
  1731. + 
  1732. X  char *
  1733. X  _Ximp_SetICValues(ic, values)
  1734. X      Ximp_XIC     ic;
  1735. ***************
  1736. *** 117,126 ****
  1737. X      else {
  1738. X          change_mask &= ~(XIMP_PROP_STATUS | XIMP_PROP_STSFONT);
  1739. X          }
  1740. !     if(change_mask)
  1741. !          _Ximp_IM_SendMessage(ic, XIMP_SETVALUE, change_mask, NULL, NULL);
  1742. !     return(ret);
  1743. X      }
  1744. X  
  1745. X  char *
  1746. X  _Ximp_SetICValueData(ic, values, mode, change_mask)
  1747. --- 189,222 ----
  1748. X      else {
  1749. X          change_mask &= ~(XIMP_PROP_STATUS | XIMP_PROP_STSFONT);
  1750. X          }
  1751. !     if(change_mask) {
  1752. !         XWindowAttributes        war;
  1753. !         long            mask;
  1754. ! 
  1755. !         XGetWindowAttributes( ic->core.im->core.display,
  1756. !                   ic->core.client_window, &war );
  1757. !         XSelectInput( ic->core.im->core.display, ic->core.client_window,
  1758. !               war.your_event_mask | PropertyChangeMask );
  1759. !         _Ximp_IM_SendMessage(ic, XIMP_SETVALUE, change_mask, NULL, NULL);
  1760. !         if( change_mask & XIMP_PROP_FOCUS )
  1761. !         if( !_XimpPNIfEvent( ic, ((Ximp_XIM)ic->core.im)->ximp_impart->focus_win_id ) )
  1762. !             change_mask = 0;
  1763. !         if( change_mask & XIMP_PROP_PREEDIT )
  1764. !         if( !_XimpPNIfEvent( ic, ((Ximp_XIM)ic->core.im)->ximp_impart->preedit_atr_id ) )
  1765. !             change_mask = 0;
  1766. !         if( change_mask & XIMP_PROP_PREFONT )
  1767. !         if( !_XimpPNIfEvent( ic, ((Ximp_XIM)ic->core.im)->ximp_impart->preeditfont_id ) )
  1768. !             change_mask = 0;
  1769. !         if( change_mask & XIMP_PROP_STATUS )
  1770. !         if( !_XimpPNIfEvent( ic, ((Ximp_XIM)ic->core.im)->ximp_impart->status_atr_id ) )
  1771. !             change_mask = 0;
  1772. !         if( change_mask & XIMP_PROP_STSFONT )
  1773. !         !_XimpPNIfEvent( ic, ((Ximp_XIM)ic->core.im)->ximp_impart->statusfont_id );
  1774. SHAR_EOF
  1775. true || echo 'restore of fix-16 failed'
  1776. fi
  1777. echo 'End of  part 2'
  1778. echo 'File fix-16 is continued in part 3'
  1779. echo 3 > _shar_seq_.tmp
  1780. exit 0
  1781. -- 
  1782. Senior Systems Scientist        mail: dcmartin@msi.com
  1783. Molecular Simulations, Inc.        uucp: uunet!dcmartin
  1784. 796 North Pastoria Avenue        at&t: 408/522-9236
  1785. Sunnyvale, California 94086        fax: 408/732-0831
  1786.