home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume10 / boxx / patch1 / patch
Encoding:
Text File  |  1990-12-09  |  63.8 KB  |  2,112 lines

  1. *** Makefile.orig    Fri Nov 30 08:44:04 1990
  2. --- Makefile    Thu Nov  1 16:19:05 1990
  3. ***************
  4. *** 8,13 ****
  5. --- 8,16 ----
  6.   # Where to install the help file
  7.   HELPDIR        = /usr/local/lib/help
  8.   
  9. + # Your system mailer
  10. + MAILER        = /usr/ucb/mail
  11.   # Where you installed Open Windows
  12.   OPENWINHOME    = /usr/openwin
  13.   
  14. ***************
  15. *** 15,30 ****
  16.   LDFLAGS        = -L$(OPENWINHOME)/lib
  17.   
  18.   # Where your XView include files are installed
  19. ! CPPFLAGS    = -I$(OPENWINHOME)/include
  20.   
  21. ! OFILES    =     boss.o boss_ui.o calentool.o casio_master.o casio_slave.o \
  22. !         database.o do_clear.o do_load.o do_port.o do_schedule.o do_store.o \
  23. !         expand.o misc.o object.o packet.o parse.o print.o \
  24. !         record.o window_misc.o
  25.   
  26.   OPTIONS        = -O
  27.   
  28. ! CPPFLAGS    = -I$(OPENWINHOME)/include
  29.   LDFLAGS        = -L$(OPENWINHOME)/lib
  30.   LDLIBS        = -lxview -lolgx -lX
  31.   
  32. --- 18,34 ----
  33.   LDFLAGS        = -L$(OPENWINHOME)/lib
  34.   
  35.   # Where your XView include files are installed
  36. ! CPPFLAGS    = -I$(OPENWINHOME)/include -DMAILER=\"$(MAILER)\"
  37.   
  38. ! OFILES        = about.o boss.o boss_ui.o busy.o calentool.o casio_master.o casio_slave.o \
  39. !           database.o do_clear.o do_load.o do_port.o do_schedule.o do_store.o \
  40. !           expand.o filename_completion.o list_misc.o misc.o object.o packet.o \
  41. !           parse.o pinned_menu_notify.o place_dialog.o print.o \
  42. !           record.o send_mail.o window_misc.o
  43.   
  44.   OPTIONS        = -O
  45.   
  46. ! CPPFLAGS    = -I$(OPENWINHOME)/include -DMAILER=\"$(MAILER)\"
  47.   LDFLAGS        = -L$(OPENWINHOME)/lib
  48.   LDLIBS        = -lxview -lolgx -lX
  49.   
  50. *** Imakefile.orig    Fri Nov 30 08:44:07 1990
  51. --- Imakefile    Thu Nov  1 16:19:05 1990
  52. ***************
  53. *** 2,22 ****
  54.   
  55.   HELPDIR        = /usr/local/lib/help
  56.   
  57.   LOCAL_LIBRARIES = -lxview -lolgx $(XLIB)
  58.   
  59.   LDOPTIONS    = -L$(OPENWINHOME)/lib
  60.   
  61. ! CFLAGS        = -O -I$(OPENWINHOME)/include
  62.   
  63. ! SRCS        = boss.c boss_ui.c calentool.c casio_master.c casio_slave.c \
  64.             database.c do_clear.c do_load.c do_port.c do_schedule.c do_store.c \
  65. !           expand.c misc.c object.c packet.c parse.y print.c \
  66. !           record.c window_misc.c
  67.   
  68. ! OBJS        = boss.o boss_ui.o calentool.o casio_master.o casio_slave.o \
  69.             database.o do_clear.o do_load.o do_port.o do_schedule.o do_store.o \
  70. !           expand.o misc.o object.o packet.o parse.o print.o \
  71. !           record.o window_misc.o
  72.   
  73.   ComplexProgramTarget(boss)
  74.   
  75. --- 2,24 ----
  76.   
  77.   HELPDIR        = /usr/local/lib/help
  78.   
  79. + MAILER        = /usr/ucb/mail
  80.   LOCAL_LIBRARIES = -lxview -lolgx $(XLIB)
  81.   
  82.   LDOPTIONS    = -L$(OPENWINHOME)/lib
  83.   
  84. ! CFLAGS        = -O -I$(OPENWINHOME)/include -DMAILER=\"$(MAILER)\"
  85.   
  86. ! SRCS        = about.c boss.c boss_ui.c busy.c calentool.c casio_master.c casio_slave.c \
  87.             database.c do_clear.c do_load.c do_port.c do_schedule.c do_store.c \
  88. !           expand.c filename_completion.c list_misc.c misc.c object.c packet.c parse.y pinned_menu_notify.c place_dialog.c print.c \
  89. !           record.c send_mail.c window_misc.c
  90.   
  91. ! SRCS        = about.o boss.o boss_ui.o busy.o calentool.o casio_master.o casio_slave.o \
  92.             database.o do_clear.o do_load.o do_port.o do_schedule.o do_store.o \
  93. !           expand.o filename_completion.o list_misc.o misc.o object.o packet.o parse.o pinned_menu_notify.o place_dialog.o print.o \
  94. !           record.o send_mail.o window_misc.o
  95.   
  96.   ComplexProgramTarget(boss)
  97.   
  98. *** boss.info.orig    Fri Nov 30 08:44:09 1990
  99. --- boss.info    Fri Nov 30 08:15:32 1990
  100. ***************
  101. *** 7,13 ****
  102.   Boss 1.0 provides an interface between your workstation and a Casio BOSS Digital Diary.  Using Boss 1.0, you can load and store data to and from your Casio BOSS.
  103.   # 
  104.   :file_button
  105. ! The "File" button provides access to the basic Boss functions: loading and storing data, as well as converting schedule items to other formats.
  106.   # 
  107.   :view_button
  108.   The "View" button provides access to the "Clear entries" dialog box.
  109. --- 7,13 ----
  110.   Boss 1.0 provides an interface between your workstation and a Casio BOSS Digital Diary.  Using Boss 1.0, you can load and store data to and from your Casio BOSS.
  111.   # 
  112.   :file_button
  113. ! The "File" button provides access to the basic Boss functions: loading and storing data, as well as converting schedule items to other formats.  You can also read about the history of Boss, and send mail to the developer.
  114.   # 
  115.   :view_button
  116.   The "View" button provides access to the "Clear entries" dialog box.
  117. ***************
  118. *** 150,152 ****
  119. --- 150,227 ----
  120.   # 
  121.   :schedule_accept
  122.   When you click the "Schedule" button, the schedule items held in Boss memory will be converted to the desired format.  Certain files may be modified during the conversion.
  123. + # 
  124. + :about_controls
  125. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  126. + # 
  127. + :msg_1
  128. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  129. + # 
  130. + :msg_5
  131. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  132. + # 
  133. + :msg_6
  134. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  135. + # 
  136. + :msg_7
  137. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  138. + # 
  139. + :msg_8
  140. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  141. + # 
  142. + :msg_9
  143. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  144. + # 
  145. + :msg_11
  146. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  147. + # 
  148. + :msg_12
  149. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  150. + # 
  151. + :msg_13
  152. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  153. + # 
  154. + :msg_14
  155. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  156. + # 
  157. + :msg_16
  158. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  159. + # 
  160. + :msg_17
  161. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  162. + # 
  163. + :msg_18
  164. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  165. + # 
  166. + :msg_19
  167. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  168. + # 
  169. + :msg_20
  170. + This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  171. + # 
  172. + :send_mail
  173. + Clicking this button will open another window in which you can compose and send mail to the developer of boss.
  174. + # 
  175. + :mail_controls
  176. + This window allows you to send mail concerning boss to its developer.  You are encouraged to send comments and suggestions in order to make boss a better tool.
  177. + # 
  178. + :msg_21
  179. + This window allows you to send mail concerning boss to its developer.  You are encouraged to send comments and suggestions in order to make boss a better tool.
  180. + # 
  181. + :msg_22
  182. + This window allows you to send mail concerning boss to its developer.  You are encouraged to send comments and suggestions in order to make boss a better tool.
  183. + # 
  184. + :address
  185. + This choice item lets you select the address to which your mail will be sent.  If your machine understands Internet-style addresses, you should use the first choice item.  If you are a UUCP-based site, you should use the second item.  If neither address works, use the third item to enter a valid address.
  186. + # 
  187. + :other_address
  188. + This text field is used to enter an e-mail address to which your mail will be sent.  It should only be used if the two default addresses do not work from your site.
  189. + # 
  190. + :mail_controls1
  191. + This window allows you to send mail concerning boss to its developer.  You are encouraged to send comments and suggestions in order to make boss a better tool.
  192. + # 
  193. + :accept_send
  194. + Clicking this button will send your mail message to boss's developer.
  195. + # 
  196. + :cancel_mail
  197. + Clicking this button cancels the message you were going to send.
  198. *** about.c.orig    Fri Nov 30 08:44:10 1990
  199. --- about.c    Thu Nov  1 16:15:59 1990
  200. ***************
  201. *** 0 ****
  202. --- 1,56 ----
  203. + /************************************************************************/
  204. + /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  205. + /*                                    */
  206. + /*    Permission to use, copy, modify, and distribute this software    */
  207. + /*    and its documentation for any purpose and without fee is    */
  208. + /*    hereby granted, provided that the above copyright notice    */
  209. + /*    appear in all copies and that both that copyright notice and    */
  210. + /*    this permission notice appear in supporting documentation, and    */
  211. + /*    that the name of Chuck Musciano and Harris Corporation not be    */
  212. + /*    used in advertising or publicity pertaining to distribution    */
  213. + /*    of the software without specific, written prior permission.    */
  214. + /*    Chuck Musciano and Harris Corporation make no representations    */
  215. + /*    about the suitability of this software for any purpose.  It is    */
  216. + /*    provided "as is" without express or implied warranty.        */
  217. + /*                                    */
  218. + /*    This code contains data and information that is proprietary    */
  219. + /*    to Casio Corporation.  You may be subject to legal action if    */
  220. + /*    this information is released without explicit permission from    */
  221. + /*    Casio.                                */
  222. + /************************************************************************/
  223. + /************************************************************************/
  224. + /*                                    */
  225. + /*    about.c        display a little information window        */
  226. + /*                                    */
  227. + /************************************************************************/
  228. + #include    <stdio.h>
  229. + #include    <sys/param.h>
  230. + #include    <sys/types.h>
  231. + #include    <xview/xview.h>
  232. + #include    <xview/panel.h>
  233. + #include    "boss_ui.h"
  234. + #include    "manifest.h"
  235. + PUBLIC    boss_base_objects    *boss_base;
  236. + PRIVATE    boss_about_objects    *dialog = NULL;
  237. + /************************************************************************/
  238. + EXPORT    Menu_item    popup_about_boss(item, op)
  239. + Menu_item    item;
  240. + Menu_generate    op;
  241. + {
  242. +     if (op == MENU_NOTIFY) {
  243. +        if (dialog == NULL) {
  244. +           dialog = boss_about_objects_initialize(NULL, boss_base->base);
  245. +           place_dialog(boss_base->base, dialog->about);
  246. +           }
  247. +        xv_set(dialog->about, XV_SHOW, TRUE, NULL);
  248. +        }
  249. +     return item;
  250. + }
  251. *** boss_ui.c.orig    Fri Nov 30 08:44:12 1990
  252. --- boss_ui.c    Fri Nov 30 08:15:35 1990
  253. ***************
  254. *** 1,24 ****
  255. - /************************************************************************/
  256. - /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  257. - /*                                    */
  258. - /*    Permission to use, copy, modify, and distribute this software    */
  259. - /*    and its documentation for any purpose and without fee is    */
  260. - /*    hereby granted, provided that the above copyright notice    */
  261. - /*    appear in all copies and that both that copyright notice and    */
  262. - /*    this permission notice appear in supporting documentation, and    */
  263. - /*    that the name of Chuck Musciano and Harris Corporation not be    */
  264. - /*    used in advertising or publicity pertaining to distribution    */
  265. - /*    of the software without specific, written prior permission.    */
  266. - /*    Chuck Musciano and Harris Corporation make no representations    */
  267. - /*    about the suitability of this software for any purpose.  It is    */
  268. - /*    provided "as is" without express or implied warranty.        */
  269. - /*                                    */
  270. - /*    This code contains data and information that is proprietary    */
  271. - /*    to Casio Corporation.  You may be subject to legal action if    */
  272. - /*    this information is released without explicit permission from    */
  273. - /*    Casio.                                */
  274. - /************************************************************************/
  275.   /*
  276.    * boss_ui.c - User interface object initialization functions.
  277.    * This file was generated by `gxv' from `boss.G'.
  278. --- 1,3 ----
  279. ***************
  280. *** 52,57 ****
  281. --- 31,37 ----
  282.       extern Menu_item    load_dialog();
  283.       extern Menu_item    store_dialog();
  284.       extern Menu_item    schedule_dialog();
  285. +     extern Menu_item    popup_about_boss();
  286.       Xv_opaque    obj;
  287.       
  288.       obj = xv_create(XV_NULL, MENU_COMMAND_MENU,
  289. ***************
  290. *** 71,76 ****
  291. --- 51,61 ----
  292.               MENU_STRING, "Schedule Appointments...",
  293.               MENU_GEN_PROC, schedule_dialog,
  294.               NULL,
  295. +         MENU_ITEM,
  296. +             XV_KEY_DATA, INSTANCE, ip,
  297. +             MENU_STRING, "About Boss...",
  298. +             MENU_GEN_PROC, popup_about_boss,
  299. +             NULL,
  300.           MENU_DEFAULT, 2,
  301.           MENU_GEN_PIN_WINDOW, (Xv_opaque) ip[0], "File",
  302.           NULL);
  303. ***************
  304. *** 207,213 ****
  305.           XV_KEY_DATA, INSTANCE, ip,
  306.           XV_WIDTH, 256,
  307.           XV_HEIGHT, 88,
  308. !         XV_LABEL, "Boss 1.0",
  309.           FRAME_CLOSED, FALSE,
  310.           FRAME_SHOW_FOOTER, FALSE,
  311.           FRAME_SHOW_RESIZE_CORNER, FALSE,
  312. --- 192,198 ----
  313.           XV_KEY_DATA, INSTANCE, ip,
  314.           XV_WIDTH, 256,
  315.           XV_HEIGHT, 88,
  316. !         XV_LABEL, "Boss 1.0a",
  317.           FRAME_CLOSED, FALSE,
  318.           FRAME_SHOW_FOOTER, FALSE,
  319.           FRAME_SHOW_RESIZE_CORNER, FALSE,
  320. ***************
  321. *** 1552,1557 ****
  322. --- 1537,2362 ----
  323.           XV_HEIGHT, 20,
  324.           PANEL_LABEL_STRING, "Schedule",
  325.           PANEL_NOTIFY_PROC, accept_schedule,
  326. +         NULL);
  327. +     return obj;
  328. + }
  329. + /*
  330. +  * Initialize an instance of object `about'.
  331. +  */
  332. + boss_about_objects *
  333. + boss_about_objects_initialize(ip, owner)
  334. +     boss_about_objects    *ip;
  335. +     Xv_opaque    owner;
  336. + {
  337. +     if (!ip && !(ip = (boss_about_objects *) calloc(1, sizeof (boss_about_objects))))
  338. +         return (boss_about_objects *) NULL;
  339. +     if (!ip->about)
  340. +         ip->about = boss_about_about_create(ip, owner);
  341. +     if (!ip->about_controls)
  342. +         ip->about_controls = boss_about_about_controls_create(ip, ip->about);
  343. +     if (!ip->msg_1)
  344. +         ip->msg_1 = boss_about_msg_1_create(ip, ip->about_controls);
  345. +     if (!ip->msg_5)
  346. +         ip->msg_5 = boss_about_msg_5_create(ip, ip->about_controls);
  347. +     if (!ip->msg_6)
  348. +         ip->msg_6 = boss_about_msg_6_create(ip, ip->about_controls);
  349. +     if (!ip->msg_7)
  350. +         ip->msg_7 = boss_about_msg_7_create(ip, ip->about_controls);
  351. +     if (!ip->msg_8)
  352. +         ip->msg_8 = boss_about_msg_8_create(ip, ip->about_controls);
  353. +     if (!ip->msg_9)
  354. +         ip->msg_9 = boss_about_msg_9_create(ip, ip->about_controls);
  355. +     if (!ip->msg_11)
  356. +         ip->msg_11 = boss_about_msg_11_create(ip, ip->about_controls);
  357. +     if (!ip->msg_12)
  358. +         ip->msg_12 = boss_about_msg_12_create(ip, ip->about_controls);
  359. +     if (!ip->msg_13)
  360. +         ip->msg_13 = boss_about_msg_13_create(ip, ip->about_controls);
  361. +     if (!ip->msg_14)
  362. +         ip->msg_14 = boss_about_msg_14_create(ip, ip->about_controls);
  363. +     if (!ip->msg_16)
  364. +         ip->msg_16 = boss_about_msg_16_create(ip, ip->about_controls);
  365. +     if (!ip->msg_17)
  366. +         ip->msg_17 = boss_about_msg_17_create(ip, ip->about_controls);
  367. +     if (!ip->msg_18)
  368. +         ip->msg_18 = boss_about_msg_18_create(ip, ip->about_controls);
  369. +     if (!ip->msg_19)
  370. +         ip->msg_19 = boss_about_msg_19_create(ip, ip->about_controls);
  371. +     if (!ip->msg_20)
  372. +         ip->msg_20 = boss_about_msg_20_create(ip, ip->about_controls);
  373. +     if (!ip->message6)
  374. +         ip->message6 = boss_about_message6_create(ip, ip->about_controls);
  375. +     if (!ip->message7)
  376. +         ip->message7 = boss_about_message7_create(ip, ip->about_controls);
  377. +     if (!ip->send_mail)
  378. +         ip->send_mail = boss_about_send_mail_create(ip, ip->about_controls);
  379. +     return ip;
  380. + }
  381. + /*
  382. +  * Create object `about' in the specified instance.
  383. +  */
  384. + Xv_opaque
  385. + boss_about_about_create(ip, owner)
  386. +     caddr_t        ip;
  387. +     Xv_opaque    owner;
  388. + {
  389. +     Xv_opaque    obj;
  390. +     
  391. +     obj = xv_create(owner, FRAME_CMD,
  392. +         XV_KEY_DATA, INSTANCE, ip,
  393. +         XV_WIDTH, 509,
  394. +         XV_HEIGHT, 392,
  395. +         XV_LABEL, "Boss: About Boss",
  396. +         XV_SHOW, FALSE,
  397. +         FRAME_SHOW_FOOTER, FALSE,
  398. +         FRAME_SHOW_RESIZE_CORNER, FALSE,
  399. +         FRAME_CMD_PUSHPIN_IN, TRUE,
  400. +         NULL);
  401. +     xv_set(xv_get(obj, FRAME_CMD_PANEL), WIN_SHOW, FALSE, NULL);
  402. +     return obj;
  403. + }
  404. + /*
  405. +  * Create object `about_controls' in the specified instance.
  406. +  */
  407. + Xv_opaque
  408. + boss_about_about_controls_create(ip, owner)
  409. +     caddr_t        ip;
  410. +     Xv_opaque    owner;
  411. + {
  412. +     Xv_opaque    obj;
  413. +     
  414. +     obj = xv_create(owner, PANEL,
  415. +         XV_KEY_DATA, INSTANCE, ip,
  416. +         XV_HELP_DATA, "boss:about_controls",
  417. +         XV_X, 0,
  418. +         XV_Y, 0,
  419. +         XV_WIDTH, WIN_EXTEND_TO_EDGE,
  420. +         XV_HEIGHT, WIN_EXTEND_TO_EDGE,
  421. +         WIN_BORDER, FALSE,
  422. +         NULL);
  423. +     return obj;
  424. + }
  425. + /*
  426. +  * Create object `msg_1' in the specified instance.
  427. +  */
  428. + Xv_opaque
  429. + boss_about_msg_1_create(ip, owner)
  430. +     caddr_t        ip;
  431. +     Xv_opaque    owner;
  432. + {
  433. +     Xv_opaque    obj;
  434. +     
  435. +     obj = xv_create(owner, PANEL_MESSAGE,
  436. +         XV_KEY_DATA, INSTANCE, ip,
  437. +         XV_HELP_DATA, "boss:msg_1",
  438. +         XV_X, 222,
  439. +         XV_Y, 14,
  440. +         XV_WIDTH, 65,
  441. +         XV_HEIGHT, 13,
  442. +         PANEL_LABEL_STRING, "Boss 1.0a",
  443. +         PANEL_LABEL_BOLD, TRUE,
  444. +         NULL);
  445. +     return obj;
  446. + }
  447. + /*
  448. +  * Create object `msg_5' in the specified instance.
  449. +  */
  450. + Xv_opaque
  451. + boss_about_msg_5_create(ip, owner)
  452. +     caddr_t        ip;
  453. +     Xv_opaque    owner;
  454. + {
  455. +     Xv_opaque    obj;
  456. +     
  457. +     obj = xv_create(owner, PANEL_MESSAGE,
  458. +         XV_KEY_DATA, INSTANCE, ip,
  459. +         XV_HELP_DATA, "boss:msg_5",
  460. +         XV_X, 202,
  461. +         XV_Y, 30,
  462. +         XV_WIDTH, 104,
  463. +         XV_HEIGHT, 13,
  464. +         PANEL_LABEL_STRING, "Copyright 1990",
  465. +         PANEL_LABEL_BOLD, TRUE,
  466. +         NULL);
  467. +     return obj;
  468. + }
  469. + /*
  470. +  * Create object `msg_6' in the specified instance.
  471. +  */
  472. + Xv_opaque
  473. + boss_about_msg_6_create(ip, owner)
  474. +     caddr_t        ip;
  475. +     Xv_opaque    owner;
  476. + {
  477. +     Xv_opaque    obj;
  478. +     
  479. +     obj = xv_create(owner, PANEL_MESSAGE,
  480. +         XV_KEY_DATA, INSTANCE, ip,
  481. +         XV_HELP_DATA, "boss:msg_6",
  482. +         XV_X, 117,
  483. +         XV_Y, 46,
  484. +         XV_WIDTH, 274,
  485. +         XV_HEIGHT, 13,
  486. +         PANEL_LABEL_STRING, "Chuck Musciano and Harris Corporation",
  487. +         PANEL_LABEL_BOLD, TRUE,
  488. +         NULL);
  489. +     return obj;
  490. + }
  491. + /*
  492. +  * Create object `msg_7' in the specified instance.
  493. +  */
  494. + Xv_opaque
  495. + boss_about_msg_7_create(ip, owner)
  496. +     caddr_t        ip;
  497. +     Xv_opaque    owner;
  498. + {
  499. +     Xv_opaque    obj;
  500. +     
  501. +     obj = xv_create(owner, PANEL_MESSAGE,
  502. +         XV_KEY_DATA, INSTANCE, ip,
  503. +         XV_HELP_DATA, "boss:msg_7",
  504. +         XV_X, 185,
  505. +         XV_Y, 62,
  506. +         XV_WIDTH, 135,
  507. +         XV_HEIGHT, 13,
  508. +         PANEL_LABEL_STRING, "All Rights Reserved",
  509. +         PANEL_LABEL_BOLD, TRUE,
  510. +         NULL);
  511. +     return obj;
  512. + }
  513. + /*
  514. +  * Create object `msg_8' in the specified instance.
  515. +  */
  516. + Xv_opaque
  517. + boss_about_msg_8_create(ip, owner)
  518. +     caddr_t        ip;
  519. +     Xv_opaque    owner;
  520. + {
  521. +     Xv_opaque    obj;
  522. +     
  523. +     obj = xv_create(owner, PANEL_MESSAGE,
  524. +         XV_KEY_DATA, INSTANCE, ip,
  525. +         XV_HELP_DATA, "boss:msg_8",
  526. +         XV_X, 14,
  527. +         XV_Y, 94,
  528. +         XV_WIDTH, 474,
  529. +         XV_HEIGHT, 13,
  530. +         PANEL_LABEL_STRING, "Boss was written using Sun's Devguide interface builder and the XView OPEN",
  531. +         PANEL_LABEL_BOLD, FALSE,
  532. +         NULL);
  533. +     return obj;
  534. + }
  535. + /*
  536. +  * Create object `msg_9' in the specified instance.
  537. +  */
  538. + Xv_opaque
  539. + boss_about_msg_9_create(ip, owner)
  540. +     caddr_t        ip;
  541. +     Xv_opaque    owner;
  542. + {
  543. +     Xv_opaque    obj;
  544. +     
  545. +     obj = xv_create(owner, PANEL_MESSAGE,
  546. +         XV_KEY_DATA, INSTANCE, ip,
  547. +         XV_HELP_DATA, "boss:msg_9",
  548. +         XV_X, 14,
  549. +         XV_Y, 110,
  550. +         XV_WIDTH, 354,
  551. +         XV_HEIGHT, 13,
  552. +         PANEL_LABEL_STRING, "LOOK toolkit.  It was initially released in October of 1990.",
  553. +         PANEL_LABEL_BOLD, FALSE,
  554. +         NULL);
  555. +     return obj;
  556. + }
  557. + /*
  558. +  * Create object `msg_11' in the specified instance.
  559. +  */
  560. + Xv_opaque
  561. + boss_about_msg_11_create(ip, owner)
  562. +     caddr_t        ip;
  563. +     Xv_opaque    owner;
  564. + {
  565. +     Xv_opaque    obj;
  566. +     
  567. +     obj = xv_create(owner, PANEL_MESSAGE,
  568. +         XV_KEY_DATA, INSTANCE, ip,
  569. +         XV_HELP_DATA, "boss:msg_11",
  570. +         XV_X, 14,
  571. +         XV_Y, 142,
  572. +         XV_WIDTH, 454,
  573. +         XV_HEIGHT, 13,
  574. +         PANEL_LABEL_STRING, "I welcome comments, criticism, suggestions, and bug reports.  Many of the",
  575. +         PANEL_LABEL_BOLD, FALSE,
  576. +         NULL);
  577. +     return obj;
  578. + }
  579. + /*
  580. +  * Create object `msg_12' in the specified instance.
  581. +  */
  582. + Xv_opaque
  583. + boss_about_msg_12_create(ip, owner)
  584. +     caddr_t        ip;
  585. +     Xv_opaque    owner;
  586. + {
  587. +     Xv_opaque    obj;
  588. +     
  589. +     obj = xv_create(owner, PANEL_MESSAGE,
  590. +         XV_KEY_DATA, INSTANCE, ip,
  591. +         XV_HELP_DATA, "boss:msg_12",
  592. +         XV_X, 14,
  593. +         XV_Y, 158,
  594. +         XV_WIDTH, 457,
  595. +         XV_HEIGHT, 13,
  596. +         PANEL_LABEL_STRING, "features in this version of boss were added as the result of a user request. ",
  597. +         PANEL_LABEL_BOLD, FALSE,
  598. +         NULL);
  599. +     return obj;
  600. + }
  601. + /*
  602. +  * Create object `msg_13' in the specified instance.
  603. +  */
  604. + Xv_opaque
  605. + boss_about_msg_13_create(ip, owner)
  606. +     caddr_t        ip;
  607. +     Xv_opaque    owner;
  608. + {
  609. +     Xv_opaque    obj;
  610. +     
  611. +     obj = xv_create(owner, PANEL_MESSAGE,
  612. +         XV_KEY_DATA, INSTANCE, ip,
  613. +         XV_HELP_DATA, "boss:msg_13",
  614. +         XV_X, 14,
  615. +         XV_Y, 174,
  616. +         XV_WIDTH, 467,
  617. +         XV_HEIGHT, 13,
  618. +         PANEL_LABEL_STRING, "User feedback is the single best driving force in the evolution of my tools.  I ",
  619. +         PANEL_LABEL_BOLD, FALSE,
  620. +         NULL);
  621. +     return obj;
  622. + }
  623. + /*
  624. +  * Create object `msg_14' in the specified instance.
  625. +  */
  626. + Xv_opaque
  627. + boss_about_msg_14_create(ip, owner)
  628. +     caddr_t        ip;
  629. +     Xv_opaque    owner;
  630. + {
  631. +     Xv_opaque    obj;
  632. +     
  633. +     obj = xv_create(owner, PANEL_MESSAGE,
  634. +         XV_KEY_DATA, INSTANCE, ip,
  635. +         XV_HELP_DATA, "boss:msg_14",
  636. +         XV_X, 14,
  637. +         XV_Y, 190,
  638. +         XV_WIDTH, 205,
  639. +         XV_HEIGHT, 13,
  640. +         PANEL_LABEL_STRING, "look forward to hearing from you!",
  641. +         PANEL_LABEL_BOLD, FALSE,
  642. +         NULL);
  643. +     return obj;
  644. + }
  645. + /*
  646. +  * Create object `msg_16' in the specified instance.
  647. +  */
  648. + Xv_opaque
  649. + boss_about_msg_16_create(ip, owner)
  650. +     caddr_t        ip;
  651. +     Xv_opaque    owner;
  652. + {
  653. +     Xv_opaque    obj;
  654. +     
  655. +     obj = xv_create(owner, PANEL_MESSAGE,
  656. +         XV_KEY_DATA, INSTANCE, ip,
  657. +         XV_HELP_DATA, "boss:msg_16",
  658. +         XV_X, 14,
  659. +         XV_Y, 222,
  660. +         XV_WIDTH, 460,
  661. +         XV_HEIGHT, 13,
  662. +         PANEL_LABEL_STRING, "Boss has been placed in the public domain, but the copyright on the source",
  663. +         PANEL_LABEL_BOLD, FALSE,
  664. +         NULL);
  665. +     return obj;
  666. + }
  667. + /*
  668. +  * Create object `msg_17' in the specified instance.
  669. +  */
  670. + Xv_opaque
  671. + boss_about_msg_17_create(ip, owner)
  672. +     caddr_t        ip;
  673. +     Xv_opaque    owner;
  674. + {
  675. +     Xv_opaque    obj;
  676. +     
  677. +     obj = xv_create(owner, PANEL_MESSAGE,
  678. +         XV_KEY_DATA, INSTANCE, ip,
  679. +         XV_HELP_DATA, "boss:msg_17",
  680. +         XV_X, 14,
  681. +         XV_Y, 238,
  682. +         XV_WIDTH, 472,
  683. +         XV_HEIGHT, 13,
  684. +         PANEL_LABEL_STRING, "code is retained by myself and Harris Corporation, my employer.  This means",
  685. +         PANEL_LABEL_BOLD, FALSE,
  686. +         NULL);
  687. +     return obj;
  688. + }
  689. + /*
  690. +  * Create object `msg_18' in the specified instance.
  691. +  */
  692. + Xv_opaque
  693. + boss_about_msg_18_create(ip, owner)
  694. +     caddr_t        ip;
  695. +     Xv_opaque    owner;
  696. + {
  697. +     Xv_opaque    obj;
  698. +     
  699. +     obj = xv_create(owner, PANEL_MESSAGE,
  700. +         XV_KEY_DATA, INSTANCE, ip,
  701. +         XV_HELP_DATA, "boss:msg_18",
  702. +         XV_X, 14,
  703. +         XV_Y, 254,
  704. +         XV_WIDTH, 460,
  705. +         XV_HEIGHT, 13,
  706. +         PANEL_LABEL_STRING, "that you can give the source code to anyone but you cannot sell any part of",
  707. +         PANEL_LABEL_BOLD, FALSE,
  708. +         NULL);
  709. +     return obj;
  710. + }
  711. + /*
  712. +  * Create object `msg_19' in the specified instance.
  713. +  */
  714. + Xv_opaque
  715. + boss_about_msg_19_create(ip, owner)
  716. +     caddr_t        ip;
  717. +     Xv_opaque    owner;
  718. + {
  719. +     Xv_opaque    obj;
  720. +     
  721. +     obj = xv_create(owner, PANEL_MESSAGE,
  722. +         XV_KEY_DATA, INSTANCE, ip,
  723. +         XV_HELP_DATA, "boss:msg_19",
  724. +         XV_X, 14,
  725. +         XV_Y, 270,
  726. +         XV_WIDTH, 455,
  727. +         XV_HEIGHT, 13,
  728. +         PANEL_LABEL_STRING, "the source code, nor can you incorporate any part of the source code into a",
  729. +         PANEL_LABEL_BOLD, FALSE,
  730. +         NULL);
  731. +     return obj;
  732. + }
  733. + /*
  734. +  * Create object `msg_20' in the specified instance.
  735. +  */
  736. + Xv_opaque
  737. + boss_about_msg_20_create(ip, owner)
  738. +     caddr_t        ip;
  739. +     Xv_opaque    owner;
  740. + {
  741. +     Xv_opaque    obj;
  742. +     
  743. +     obj = xv_create(owner, PANEL_MESSAGE,
  744. +         XV_KEY_DATA, INSTANCE, ip,
  745. +         XV_HELP_DATA, "boss:msg_20",
  746. +         XV_X, 14,
  747. +         XV_Y, 286,
  748. +         XV_WIDTH, 476,
  749. +         XV_HEIGHT, 13,
  750. +         PANEL_LABEL_STRING, "product which is subsequently sold.  In addition, certain portions of this code ",
  751. +         PANEL_LABEL_BOLD, FALSE,
  752. +         NULL);
  753. +     return obj;
  754. + }
  755. + /*
  756. +  * Create object `message6' in the specified instance.
  757. +  */
  758. + Xv_opaque
  759. + boss_about_message6_create(ip, owner)
  760. +     caddr_t        ip;
  761. +     Xv_opaque    owner;
  762. + {
  763. +     Xv_opaque    obj;
  764. +     
  765. +     obj = xv_create(owner, PANEL_MESSAGE,
  766. +         XV_KEY_DATA, INSTANCE, ip,
  767. +         XV_X, 14,
  768. +         XV_Y, 302,
  769. +         XV_WIDTH, 442,
  770. +         XV_HEIGHT, 13,
  771. +         PANEL_LABEL_STRING, "contain information proprietary to Casio Corporation and cannot be sold",
  772. +         PANEL_LABEL_BOLD, FALSE,
  773. +         NULL);
  774. +     return obj;
  775. + }
  776. + /*
  777. +  * Create object `message7' in the specified instance.
  778. +  */
  779. + Xv_opaque
  780. + boss_about_message7_create(ip, owner)
  781. +     caddr_t        ip;
  782. +     Xv_opaque    owner;
  783. + {
  784. +     Xv_opaque    obj;
  785. +     
  786. +     obj = xv_create(owner, PANEL_MESSAGE,
  787. +         XV_KEY_DATA, INSTANCE, ip,
  788. +         XV_X, 14,
  789. +         XV_Y, 318,
  790. +         XV_WIDTH, 317,
  791. +         XV_HEIGHT, 13,
  792. +         PANEL_LABEL_STRING, "without explicit permission from Casio Corporation.",
  793. +         PANEL_LABEL_BOLD, FALSE,
  794. +         NULL);
  795. +     return obj;
  796. + }
  797. + /*
  798. +  * Create object `send_mail' in the specified instance.
  799. +  */
  800. + Xv_opaque
  801. + boss_about_send_mail_create(ip, owner)
  802. +     caddr_t        ip;
  803. +     Xv_opaque    owner;
  804. + {
  805. +     extern void        popup_send_mail();
  806. +     Xv_opaque    obj;
  807. +     
  808. +     obj = xv_create(owner, PANEL_BUTTON,
  809. +         XV_KEY_DATA, INSTANCE, ip,
  810. +         XV_HELP_DATA, "boss:send_mail",
  811. +         XV_X, 215,
  812. +         XV_Y, 352,
  813. +         XV_WIDTH, 78,
  814. +         XV_HEIGHT, 20,
  815. +         PANEL_LABEL_STRING, "Send Mail",
  816. +         PANEL_NOTIFY_PROC, popup_send_mail,
  817. +         NULL);
  818. +     return obj;
  819. + }
  820. + /*
  821. +  * Initialize an instance of object `mail'.
  822. +  */
  823. + boss_mail_objects *
  824. + boss_mail_objects_initialize(ip, owner)
  825. +     boss_mail_objects    *ip;
  826. +     Xv_opaque    owner;
  827. + {
  828. +     if (!ip && !(ip = (boss_mail_objects *) calloc(1, sizeof (boss_mail_objects))))
  829. +         return (boss_mail_objects *) NULL;
  830. +     if (!ip->mail)
  831. +         ip->mail = boss_mail_mail_create(ip, owner);
  832. +     if (!ip->mail_controls)
  833. +         ip->mail_controls = boss_mail_mail_controls_create(ip, ip->mail);
  834. +     if (!ip->msg_21)
  835. +         ip->msg_21 = boss_mail_msg_21_create(ip, ip->mail_controls);
  836. +     if (!ip->msg_22)
  837. +         ip->msg_22 = boss_mail_msg_22_create(ip, ip->mail_controls);
  838. +     if (!ip->address)
  839. +         ip->address = boss_mail_address_create(ip, ip->mail_controls);
  840. +     if (!ip->other_address)
  841. +         ip->other_address = boss_mail_other_address_create(ip, ip->mail_controls);
  842. +     if (!ip->message)
  843. +         ip->message = boss_mail_message_create(ip, ip->mail);
  844. +     if (!ip->mail_controls1)
  845. +         ip->mail_controls1 = boss_mail_mail_controls1_create(ip, ip->mail);
  846. +     if (!ip->accept_send)
  847. +         ip->accept_send = boss_mail_accept_send_create(ip, ip->mail_controls1);
  848. +     if (!ip->cancel_mail)
  849. +         ip->cancel_mail = boss_mail_cancel_mail_create(ip, ip->mail_controls1);
  850. +     return ip;
  851. + }
  852. + /*
  853. +  * Create object `mail' in the specified instance.
  854. +  */
  855. + Xv_opaque
  856. + boss_mail_mail_create(ip, owner)
  857. +     caddr_t        ip;
  858. +     Xv_opaque    owner;
  859. + {
  860. +     extern void    done_mail();
  861. +     Xv_opaque    obj;
  862. +     
  863. +     obj = xv_create(owner, FRAME_CMD,
  864. +         XV_KEY_DATA, INSTANCE, ip,
  865. +         XV_WIDTH, 506,
  866. +         XV_HEIGHT, 338,
  867. +         XV_LABEL, "Boss: Send mail",
  868. +         XV_SHOW, FALSE,
  869. +         FRAME_SHOW_FOOTER, FALSE,
  870. +         FRAME_SHOW_RESIZE_CORNER, FALSE,
  871. +         FRAME_CMD_PUSHPIN_IN, FALSE,
  872. +         FRAME_DONE_PROC, done_mail,
  873. +         NULL);
  874. +     xv_set(xv_get(obj, FRAME_CMD_PANEL), WIN_SHOW, FALSE, NULL);
  875. +     return obj;
  876. + }
  877. + /*
  878. +  * Create object `mail_controls' in the specified instance.
  879. +  */
  880. + Xv_opaque
  881. + boss_mail_mail_controls_create(ip, owner)
  882. +     caddr_t        ip;
  883. +     Xv_opaque    owner;
  884. + {
  885. +     Xv_opaque    obj;
  886. +     
  887. +     obj = xv_create(owner, PANEL,
  888. +         XV_KEY_DATA, INSTANCE, ip,
  889. +         XV_HELP_DATA, "boss:mail_controls",
  890. +         XV_X, 0,
  891. +         XV_Y, 0,
  892. +         XV_WIDTH, WIN_EXTEND_TO_EDGE,
  893. +         XV_HEIGHT, 92,
  894. +         WIN_BORDER, FALSE,
  895. +         NULL);
  896. +     return obj;
  897. + }
  898. + /*
  899. +  * Create object `msg_21' in the specified instance.
  900. +  */
  901. + Xv_opaque
  902. + boss_mail_msg_21_create(ip, owner)
  903. +     caddr_t        ip;
  904. +     Xv_opaque    owner;
  905. + {
  906. +     Xv_opaque    obj;
  907. +     
  908. +     obj = xv_create(owner, PANEL_MESSAGE,
  909. +         XV_KEY_DATA, INSTANCE, ip,
  910. +         XV_HELP_DATA, "boss:msg_21",
  911. +         XV_X, 14,
  912. +         XV_Y, 14,
  913. +         XV_WIDTH, 478,
  914. +         XV_HEIGHT, 13,
  915. +         PANEL_LABEL_STRING, "Your feedback is appreciated.  To ensure that your message reaches me, check",
  916. +         PANEL_LABEL_BOLD, FALSE,
  917. +         NULL);
  918. +     return obj;
  919. + }
  920. + /*
  921. +  * Create object `msg_22' in the specified instance.
  922. +  */
  923. + Xv_opaque
  924. + boss_mail_msg_22_create(ip, owner)
  925. +     caddr_t        ip;
  926. +     Xv_opaque    owner;
  927. + {
  928. +     Xv_opaque    obj;
  929. +     
  930. +     obj = xv_create(owner, PANEL_MESSAGE,
  931. +         XV_KEY_DATA, INSTANCE, ip,
  932. +         XV_HELP_DATA, "boss:msg_22",
  933. +         XV_X, 14,
  934. +         XV_Y, 30,
  935. +         XV_WIDTH, 395,
  936. +         XV_HEIGHT, 13,
  937. +         PANEL_LABEL_STRING, "that the \"To\" address is valid for your site before clicking \"Send\".",
  938. +         PANEL_LABEL_BOLD, FALSE,
  939. +         NULL);
  940. +     return obj;
  941. + }
  942. + /*
  943. +  * Create object `address' in the specified instance.
  944. +  */
  945. + Xv_opaque
  946. + boss_mail_address_create(ip, owner)
  947. +     caddr_t        ip;
  948. +     Xv_opaque    owner;
  949. + {
  950. +     extern int        handle_address();
  951. +     Xv_opaque    obj;
  952. +     
  953. +     obj = xv_create(owner, PANEL_CHOICE, PANEL_DISPLAY_LEVEL, PANEL_CURRENT,
  954. +         XV_KEY_DATA, INSTANCE, ip,
  955. +         XV_HELP_DATA, "boss:address",
  956. +         XV_X, 14,
  957. +         XV_Y, 64,
  958. +         XV_WIDTH, 278,
  959. +         XV_HEIGHT, 23,
  960. +         PANEL_VALUE_X, 43,
  961. +         PANEL_VALUE_Y, 64,
  962. +         PANEL_LAYOUT, PANEL_HORIZONTAL,
  963. +         PANEL_CHOICE_NROWS, 1,
  964. +         PANEL_LABEL_STRING, "To:",
  965. +         PANEL_NOTIFY_PROC, handle_address,
  966. +         PANEL_CHOICE_STRINGS,
  967. +             "chuck@trantor.harris-atd.com",
  968. +             "uunet!trantor.harris-atd.com!chuck",
  969. +             "Other:",
  970. +             0,
  971. +         NULL);
  972. +     return obj;
  973. + }
  974. + /*
  975. +  * Create object `other_address' in the specified instance.
  976. +  */
  977. + Xv_opaque
  978. + boss_mail_other_address_create(ip, owner)
  979. +     caddr_t        ip;
  980. +     Xv_opaque    owner;
  981. + {
  982. +     Xv_opaque    obj;
  983. +     
  984. +     obj = xv_create(owner, PANEL_TEXT,
  985. +         XV_KEY_DATA, INSTANCE, ip,
  986. +         XV_HELP_DATA, "boss:other_address",
  987. +         XV_X, 105,
  988. +         XV_Y, 69,
  989. +         XV_WIDTH, 385,
  990. +         XV_HEIGHT, 15,
  991. +         PANEL_VALUE_X, 114,
  992. +         PANEL_VALUE_Y, 69,
  993. +         PANEL_LAYOUT, PANEL_HORIZONTAL,
  994. +         PANEL_VALUE_DISPLAY_LENGTH, 47,
  995. +         PANEL_VALUE_STORED_LENGTH, 256,
  996. +         PANEL_READ_ONLY, FALSE,
  997. +         NULL);
  998. +     return obj;
  999. + }
  1000. + /*
  1001. +  * Create object `message' in the specified instance.
  1002. +  */
  1003. + Xv_opaque
  1004. + boss_mail_message_create(ip, owner)
  1005. +     caddr_t        ip;
  1006. +     Xv_opaque    owner;
  1007. + {
  1008. +     Xv_opaque    obj;
  1009. +     
  1010. +     obj = xv_create(owner, TEXTSW,
  1011. +         XV_KEY_DATA, INSTANCE, ip,
  1012. +         XV_X, 0,
  1013. +         XV_Y, 92,
  1014. +         XV_WIDTH, WIN_EXTEND_TO_EDGE,
  1015. +         XV_HEIGHT, 188,
  1016. +         OPENWIN_SHOW_BORDERS, TRUE,
  1017. +         NULL);
  1018. +     return obj;
  1019. + }
  1020. + /*
  1021. +  * Create object `mail_controls1' in the specified instance.
  1022. +  */
  1023. + Xv_opaque
  1024. + boss_mail_mail_controls1_create(ip, owner)
  1025. +     caddr_t        ip;
  1026. +     Xv_opaque    owner;
  1027. + {
  1028. +     Xv_opaque    obj;
  1029. +     
  1030. +     obj = xv_create(owner, PANEL,
  1031. +         XV_KEY_DATA, INSTANCE, ip,
  1032. +         XV_HELP_DATA, "boss:mail_controls1",
  1033. +         XV_X, 0,
  1034. +         XV_Y, 280,
  1035. +         XV_WIDTH, WIN_EXTEND_TO_EDGE,
  1036. +         XV_HEIGHT, WIN_EXTEND_TO_EDGE,
  1037. +         WIN_BORDER, FALSE,
  1038. +         NULL);
  1039. +     return obj;
  1040. + }
  1041. + /*
  1042. +  * Create object `accept_send' in the specified instance.
  1043. +  */
  1044. + Xv_opaque
  1045. + boss_mail_accept_send_create(ip, owner)
  1046. +     caddr_t        ip;
  1047. +     Xv_opaque    owner;
  1048. + {
  1049. +     extern void        send_mail();
  1050. +     Xv_opaque    obj;
  1051. +     
  1052. +     obj = xv_create(owner, PANEL_BUTTON,
  1053. +         XV_KEY_DATA, INSTANCE, ip,
  1054. +         XV_HELP_DATA, "boss:accept_send",
  1055. +         XV_X, 193,
  1056. +         XV_Y, 18,
  1057. +         XV_WIDTH, 48,
  1058. +         XV_HEIGHT, 20,
  1059. +         PANEL_LABEL_STRING, "Send",
  1060. +         PANEL_NOTIFY_PROC, send_mail,
  1061. +         NULL);
  1062. +     return obj;
  1063. + }
  1064. + /*
  1065. +  * Create object `cancel_mail' in the specified instance.
  1066. +  */
  1067. + Xv_opaque
  1068. + boss_mail_cancel_mail_create(ip, owner)
  1069. +     caddr_t        ip;
  1070. +     Xv_opaque    owner;
  1071. + {
  1072. +     extern void        cancel_mail();
  1073. +     Xv_opaque    obj;
  1074. +     
  1075. +     obj = xv_create(owner, PANEL_BUTTON,
  1076. +         XV_KEY_DATA, INSTANCE, ip,
  1077. +         XV_HELP_DATA, "boss:cancel_mail",
  1078. +         XV_X, 253,
  1079. +         XV_Y, 18,
  1080. +         XV_WIDTH, 59,
  1081. +         XV_HEIGHT, 20,
  1082. +         PANEL_LABEL_STRING, "Cancel",
  1083. +         PANEL_NOTIFY_PROC, cancel_mail,
  1084.           NULL);
  1085.       return obj;
  1086.   }
  1087. *** boss_ui.h.orig    Fri Nov 30 08:44:16 1990
  1088. --- boss_ui.h    Fri Nov 30 08:15:29 1990
  1089. ***************
  1090. *** 1,24 ****
  1091. - /************************************************************************/
  1092. - /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  1093. - /*                                    */
  1094. - /*    Permission to use, copy, modify, and distribute this software    */
  1095. - /*    and its documentation for any purpose and without fee is    */
  1096. - /*    hereby granted, provided that the above copyright notice    */
  1097. - /*    appear in all copies and that both that copyright notice and    */
  1098. - /*    this permission notice appear in supporting documentation, and    */
  1099. - /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1100. - /*    used in advertising or publicity pertaining to distribution    */
  1101. - /*    of the software without specific, written prior permission.    */
  1102. - /*    Chuck Musciano and Harris Corporation make no representations    */
  1103. - /*    about the suitability of this software for any purpose.  It is    */
  1104. - /*    provided "as is" without express or implied warranty.        */
  1105. - /*                                    */
  1106. - /*    This code contains data and information that is proprietary    */
  1107. - /*    to Casio Corporation.  You may be subject to legal action if    */
  1108. - /*    this information is released without explicit permission from    */
  1109. - /*    Casio.                                */
  1110. - /************************************************************************/
  1111.   #ifndef    boss_HEADER
  1112.   #define    boss_HEADER
  1113.   
  1114. --- 1,3 ----
  1115. ***************
  1116. *** 159,162 ****
  1117. --- 138,213 ----
  1118.   extern Xv_opaque    boss_schedule_dialog_schedule_format_create();
  1119.   extern Xv_opaque    boss_schedule_dialog_appt_file_create();
  1120.   extern Xv_opaque    boss_schedule_dialog_schedule_accept_create();
  1121. + typedef struct {
  1122. +     Xv_opaque    about;
  1123. +     Xv_opaque    about_controls;
  1124. +     Xv_opaque    msg_1;
  1125. +     Xv_opaque    msg_5;
  1126. +     Xv_opaque    msg_6;
  1127. +     Xv_opaque    msg_7;
  1128. +     Xv_opaque    msg_8;
  1129. +     Xv_opaque    msg_9;
  1130. +     Xv_opaque    msg_11;
  1131. +     Xv_opaque    msg_12;
  1132. +     Xv_opaque    msg_13;
  1133. +     Xv_opaque    msg_14;
  1134. +     Xv_opaque    msg_16;
  1135. +     Xv_opaque    msg_17;
  1136. +     Xv_opaque    msg_18;
  1137. +     Xv_opaque    msg_19;
  1138. +     Xv_opaque    msg_20;
  1139. +     Xv_opaque    message6;
  1140. +     Xv_opaque    message7;
  1141. +     Xv_opaque    send_mail;
  1142. + } boss_about_objects;
  1143. + extern boss_about_objects    *boss_about_objects_initialize();
  1144. + extern Xv_opaque    boss_about_about_create();
  1145. + extern Xv_opaque    boss_about_about_controls_create();
  1146. + extern Xv_opaque    boss_about_msg_1_create();
  1147. + extern Xv_opaque    boss_about_msg_5_create();
  1148. + extern Xv_opaque    boss_about_msg_6_create();
  1149. + extern Xv_opaque    boss_about_msg_7_create();
  1150. + extern Xv_opaque    boss_about_msg_8_create();
  1151. + extern Xv_opaque    boss_about_msg_9_create();
  1152. + extern Xv_opaque    boss_about_msg_11_create();
  1153. + extern Xv_opaque    boss_about_msg_12_create();
  1154. + extern Xv_opaque    boss_about_msg_13_create();
  1155. + extern Xv_opaque    boss_about_msg_14_create();
  1156. + extern Xv_opaque    boss_about_msg_16_create();
  1157. + extern Xv_opaque    boss_about_msg_17_create();
  1158. + extern Xv_opaque    boss_about_msg_18_create();
  1159. + extern Xv_opaque    boss_about_msg_19_create();
  1160. + extern Xv_opaque    boss_about_msg_20_create();
  1161. + extern Xv_opaque    boss_about_message6_create();
  1162. + extern Xv_opaque    boss_about_message7_create();
  1163. + extern Xv_opaque    boss_about_send_mail_create();
  1164. + typedef struct {
  1165. +     Xv_opaque    mail;
  1166. +     Xv_opaque    mail_controls;
  1167. +     Xv_opaque    msg_21;
  1168. +     Xv_opaque    msg_22;
  1169. +     Xv_opaque    address;
  1170. +     Xv_opaque    other_address;
  1171. +     Xv_opaque    message;
  1172. +     Xv_opaque    mail_controls1;
  1173. +     Xv_opaque    accept_send;
  1174. +     Xv_opaque    cancel_mail;
  1175. + } boss_mail_objects;
  1176. + extern boss_mail_objects    *boss_mail_objects_initialize();
  1177. + extern Xv_opaque    boss_mail_mail_create();
  1178. + extern Xv_opaque    boss_mail_mail_controls_create();
  1179. + extern Xv_opaque    boss_mail_msg_21_create();
  1180. + extern Xv_opaque    boss_mail_msg_22_create();
  1181. + extern Xv_opaque    boss_mail_address_create();
  1182. + extern Xv_opaque    boss_mail_other_address_create();
  1183. + extern Xv_opaque    boss_mail_message_create();
  1184. + extern Xv_opaque    boss_mail_mail_controls1_create();
  1185. + extern Xv_opaque    boss_mail_accept_send_create();
  1186. + extern Xv_opaque    boss_mail_cancel_mail_create();
  1187.   #endif
  1188. *** busy.c.orig    Fri Nov 30 08:44:17 1990
  1189. --- busy.c    Tue Oct 23 08:03:24 1990
  1190. ***************
  1191. *** 0 ****
  1192. --- 1,65 ----
  1193. + /************************************************************************/
  1194. + /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1195. + /*                                    */
  1196. + /*    Permission to use, copy, modify, and distribute this software    */
  1197. + /*    and its documentation for any purpose and without fee is    */
  1198. + /*    hereby granted, provided that the above copyright notice    */
  1199. + /*    appear in all copies and that both that copyright notice and    */
  1200. + /*    this permission notice appear in supporting documentation, and    */
  1201. + /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1202. + /*    used in advertising or publicity pertaining to distribution    */
  1203. + /*    of the software without specific, written prior permission.    */
  1204. + /*    Chuck Musciano and Harris Corporation make no representations    */
  1205. + /*    about the suitability of this software for any purpose.  It is    */
  1206. + /*    provided "as is" without express or implied warranty.  This     */
  1207. + /*    software may not be sold without the prior explicit permission    */
  1208. + /*    of Harris Corporation.                        */
  1209. + /************************************************************************/
  1210. + /************************************************************************/
  1211. + /*                                    */
  1212. + /*    busy.c    turn frame busy attribute on and off            */
  1213. + /*                                    */
  1214. + /************************************************************************/
  1215. + #include    <stdio.h>
  1216. + #include    <xview/xview.h>
  1217. + #include    <xview/panel.h>
  1218. + #include    "manifest.h"
  1219. + /************************************************************************/
  1220. + PRIVATE    set_busy(base, busy, skip)
  1221. + Frame    base;
  1222. + int    busy;
  1223. + Frame    skip;
  1224. + {    Frame    subframe;
  1225. +     int    i;
  1226. +     for (i = 1; subframe = (Frame) xv_get(base, FRAME_NTH_SUBFRAME, i); i++)
  1227. +        if (subframe != skip)
  1228. +           if (xv_get(subframe, XV_SHOW))
  1229. +              xv_set(subframe, FRAME_BUSY, busy, NULL);
  1230. +     xv_set(base, FRAME_BUSY, busy, NULL);
  1231. + }
  1232. + /************************************************************************/
  1233. + EXPORT    lets_get_busy(base, busy, skip)
  1234. + Frame    base;
  1235. + int    busy;
  1236. + Frame    skip;
  1237. + {    static    int    depth = 0;
  1238. +     if (busy) {
  1239. +        if (depth == 0)
  1240. +           set_busy(base, TRUE, skip);
  1241. +        depth++;
  1242. +        }
  1243. +     else if (depth > 0)
  1244. +        if (--depth == 0)
  1245. +           set_busy(base, FALSE, NULL);
  1246. + }
  1247. *** do_load.c.orig    Fri Nov 30 08:44:24 1990
  1248. --- do_load.c    Wed Oct 24 08:18:56 1990
  1249. ***************
  1250. *** 108,114 ****
  1251.       FILE    *f;
  1252.       object    *o, *obj;
  1253.   
  1254. !     lets_get_busy(TRUE, NULL);
  1255.       xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1256.   
  1257.       if (((int) xv_get(dialog->source, PANEL_VALUE)) == FROM_BOSS) {
  1258. --- 108,114 ----
  1259.       FILE    *f;
  1260.       object    *o, *obj;
  1261.   
  1262. !     lets_get_busy(boss_base->base, TRUE, NULL);
  1263.       xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1264.   
  1265.       if (((int) xv_get(dialog->source, PANEL_VALUE)) == FROM_BOSS) {
  1266. ***************
  1267. *** 166,170 ****
  1268.          else
  1269.             error("Could not read from %s", p);
  1270.          }
  1271. !     lets_get_busy(FALSE, NULL);
  1272.   }
  1273. --- 166,170 ----
  1274.          else
  1275.             error("Could not read from %s", p);
  1276.          }
  1277. !     lets_get_busy(boss_base->base, FALSE, NULL);
  1278.   }
  1279. *** do_schedule.c.orig    Fri Nov 30 08:44:26 1990
  1280. --- do_schedule.c    Wed Oct 24 08:18:49 1990
  1281. ***************
  1282. *** 223,233 ****
  1283.   
  1284.   {    int    result, format;
  1285.   
  1286. !     lets_get_busy(TRUE, NULL);
  1287.       if ((format = (int) xv_get(dialog->schedule_format, PANEL_VALUE)) == CALENTOOL)
  1288.          result = convert_to_calentool();
  1289.       else if (format == CALENDAR_MANAGER)
  1290.          result = convert_to_calendar_manager();
  1291.       xv_set(item, PANEL_NOTIFY_STATUS, result, NULL);
  1292. !     lets_get_busy(FALSE, NULL);
  1293.   }
  1294. --- 223,233 ----
  1295.   
  1296.   {    int    result, format;
  1297.   
  1298. !     lets_get_busy(boss_base->base, TRUE, NULL);
  1299.       if ((format = (int) xv_get(dialog->schedule_format, PANEL_VALUE)) == CALENTOOL)
  1300.          result = convert_to_calentool();
  1301.       else if (format == CALENDAR_MANAGER)
  1302.          result = convert_to_calendar_manager();
  1303.       xv_set(item, PANEL_NOTIFY_STATUS, result, NULL);
  1304. !     lets_get_busy(boss_base->base, FALSE, NULL);
  1305.   }
  1306. *** do_store.c.orig    Fri Nov 30 08:44:27 1990
  1307. --- do_store.c    Fri Nov  2 10:04:49 1990
  1308. ***************
  1309. *** 30,38 ****
  1310. --- 30,40 ----
  1311.   #include    <sys/types.h>
  1312.   #include    <xview/xview.h>
  1313.   #include    <xview/panel.h>
  1314. + #include    <xview/notice.h>
  1315.   #include    "boss_ui.h"
  1316.   
  1317.   #include    "manifest.h"
  1318. + #include    "packet.h"
  1319.   #include    "object.h"
  1320.   #include    "globals.h"
  1321.   
  1322. ***************
  1323. *** 109,120 ****
  1324.       object    *obj;
  1325.       char    *path;
  1326.   
  1327. !     lets_get_busy(TRUE, NULL);
  1328.       xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1329.   
  1330.       if ((which = (int) xv_get(dialog->store_data, PANEL_VALUE)) == 0)
  1331.          xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1332.       else if (((int) xv_get(dialog->dest, PANEL_VALUE)) == TO_BOSS) {
  1333.          if (open_casio(port_file, baud_rate, parity)) {
  1334.             if (start_session()) {
  1335.                for (i = 0; i < MAX_OBJECT_KINDS; i++)
  1336. --- 111,138 ----
  1337.       object    *obj;
  1338.       char    *path;
  1339.   
  1340. !     lets_get_busy(boss_base->base, TRUE, NULL);
  1341.       xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1342.   
  1343.       if ((which = (int) xv_get(dialog->store_data, PANEL_VALUE)) == 0)
  1344.          xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1345.       else if (((int) xv_get(dialog->dest, PANEL_VALUE)) == TO_BOSS) {
  1346. +        if (baud_rate == BAUD_9600) {
  1347. +           i = notice_prompt(boss_base->base, NULL,
  1348. +                                NOTICE_MESSAGE_STRINGS, "Storing data to the BOSS at 9600 baud is known",
  1349. +                                               "to be unreliable.  You should reduce the baud",
  1350. +                                                 "rate to 4800 or lower before proceeding.",
  1351. +                                                 " ",
  1352. +                                                 "Do you wish to continue?",
  1353. +                                                 NULL,
  1354. +                                NOTICE_BUTTON_YES, "Continue",
  1355. +                                NOTICE_BUTTON_NO, "Cancel",
  1356. +                             0);
  1357. +           if (i == NOTICE_NO) {
  1358. +              lets_get_busy(boss_base->base, FALSE, NULL);
  1359. +              return;
  1360. +              }
  1361. +           }
  1362.          if (open_casio(port_file, baud_rate, parity)) {
  1363.             if (start_session()) {
  1364.                for (i = 0; i < MAX_OBJECT_KINDS; i++)
  1365. ***************
  1366. *** 160,164 ****
  1367.             xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1368.             }
  1369.          }
  1370. !     lets_get_busy(FALSE, NULL);
  1371.   }
  1372. --- 178,182 ----
  1373.             xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1374.             }
  1375.          }
  1376. !     lets_get_busy(boss_base->base, FALSE, NULL);
  1377.   }
  1378. *** expand.c.orig    Fri Nov 30 08:44:28 1990
  1379. --- expand.c    Fri Jun  8 11:35:59 1990
  1380. ***************
  1381. *** 1,5 ****
  1382.   /************************************************************************/
  1383. ! /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  1384.   /*                                    */
  1385.   /*    Permission to use, copy, modify, and distribute this software    */
  1386.   /*    and its documentation for any purpose and without fee is    */
  1387. --- 1,5 ----
  1388.   /************************************************************************/
  1389. ! /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1390.   /*                                    */
  1391.   /*    Permission to use, copy, modify, and distribute this software    */
  1392.   /*    and its documentation for any purpose and without fee is    */
  1393. ***************
  1394. *** 11,22 ****
  1395.   /*    of the software without specific, written prior permission.    */
  1396.   /*    Chuck Musciano and Harris Corporation make no representations    */
  1397.   /*    about the suitability of this software for any purpose.  It is    */
  1398. ! /*    provided "as is" without express or implied warranty.        */
  1399. ! /*                                    */
  1400. ! /*    This code contains data and information that is proprietary    */
  1401. ! /*    to Casio Corporation.  You may be subject to legal action if    */
  1402. ! /*    this information is released without explicit permission from    */
  1403. ! /*    Casio.                                */
  1404.   /************************************************************************/
  1405.   
  1406.   #include    <sys/types.h>
  1407. --- 11,19 ----
  1408.   /*    of the software without specific, written prior permission.    */
  1409.   /*    Chuck Musciano and Harris Corporation make no representations    */
  1410.   /*    about the suitability of this software for any purpose.  It is    */
  1411. ! /*    provided "as is" without express or implied warranty.  This     */
  1412. ! /*    software may not be sold without the prior explicit permission    */
  1413. ! /*    of Harris Corporation.                        */
  1414.   /************************************************************************/
  1415.   
  1416.   #include    <sys/types.h>
  1417. *** filename_completion.c.orig    Fri Nov 30 08:44:28 1990
  1418. --- filename_completion.c    Tue Oct 23 08:20:50 1990
  1419. ***************
  1420. *** 0 ****
  1421. --- 1,52 ----
  1422. + /************************************************************************/
  1423. + /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1424. + /*                                    */
  1425. + /*    Permission to use, copy, modify, and distribute this software    */
  1426. + /*    and its documentation for any purpose and without fee is    */
  1427. + /*    hereby granted, provided that the above copyright notice    */
  1428. + /*    appear in all copies and that both that copyright notice and    */
  1429. + /*    this permission notice appear in supporting documentation, and    */
  1430. + /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1431. + /*    used in advertising or publicity pertaining to distribution    */
  1432. + /*    of the software without specific, written prior permission.    */
  1433. + /*    Chuck Musciano and Harris Corporation make no representations    */
  1434. + /*    about the suitability of this software for any purpose.  It is    */
  1435. + /*    provided "as is" without express or implied warranty.  This     */
  1436. + /*    software may not be sold without the prior explicit permission    */
  1437. + /*    of Harris Corporation.                        */
  1438. + /************************************************************************/
  1439. + /************************************************************************/
  1440. + /*                                    */
  1441. + /*    filename_completion.c    completion handler for text items    */
  1442. + /*                                    */
  1443. + /************************************************************************/
  1444. + #include    <stdio.h>
  1445. + #include    <sys/param.h>
  1446. + #include    <sys/types.h>
  1447. + #include    <xview/xview.h>
  1448. + #include    <xview/panel.h>
  1449. + #include    "manifest.h"
  1450. + /************************************************************************/
  1451. + EXPORT    Panel_setting    filename_completion(item, event)
  1452. + Panel_item    item;
  1453. + Event        *event;
  1454. + {    char    *p, *expand_filename();
  1455. +     switch (event_action(event)) {
  1456. +        case '\n' :
  1457. +        case '\r' :
  1458. +        case ' '  : if ((p = expand_filename((char *) xv_get(item, PANEL_VALUE))) == NULL)
  1459. +                  window_bell(xv_get(item, XV_OWNER));
  1460. +                   else
  1461. +                      xv_set(item, PANEL_VALUE, p, 0);
  1462. +                   return(PANEL_NONE);
  1463. +        case '\t' : return(event_shift_is_down(event)? PANEL_PREVIOUS : PANEL_NEXT);
  1464. +        default   : return(panel_text_notify(item, event));
  1465. +        }
  1466. + }
  1467. *** list_misc.c.orig    Fri Nov 30 08:44:31 1990
  1468. --- list_misc.c    Fri Nov  9 11:11:30 1990
  1469. ***************
  1470. *** 0 ****
  1471. --- 1,85 ----
  1472. + /************************************************************************/
  1473. + /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1474. + /*                                    */
  1475. + /*    Permission to use, copy, modify, and distribute this software    */
  1476. + /*    and its documentation for any purpose and without fee is    */
  1477. + /*    hereby granted, provided that the above copyright notice    */
  1478. + /*    appear in all copies and that both that copyright notice and    */
  1479. + /*    this permission notice appear in supporting documentation, and    */
  1480. + /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1481. + /*    used in advertising or publicity pertaining to distribution    */
  1482. + /*    of the software without specific, written prior permission.    */
  1483. + /*    Chuck Musciano and Harris Corporation make no representations    */
  1484. + /*    about the suitability of this software for any purpose.  It is    */
  1485. + /*    provided "as is" without express or implied warranty.  This     */
  1486. + /*    software may not be sold without the prior explicit permission    */
  1487. + /*    of Harris Corporation.                        */
  1488. + /************************************************************************/
  1489. + /************************************************************************/
  1490. + /*                                    */
  1491. + /*    list_utils.c    other tools for manipulating panel settings    */
  1492. + /*                                    */
  1493. + /************************************************************************/
  1494. + #include    <stdio.h>
  1495. + #include    <sys/param.h>
  1496. + #include    <sys/types.h>
  1497. + #include    <xview/xview.h>
  1498. + #include    <xview/panel.h>
  1499. + #include    "manifest.h"
  1500. + /************************************************************************/
  1501. + EXPORT    int    list_count(item)
  1502. + Panel_item    item;
  1503. + {    int    i, count, rows;
  1504. +     rows = (int) xv_get(item, PANEL_LIST_NROWS);
  1505. +     for (i = count = 0; i < rows; i++)
  1506. +        if (xv_get(item, PANEL_LIST_SELECTED, i))
  1507. +           count++;
  1508. +     return(count);
  1509. + }
  1510. + /************************************************************************/
  1511. + EXPORT    empty_list(item)
  1512. + Panel_item    item;
  1513. + {    int    row;
  1514. +     row = (int) xv_get(item, PANEL_LIST_NROWS);
  1515. +     for ( ; row > 0; row--)
  1516. +        xv_set(item, PANEL_LIST_DELETE, row - 1, NULL);
  1517. + }
  1518. + /************************************************************************/
  1519. + EXPORT    clear_list(item)
  1520. + Panel_item    item;
  1521. + {    int    i, row;
  1522. +     row = (int) xv_get(item, PANEL_LIST_NROWS);
  1523. +     for (i = 0; i < row; i++)
  1524. +        if (xv_get(item, PANEL_LIST_SELECTED, i))
  1525. +           xv_set(item, PANEL_LIST_SELECT, i, FALSE, NULL);
  1526. + }
  1527. + /************************************************************************/
  1528. + EXPORT    int    first_selected(item)
  1529. + Panel_item    item;
  1530. + {    int    i, row;
  1531. +     row = (int) xv_get(item, PANEL_LIST_NROWS);
  1532. +     for (i = 0; i < row; i++)
  1533. +        if (xv_get(item, PANEL_LIST_SELECTED, i))
  1534. +           return(i);
  1535. +     return(0);
  1536. + }
  1537. +        
  1538. *** misc.c.orig    Fri Nov 30 08:44:33 1990
  1539. --- misc.c    Fri Nov  2 07:34:57 1990
  1540. ***************
  1541. *** 204,206 ****
  1542. --- 204,220 ----
  1543.          }
  1544.       return(c);
  1545.   }
  1546. + /************************************************************************/
  1547. + EXPORT    int    is_empty(s)
  1548. + char    *s;
  1549. + {
  1550. +     if (s == NULL)
  1551. +        return(TRUE);
  1552. +     for (; *s; s++)
  1553. +        if (!isspace(*s))
  1554. +           return(FALSE); 
  1555. +     return(TRUE);
  1556. + }
  1557. *** patchlevel.h.orig    Fri Nov 30 08:44:38 1990
  1558. --- patchlevel.h    Fri Nov 30 08:12:35 1990
  1559. ***************
  1560. *** 22,26 ****
  1561. --- 22,32 ----
  1562.   /************************************************************************/
  1563.   /*                                    */
  1564.   /*    0    15 Oct 90    Initial release                */
  1565. + /*                comp.sources.x: Volume 10, Issues 3-8    */
  1566. + /*                                    */
  1567. + /*    1     1 Dec 90    Restructured code for maintainability    */
  1568. + /*                Added "About Boss..."            */
  1569. + /*                Added warning about downloads at 9600    */
  1570. + /*                   baud                    */
  1571.   /*                                    */
  1572.   /************************************************************************/
  1573. *** pinned_menu_notify.c.orig    Fri Nov 30 08:44:39 1990
  1574. --- pinned_menu_notify.c    Tue Oct 23 08:03:27 1990
  1575. ***************
  1576. *** 0 ****
  1577. --- 1,52 ----
  1578. + /************************************************************************/
  1579. + /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1580. + /*                                    */
  1581. + /*    Permission to use, copy, modify, and distribute this software    */
  1582. + /*    and its documentation for any purpose and without fee is    */
  1583. + /*    hereby granted, provided that the above copyright notice    */
  1584. + /*    appear in all copies and that both that copyright notice and    */
  1585. + /*    this permission notice appear in supporting documentation, and    */
  1586. + /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1587. + /*    used in advertising or publicity pertaining to distribution    */
  1588. + /*    of the software without specific, written prior permission.    */
  1589. + /*    Chuck Musciano and Harris Corporation make no representations    */
  1590. + /*    about the suitability of this software for any purpose.  It is    */
  1591. + /*    provided "as is" without express or implied warranty.  This     */
  1592. + /*    software may not be sold without the prior explicit permission    */
  1593. + /*    of Harris Corporation.                        */
  1594. + /************************************************************************/
  1595. + /************************************************************************/
  1596. + /*                                    */
  1597. + /*    pinned_menu_notify.c    GUIDE callback for pinned menus        */
  1598. + /*                                    */
  1599. + /************************************************************************/
  1600. + #include    <stdio.h>
  1601. + #include    <sys/param.h>
  1602. + #include    <sys/types.h>
  1603. + #include    <xview/xview.h>
  1604. + #include    "manifest.h"
  1605. + /************************************************************************/
  1606. + EXPORT    void    pinned_menu_notify(menu, item)
  1607. + Menu        menu;
  1608. + Menu_item    item;
  1609. + {    Xv_opaque    pin_window     = (Xv_opaque) xv_get(menu, MENU_PIN_WINDOW);
  1610. +     void        (*menu_notify)() = (void (*)()) xv_get(menu, MENU_GEN_PROC);
  1611. +     void        (*item_notify)() = (void (*)()) xv_get(item, MENU_GEN_PROC);
  1612. +     
  1613. +     if (pin_window && xv_get(pin_window, XV_SHOW)) {
  1614. +        if (menu_notify)
  1615. +           (*menu_notify)(menu, MENU_NOTIFY);
  1616. +        if (item_notify)
  1617. +           (*item_notify)(item, MENU_NOTIFY);
  1618. +        if (item_notify)
  1619. +           (*item_notify)(item, MENU_NOTIFY_DONE);
  1620. +        if (menu_notify)
  1621. +           (*menu_notify)(menu, MENU_NOTIFY_DONE);
  1622. +     }
  1623. + }
  1624. *** place_dialog.c.orig    Fri Nov 30 08:44:40 1990
  1625. --- place_dialog.c    Thu Nov 29 15:18:03 1990
  1626. ***************
  1627. *** 0 ****
  1628. --- 1,69 ----
  1629. + /************************************************************************/
  1630. + /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1631. + /*                                    */
  1632. + /*    Permission to use, copy, modify, and distribute this software    */
  1633. + /*    and its documentation for any purpose and without fee is    */
  1634. + /*    hereby granted, provided that the above copyright notice    */
  1635. + /*    appear in all copies and that both that copyright notice and    */
  1636. + /*    this permission notice appear in supporting documentation, and    */
  1637. + /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1638. + /*    used in advertising or publicity pertaining to distribution    */
  1639. + /*    of the software without specific, written prior permission.    */
  1640. + /*    Chuck Musciano and Harris Corporation make no representations    */
  1641. + /*    about the suitability of this software for any purpose.  It is    */
  1642. + /*    provided "as is" without express or implied warranty.  This     */
  1643. + /*    software may not be sold without the prior explicit permission    */
  1644. + /*    of Harris Corporation.                        */
  1645. + /************************************************************************/
  1646. + /************************************************************************/
  1647. + /*                                    */
  1648. + /*    place_dialog.c    position a dialog box at the right place    */
  1649. + /*                                    */
  1650. + /************************************************************************/
  1651. + #include    <stdio.h>
  1652. + #include    <sys/param.h>
  1653. + #include    <sys/types.h>
  1654. + #include    <xview/xview.h>
  1655. + #include    <X11/Xutil.h>
  1656. + #include    "manifest.h"
  1657. + /************************************************************************/
  1658. + EXPORT    void    place_dialog(base, dialog)
  1659. + Xv_opaque    base;
  1660. + Xv_opaque    dialog;
  1661. + {    Rect        br, dr, sr;
  1662. +     XWMHints    *hints;
  1663. +     sr = *((Rect *) xv_get(base, WIN_SCREEN_RECT));
  1664. +     frame_get_rect(base, &br);
  1665. +     frame_get_rect(dialog, &dr);
  1666. +     if (rect_right(&br) + dr.r_width < sr.r_width) {
  1667. +        dr.r_left = rect_right(&br);
  1668. +        dr.r_top = br.r_top;
  1669. +        }
  1670. +     else if (dr.r_width <= br.r_left) {
  1671. +        dr.r_left = br.r_left - dr.r_width;
  1672. +        dr.r_top = br.r_top;
  1673. +        }
  1674. +     else {
  1675. +        dr.r_left = br.r_left + 32;
  1676. +        dr.r_top = br.r_top + 32;
  1677. +        }
  1678. +     if (dr.r_top + dr.r_height > sr.r_height)
  1679. +        dr.r_top = sr.r_height - dr.r_height;
  1680. +     if (dr.r_top < 0)
  1681. +        dr.r_top = 0;
  1682. +     frame_set_rect(dialog, &dr);
  1683. +     hints = XGetWMHints(xv_get(dialog, XV_DISPLAY), xv_get(dialog, XV_XID));
  1684. +     hints->flags |= StateHint;
  1685. +     hints->initial_state = NormalState;
  1686. +     XSetWMHints(xv_get(dialog, XV_DISPLAY), xv_get(dialog, XV_XID), hints);
  1687. +     XFree(hints);
  1688. + }
  1689. *** send_mail.c.orig    Fri Nov 30 08:44:44 1990
  1690. --- send_mail.c    Thu Nov 29 15:58:19 1990
  1691. ***************
  1692. *** 0 ****
  1693. --- 1,146 ----
  1694. + /************************************************************************/
  1695. + /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  1696. + /*                                    */
  1697. + /*    Permission to use, copy, modify, and distribute this software    */
  1698. + /*    and its documentation for any purpose and without fee is    */
  1699. + /*    hereby granted, provided that the above copyright notice    */
  1700. + /*    appear in all copies and that both that copyright notice and    */
  1701. + /*    this permission notice appear in supporting documentation, and    */
  1702. + /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1703. + /*    used in advertising or publicity pertaining to distribution    */
  1704. + /*    of the software without specific, written prior permission.    */
  1705. + /*    Chuck Musciano and Harris Corporation make no representations    */
  1706. + /*    about the suitability of this software for any purpose.  It is    */
  1707. + /*    provided "as is" without express or implied warranty.        */
  1708. + /*                                    */
  1709. + /*    This code contains data and information that is proprietary    */
  1710. + /*    to Casio Corporation.  You may be subject to legal action if    */
  1711. + /*    this information is released without explicit permission from    */
  1712. + /*    Casio.                                */
  1713. + /************************************************************************/
  1714. + /************************************************************************/
  1715. + /*                                    */
  1716. + /*    send_mail.c    display a little information window        */
  1717. + /*                                    */
  1718. + /************************************************************************/
  1719. + #include    <stdio.h>
  1720. + #include    <sys/param.h>
  1721. + #include    <sys/types.h>
  1722. + #include    <xview/xview.h>
  1723. + #include    <xview/panel.h>
  1724. + #include    <xview/textsw.h>
  1725. + #include    "boss_ui.h"
  1726. + #include    "manifest.h"
  1727. + #define        VERSION            "1.0a"
  1728. + PUBLIC    boss_base_objects    *boss_base;
  1729. + PRIVATE    boss_mail_objects    *dialog = NULL;
  1730. + /************************************************************************/
  1731. + EXPORT    popup_send_mail(item, event)
  1732. + Panel_item    item;
  1733. + Event        *event;
  1734. + {
  1735. +     if (dialog == NULL) {
  1736. +        dialog = boss_mail_objects_initialize(NULL, boss_base->base);
  1737. +        place_dialog(boss_base->base, dialog->mail);
  1738. +        xv_set(dialog->other_address, WIN_SHOW, FALSE, NULL);
  1739. +        }
  1740. +     xv_set(dialog->mail, XV_SHOW, TRUE, NULL);
  1741. +     xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1742. + }
  1743. + /************************************************************************/
  1744. + EXPORT    void    handle_address(item, value, event)
  1745. + Panel_item    item;
  1746. + int        value;
  1747. + Event        *event;
  1748. + {
  1749. +     if (value == 2) {
  1750. +        xv_set(dialog->other_address, WIN_SHOW, TRUE, NULL);
  1751. +        panel_paint(dialog->address, PANEL_NO_CLEAR);
  1752. +        panel_paint(dialog->other_address, PANEL_NO_CLEAR);
  1753. +        }
  1754. +     else {
  1755. +        xv_set(dialog->other_address, WIN_SHOW, FALSE, NULL);
  1756. +        panel_paint(dialog->address, PANEL_NO_CLEAR);
  1757. +        }
  1758. + }
  1759. + /************************************************************************/
  1760. + EXPORT    void    done_mail(frame)
  1761. + Frame        frame;
  1762. + {
  1763. +     textsw_reset(dialog->message, 0, 0);
  1764. +     xv_set(frame, XV_SHOW, FALSE, 0);
  1765. + }
  1766. + /************************************************************************/
  1767. + EXPORT    void    send_mail(item, event)
  1768. + Panel_item    item;
  1769. + Event        *event;
  1770. + {    char    cmd[1024], *buf;
  1771. +     int    val, size;
  1772. +     FILE    *pipe;
  1773. +     xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1774. +     val = (int) xv_get(dialog->address, PANEL_VALUE);
  1775. +     if (val != 2)
  1776. +        sprintf(cmd, "%s %s", MAILER, xv_get(dialog->address, PANEL_CHOICE_STRING, val));
  1777. +     else {
  1778. +        buf = (char *) xv_get(dialog->other_address, PANEL_VALUE);
  1779. +        if (is_empty(buf)) {
  1780. +           error("You must specify an alternate address before sending your message");
  1781. +           return;
  1782. +           }
  1783. +        else
  1784. +           sprintf(cmd, "%s %s", MAILER, buf);
  1785. +        }
  1786. +     size = (int) xv_get(dialog->message, TEXTSW_LENGTH);
  1787. +     if (size == 0) {
  1788. +        error("Please type a message before sending the mail");
  1789. +        return;
  1790. +        }
  1791. +     if ((pipe = popen(cmd, "w")) == NULL) {
  1792. +        error("Could not invoke \"%s\" to send mail", cmd);
  1793. +        return;
  1794. +        }
  1795. +     lets_get_busy(boss_base->base, TRUE, NULL);
  1796. +     buf = (char *) malloc(size);
  1797. +     xv_get(dialog->message, TEXTSW_CONTENTS, 0, buf, size);
  1798. +     fprintf(pipe, "Subject: Boss %s comment\n\n", VERSION);
  1799. +     if (fwrite(buf, 1, size, pipe) != size) {
  1800. +        error("Could not write message to the mailer");
  1801. +        free(buf);
  1802. +        return;
  1803. +        }
  1804. +     pclose(pipe);
  1805. +     free(buf);
  1806. +     textsw_reset(dialog->message, 0, 0);
  1807. +     lets_get_busy(boss_base->base, FALSE, NULL);
  1808. +     xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1809. + }
  1810. + /************************************************************************/
  1811. + EXPORT    void    cancel_mail(item, event)
  1812. + Panel_item    item;
  1813. + Event        *event;
  1814. + {
  1815. +     textsw_reset(dialog->message, 0, 0);
  1816. +     xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1817. + }
  1818. *** window_misc.c.orig    Fri Nov 30 08:44:45 1990
  1819. --- window_misc.c    Tue Oct 23 14:17:46 1990
  1820. ***************
  1821. *** 51,182 ****
  1822.                    NOTICE_BUTTON_YES, "OK",
  1823.                 0);
  1824.   }
  1825. - /************************************************************************/
  1826. - EXPORT    void    pinned_menu_notify(menu, item)
  1827. - Menu        menu;
  1828. - Menu_item    item;
  1829. - {    Xv_opaque    pin_window     = (Xv_opaque) xv_get(menu, MENU_PIN_WINDOW);
  1830. -     void        (*menu_notify)() = (void (*)()) xv_get(menu, MENU_GEN_PROC);
  1831. -     void        (*item_notify)() = (void (*)()) xv_get(item, MENU_GEN_PROC);
  1832. -     
  1833. -     if (pin_window && xv_get(pin_window, XV_SHOW)) {
  1834. -        if (menu_notify)
  1835. -           (*menu_notify)(menu, MENU_NOTIFY);
  1836. -        if (item_notify)
  1837. -           (*item_notify)(item, MENU_NOTIFY);
  1838. -        if (item_notify)
  1839. -           (*item_notify)(item, MENU_NOTIFY_DONE);
  1840. -        if (menu_notify)
  1841. -           (*menu_notify)(menu, MENU_NOTIFY_DONE);
  1842. -     }
  1843. - }
  1844. - /************************************************************************/
  1845. - EXPORT    Panel_setting    filename_completion(item, event)
  1846. - Panel_item    item;
  1847. - Event        *event;
  1848. - {    char    *p, *expand_filename();
  1849. -     switch (event_action(event)) {
  1850. -        case '\n' :
  1851. -        case '\r' :
  1852. -        case ' '  : if ((p = expand_filename((char *) xv_get(item, PANEL_VALUE))) == NULL)
  1853. -                  window_bell(xv_get(item, XV_OWNER));
  1854. -                   else
  1855. -                      xv_set(item, PANEL_VALUE, p, 0);
  1856. -                   return(PANEL_NONE);
  1857. -        case '\t' : return(event_shift_is_down(event)? PANEL_PREVIOUS : PANEL_NEXT);
  1858. -        default   : return(panel_text_notify(item, event));
  1859. -        }
  1860. - }
  1861. - /************************************************************************/
  1862. - EXPORT    void    place_dialog(base, dialog)
  1863. - Xv_opaque    base;
  1864. - Xv_opaque    dialog;
  1865. - {    Rect    br, dr, sr;
  1866. -     sr = *((Rect *) xv_get(base, WIN_SCREEN_RECT));
  1867. -     frame_get_rect(base, &br);
  1868. -     frame_get_rect(dialog, &dr);
  1869. -     if (rect_right(&br) + dr.r_width < sr.r_width) {
  1870. -        dr.r_left = rect_right(&br);
  1871. -        dr.r_top = br.r_top;
  1872. -        }
  1873. -     else if (dr.r_width <= br.r_left) {
  1874. -        dr.r_left = br.r_left - dr.r_width;
  1875. -        dr.r_top = br.r_top;
  1876. -        }
  1877. -     else {
  1878. -        dr.r_left = br.r_left + 32;
  1879. -        dr.r_top = br.r_top + 32;
  1880. -        }
  1881. -     frame_set_rect(dialog, &dr);
  1882. - }
  1883. - /************************************************************************/
  1884. - EXPORT    int    list_count(item)
  1885. - Panel_item    item;
  1886. - {    int    i, count, rows;
  1887. -     rows = (int) xv_get(item, PANEL_LIST_NROWS);
  1888. -     for (i = count = 0; i < rows; i++)
  1889. -        if (xv_get(item, PANEL_LIST_SELECTED, i))
  1890. -           count++;
  1891. -     return(count);
  1892. - }
  1893. - /************************************************************************/
  1894. - EXPORT    empty_list(item)
  1895. - Panel_item    item;
  1896. - {    int    row;
  1897. -     row = (int) xv_get(item, PANEL_LIST_NROWS);
  1898. -     for ( ; row > 0; row--)
  1899. -        xv_set(item, PANEL_LIST_DELETE, row - 1, NULL);
  1900. - }
  1901. - /************************************************************************/
  1902. - PRIVATE    set_busy(busy, skip)
  1903. - int    busy;
  1904. - Frame    skip;
  1905. - {    Frame    subframe;
  1906. -     int    i;
  1907. -     for (i = 1; subframe = (Frame) xv_get(boss_base->base, FRAME_NTH_SUBFRAME, i); i++)
  1908. -        if (subframe != skip)
  1909. -           if (xv_get(subframe, XV_SHOW))
  1910. -              xv_set(subframe, FRAME_BUSY, busy, NULL);
  1911. -     xv_set(boss_base->base, FRAME_BUSY, busy, NULL);
  1912. - }
  1913. - /************************************************************************/
  1914. - EXPORT    lets_get_busy(busy, skip)
  1915. - int    busy;
  1916. - Frame    skip;
  1917. - {    static    int    depth = 0;
  1918. -     if (busy) {
  1919. -        if (depth == 0)
  1920. -           set_busy(TRUE, skip);
  1921. -        depth++;
  1922. -        }
  1923. -     else if (depth > 0)
  1924. -        if (--depth == 0)
  1925. -           set_busy(FALSE, NULL);
  1926. - }
  1927. --- 51,53 ----
  1928.