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