home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume15 / monthtool2 / part02 / monthtool.c
Encoding:
C/C++ Source or Header  |  1988-06-01  |  42.5 KB  |  1,678 lines
  1. /*  @(#)monthtool.c    5.1 2/20/88 */
  2.  
  3. /*
  4.     Name:        monthtool
  5.   
  6.     Purpose:     visual appointment calendar 
  7.   
  8.     Author:        Sarah Metcalfe apres Mike Essex & Rich Burridge
  9.   
  10.     Discussion: Displays a calendar to the screen for a given month.  
  11.                 User may move the mouse to any day of the
  12.                 month and view or enter appointments for that date. 
  13.  
  14.     Modifications:
  15.                 10 Oct 87:    Sarah Metcalfe
  16.                             Allow weekly appointments.
  17.                             Automatically save on close and reload on open.
  18.                             Automatically switch to today on open.
  19.                  9 Nov 87:    D. Brent Chapman (capmkt!brent) 
  20.                             Set the "DEFAULT_FONT" environment variable to 
  21.                             the monthtool font, so that the program works 
  22.                             properly under SunOS 3.4.
  23.                 25 Nov 87:    Steve Schlaifer (jplgodo!steve) 
  24.                             Better fix for above problem.
  25.                 25 Nov 87:    Sarah Metcalfe 
  26.                             Create half-shaded date boxes for days with only
  27.                             yearly, monthly, weekly appts.
  28.                 20 Feb 88:    Sarah Metcalfe 
  29.                             Fix message length bug (at least somewhat).
  30.  
  31. */
  32.  
  33.  
  34.  
  35.  
  36. #include "monthtool.h"
  37.  
  38. static Notify_value     openCloseEvent();
  39.  
  40. void             dateEvent();
  41.  
  42. void             monthEvent();
  43. void             todayBtnHit();
  44. void             upBtnHit();
  45. void             downBtnHit();
  46. void             monthBackgroundHit();
  47.  
  48. void             notesBackgroundHit();
  49. void             notesPanelEvent();
  50. void             notesRadioHit();
  51.  
  52. Canvas             datesDsply;
  53. Textsw             notesDsply;
  54. Panel             monthPanel,
  55.                  notesPanel;
  56. Frame             frame;
  57. Menu             mainMenu,
  58.                  fileMenu;
  59. Panel_item         monthItem,
  60.                  notesTypeItem;
  61. Pixwin            *datesCrayon;
  62. struct pixfont     *font,
  63.                 *notesFont;
  64.  
  65.  
  66. short             dayIcon[] = {
  67.     0xFFFF,0xFFFF,0xFF00,0x0000,0x8000,0x0000,0x0100,0x0000,
  68.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  69.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  70.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  71.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  72.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  73.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  74.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  75.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  76.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  77.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  78.     0x8000,0x0000,0x0100,0x0000,0x8000,0x0000,0x0100,0x0000,
  79.     0x8000,0x0000,0x0100,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  80.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  81.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  82.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  83.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  84.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  85.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  86.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  87.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  88.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  89.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  90.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  91.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  92.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  93.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  94.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  95.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  96.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  97.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  98.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000
  99. };
  100. mpr_static(dayPr, 64, 64, 1, dayIcon);
  101.  
  102. short             halfDayIcon[] = {
  103.     0xFFFF,0xFFFF,0xFF00,0x0000,0x8000,0x0000,0x0100,0x0000,
  104.     0xBFFF,0xFFFF,0xFD00,0x0000,0xA000,0x0000,0x0500,0x0000,
  105.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  106.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  107.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  108.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  109.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  110.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  111.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  112.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  113.     0xA000,0x0000,0x0500,0x0000,0xA000,0x0000,0x0500,0x0000,
  114.     0xA000,0x0000,0x0500,0x0000,0xBFFF,0xFFFF,0xFD00,0x0000,
  115.     0x8000,0x0000,0x0100,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  116.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  117.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  118.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  119.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  120.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  121.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  122.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  123.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  124.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  125.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  126.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  127.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  128.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  129.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  130.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  131.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  132.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  133.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  134.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000
  135. };
  136. mpr_static(halfDayPr, 64, 64, 1, halfDayIcon);
  137.  
  138. short             fullDayIcon[] = {
  139.     0xFFFF,0xFFFF,0xFF00,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  140.     0xFFFF,0xFFFF,0xFF00,0x0000,0xE000,0x0000,0x0700,0x0000,
  141.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  142.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  143.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  144.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  145.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  146.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  147.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  148.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  149.     0xE000,0x0000,0x0700,0x0000,0xE000,0x0000,0x0700,0x0000,
  150.     0xE000,0x0000,0x0700,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  151.     0xFFFF,0xFFFF,0xFF00,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  152.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  153.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  154.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  155.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  156.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  157.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  158.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  159.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  160.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  161.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  162.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  163.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  164.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  165.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  166.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  167.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  168.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  169.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  170.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000
  171. };
  172. mpr_static(fullDayPr, 64, 64, 1, fullDayIcon);
  173.  
  174. short             daySelIcon[] = {
  175.     0xFFFF,0xFFFF,0xFF00,0x0000,0xA222,0x2222,0x2300,0x0000,
  176.     0xC444,0x4444,0x4500,0x0000,0x9111,0x1111,0x1100,0x0000,
  177.     0x8888,0x8888,0x8900,0x0000,0xA222,0x2222,0x2300,0x0000,
  178.     0xC444,0x4444,0x4500,0x0000,0x9111,0x1111,0x1100,0x0000,
  179.     0x8888,0x8888,0x8900,0x0000,0xA222,0x2222,0x2300,0x0000,
  180.     0xC444,0x4444,0x4500,0x0000,0x9111,0x1111,0x1100,0x0000,
  181.     0x8888,0x8888,0x8900,0x0000,0xA222,0x2222,0x2300,0x0000,
  182.     0xC444,0x4444,0x4500,0x0000,0x9111,0x1111,0x1100,0x0000,
  183.     0x8888,0x8888,0x8900,0x0000,0xA222,0x2222,0x2300,0x0000,
  184.     0xC444,0x4444,0x4500,0x0000,0x9111,0x1111,0x1100,0x0000,
  185.     0x8888,0x8888,0x8900,0x0000,0xA222,0x2222,0x2300,0x0000,
  186.     0xC444,0x4444,0x4500,0x0000,0x9111,0x1111,0x1100,0x0000,
  187.     0x8888,0x8888,0x8900,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  188.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  189.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  190.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  191.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  192.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  193.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  194.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  195.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  196.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  197.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  198.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  199.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  200.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  201.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  202.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  203.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  204.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  205.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  206.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000
  207. };
  208. mpr_static(daySelPr, 64, 64, 1, daySelIcon);
  209.  
  210. short             halfDaySelIcon[] = {
  211.     0xFFFF,0xFFFF,0xFF00,0x0000,0x8000,0x0000,0x0100,0x0000,
  212.     0xBFFF,0xFFFF,0xFD00,0x0000,0xB111,0x1111,0x1500,0x0000,
  213.     0xA888,0x8888,0x8D00,0x0000,0xA222,0x2222,0x2500,0x0000,
  214.     0xA444,0x4444,0x4500,0x0000,0xB111,0x1111,0x1500,0x0000,
  215.     0xA888,0x8888,0x8D00,0x0000,0xA222,0x2222,0x2500,0x0000,
  216.     0xA444,0x4444,0x4500,0x0000,0xB111,0x1111,0x1500,0x0000,
  217.     0xA888,0x8888,0x8D00,0x0000,0xA222,0x2222,0x2500,0x0000,
  218.     0xA444,0x4444,0x4500,0x0000,0xB111,0x1111,0x1500,0x0000,
  219.     0xA888,0x8888,0x8D00,0x0000,0xA222,0x2222,0x2500,0x0000,
  220.     0xA444,0x4444,0x4500,0x0000,0xB111,0x1111,0x1500,0x0000,
  221.     0xA888,0x8888,0x8D00,0x0000,0xA222,0x2222,0x2500,0x0000,
  222.     0xA444,0x4444,0x4500,0x0000,0xBFFF,0xFFFF,0xFD00,0x0000,
  223.     0x8000,0x0000,0x0100,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  224.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  225.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  226.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  227.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  228.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  229.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  230.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  231.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  232.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  233.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  234.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  235.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  236.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  237.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  238.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  239.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  240.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  241.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  242.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000
  243. };
  244. mpr_static(halfDaySelPr, 64, 64, 1, halfDaySelIcon);
  245.  
  246. short             fullDaySelIcon[] = {
  247.     0xFFFF,0xFFFF,0xFF00,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  248.     0xFFFF,0xFFFF,0xFF00,0x0000,0xF111,0x1111,0x1700,0x0000,
  249.     0xE888,0x8888,0x8F00,0x0000,0xE222,0x2222,0x2700,0x0000,
  250.     0xE444,0x4444,0x4700,0x0000,0xF111,0x1111,0x1700,0x0000,
  251.     0xE888,0x8888,0x8F00,0x0000,0xE222,0x2222,0x2700,0x0000,
  252.     0xE444,0x4444,0x4700,0x0000,0xF111,0x1111,0x1700,0x0000,
  253.     0xE888,0x8888,0x8F00,0x0000,0xE222,0x2222,0x2700,0x0000,
  254.     0xE444,0x4444,0x4700,0x0000,0xF111,0x1111,0x1700,0x0000,
  255.     0xE888,0x8888,0x8F00,0x0000,0xE222,0x2222,0x2700,0x0000,
  256.     0xE444,0x4444,0x4700,0x0000,0xF111,0x1111,0x1700,0x0000,
  257.     0xE888,0x8888,0x8F00,0x0000,0xE222,0x2222,0x2700,0x0000,
  258.     0xE444,0x4444,0x4700,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  259.     0xFFFF,0xFFFF,0xFF00,0x0000,0xFFFF,0xFFFF,0xFF00,0x0000,
  260.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  261.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  262.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  263.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  264.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  265.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  266.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  267.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  268.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  269.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  270.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  271.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  272.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  273.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  274.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  275.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  276.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  277.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  278.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000
  279. };
  280. mpr_static(fullDaySelPr, 64, 64, 1, fullDaySelIcon);
  281.  
  282.  
  283. short             upBtnIcon[] = {
  284.     0x3FFF,0xE000,0x7FFF,0xF000,
  285.     0xE000,0x3800,0xC000,0x1800,
  286.     0xC020,0x1800,0xC070,0x1800,
  287.     0xC0F8,0x1800,0xC1FC,0x1800,
  288.     0xC3FE,0x1800,0xC7FF,0x1800,
  289.     0xCFFF,0x9800,0xC0F8,0x1800,
  290.     0xC0F8,0x1800,0xC0F8,0x1800,
  291.     0xC0F8,0x1800,0xC000,0x1800,
  292.     0xE000,0x3800,0x7FFF,0xF000,
  293.     0x3FFF,0xE000,0x0000,0x0000
  294. };
  295. mpr_static(upBtnPr, BTN_WIDTH, BTN_HEIGHT, 1, upBtnIcon);
  296.  
  297. short             downBtnIcon[] = {
  298.     0x3FFF,0xE000,0x7FFF,0xF000,
  299.     0xE000,0x3800,0xC000,0x1800,
  300.     0xC0F8,0x1800,0xC0F8,0x1800,
  301.     0xC0F8,0x1800,0xC0F8,0x1800,
  302.     0xCFFF,0x9800,0xC7FF,0x1800,
  303.     0xC3FE,0x1800,0xC1FC,0x1800,
  304.     0xC0F8,0x1800,0xC070,0x1800,
  305.     0xC020,0x1800,0xC000,0x1800,
  306.     0xE000,0x3800,0x7FFF,0xF000,
  307.     0x3FFF,0xE000,0x0000,0x0000
  308. };
  309. mpr_static(downBtnPr, BTN_WIDTH, BTN_HEIGHT, 1, downBtnIcon);
  310.  
  311.  
  312. short             toolIcon[] = {
  313.     0xFFFF,0xFFFF,0xFFFF,0xFFFF,0x8C08,0x87C2,0x21F0,0xF031,
  314.     0x920D,0x8102,0x2040,0x8049,0x880A,0x8102,0xA040,0xE021,
  315.     0x840A,0x8102,0xA040,0x8011,0x9208,0x8103,0x6040,0x8049,
  316.     0x8C08,0x8102,0x2040,0x8031,0xFFFF,0xFFFF,0xFFFF,0xFFFF,
  317.     0xFFFF,0xFFFF,0xFFFF,0xFFFF,0x8040,0x2010,0x0804,0x0201,
  318.     0x8040,0x2814,0x0A05,0x0281,0x8040,0x2814,0x0A05,0x0281,
  319.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2010,0x0804,0x0201,
  320.     0x8040,0x2013,0xA804,0x0201,0x8040,0x2010,0x0804,0x0201,
  321.     0x8040,0x2016,0x8804,0x0201,0x8040,0x2010,0x0804,0x0201,
  322.     0x8040,0x2010,0x0804,0x0201,0xFFFF,0xFFFF,0xFFFF,0xFFFF,
  323.     0x8040,0x2010,0x0804,0x0201,0xA050,0x2814,0x0B05,0x82C1,
  324.     0xA050,0x2814,0x0B05,0x82C1,0x8040,0x2010,0x0804,0x0201,
  325.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2010,0x0805,0xD201,
  326.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2010,0x0804,0x0201,
  327.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2010,0x0804,0x0201,
  328.     0xFFFF,0xFFFF,0xFFFF,0xFFFF,0x8040,0x2010,0x0804,0x0201,
  329.     0xB058,0x2C16,0x0B05,0x82C1,0xB058,0x2C16,0x0B05,0x82C1,
  330.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2F50,0x0804,0x0201,
  331.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2D50,0x0804,0x0201,
  332.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2010,0x0804,0x0201,
  333.     0x8040,0x2010,0x0804,0x0201,0xFFFF,0xFFFF,0xFFFF,0xFFFF,
  334.     0x8040,0x2010,0x0804,0x0201,0xB058,0x2C16,0x0B05,0x82C1,
  335.     0xB058,0x2C16,0x0B05,0x82C1,0x8040,0x2010,0x0804,0x0201,
  336.     0x8040,0x2010,0x0BE4,0x0201,0x8040,0x2010,0x0804,0x0201,
  337.     0x8040,0x2010,0x0BA4,0x0201,0x8040,0x2010,0x0804,0x0201,
  338.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2010,0x0804,0x0201,
  339.     0xFFFF,0xFFFF,0xFFFF,0xFFFF,0x8040,0x2010,0x0804,0x0201,
  340.     0xB058,0x2C16,0x0B04,0x0201,0xB058,0x2C16,0x0B04,0x0201,
  341.     0x8040,0x2010,0x0804,0x0201,0x8040,0x2010,0x0804,0x0201,
  342.     0xBA40,0x2017,0xC804,0x0201,0x8040,0x2010,0x0804,0x0201,
  343.     0x8040,0x2013,0xC804,0x0201,0x9240,0x2010,0x0804,0x0201,
  344.     0x8040,0x2010,0x0804,0x0201,0xFFFF,0xFFFF,0xFFFF,0xFFFF
  345. };
  346. DEFINE_ICON_FROM_IMAGE(monthIcon, toolIcon);
  347.  
  348.  
  349.  
  350. struct dateBox         monthBoxes[DATE_ROWS][DATE_COLS];
  351.  
  352.  
  353. struct apptsData     *firstApptRecord[NUM_NOTES_TYPE + 1 /*for NOTES_ERROR*/];
  354. struct apptsData     *lastApptRecord[NUM_NOTES_TYPE + 1 /*for NOTES_ERROR*/];
  355.  
  356.     
  357. int                     tmonth, tday, tyear;
  358. int                     firstDow;
  359.  
  360. int                     yearToShow, monthToShow;
  361. int                     dayToShow = 0;
  362. int                     dateNumToShow[NUM_NOTES_TYPE];
  363.  
  364. int                     editCount = 0;
  365. int                     notesModified = 0;
  366. int                     hasWeeklyNotes;
  367.  
  368. char                 toolFile[80];
  369. struct stat             lastStatus;
  370.  
  371. char                 typeChar[NUM_NOTES_TYPE] = { 0x90, 0x91, 0x92, 0x93, 0x94 }; 
  372. char                 typeMark[3] = "  ";
  373.                             
  374. char                *smon[] = { "January", "February", "March",
  375.                                 "April", "May", "June",
  376.                                 "July", "August", "September",
  377.                                 "October", "November", "December"
  378.                               };
  379. int                     mon[] = { 0,     31, 29, 31, 
  380.                                     30, 31, 30,
  381.                                     31, 31, 30, 
  382.                                     31, 30, 31, 
  383.                               };
  384.  
  385.  
  386. main(argc, argv)
  387.  
  388. int         argc;
  389. char    *argv[];
  390.  
  391. {
  392.     char    fontString[80];
  393.     char    choiceString[2];
  394.     int        type;
  395.  
  396.     /* set default font */
  397.  
  398.     strcpy(fontString, FONTDIR);
  399.     strcat(fontString, NORMALFONT);
  400.  
  401.     font = pf_open(LARGEFONT);              /* Open large sized font. */
  402.     notesFont = pf_open(fontString);        /* Open regular sized font. */
  403.  
  404.     /* Set up menus */
  405.                         
  406.     fileMenu = menu_create(MENU_ITEM,
  407.                                 MENU_STRING,    "Save",
  408.                                 MENU_VALUE,         MENU_SAVE,
  409.                                 0,
  410.                             MENU_ITEM,
  411.                                 MENU_STRING,    "Reload",
  412.                                 MENU_VALUE,         MENU_RELOAD,
  413.                                 0,
  414.                             0);
  415.  
  416.     mainMenu = menu_create(MENU_ITEM,
  417.                                 MENU_STRING,    "Close (with Save)",
  418.                                 MENU_VALUE,         MENU_CLOSE,
  419.                                 0,
  420.                             MENU_ITEM,
  421.                                 MENU_STRING,    "Update Appts.",
  422.                                 MENU_PULLRIGHT,     fileMenu,
  423.                                 0,
  424.                             MENU_ITEM,
  425.                                 MENU_STRING,    "Quit (with Save)",
  426.                                 MENU_VALUE,         MENU_QUIT,
  427.                                 0,
  428.                             0);
  429.                         
  430.  
  431.     /*    Set up windows */
  432.  
  433.     frame = window_create(0, FRAME,
  434.                 FRAME_ICON, &monthIcon,
  435.                 FRAME_SHOW_LABEL, FALSE,
  436.                 FRAME_SUBWINDOWS_ADJUSTABLE, FALSE,
  437.                 FRAME_NO_CONFIRM, FALSE,
  438.                 WIN_HEIGHT, DATES_HEIGHT + MONTH_HEIGHT + 
  439.                     NOTES_PANEL_HEIGHT + NOTES_HEIGHT + 25,
  440.                 WIN_WIDTH, WINDOW_WIDTH + 10,
  441.                 FRAME_ARGS, argc, argv,
  442.                 0);
  443.     (void) notify_interpose_event_func( frame, openCloseEvent, NOTIFY_SAFE );
  444.  
  445.     monthPanel = window_create(frame, PANEL,
  446.                 WIN_X, 0,
  447.                 WIN_Y, 0,
  448.                 WIN_HEIGHT, MONTH_HEIGHT,
  449.                 WIN_WIDTH, WINDOW_WIDTH,
  450.                 WIN_FONT, font,
  451.                 PANEL_BACKGROUND_PROC, monthBackgroundHit,
  452.                 PANEL_EVENT_PROC, monthEvent,
  453.                 0);
  454.  
  455.     datesDsply = window_create(frame, CANVAS,
  456.                 WIN_X, 0,
  457.                 WIN_BELOW, monthPanel,
  458.                 WIN_HEIGHT, DATES_HEIGHT,
  459.                 WIN_WIDTH, WINDOW_WIDTH,
  460.                 WIN_FONT, font,
  461.                 WIN_EVENT_PROC, dateEvent,
  462.                 WIN_CONSUME_KBD_EVENTS, WIN_ASCII_EVENTS, WIN_LEFT_KEYS, 0,
  463.                 0);
  464.  
  465.     datesCrayon = canvas_pixwin(datesDsply);
  466.  
  467.     notesPanel = window_create(frame, PANEL,
  468.                 WIN_X, 0,
  469.                 WIN_BELOW, datesDsply,
  470.                 WIN_HEIGHT, NOTES_PANEL_HEIGHT,
  471.                 WIN_WIDTH, WINDOW_WIDTH,
  472.                 WIN_FONT, notesFont,
  473.                 PANEL_BACKGROUND_PROC, notesBackgroundHit,
  474.                 PANEL_EVENT_PROC, notesPanelEvent,
  475.                 0);
  476.  
  477.     notesDsply = window_create(frame, TEXTSW,
  478.                 WIN_X, 0,
  479.                 WIN_BELOW, notesPanel,
  480.                 WIN_HEIGHT, WIN_EXTEND_TO_EDGE,
  481.                 WIN_WIDTH, 10000 /* very large number, cuts to actual width */,
  482.                 WIN_FONT, notesFont,
  483.                 TEXTSW_IGNORE_LIMIT, TEXTSW_INFINITY,
  484.                 0);
  485.     /* For bug in Sun Version 3.4 */
  486.     window_set( notesDsply, WIN_FONT, notesFont, 0);
  487.  
  488.     /* Set up panels */
  489.  
  490.  
  491.     monthItem = panel_create_item(monthPanel, PANEL_MESSAGE,
  492.                     PANEL_LABEL_X, 5,
  493.                     PANEL_LABEL_Y, 10,
  494.                   0);
  495.                         
  496.  
  497.     panel_create_item( monthPanel, PANEL_BUTTON,
  498.                         PANEL_ITEM_X, WINDOW_WIDTH - 2 * (BTN_WIDTH + GAP) - 55,
  499.                         PANEL_ITEM_Y, 10,
  500.                           PANEL_NOTIFY_PROC, todayBtnHit, 
  501.                            PANEL_LABEL_IMAGE,
  502.                             panel_button_image(monthPanel,"Today",0,notesFont),
  503.                         0);
  504.  
  505.     panel_create_item( monthPanel, PANEL_BUTTON,
  506.                         PANEL_ITEM_X, WINDOW_WIDTH - 2 * (BTN_WIDTH + GAP),
  507.                         PANEL_ITEM_Y, 10,
  508.                           PANEL_NOTIFY_PROC, upBtnHit, 
  509.                            PANEL_LABEL_IMAGE, &upBtnPr,
  510.                         0);
  511.  
  512.     panel_create_item( monthPanel, PANEL_BUTTON,
  513.                         PANEL_ITEM_X, WINDOW_WIDTH - (BTN_WIDTH + GAP),
  514.                         PANEL_ITEM_Y, 10,
  515.                           PANEL_NOTIFY_PROC, downBtnHit, 
  516.                            PANEL_LABEL_IMAGE, &downBtnPr,
  517.                         0);
  518.  
  519.  
  520.     notesTypeItem = panel_create_item( notesPanel, PANEL_CHOICE,
  521.                         PANEL_LABEL_STRING, "Reminder Types:",
  522.                         PANEL_FEEDBACK, PANEL_NONE,
  523.                         PANEL_NOTIFY_PROC, notesRadioHit,
  524.                     0);
  525.     choiceString[1] = '\0';
  526.     for (type = 0; type < NUM_NOTES_TYPE; type++) {
  527.         choiceString[0] = typeChar[type];
  528.         panel_set( notesTypeItem, PANEL_CHOICE_STRING, type, choiceString, 0);
  529.         panel_set( notesTypeItem, PANEL_CHOICE_X, type, 100 + 35*(type+1), 0);
  530.         panel_set( notesTypeItem, PANEL_CHOICE_Y, type, 4, 0);
  531.     }
  532.     panel_set( notesTypeItem, PANEL_LABEL_X, 4, 0);
  533.     panel_set( notesTypeItem, PANEL_LABEL_Y, 4, 0);
  534.  
  535.     /* Get monthtool filename */
  536.  
  537.     strcpy(toolFile, getenv("HOME"));
  538.     strcat(toolFile, "/.monthtool");
  539.  
  540.     /* Get today's date */
  541.  
  542.     todaySet();
  543.     yearToShow = tyear;
  544.     monthToShow = tmonth;
  545.  
  546.     /* Load the appointments file and show this month's calendar */
  547.     
  548.     loadData();    
  549.     firstDowSet();
  550.     dayHit(tday);    
  551.  
  552.     /* Wait for events */
  553.  
  554.     window_main_loop(frame);
  555.  
  556.     /* When done, leave */
  557.  
  558.     freeData();
  559.     exit(0);
  560.  
  561. }
  562.  
  563. static Notify_value    openCloseEvent(frame, event, arg, type)
  564.  
  565. Frame                 frame;
  566. Event                *event;
  567. Notify_arg             arg;
  568. Notify_event_type     type;
  569.  
  570. {
  571.     int                    initialClosed, finalClosed;
  572.     Notify_value        value;
  573.  
  574.     initialClosed = (int) window_get( frame, FRAME_CLOSED );
  575.     value = notify_next_event_func( frame, event, arg, type );
  576.     finalClosed = (int) window_get( frame, FRAME_CLOSED );
  577.  
  578.     if ( initialClosed != finalClosed ) {
  579.         if ( finalClosed ) {
  580.             saveData();
  581.         }else{
  582.             reloadData();
  583.             todaySet();
  584.             monthToShow = tmonth;
  585.             yearToShow = tyear;
  586.             monthDisplay();
  587.             dayHit(tday);
  588.         }
  589.     }
  590.  
  591.     return( value );
  592.         
  593. }
  594.  
  595. static void    monthEvent(item, event)
  596.  
  597. Panel_item     item;
  598. Event        *event;
  599.  
  600. {
  601.     switch (event_id(event)) {
  602.     case MS_RIGHT:
  603.         if (event_is_down(event)) {
  604.             rootMenuDisplay(monthPanel,event);
  605.         }
  606.         break;
  607.     case MS_LEFT:
  608.         panel_default_handle_event(item,event);
  609.         break;
  610.     default:
  611.         return;
  612.     }
  613.  
  614. }
  615.  
  616. static void    todayBtnHit(item, event)
  617.  
  618. Panel_item     item;
  619. Event        *event;
  620.  
  621. {
  622.     todaySet();
  623.     if ( (monthToShow != tmonth) || (yearToShow != tyear) ) {
  624.         notesSave();
  625.         monthToShow = tmonth;
  626.         yearToShow = tyear;
  627.         monthDisplay();
  628.         dayHit(tday);
  629.     }else{
  630.         if (dayToShow != tday) {
  631.             notesSave();
  632.             dayHit(tday);
  633.         }
  634.     }
  635. }
  636.  
  637. static void    upBtnHit(item, event)
  638.  
  639. Panel_item     item;
  640. Event        *event;
  641.  
  642. {
  643.     notesSave();
  644.     if (--monthToShow < 1) {
  645.         monthToShow = 12;
  646.         yearToShow--;
  647.     }
  648.     monthDisplay();
  649.     dayHit(1);
  650.  
  651. }
  652.  
  653. static void    downBtnHit(item, event)
  654.  
  655. Panel_item     item;
  656. Event        *event;
  657.  
  658. {
  659.     notesSave();
  660.     if (++monthToShow == 13) {
  661.         monthToShow = 1;
  662.         yearToShow++;
  663.     }
  664.     monthDisplay();
  665.     dayHit(1);
  666.  
  667. }
  668.  
  669. static void    monthBackgroundHit(panel, event)
  670.  
  671. Panel         panel;
  672. Event        *event;
  673.  
  674. {
  675.     switch (event_id(event)) {
  676.     case MS_RIGHT:
  677.         if (event_is_down(event)) {
  678.             rootMenuDisplay(monthPanel,event);
  679.         }
  680.         break;
  681.     default:
  682.         return;
  683.     }
  684.  
  685. }
  686.  
  687. static void    dateEvent(win, event, arg)
  688.  
  689. Canvas         win;
  690. Event        *event;
  691. caddr_t         arg;
  692.  
  693. {
  694.     int            column,
  695.                 row;
  696.  
  697.     if (event_is_up(event)) {
  698.         return;
  699.     }
  700.  
  701.     switch (event_id(event)) {
  702.     case MS_LEFT:
  703.         notesSave();
  704.         column = event_x(event) / (DATE_BOX_WIDTH + GAP);
  705.         row = (event_y(event)) / (DATE_BOX_HEIGHT + GAP);
  706.         dayHit(monthBoxes[row][column].date);
  707.         break;
  708.     case MS_RIGHT:
  709.         rootMenuDisplay(win,event);
  710.         break;
  711.     case WIN_REPAINT:
  712.         notesSave();
  713.         monthDisplay();
  714.         dayHit(dayToShow);
  715.         break;
  716.     default:
  717.         return;
  718.     }
  719.  
  720. }
  721.  
  722. dayHit(date)
  723.  
  724. int    date;
  725.  
  726. {
  727.     int                     row,
  728.                          column;
  729.  
  730.     if (date != 0) {
  731.         if (dayToShow != 0) {
  732.             for (row = 0; row < DATE_ROWS; row++) {
  733.                 for (column = 0; column < DATE_COLS; column++) {
  734.                     if (dayToShow == monthBoxes[row][column].date) {
  735.                         dateBoxDisplay(row, column, NOHIGHLIGHT);
  736.                     }
  737.                 }
  738.             }
  739.         }
  740.         for (row = 0; row < DATE_ROWS; row++) {
  741.             for (column = 0; column < DATE_COLS; column++) {
  742.                 if (date == monthBoxes[row][column].date) {
  743.                     dateBoxDisplay(row, column, HIGHLIGHT);
  744.                 }
  745.             }
  746.         }
  747.  
  748.         dayToShow = date;
  749.  
  750.         dateNumToShow[NOTES_ALL_ALL_ALL] = 0;
  751.  
  752.         dateNumToShow[NOTES_D_ALL_ALL] = dayToShow;
  753.  
  754.         dateNumToShow[NOTES_D_M_ALL] = dayToShow + 100 * monthToShow;
  755.  
  756.         dateNumToShow[NOTES_WEEKLY] = ((dayToShow + firstDow) % DATE_COLS);        
  757.         if ( dateNumToShow[NOTES_WEEKLY] == 0 ) {
  758.             dateNumToShow[NOTES_WEEKLY] = DATE_COLS;
  759.         }
  760.         dateNumToShow[NOTES_WEEKLY] += 100 * 99;
  761.  
  762.         dateNumToShow[NOTES_D_M_Y] = dayToShow + 100 * monthToShow + 10000 * yearToShow;
  763.  
  764.         notesDisplay();
  765.  
  766.     }
  767.  
  768. }
  769.  
  770. static void    notesPanelEvent(item, event)
  771.  
  772. Panel_item     item;
  773. Event        *event;
  774.  
  775. {
  776.  
  777.     switch (event_id(event)) {
  778.     case MS_RIGHT:
  779.         if (event_is_down(event)) {
  780.             rootMenuDisplay(notesPanel,event);
  781.         }
  782.         break;
  783.     case MS_LEFT:
  784.         panel_default_handle_event(item,event);
  785.         break;
  786.     default:
  787.         return;
  788.     }
  789.  
  790. }
  791.  
  792. static void    notesRadioHit(item, value, event)
  793.  
  794. Panel_item     item;
  795. int             value;
  796. Event        *event;
  797.  
  798. {
  799.     int            caretIndex,
  800.                 endIndex,
  801.                 lineStartIndex,
  802.                 nextLineStartIndex,
  803.                 ptrnStartIndex,
  804.                 ptrnEndIndex,
  805.                 ptrnLen,
  806.                 type,
  807.                 result,
  808.                 lineNo;
  809.  
  810.     typeMark[0] = typeChar[value];
  811.     ptrnLen = strlen(typeMark);
  812.  
  813.     caretIndex = (int)window_get( notesDsply, TEXTSW_INSERTION_POINT );
  814.  
  815.     lineNo = 0;
  816.     lineStartIndex = 0;
  817.     while (1) {
  818.         nextLineStartIndex = (int)textsw_index_for_file_line(notesDsply, lineNo+1);
  819.         if ( (nextLineStartIndex < 0) || (nextLineStartIndex > caretIndex) ) {
  820.             break;
  821.         }
  822.         lineNo++;
  823.         lineStartIndex = nextLineStartIndex;
  824.     }
  825.  
  826.     window_set( notesDsply, TEXTSW_INSERTION_POINT, lineStartIndex, 0 );
  827.     textsw_insert( notesDsply, typeMark, ptrnLen );
  828.     caretIndex += ptrnLen;
  829.  
  830.     endIndex = (int)window_get( notesDsply, TEXTSW_LENGTH );
  831.     if ( (nextLineStartIndex < 0) || (nextLineStartIndex > endIndex) ) {
  832.         nextLineStartIndex = endIndex + 1;
  833.     }
  834.     
  835.     lineStartIndex += strlen(typeMark);
  836.     for (type = 0; type < NUM_NOTES_TYPE; type++) {
  837.  
  838.         typeMark[0] = typeChar[type];
  839.         ptrnLen = strlen(typeMark);
  840.         while ( ptrnLen ) {
  841.             do {
  842.                 ptrnStartIndex = lineStartIndex;
  843.                 result = textsw_find_bytes(notesDsply, &ptrnStartIndex, &ptrnEndIndex,
  844.                     typeMark, ptrnLen, 0);
  845.                 if (result != -1) {
  846.                     if ((ptrnEndIndex < nextLineStartIndex) && (ptrnStartIndex >= lineStartIndex)) {
  847.                         textsw_erase(notesDsply, ptrnStartIndex, ptrnEndIndex);
  848.                         caretIndex -= ptrnLen;
  849.                     }else{
  850.                         result = -1;
  851.                     }
  852.                 }
  853.             } while (result != -1);
  854.             ptrnLen--;
  855.         }
  856.             
  857.     }
  858.  
  859.     window_set( notesDsply, TEXTSW_INSERTION_POINT, caretIndex, 0);
  860.  
  861. }
  862.  
  863. static void    notesBackgroundHit(panel, event)
  864.  
  865. Panel         panel;
  866. Event        *event;
  867.  
  868. {
  869.     switch (event_id(event)) {
  870.     case MS_RIGHT:
  871.         if (event_is_down(event)) {
  872.             rootMenuDisplay(notesPanel,event);
  873.         }
  874.         break;
  875.     default:
  876.         return;
  877.     }
  878.  
  879. }
  880.  
  881. rootMenuDisplay(window, event)
  882.  
  883. Window         window;
  884. Event        *event;
  885.  
  886. {
  887.  
  888.     switch( (int)menu_show(mainMenu, window, event, 0) ) {
  889.     case MENU_SAVE:
  890.         saveData();
  891.         break;
  892.     case MENU_RELOAD:
  893.         reloadData();
  894.         monthDisplay();
  895.         dayHit(dayToShow);
  896.         break;
  897.     case MENU_CLOSE:
  898.         saveData();
  899.         window_set(frame, FRAME_CLOSED, TRUE, 0);
  900.         break;
  901.     case MENU_QUIT:
  902.         saveData();
  903.         window_destroy(frame);
  904.         break;
  905.     }
  906.  
  907. }
  908.  
  909. monthDisplay()
  910.  
  911.  
  912. {                
  913.     int                     column,
  914.                          row;
  915.     int                     i, day;
  916.     char                 monthString[20];
  917.     struct apptsData     *cur ;
  918.     struct dateBox        *thisBox;
  919.  
  920.     sprintf(monthString, "%s %4u", smon[monthToShow-1], yearToShow);
  921.     panel_set(monthItem, PANEL_LABEL_STRING, monthString, 0);
  922.  
  923.     firstDowSet();
  924.  
  925.     row = 0;
  926.     for (column = 0; column < firstDow; column++) {
  927.         monthBoxes[row][column].date = 0;
  928.         monthBoxes[row][column].boxOutline = NO_OUTLINE;
  929.     }
  930.  
  931.     for ( day = 1; day <= mon[monthToShow]; day++) {
  932.         monthBoxes[row][column].date = day;
  933.         monthBoxes[row][column].boxOutline = NO_OUTLINE;
  934.         if (column >= (DATE_COLS-1)) {
  935.             row++;
  936.             column = 0;
  937.         }else{
  938.             column++;
  939.         }
  940.     }
  941.  
  942.     for (; row < DATE_ROWS; row++) {
  943.         for (; column < DATE_COLS; column++) {
  944.             monthBoxes[row][column].date = 0;
  945.             monthBoxes[row][column].boxOutline = NO_OUTLINE;
  946.         }
  947.         column = 0;        
  948.     }
  949.  
  950.     for (i = 0; i < NUM_NOTES_TYPE; i++) {
  951.         if  ( i == NOTES_WEEKLY ) { 
  952.             for ( cur = firstApptRecord[i]; cur != NULL; cur = cur->next) {
  953.                 if ( cur->month == 99 ) {
  954.                     for (row = 0; row < DATE_ROWS; row++) {
  955.                         if (monthBoxes[row][cur->day-1].boxOutline != FULL_OUTLINE) {
  956.                             monthBoxes[row][cur->day-1].boxOutline = HALF_OUTLINE;
  957.                          }
  958.                      }
  959.                 }
  960.             }
  961.         }else if  ( i != NOTES_ALL_ALL_ALL ) {  
  962.             for (cur = firstApptRecord[i]; cur != NULL; cur = cur->next) {
  963.                 if (    i==NOTES_D_ALL_ALL ||
  964.                 (             cur->month==monthToShow &&  
  965.                 (                 i==NOTES_D_M_ALL ||
  966.                 (                     cur->year==yearToShow 
  967.                 )))) { 
  968.                     thisBox = &monthBoxes[(cur->day + firstDow-1) / DATE_COLS]
  969.                                          [(cur->day + firstDow-1) % DATE_COLS];
  970.                     if ( i == NOTES_D_M_Y ) {
  971.                         thisBox->boxOutline = FULL_OUTLINE;
  972.                     }else if ( i != NOTES_ALL_ALL_ALL ) {
  973.                         if (thisBox->boxOutline != FULL_OUTLINE) {
  974.                             thisBox->boxOutline = HALF_OUTLINE;
  975.                         }
  976.                     }
  977.                 }
  978.             }
  979.         }
  980.     }
  981.  
  982.     pw_writebackground(datesCrayon, 0, 0, WINDOW_WIDTH, DATES_HEIGHT, PIX_CLR);
  983.  
  984.     for (row = 0; row < DATE_ROWS; row++) {
  985.         for (column = 0; column < DATE_COLS; column++) {
  986.             dateBoxDisplay(row, column, NOHIGHLIGHT);
  987.         }
  988.     }
  989.  
  990. }
  991.  
  992. firstDowSet()
  993.  
  994. {
  995.     int            i;
  996.  
  997.     firstDow = jan1Set(yearToShow);
  998.     mon[2] = 29;
  999.     mon[9] = 30;
  1000.     switch ((jan1Set(yearToShow + 1) + 7 - firstDow) % 7) {
  1001.     case 1:                /* non-leap year */
  1002.         mon[2] = 28;
  1003.         break;
  1004.     case 2:                /* leap year */
  1005.         break;
  1006.     default:            /* 1752 */
  1007.         mon[9] = 19;
  1008.         break;
  1009.     }
  1010.     for (i = 1; i < monthToShow; i++) {    
  1011.         firstDow += mon[i];
  1012.     }
  1013.     firstDow %= 7;
  1014.  
  1015. }
  1016.  
  1017.  
  1018.  
  1019.  
  1020.  
  1021. jan1Set(year)
  1022.  
  1023. int             year;
  1024.  
  1025. {
  1026.  
  1027.     register        y, dow;
  1028.  
  1029.     /* normal gregorian calendar one extra day per four years */
  1030.  
  1031.     y = year;
  1032.     dow = 4 + y + (y + 3) / 4;
  1033.  
  1034.     /* julian calendar regular gregorian less three days per 400 */
  1035.  
  1036.     if (y > 1800) {
  1037.         dow -= (y - 1701) / 100;
  1038.         dow += (y - 1601) / 400;
  1039.     }
  1040.  
  1041.     /* great calendar changeover instant */
  1042.  
  1043.     if (y > 1752)
  1044.         dow += 3;
  1045.  
  1046.     return (dow % 7);
  1047.  
  1048. } 
  1049.  
  1050. todaySet()
  1051.  
  1052.  
  1053. {
  1054.     struct tm      *tp;        /* time structure */
  1055.     long            tloc;    /* number of seconds since 1970 */
  1056.  
  1057.     time(&tloc);        
  1058.     tp = localtime(&tloc);
  1059.     tyear = tp->tm_year;
  1060.     tmonth = tp->tm_mon + 1;
  1061.     tday = tp->tm_mday;
  1062.     tyear += 1900;
  1063.  
  1064. }
  1065.  
  1066. dateBoxDisplay(row, column, hilite)
  1067.  
  1068. int              row;
  1069. int              column;
  1070. int              hilite;
  1071.  
  1072. {
  1073.     char            dateString[4];
  1074.  
  1075.     if (monthBoxes[row][column].date == 0) {
  1076.         pw_write(datesCrayon, 
  1077.             column * DATE_BOX_WIDTH + DATE_BORDER + (column * GAP),
  1078.             row * DATE_BOX_HEIGHT + DATE_BORDER + (row * GAP),
  1079.             DATE_BOX_WIDTH, DATE_BOX_HEIGHT, PIX_SRC, &dayPr, 0, 0);
  1080.         pw_text(datesCrayon, 
  1081.             column * DATE_BOX_WIDTH + DATE_BORDER + (column * GAP) + 8,
  1082.             row * DATE_BOX_HEIGHT + DATE_BORDER + (row * GAP) + 20,
  1083.             PIX_SRC | PIX_DST, font, "  ");
  1084.     }else{
  1085.         switch (monthBoxes[row][column].boxOutline) {
  1086.         case FULL_OUTLINE:
  1087.             pw_write(datesCrayon, 
  1088.                 column * DATE_BOX_WIDTH + DATE_BORDER + (column * GAP),
  1089.                 row * DATE_BOX_HEIGHT + DATE_BORDER + (row * GAP),
  1090.                 DATE_BOX_WIDTH, DATE_BOX_HEIGHT, PIX_SRC, 
  1091.                 hilite ? &fullDaySelPr : &fullDayPr, 
  1092.                 0, 0);
  1093.             break;
  1094.         case HALF_OUTLINE:
  1095.             pw_write(datesCrayon, 
  1096.                 column * DATE_BOX_WIDTH + DATE_BORDER + (column * GAP),
  1097.                 row * DATE_BOX_HEIGHT + DATE_BORDER + (row * GAP),
  1098.                 DATE_BOX_WIDTH, DATE_BOX_HEIGHT, PIX_SRC, 
  1099.                 hilite ? &halfDaySelPr : &halfDayPr, 
  1100.                 0, 0);
  1101.             break;
  1102.         case NO_OUTLINE:
  1103.             pw_write(datesCrayon, 
  1104.                 column * DATE_BOX_WIDTH + DATE_BORDER + (column * GAP),
  1105.                 row * DATE_BOX_HEIGHT + DATE_BORDER + (row * GAP),
  1106.                 DATE_BOX_WIDTH, DATE_BOX_HEIGHT, PIX_SRC, 
  1107.                 hilite ? &daySelPr : &dayPr, 
  1108.                 0, 0);
  1109.             break;
  1110.         }
  1111.         sprintf(dateString, "%2u", monthBoxes[row][column].date);
  1112.         pw_text(datesCrayon, 
  1113.             column * DATE_BOX_WIDTH + DATE_BORDER + (column * GAP) + 8,
  1114.             row * DATE_BOX_HEIGHT + DATE_BORDER + (row * GAP) + 20,
  1115.             PIX_SRC | PIX_DST, font, dateString);
  1116.     }
  1117.  
  1118. }
  1119.  
  1120. notesDisplay()
  1121.  
  1122.  
  1123. {
  1124.     int                     type,
  1125.                           i;
  1126.     char                 timeString[7];
  1127.     struct apptsData     *cur;
  1128.  
  1129.     hasWeeklyNotes = 0;
  1130.  
  1131.     i = (int)window_get(notesDsply, TEXTSW_LENGTH);
  1132.     if ( i > 0 ) {
  1133.         textsw_erase( notesDsply, 0, i + 1 );
  1134.     }
  1135.  
  1136.     for (type = 0; type < NUM_NOTES_TYPE; type++) {
  1137.  
  1138.         typeMark[0] = typeChar[type];
  1139.  
  1140.         cur = firstApptRecord[type];
  1141.         while ( (cur != NULL) && (cur->dateNum < dateNumToShow[type]) ) {
  1142.             cur = cur->next;                    
  1143.         }
  1144.  
  1145.         while ( (cur != NULL) && (cur->dateNum == dateNumToShow[type]) ) {
  1146.             
  1147.             textsw_insert( notesDsply, typeMark, 2 );
  1148.             if (cur->time != 0) {
  1149.                 sprintf(timeString, "%d:%02d ", 
  1150.                     (int)(cur->time / 100), (cur->time % 100));
  1151.                 textsw_insert( notesDsply, timeString, strlen(timeString) );
  1152.             }
  1153.             textsw_insert( notesDsply, cur->apptMsg, strlen(cur->apptMsg) );
  1154.             textsw_insert( notesDsply, "\n", 1 );
  1155.             cur = cur->next;    
  1156.             if ( type == NOTES_WEEKLY ) {                
  1157.                 hasWeeklyNotes = 1;
  1158.             }
  1159.  
  1160.         }
  1161.     
  1162.     }
  1163.  
  1164.     editCount = (int)window_get(notesDsply, TEXTSW_EDIT_COUNT);
  1165.     window_set(notesDsply, TEXTSW_FIRST_LINE, 0, 0);
  1166.     window_set(notesDsply, TEXTSW_UPDATE_SCROLLBAR, 0);
  1167.  
  1168. }
  1169.  
  1170. notesSave()
  1171.  
  1172.  
  1173. {
  1174.     int                     bufLen,
  1175.                          row, column,
  1176.                          notesFound,
  1177.                          nowHasWeeklyNotes,
  1178.                          type,
  1179.                          newEditCount,
  1180.                          thisTime, thisYear, thisMonth, thisDay;
  1181.     char                *thisMsg,
  1182.                         *untypedMsg,
  1183.                         *notesBuffer;
  1184.     struct apptsData     *cur,
  1185.                         *new,
  1186.                         *old,
  1187.                         *nextAppt[NUM_NOTES_TYPE];
  1188.  
  1189.     newEditCount = (int)window_get(notesDsply, TEXTSW_EDIT_COUNT);
  1190.     if (newEditCount <= editCount) {
  1191.         return;
  1192.     }
  1193.     editCount = newEditCount;
  1194.  
  1195.     for (type = 0; type < NUM_NOTES_TYPE; type++) {
  1196.  
  1197.         cur = firstApptRecord[type];
  1198.         while ( (cur != NULL) && (cur->dateNum < dateNumToShow[type]) ) {
  1199.             cur = cur->next;                    
  1200.         }
  1201.  
  1202.         while ( (cur != NULL) && (cur->dateNum == dateNumToShow[type]) ) {
  1203.             if (cur->prev != NULL) {
  1204.                 cur->prev->next = cur->next;
  1205.             }else{
  1206.                 firstApptRecord[type] = cur->next;
  1207.             }
  1208.             if (cur->next != NULL) {
  1209.                 cur->next->prev = cur->prev;
  1210.             }else{
  1211.                 lastApptRecord[type] = cur->prev;
  1212.             }
  1213.             old = cur;        
  1214.             cur = cur->next;        
  1215.             free(old->apptMsg);
  1216.             free(old);            
  1217.         }
  1218.         nextAppt[type] = cur;
  1219.  
  1220.     }
  1221.  
  1222.     notesFound = NO_OUTLINE;
  1223.     nowHasWeeklyNotes = 0;
  1224.     bufLen = (int)window_get(notesDsply, TEXTSW_LENGTH);
  1225.     
  1226.     if (bufLen > 0) {
  1227.  
  1228.         notesBuffer = (char *)malloc( bufLen + 1 );
  1229.         if ( notesBuffer == (char *)0 ) {
  1230.             fprintf(stderr, "Monthtool error:  Out of memory.\n");
  1231.             exit(4);
  1232.         }
  1233.         window_get( notesDsply, TEXTSW_CONTENTS, 0, notesBuffer, bufLen + 1 );
  1234.     
  1235.         thisMsg = strtok( notesBuffer, "\n" );
  1236.  
  1237.         while ( thisMsg != NULL ) {
  1238.     
  1239.             stripType(thisMsg, &untypedMsg, &type);
  1240.             findTime(&untypedMsg, &thisTime);
  1241.                 
  1242.             if (strlen (untypedMsg) != 0) {
  1243.  
  1244.                 thisYear = thisMonth = thisDay = 0;
  1245.                 switch (type) {
  1246.                     case NOTES_D_M_Y:
  1247.                         thisYear = yearToShow;
  1248.                     case NOTES_D_M_ALL:
  1249.                         thisMonth = monthToShow;
  1250.                     case NOTES_D_ALL_ALL:
  1251.                         thisDay = dayToShow;
  1252.                         break;
  1253.                     case NOTES_WEEKLY:
  1254.                         thisMonth = 99;
  1255.                         thisDay = (dayToShow + firstDow) % DATE_COLS;
  1256.                         if ( thisDay == 0 ) {
  1257.                             thisDay = DATE_COLS;
  1258.                         }
  1259.                         nowHasWeeklyNotes = 1;
  1260.                 }
  1261.  
  1262.                 new = (struct apptsData *)malloc( sizeof( struct apptsData ) );
  1263.                 if ( new == (struct apptsData *)0 ) {
  1264.                     fprintf(stderr, "Monthtool error:  Out of memory.\n");
  1265.                     exit(4);
  1266.                 }
  1267.                 new->year = thisYear;
  1268.                 new->month = thisMonth;
  1269.                 new->day = thisDay;
  1270.                 new->dateNum = dateNumToShow[type];
  1271.                 new->time = thisTime;
  1272.                 new->apptMsg = (char *)malloc( strlen(untypedMsg) + 1 );
  1273.                 if ( new->apptMsg  == (char *)0 ) {
  1274.                     fprintf(stderr, "Monthtool error:  Out of memory.\n");
  1275.                     exit(4);
  1276.                 }
  1277.                 strcpy( new->apptMsg, untypedMsg );
  1278.  
  1279.                 if (nextAppt[type] != NULL) {
  1280.                     new->prev = nextAppt[type]->prev;
  1281.                     if (new->prev != NULL) {
  1282.                         new->prev->next = new;
  1283.                     }else{
  1284.                         firstApptRecord[type] = new;
  1285.                     }                
  1286.                     new->next = nextAppt[type];
  1287.                     if (new->next != NULL) {
  1288.                         new->next->prev = new;
  1289.                     }else{
  1290.                         lastApptRecord[type] = new;
  1291.                     }                
  1292.                 }else{    
  1293.                     if ( lastApptRecord[type] != NULL ) {
  1294.                         new->next = NULL;
  1295.                         new->prev = lastApptRecord[type];
  1296.                         lastApptRecord[type]->next = new;
  1297.                         lastApptRecord[type] = new;
  1298.                     }else{                
  1299.                         firstApptRecord[type] = lastApptRecord[type] = new;
  1300.                         new->prev = new->next = NULL;
  1301.                     }
  1302.                 }    
  1303.     
  1304.                 if (type == NOTES_D_M_Y) {    
  1305.                     notesFound = FULL_OUTLINE;
  1306.                 }else if (type != NOTES_ALL_ALL_ALL) {    
  1307.                     if (notesFound != FULL_OUTLINE) {
  1308.                         notesFound = HALF_OUTLINE;
  1309.                     }
  1310.                 }
  1311.  
  1312.             }
  1313.             free(untypedMsg);
  1314.             thisMsg = strtok( NULL, "\n" );
  1315.  
  1316.         }
  1317.  
  1318.         free(notesBuffer);
  1319.  
  1320.     }
  1321.  
  1322.     if (hasWeeklyNotes == nowHasWeeklyNotes) {
  1323.         for (row = 0; row < DATE_ROWS; row++) {
  1324.             for (column = 0; column < DATE_COLS; column++) {
  1325.                 if (dayToShow == monthBoxes[row][column].date) {
  1326.                     monthBoxes[row][column].boxOutline = notesFound;
  1327.                     dateBoxDisplay(row, column, HIGHLIGHT);
  1328.                 }
  1329.             }
  1330.         }
  1331.     }else{
  1332.         monthDisplay();
  1333.     }
  1334.  
  1335.     notesModified = 1; 
  1336.     hasWeeklyNotes = nowHasWeeklyNotes;
  1337.  
  1338. }
  1339.  
  1340. int     stripType( oldMsg, newMsg, type )
  1341.  
  1342. char         *oldMsg;
  1343. char        **newMsg;
  1344. int             *type;
  1345.  
  1346. {
  1347.     int             i,j,
  1348.                  typeFound, thisIsTypeChar;
  1349.  
  1350.     *newMsg = (char *)malloc( strlen(oldMsg) + 1 );
  1351.     if ( *newMsg  == (char *)0 ) {
  1352.         fprintf(stderr, "Monthtool error:  Out of memory.\n");
  1353.         exit(4);
  1354.     }
  1355.  
  1356.     i = 0;
  1357.     typeFound = 0;
  1358.  
  1359.     while ( *oldMsg != '\0' ) {
  1360.         thisIsTypeChar = 0;
  1361.         for (j = 0; j < NUM_NOTES_TYPE; j++) {
  1362.             if ( *oldMsg == typeChar[j] ) {
  1363.                 *type = j;
  1364.                 thisIsTypeChar = 1;
  1365.                 typeFound = 1;
  1366.             }
  1367.         }            
  1368.         if (thisIsTypeChar) {
  1369.             oldMsg++;
  1370.             while (*oldMsg == ' ') {
  1371.                 oldMsg++;
  1372.             }
  1373.         }else{
  1374.             (*newMsg)[i] = *oldMsg;
  1375.             oldMsg++;
  1376.             i++;
  1377.         }        
  1378.     } 
  1379.     (*newMsg)[i] = '\0';
  1380.  
  1381.     if ( !typeFound ) {
  1382.         *type = NOTES_D_M_Y;
  1383.     }
  1384.  
  1385. }
  1386.  
  1387. findTime(msg, time)
  1388.  
  1389. char     **msg;
  1390. int         *time;
  1391.  
  1392. {
  1393.     char     timeString[5];
  1394.     char    *curChar;
  1395.     int         timeFound;
  1396.  
  1397.     curChar = *msg;                        
  1398.     while (*curChar == ' ') {
  1399.         curChar++;
  1400.     }
  1401.  
  1402.     if (strlen(curChar) >= 4) {        
  1403.  
  1404.         timeFound = 1;
  1405.         if (*(curChar+1) == ':') {
  1406.             timeString[0] = '0';    
  1407.         }else if (*(curChar+2) == ':') {
  1408.             if (isdigit(*curChar)) {
  1409.                 timeString[0] = *curChar;
  1410.                 curChar++;
  1411.             }else{
  1412.                 timeFound = 0;
  1413.             }
  1414.         }else{
  1415.             timeFound = 0;
  1416.         }
  1417.  
  1418.         if (timeFound) {
  1419.             if ( isdigit(*curChar) && isdigit(*(curChar+2)) && isdigit(*(curChar+3)) &&
  1420.                     ( (*(curChar+4) == ' ') || (*(curChar+4) == '\0') ) ) {
  1421.                 timeString[1] = *curChar;
  1422.                 timeString[2] = *(curChar+2);
  1423.                 timeString[3] = *(curChar+3);
  1424.                 timeString[4] = '\0';                        
  1425.             }else{
  1426.                 timeFound = 0;
  1427.             }
  1428.         }
  1429.     }else{
  1430.         timeFound = 0;
  1431.     }
  1432.  
  1433.     if (timeFound) {
  1434.         *time = atoi( timeString );
  1435.         if ( ( (int)(*time / 100) >= 24 ) || ( (*time % 100 ) >= 60 ) ) {
  1436.             *time = 0;
  1437.         }else{
  1438.             curChar += 4;
  1439.             while (*curChar == ' ') {
  1440.                 curChar++;
  1441.             }
  1442.             *msg = curChar;
  1443.         }
  1444.     }else{
  1445.         *time = 0;
  1446.     }
  1447.                                          
  1448. }
  1449.  
  1450. loadData()
  1451.  
  1452.  
  1453. {
  1454.     FILE                *fptr;
  1455.  
  1456.     char                 basedata[MAX_MSG_LEN+100];
  1457.     char                *timestr;
  1458.     char                *apptstring;
  1459.  
  1460.     int                     i;
  1461.     struct apptsData     *new;
  1462.  
  1463.  
  1464.     if ((fptr = fopen(toolFile, "r")) != NULL) {
  1465.  
  1466.         for ( i = 0; i < (NUM_NOTES_TYPE + 1 /*for NOTES_ERROR*/); i++ ){
  1467.             firstApptRecord[i] = lastApptRecord[i] = NULL;
  1468.         }
  1469.  
  1470.         while ((fgets(basedata, MAX_MSG_LEN+100, fptr) != NULL)) {
  1471.  
  1472.             basedata[MAX_MSG_LEN+99] = NULL;
  1473.  
  1474.             new = (struct apptsData *)malloc( sizeof( struct apptsData ) );
  1475.             if ( new == (struct apptsData *)0 ) {
  1476.                 fprintf(stderr, "Monthtool error:  Out of memory.\n");
  1477.                 exit(4);
  1478.             }
  1479.  
  1480.             new->month = atoi( strtok(basedata, ",") );
  1481.             new->day = atoi( strtok(NULL, ",") );
  1482.             new->year = atoi( strtok(NULL, ",") );
  1483.             new->dateNum = 10000 * new->year + 100 * new->month + new->day;
  1484.  
  1485.             timestr = strtok(NULL,","); 
  1486.             if (strcmp(timestr, "    ") == 0) {
  1487.                 new->time = 0;
  1488.             }else{
  1489.                 new->time = atoi(timestr);
  1490.             }     
  1491.  
  1492.             apptstring = strtok(NULL, "\n" );
  1493.             new->apptMsg = (char *)malloc(strlen(apptstring) + 1);
  1494.             if ( new->apptMsg == (char *)0 ) {
  1495.                 fprintf(stderr, "Monthtool error:  Out of memory.\n");
  1496.                 exit(4);
  1497.             }
  1498.             strcpy(new->apptMsg, apptstring);
  1499.  
  1500.             if ( new->year != 0 ) {
  1501.                 if ( new->month != 0 ) {
  1502.                     if ( new->day != 0 ) {
  1503.                         i = NOTES_D_M_Y;
  1504.                     }else{
  1505.                         i = NOTES_ERROR;    /* *mmyyyy */
  1506.                     }
  1507.                 }else{
  1508.                     i = NOTES_ERROR;        /* dd*yyyy or **yyyy */
  1509.                 }
  1510.             }else{
  1511.                 if ( new->month == 99 ) {
  1512.                     if ( (new->day >= 1) &&  (new->day <= 7) ) {
  1513.                         i = NOTES_WEEKLY;
  1514.                     }else{
  1515.                         i = NOTES_ERROR;    
  1516.                     }
  1517.                 }else if ( new->month != 0 ) {
  1518.                     if ( new->day != 0 ) {
  1519.                         i = NOTES_D_M_ALL;
  1520.                     }else{
  1521.                         i = NOTES_ERROR;    /* *mm* */
  1522.                     }
  1523.                 }else{
  1524.                     if ( new->day != 0 ) {
  1525.                         i = NOTES_D_ALL_ALL;
  1526.                     }else{
  1527.                         i = NOTES_ALL_ALL_ALL;   
  1528.                     }
  1529.                 }
  1530.             }
  1531.                 
  1532.             if ( i == NOTES_ERROR ) {
  1533.                 fprintf(stderr, "Monthtool warning! Invalid record: %u,%u,%4u,",
  1534.                     new->month, new->day, new->year );
  1535.                 if (new->time != 0) {
  1536.                     fprintf(stderr, "%04u", new->time);
  1537.                 }else{
  1538.                     fprintf(stderr, "    ");
  1539.                 }
  1540.                 fprintf(stderr, ",%s\n", new->apptMsg );
  1541.             }
  1542.  
  1543.             insertApptRecord(new, i);
  1544.                         
  1545.         }
  1546.  
  1547.         fclose(fptr);
  1548.         stat( toolFile, &lastStatus );
  1549.     }
  1550.  
  1551. } 
  1552.  
  1553. insertApptRecord(new, type)
  1554.  
  1555. struct apptsData     *new;
  1556. int                     type;
  1557.  
  1558. {
  1559.     struct apptsData     *cur;
  1560.     int                     inserted;
  1561.  
  1562.     if (lastApptRecord[type] == NULL) {
  1563.         firstApptRecord[type] = lastApptRecord[type] = new;
  1564.         new->prev = NULL;                
  1565.         new->next = NULL;    
  1566.     }else{
  1567.         inserted = 0;
  1568.         cur = lastApptRecord[type];
  1569.         do {
  1570.             if (new->dateNum >= cur->dateNum) {
  1571.                 if (cur->next != NULL) {
  1572.                     cur->next->prev = new;
  1573.                 }else{
  1574.                     lastApptRecord[type] = new;
  1575.                 }
  1576.                 new->next = cur->next;
  1577.                 new->prev = cur;
  1578.                 cur->next = new;
  1579.                 inserted = 1;
  1580.             }else{
  1581.                 cur = cur->prev;
  1582.             }
  1583.         } while ( !inserted && cur != NULL );
  1584.         if (!inserted) {
  1585.             new->next = firstApptRecord[type];
  1586.             new->prev = NULL;
  1587.             firstApptRecord[type]->prev = new;
  1588.             firstApptRecord[type] = new;
  1589.         }                        
  1590.     }
  1591.  
  1592. }
  1593.  
  1594. reloadData()
  1595.  
  1596.  
  1597. {
  1598.     struct stat            statusNow;
  1599.  
  1600.  
  1601.     stat( toolFile, &statusNow );
  1602.     if ( statusNow.st_mtime > lastStatus.st_mtime ) {
  1603.         loadData();
  1604.     }
  1605.  
  1606. }
  1607.  
  1608. saveData()
  1609.  
  1610.  
  1611. {
  1612.     FILE                *fptr;
  1613.  
  1614.     int                     i;
  1615.     struct apptsData     *cur;
  1616.  
  1617.  
  1618.     notesSave();
  1619.  
  1620.     if (notesModified) {
  1621.  
  1622.         if ((fptr = fopen(toolFile, "w")) == NULL) {
  1623.             fprintf(stderr, "Monthtool error:  Cannot open %s file", toolFile);
  1624.             return;
  1625.         }
  1626.  
  1627.         for ( i = 0; i < (NUM_NOTES_TYPE + 1 /*for NOTES_ERROR*/); i++ ) {
  1628.             for (cur = firstApptRecord[i]; cur != NULL; cur = cur->next) {
  1629.                 fprintf(fptr, "%u,%u,%u,", cur->month, cur->day, cur->year );
  1630.                 if (cur->time != 0) {
  1631.                     fprintf(fptr, "%04u", cur->time);
  1632.                 }else{
  1633.                     fprintf(fptr, "    ");
  1634.                 }
  1635.                 if ( strlen(cur->apptMsg) > (MAX_MSG_LEN-1) ) {
  1636.                     cur->apptMsg[MAX_MSG_LEN-1] = NULL;
  1637.                     fprintf(stderr, "Monthtool warning! Record truncated: %u,%u,%4u,",
  1638.                         cur->month, cur->day, cur->year );
  1639.                     if (cur->time != 0) {
  1640.                         fprintf(stderr, "%04u", cur->time);
  1641.                     }else{
  1642.                         fprintf(stderr, "    ");
  1643.                     }
  1644.                     fprintf(stderr, ",%s\n", cur->apptMsg );
  1645.                 }
  1646.                 fprintf(fptr, ",%s\n", cur->apptMsg );
  1647.             }
  1648.         }
  1649.  
  1650.         fclose(fptr);
  1651.         stat( toolFile, &lastStatus );
  1652.  
  1653.         notesModified = 0;
  1654.  
  1655.     }
  1656.  
  1657. }
  1658.  
  1659. freeData()
  1660.  
  1661.  
  1662. {
  1663.  
  1664.     int                     i;
  1665.     struct apptsData     *cur ;
  1666.  
  1667.     for ( i = 0; i < (NUM_NOTES_TYPE + 1 /*for NOTES_ERROR*/); i++ ) {
  1668.         while( firstApptRecord[i] != NULL) {
  1669.             cur = firstApptRecord[i]; 
  1670.             firstApptRecord[i] = firstApptRecord[i]->next;
  1671.             free(cur->apptMsg);
  1672.             free( cur );
  1673.         }
  1674.     }
  1675.     
  1676. }
  1677.     
  1678.