home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / memsz331.zip / Source.zip / ITEMS.CPP < prev    next >
Text File  |  1996-12-30  |  47KB  |  1,329 lines
  1. /****************************************************************** ITEMS.CPP
  2.  *                                                                          *
  3.  *                     Display Item Class Functions                         *
  4.  *                                                                          *
  5.  ****************************************************************************/
  6.  
  7. #define INCL_BASE
  8. #define INCL_DOSDEVIOCTL
  9. #define INCL_PM
  10. #include <os2.h>
  11.  
  12. #include <stdio.h>
  13. #include <stdlib.h>
  14. #include <string.h>
  15. #include <time.h>
  16.  
  17. #include "Config.h"
  18. #include "Debug.h"
  19. #include "DQPS.h"
  20. #include "MemSize.h"
  21. #include "Support.h"
  22. #include "ReString.h"
  23.  
  24. #include "Items.h"
  25.  
  26. static int MeasureValue ( char *Text, char *Label, BOOL ShowK, BOOL ShowM ) {
  27.    int Result ;
  28.    if ( ShowK == SHOWK_NEVER ) {
  29.       Result = sprintf ( Text, "%s 1,234,567,890 ", Label ) ;
  30.    } else if ( !ShowM ) {
  31.       Result = sprintf ( Text, "%s 1,234,567K", Label ) ;
  32.    } else {
  33.       Result = sprintf ( Text, "%s 1,234M", Label ) ;
  34.    } /* endif */
  35.    return ( Result ) ;
  36. } 
  37.  
  38. inline ULONG KiloScale ( ULONG Value, int ShowTrueK=TRUE, int Scale=1 ) {
  39.    if ( ShowTrueK ) {
  40.       return ( (Value+(0x200/Scale))/(0x400/Scale) ) ;
  41.    } else {
  42.       return ( (Value+(500/Scale))/(1000/Scale) ) ;
  43.    } /* endif */
  44. }
  45.  
  46. inline ULONG MegaScale ( ULONG Value, int ShowTrueK=TRUE, int Scale=1 ) {
  47.    if ( ShowTrueK ) {
  48.       return ( (Value+(0x80000/Scale))/(0x100000/Scale) ) ;
  49.    } else {
  50.       return ( (Value+(500000/Scale))/(1000000/Scale) ) ;
  51.    } /* endif */
  52. }
  53.  
  54. static void FormatValue ( ULONG Value, char Text[], COUNTRYINFO &CountryInfo, int ShowK=SHOWK_ABOVE512, int ShowTrueK=TRUE, int ShowM=TRUE, int Scale=1 ) {
  55.  
  56.    int MegaBreak = ShowTrueK ? 0x800000/Scale : 8000000/Scale ;
  57.    int KiloBreak = ShowTrueK ? 0x80000/Scale : 500000/Scale ;
  58.  
  59.    switch ( ShowK ) {
  60.       case SHOWK_NEVER:
  61.          sprintf ( Text, "%lu", Value*Scale ) ;
  62.          break;
  63.       case SHOWK_ALWAYS:
  64.          if ( !ShowM || ( Value < MegaBreak ) )
  65.             sprintf ( Text, "%lu", KiloScale(Value,ShowTrueK,Scale) ) ;
  66.          else 
  67.             sprintf ( Text, "%lu", MegaScale(Value,ShowTrueK,Scale) ) ;
  68.          break;
  69.       case SHOWK_ABOVE512:
  70.       default:
  71.          if ( Value < KiloBreak )
  72.             sprintf ( Text, "%lu", Value*Scale ) ;
  73.          else if ( !ShowM || ( Value < MegaBreak ) )
  74.             sprintf ( Text, "%lu", KiloScale(Value,ShowTrueK,Scale) ) ;
  75.          else
  76.             sprintf ( Text, "%lu", MegaScale(Value,ShowTrueK,Scale) ) ;
  77.          break;
  78.    } /* endswitch */
  79.  
  80.    char Work[100] ;
  81.    char *p1 = Text ;
  82.    char *p2 = Work ;
  83.    while ( *p1 ) {
  84.       *p2 = *p1 ;
  85.       p1 ++ ;
  86.       p2 ++ ;
  87.       if ( *p1 ) {
  88.          if ( strlen(p1) % 3 == 0 ) {
  89.             *p2 = CountryInfo.szThousandsSeparator [0] ;
  90.             p2 ++ ;
  91.          } /* endif */
  92.       } /* endif */
  93.    } /* endwhile */
  94.    *p2 = 0 ;
  95.    strcpy ( Text, Work ) ;
  96.  
  97.    p2 = Text + strlen(Text) ;
  98.    *(p2+1) = 0 ;
  99.    switch ( ShowK ) {
  100.       case SHOWK_NEVER:
  101.          *p2 = ' ' ;
  102.          break;
  103.       case SHOWK_ALWAYS:
  104.          if ( !ShowM || ( Value < MegaBreak ) )
  105.             *p2 = (char) ( ShowTrueK ? 'K' : 'k' ) ;
  106.          else 
  107.             *p2 = (char) ( ShowTrueK ? 'M' : 'm' ) ;
  108.          break;
  109.       case SHOWK_ABOVE512:
  110.       default:
  111.          if ( Value < KiloBreak )
  112.             *p2 = ' ' ;
  113.          else if ( !ShowM || ( Value < MegaBreak ) )
  114.             *p2 = (char) ( ShowTrueK ? 'K' : 'k' ) ;
  115.          else 
  116.             *p2 = (char) ( ShowTrueK ? 'M' : 'm' ) ;
  117.          break;
  118.    } /* endswitch */
  119. }
  120.  
  121.  
  122. Item::Item ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, Dde_Server *ddeserver, char *topic ) :
  123.    Id(id), Flag(TRUE), Value(0), pDdeServer(ddeserver), LevelSense(0) {
  124.    strcpy ( Name, pName ) ;
  125.    strcpy ( CurrentLabel, pCurrentLabel ) ;
  126.    strcpy ( DefaultLabel, pDefaultLabel ) ;
  127.    strcpy ( Topic, topic ) ;
  128.    pDdeServer->AddItem ( Topic, DefaultLabel, DDEFMT_TEXT, "", 1 ) ;
  129.    pDdeItem = pDdeServer->FindItem ( Topic, DefaultLabel ) ;
  130.    NormalColors [0] = 0xFFFFFF ;
  131.    NormalColors [1] = 0x000000 ;
  132.    WarningColors[0] = 0xFFFF00 ;
  133.    WarningColors[1] = 0x000000 ;
  134.    ErrorColors  [0] = 0xFF0000 ;
  135.    ErrorColors  [1] = 0xFFFFFF ;
  136. } /* endmethod */
  137.  
  138. Item::~Item ( ) {
  139.    pDdeServer->RemoveItem ( Topic, DefaultLabel ) ;
  140. } /* endmethod */
  141.  
  142. void Item::GetProfile ( HINI IniHandle ) {
  143.  
  144.      Flag = TRUE ;  ULONG Size ;
  145.      if ( PrfQueryProfileSize ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Name), &Size )
  146.         AND ( ( Size == sizeof(Flag) ) OR ( Size == sizeof(short) ) )
  147.         AND PrfQueryProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Name), &Flag, &Size ) ) {
  148.      } /* endif */
  149.  
  150.      char Tag [80] ;
  151.      strcpy ( Tag, PCHAR(Name) ) ;
  152.      strcat ( Tag, " Label" ) ;
  153.      if ( PrfQueryProfileSize ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), &Size )
  154.         AND ( Size == sizeof(CurrentLabel) )
  155.         AND PrfQueryProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), &CurrentLabel, &Size ) ) {
  156.      } /* endif */
  157.  
  158.      strcpy ( Tag, PCHAR(Name) ) ;
  159.      strcat ( Tag, " Warning" ) ;
  160.      if ( PrfQueryProfileSize ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), &Size )
  161.         AND ( Size == sizeof(WarningLevel) )
  162.         AND PrfQueryProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), &WarningLevel, &Size ) ) {
  163.      } /* endif */
  164.  
  165.      strcpy ( Tag, PCHAR(Name) ) ;
  166.      strcat ( Tag, " Error" ) ;
  167.      if ( PrfQueryProfileSize ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), &Size )
  168.         AND ( Size == sizeof(ErrorLevel) )
  169.         AND PrfQueryProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), &ErrorLevel, &Size ) ) {
  170.      } /* endif */
  171.  
  172. } /* endmethod */
  173.  
  174. void Item::PutProfile ( HINI IniHandle ) {
  175.  
  176.    PrfWriteProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Name), &Flag, sizeof(Flag) ) ;
  177.  
  178.    // Save custom label, if any.
  179.    char Tag [80] ;
  180.    strcpy ( Tag, PCHAR(Name) ) ;
  181.    strcat ( Tag, " Label" ) ;
  182.    if ( strcmp ( CurrentLabel, DefaultLabel ) ) {
  183.       PrfWriteProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), CurrentLabel, sizeof(CurrentLabel) ) ;
  184.    } else {
  185.       PrfWriteProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), 0, 0 ) ;
  186.    } /* endif */
  187.  
  188.    // If the item uses a warning/error threshold at all . . .
  189.    if ( LevelSense ) {
  190.  
  191.       // Save the warning threshold value.
  192.       ULONG Threshold = WarningLevel ;
  193.       strcpy ( Tag, PCHAR(Name) ) ;
  194.       strcat ( Tag, " Warning" ) ;
  195.       PrfWriteProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), &Threshold, sizeof(Threshold) ) ;
  196.  
  197.       // Save the error threshold value.
  198.       Threshold = ErrorLevel ;
  199.       strcpy ( Tag, PCHAR(Name) ) ;
  200.       strcat ( Tag, " Error" ) ;
  201.       PrfWriteProfileData ( IniHandle, PSZ(PROGRAM_NAME), PSZ(Tag), &Threshold, sizeof(Threshold) ) ;
  202.  
  203.    } /* endif */
  204.  
  205. } /* endmethod */
  206.  
  207. void Item::FormatLine ( char *Buffer, int MaxWidth ) {
  208.  
  209.    // Get the left and right texts for the line.
  210.    char Label[100], Text[100] ;
  211.    FormatText ( Label, Text, QueryValue() ) ;
  212.  
  213.    // Format the line.
  214.    strcat ( Buffer, Label ) ;
  215.    sprintf ( Buffer+strlen(Buffer), "%*s", MaxWidth-strlen(Label)-strlen(Text), "" ) ;
  216.    strcat ( Buffer, Text ) ;
  217.    strcat ( Buffer, "\r\n" ) ;
  218. }
  219.  
  220.  
  221. void Item::DdeUpdate ( char *Text ) {
  222.  
  223.    int Format, Size ; PVOID Data ;
  224.    pDdeItem->Query ( Format, Data, Size ) ;
  225.  
  226.    int NewSize = strlen(Text) + 1 ;
  227.    if ( Data && memcmp ( Text, Data, NewSize ) )
  228.       pDdeItem->Update ( DDEFMT_TEXT, Text, NewSize ) ;
  229. }
  230.  
  231.  
  232. void Item::Paint ( HPS hPS, RECTL &Rectangle,
  233.    char *Label, char *Text, ULONG NewValue, int Scale ) {
  234.  
  235.    COLOR *Colors = NormalColors ;
  236.    if ( LevelSense > 0 ) {
  237.       if ( NewValue >= ErrorLevel/Scale ) {
  238.          Colors = ErrorColors ;
  239.       } else if ( NewValue >= WarningLevel/Scale ) {
  240.          Colors = WarningColors ;
  241.       } /* endif */
  242.    } else if ( LevelSense < 0 ) {
  243.       if ( NewValue*Scale <= ErrorLevel/Scale ) {
  244.          Colors = ErrorColors ;
  245.       } else if ( NewValue <= WarningLevel/Scale ) {
  246.          Colors = WarningColors ;
  247.       } /* endif */
  248.    } /* endif */
  249.  
  250.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle,
  251.       Colors[1], Colors[0], DT_RIGHT | DT_BOTTOM | DT_ERASERECT ) ;
  252.  
  253.    WinDrawText ( hPS, strlen(Label), PSZ(Label), &Rectangle,
  254.       Colors[1], Colors[0], DT_LEFT | DT_BOTTOM ) ;
  255.  
  256.    Value = NewValue ;
  257. }
  258.  
  259.  
  260. Clock::Clock ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  261.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo,
  262.    char *szam, char *szpm, ResourceString *daysofweek, BOOL showseconds, BOOL hour24 )
  263.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ),
  264.    DaysOfWeek(daysofweek), ShowSeconds(showseconds), Hour24(hour24) {
  265.    CountryInfo = countryinfo ;
  266.    memcpy ( szAm, szam, min(strlen(szam),sizeof(szAm)-1) ) ;
  267.    szAm [ sizeof(szAm) - 1 ] = 0 ;
  268.    memcpy ( szPm, szpm, min(strlen(szpm),sizeof(szPm)-1) ) ;
  269.    szPm [ sizeof(szPm) - 1 ] = 0 ;
  270. } /* endmethod */
  271.  
  272. int Clock::Measure ( HPS hPS, RECTL &Rectangle ) {
  273.    int Result ;
  274.    char Text [100] ;
  275.    if ( CountryInfo.fsDateFmt != DATEFMT_YY_MM_DD ) {
  276.       Result = sprintf ( Text, " MMM, MM-DD HH:MM%s%s ", ShowSeconds?":SS":"", CountryInfo.fsTimeFmt?"":"xx" ) ;
  277.    } else {
  278.       Result = sprintf ( Text, " MM-DD MMM HH:MM%s%s ", ShowSeconds?":SS":"", CountryInfo.fsTimeFmt?"":"xx" ) ;
  279.    } /* endif */
  280.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  281.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  282.    return ( Result ) ;
  283. }
  284.  
  285. struct Date_Time {
  286.    unsigned Weekday : 3 ;
  287.    unsigned Month : 4 ;
  288.    unsigned Day : 5 ;
  289.    unsigned Hours : 5 ;
  290.    unsigned Minutes : 6 ;
  291.    unsigned Seconds : 6 ;
  292. } ;
  293.  
  294. ULONG Clock::NewValue ( void ) {
  295.  
  296.   DATETIME DateTime ;
  297.   DosGetDateTime ( &DateTime ) ;
  298.  
  299.   struct Date_Time Dttm = { 
  300.      DateTime.weekday, 
  301.      DateTime.month, 
  302.      DateTime.day, 
  303.      DateTime.hours, 
  304.      DateTime.minutes, 
  305.      0 
  306.   } ;
  307.  
  308.   if ( ShowSeconds ) 
  309.      Dttm.Seconds = DateTime.seconds ;
  310.  
  311.   ULONG Time = * ( (PULONG) &Dttm ) ;
  312.  
  313.   return ( Time ) ;
  314. }
  315.  
  316.  
  317. void Clock::FormatText ( char *Label, char *Text, ULONG Time ) {
  318.  
  319.    strcpy ( Label, CurrentLabel ) ;
  320.  
  321.    struct Date_Time Dttm = * ( (struct Date_Time*) &Time ) ;
  322.    ULONG Dow    = Dttm.Weekday ;
  323.    ULONG Month  = Dttm.Month ;
  324.    ULONG Day    = Dttm.Day ;
  325.    ULONG Hour   = Dttm.Hours ;
  326.    ULONG Minute = Dttm.Minutes ;
  327.    ULONG Second = Dttm.Seconds ;
  328.  
  329.    switch ( CountryInfo.fsDateFmt ) {
  330.  
  331.       case DATEFMT_DD_MM_YY:
  332.          sprintf ( Text, "%0.*s, %02lu%s%02lu ",
  333.             strlen(PCHAR(*DaysOfWeek))/7, PSZ(*DaysOfWeek) + Dow*(strlen(PCHAR(*DaysOfWeek))/7),
  334.             Day, CountryInfo.szDateSeparator, Month ) ;
  335.          break ;
  336.  
  337.       case DATEFMT_YY_MM_DD:
  338.          sprintf ( Text, "%02lu%s%02lu %0.*s ",
  339.             Month, CountryInfo.szDateSeparator, Day,
  340.             strlen(PCHAR(*DaysOfWeek))/7, PSZ(*DaysOfWeek) + Dow*(strlen(PCHAR(*DaysOfWeek))/7) ) ;
  341.          break ;
  342.  
  343.       case DATEFMT_MM_DD_YY:
  344.       default:
  345.          sprintf ( Text, "%0.*s, %02lu%s%02lu ",
  346.             strlen(PCHAR(*DaysOfWeek))/7, PSZ(*DaysOfWeek) + Dow*(strlen(PCHAR(*DaysOfWeek))/7),
  347.             Month, CountryInfo.szDateSeparator, Day ) ;
  348.          break ;
  349.  
  350.    } /* endswitch */
  351.  
  352.    if ( Hour24 ) {
  353.       if ( ShowSeconds ) {
  354.          sprintf ( Text+strlen(Text), "%02lu%s%02lu%s%02lu",
  355.              Hour, CountryInfo.szTimeSeparator, Minute, CountryInfo.szTimeSeparator, Second ) ;
  356.       } else {
  357.          sprintf ( Text+strlen(Text), "%02lu%s%02lu",
  358.              Hour, CountryInfo.szTimeSeparator, Minute ) ;
  359.       } /* endif */
  360.    } else {
  361.       PCHAR AmPm ;
  362.       if ( Hour ) {
  363.          if ( Hour < 12 ) {
  364.             AmPm = szAm ;
  365.          } else if ( Hour == 12 ) {
  366.             if ( Minute )
  367.                AmPm = szPm ;
  368.             else
  369.                AmPm = szAm ;
  370.          } else if ( Hour > 12 ) {
  371.             Hour -= 12 ;
  372.             AmPm = szPm ;
  373.          } /* endif */
  374.       } else {
  375.          Hour = 12 ;
  376.          if ( Minute )
  377.             AmPm = szAm ;
  378.          else
  379.             AmPm = szPm ;
  380.       } /* endif */
  381.       if ( ShowSeconds )
  382.          sprintf ( Text+strlen(Text), "%02lu%s%02lu%s%02lu%s",
  383.              Hour, CountryInfo.szTimeSeparator, Minute, CountryInfo.szTimeSeparator, Second, AmPm ) ;
  384.       else
  385.          sprintf ( Text+strlen(Text), "%02lu%s%02lu%s",
  386.              Hour, CountryInfo.szTimeSeparator, Minute, AmPm ) ;
  387.    } /* endif */
  388.  
  389.    DdeUpdate ( Text ) ;
  390. }
  391.  
  392.  
  393. void Clock::FormatLine ( char *Buffer, int MaxWidth ) {
  394.  
  395.    // Get the left and right texts for the line.
  396.    char Label[100], Text[100] ;
  397.    FormatText ( Label, Text, QueryValue() ) ;
  398.  
  399.    // Format the line.
  400.    sprintf ( Buffer+strlen(Buffer), "%*s%s%*s", 
  401.       (MaxWidth-strlen(Text))/2, "", Text, 
  402.       MaxWidth-strlen(Text)-(MaxWidth-strlen(Text))/2, "" ) ;
  403.    strcat ( Buffer, "\r\n" ) ;
  404. }
  405.  
  406.  
  407. void Clock::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  408.    ULONG Time = NewValue ( ) ;
  409.    if ( Mandatory || ( Time != Value ) ) {
  410.       char Label[100], Text [100] ;
  411.       FormatText ( Label, Text, Time ) ;
  412.       WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle,
  413.          NormalColors[1], NormalColors[0], DT_CENTER | DT_BOTTOM | DT_ERASERECT ) ;
  414.       Value = Time ;
  415.    } /* endif */
  416. }
  417.  
  418.  
  419. ElapsedTime::ElapsedTime ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  420.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo,
  421.    ResourceString *day, ResourceString *days, BOOL showseconds )
  422.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ),
  423.    Day(day), Days(days), ShowSeconds(showseconds) {
  424.    CountryInfo = countryinfo ;
  425. } /* endmethod */
  426.  
  427. int ElapsedTime::Measure ( HPS hPS, RECTL &Rectangle ) {
  428.    int Result ;
  429.    char Text [100] ;
  430.    Result = sprintf ( Text, "%s XX %s, XX:XX%s", QueryCurrentLabel(), PSZ(*Days), ShowSeconds?":XX":"" ) ;
  431.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  432.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  433.    return ( Result ) ;
  434. }
  435.  
  436. ULONG ElapsedTime::NewValue ( void ) {
  437.    ULONG Milliseconds ;
  438.    DosQuerySysInfo ( QSV_MS_COUNT, QSV_MS_COUNT, &Milliseconds, sizeof(Milliseconds) ) ;
  439.    return ( Milliseconds / 1000 ) ;
  440. }
  441.  
  442. void ElapsedTime::FormatText ( char *Label, char *Text, ULONG Time ) {
  443.  
  444.    strcpy ( Label, CurrentLabel ) ;
  445.  
  446.    *Text = 0 ;
  447.  
  448.    ULONG NumberOfDays = Time / ( 60 * 60 * 24 ) ;
  449.    Time -= NumberOfDays * 60 * 60 * 24 ;
  450.    ULONG Hours   = Time / ( 60 * 60 ) ;
  451.    Time -= Hours * 60 * 60 ;
  452.    ULONG Minutes = Time / 60 ;
  453.    ULONG Seconds = Time % 60 ;
  454.  
  455.    if ( NumberOfDays ) {
  456.       sprintf ( Text, "%lu %s, ",
  457.          NumberOfDays, NumberOfDays > 1 ? PSZ(*Days) : PSZ(*Day) ) ;
  458.    } /* endif */
  459.  
  460.    if ( ShowSeconds )
  461.       sprintf ( Text+strlen(Text), "%lu%s%02lu%s%02lu",
  462.          Hours, CountryInfo.szTimeSeparator, Minutes,
  463.          CountryInfo.szTimeSeparator, Seconds ) ;
  464.    else
  465.       sprintf ( Text+strlen(Text), "%lu%s%02lu",
  466.          Hours, CountryInfo.szTimeSeparator, Minutes ) ;
  467.  
  468.    DdeUpdate ( Text ) ;
  469. }
  470.  
  471. void ElapsedTime::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  472.    ULONG Time = NewValue ( ) ;
  473.    if ( Mandatory || ( Time != Value ) ) {
  474.       char Label[100], Text[100] ;
  475.       FormatText ( Label, Text, Time ) ;
  476.       Paint ( hPS, Rectangle, Label, Text, Time ) ;
  477.    } /* endif */
  478. }
  479.  
  480.  
  481. MemoryFree::MemoryFree ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  482.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo, USHORT sk, USHORT stk, USHORT sm ) 
  483.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  484.    ShowK(sk), ShowTrueK(stk), ShowM(sm) {
  485.    CountryInfo = countryinfo ;
  486.    LevelSense = -1 ;
  487.    MinLevel = 0 ;
  488.    ULONG TotalPhysicalMemory ;
  489.    DosQuerySysInfo ( QSV_TOTPHYSMEM, QSV_TOTPHYSMEM, &TotalPhysicalMemory, sizeof(TotalPhysicalMemory) ) ;
  490.    MaxLevel = TotalPhysicalMemory ;
  491.    DefaultLevels [0] = WarningLevel = TotalPhysicalMemory / 8 ;
  492.    DefaultLevels [1] = ErrorLevel = TotalPhysicalMemory / 16 ;
  493. } /* endmethod */
  494.  
  495. int MemoryFree::Measure ( HPS hPS, RECTL &Rectangle ) {
  496.    char Text [100] ;
  497.    int Result = MeasureValue ( Text, QueryCurrentLabel(), ShowK, ShowM ) ;
  498.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  499.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  500.    return ( Result ) ;
  501. }
  502.  
  503. ULONG MemoryFree::NewValue ( void ) {
  504.    APIRET16 APIENTRY16 Dos16MemAvail ( PULONG pulAvailMem ) ;
  505.    ULONG Value ;
  506.    Dos16MemAvail ( &Value ) ;
  507.    return ( Value ) ;
  508. }
  509.  
  510. void MemoryFree::FormatText ( char *Label, char *Text, ULONG Value ) {
  511.    strcpy ( Label, CurrentLabel ) ;
  512.    FormatValue ( Value, Text, CountryInfo, ShowK, ShowTrueK, ShowM ) ;
  513.    DdeUpdate ( Text ) ;
  514. }
  515.  
  516. void MemoryFree::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  517.    ULONG Size = NewValue ( ) ;
  518.    if ( Mandatory || ( Size != Value ) ) {
  519.       char Label[100], Text [100] ;
  520.       FormatText ( Label, Text, Size ) ;
  521.       Paint ( hPS, Rectangle, Label, Text, Size ) ;
  522.    } /* endif */
  523. }
  524.  
  525.  
  526. VirtualFree::VirtualFree ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  527.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo, USHORT sk, USHORT stk, USHORT sm ) 
  528.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  529.    ShowK(sk), ShowTrueK(stk), ShowM(sm) {
  530.    CountryInfo = countryinfo ;
  531.    LevelSense = -1 ;
  532.    MinLevel = 0 ;
  533.    MaxLevel = 64*1024*1024 ;
  534.    DefaultLevels [0] = WarningLevel = 8*1024*1024 ;
  535.    DefaultLevels [1] = ErrorLevel = 4*1024*1024 ;
  536. } /* endmethod */
  537.  
  538. int VirtualFree::Measure ( HPS hPS, RECTL &Rectangle ) {
  539.    char Text [100] ;
  540.    int Result = MeasureValue ( Text, QueryCurrentLabel(), ShowK, ShowM ) ;
  541.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  542.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  543.    return ( Result ) ;
  544. }
  545.  
  546. ULONG VirtualFree::NewValue ( void ) {
  547.    ULONG Space ;
  548.    DosQuerySysInfo ( QSV_TOTAVAILMEM, QSV_TOTAVAILMEM, &Space, sizeof(Space) ) ;
  549.    return ( Space ) ;
  550. }
  551.  
  552. void VirtualFree::FormatText ( char *Label, char *Text, ULONG Value ) {
  553.    strcpy ( Label, CurrentLabel ) ;
  554.    FormatValue ( Value, Text, CountryInfo, ShowK, ShowTrueK, ShowM ) ;
  555.    DdeUpdate ( Text ) ;
  556. }
  557.  
  558. void VirtualFree::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  559.    ULONG Size = NewValue ( ) ;
  560.    if ( Mandatory || ( Size != Value ) ) {
  561.       char Label[100], Text [100] ;
  562.       FormatText ( Label, Text, Size ) ;
  563.       Paint ( hPS, Rectangle, Label, Text, Size ) ;
  564.    } /* endif */
  565. }
  566.  
  567.  
  568. SwapSize::SwapSize ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  569.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO countryinfo, 
  570.    USHORT sk, USHORT stk, USHORT sm, PSZ swappath, ULONG initialsize )
  571.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  572.    ShowK(sk), ShowTrueK(stk), ShowM(sm) {
  573.    CountryInfo = countryinfo ;
  574.    SwapPath = new BYTE [ strlen(PCHAR(swappath)) + 1 ] ;
  575.    strcpy ( PCHAR(SwapPath), PCHAR(swappath) ) ;
  576.    LevelSense = +1 ;
  577.    MinLevel = 0 ;
  578.    MaxLevel = 64*1024*1024 ;
  579.    DefaultLevels [0] = WarningLevel = initialsize > 0x2000 ? initialsize * 2 * 1024 : 16 * 1024 * 1024 ;
  580.    DefaultLevels [1] = ErrorLevel = initialsize > 0x2000 ? initialsize * 2 * 1024 : 32 * 1024 * 1024 ;
  581. } /* endmethod */
  582.  
  583. SwapSize::~SwapSize ( void ) {
  584.    delete [] SwapPath ;
  585. } /* endmethod */
  586.  
  587. int SwapSize::Measure ( HPS hPS, RECTL &Rectangle ) {
  588.    char Text [100] ;
  589.    int Result = MeasureValue ( Text, QueryCurrentLabel(), ShowK, ShowM ) ;
  590.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  591.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  592.    return ( Result ) ;
  593. }
  594.  
  595. ULONG SwapSize::NewValue ( void ) {
  596.  
  597.    char Path [_MAX_PATH+1] ;
  598.    strcpy ( Path, (PCHAR)SwapPath ) ;
  599.  
  600.    if ( Path[strlen(Path)-1] != '\\' )
  601.       strcat ( Path, "\\" ) ;
  602.  
  603.    strcat ( Path, "SWAPPER.DAT" ) ;
  604.  
  605.    ULONG SwapSize = 0 ;
  606.    FILESTATUS3 Status ;
  607.    if ( DosQueryPathInfo ( (PSZ)Path, FIL_STANDARD, &Status, sizeof(Status) ) == 0 ) 
  608.       SwapSize = Status.cbFile ;
  609.  
  610.    return ( SwapSize ) ;
  611. }
  612.  
  613. void SwapSize::FormatText ( char *Label, char *Text, ULONG Value ) {
  614.    strcpy ( Label, CurrentLabel ) ;
  615.    FormatValue ( Value, Text, CountryInfo, ShowK, ShowTrueK, ShowM ) ;
  616.    DdeUpdate ( Text ) ;
  617. }
  618.  
  619. void SwapSize::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  620.    ULONG Size = NewValue ( ) ;
  621.    if ( Mandatory || ( Size != Value ) ) {
  622.       char Label[100], Text [100] ;
  623.       FormatText ( Label, Text, Size ) ;
  624.       Paint ( hPS, Rectangle, Label, Text, Size ) ;
  625.    } /* endif */
  626. }
  627.  
  628.  
  629. SwapFree::SwapFree ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  630.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo,
  631.    USHORT sk, USHORT stk, USHORT sm, PSZ swappath, ULONG minfree )
  632.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ),
  633.    ShowK(sk), ShowTrueK(stk), ShowM(sm), MinFree(minfree) {
  634.    CountryInfo = countryinfo ;
  635.    SwapPath = new BYTE [ strlen(PCHAR(swappath)) + 1 ] ;
  636.    strcpy ( PCHAR(SwapPath), PCHAR(swappath) ) ;
  637.    LevelSense = -1 ;
  638.    MinLevel = 0 ;
  639.    MaxLevel = 64*1024*1024 ;
  640.    DefaultLevels [0] = WarningLevel = 8*1024*1024 ;
  641.    DefaultLevels [1] = ErrorLevel = 4*1024*1024 ;
  642. } /* endmethod */
  643.  
  644. SwapFree::~SwapFree ( void ) {
  645.    delete [] SwapPath ;
  646. } /* endmethod */
  647.  
  648. int SwapFree::Measure ( HPS hPS, RECTL &Rectangle ) {
  649.    char Text [100] ;
  650.    int Result = MeasureValue ( Text, QueryCurrentLabel(), ShowK, ShowM ) ;
  651.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  652.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  653.    return ( Result ) ;
  654. }
  655.  
  656. ULONG SwapFree::NewValue ( void ) {
  657.  
  658.    DosError ( FERR_DISABLEHARDERR ) ;
  659.    FSALLOCATE Allocation ;
  660.    DosQueryFSInfo ( SwapPath[0]-'A'+1, FSIL_ALLOC, PBYTE(&Allocation), sizeof(Allocation) ) ;
  661.    DosError ( FERR_ENABLEHARDERR ) ;
  662.  
  663.    ULONG SwapFree = Allocation.cUnitAvail*Allocation.cSectorUnit*Allocation.cbSector ;
  664.  
  665.    SwapFree -= MinFree * 1024 ;                 // The swap-file will not allocate the space required free.
  666.  
  667.    SwapFree -= ( SwapFree % ( 1024 * 1024 ) ) ; // The swap-file only expands by 1M increments.
  668.  
  669.    return ( SwapFree ) ;
  670. }
  671.  
  672. void SwapFree::FormatText ( char *Label, char *Text, ULONG Value ) {
  673.    strcpy ( Label, CurrentLabel ) ;
  674.    FormatValue ( Value, Text, CountryInfo, ShowK, ShowTrueK, ShowM ) ;
  675.    DdeUpdate ( Text ) ;
  676. }
  677.  
  678. void SwapFree::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  679.    ULONG Size = NewValue ( ) ;
  680.    if ( Mandatory || ( Size != Value ) ) {
  681.       char Label[100], Text [100] ;
  682.       FormatText ( Label, Text, Size ) ;
  683.       Paint ( hPS, Rectangle, Label, Text, Size ) ;
  684.    } /* endif */
  685. }
  686.  
  687.  
  688. SpoolSize::SpoolSize ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  689.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo, 
  690.    USHORT sk, USHORT stk, USHORT sm, PSZ spoolpath )
  691.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  692.    ShowK(sk), ShowTrueK(stk), ShowM(sm) {
  693.    CountryInfo = countryinfo ;
  694.    SpoolPath = new BYTE [ strlen(PCHAR(spoolpath)) + 1 ] ;
  695.    strcpy ( PCHAR(SpoolPath), PCHAR(spoolpath) ) ;
  696.    LevelSense = +1 ;
  697.    MinLevel = 0 ;
  698.    MaxLevel = 64*1024*1024 ;
  699.    DefaultLevels [0] = WarningLevel = 8*1024*1024 ;
  700.    DefaultLevels [1] = ErrorLevel = 16*1024*1024 ;
  701. } /* endmethod */
  702.  
  703. SpoolSize::~SpoolSize ( void ) {
  704.    delete [] SpoolPath ;
  705. } /* endmethod */
  706.  
  707. int SpoolSize::Measure ( HPS hPS, RECTL &Rectangle ) {
  708.    char Text [100] ;
  709.    int Result = MeasureValue ( Text, QueryCurrentLabel(), ShowK, ShowM ) ;
  710.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  711.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  712.    return ( Result ) ;
  713. }
  714.  
  715. ULONG SpoolSize::NewValue ( void ) {
  716.  
  717.    ULONG PathSize ;
  718.    DosQuerySysInfo ( QSV_MAX_PATH_LENGTH, QSV_MAX_PATH_LENGTH, &PathSize, sizeof(PathSize) ) ;
  719.  
  720.    PBYTE Path = PBYTE ( malloc ( size_t(PathSize) ) ) ;
  721.    if ( Path == NULL ) 
  722.       return ( 0 ) ;
  723.  
  724.    PFILEFINDBUF3 Found = PFILEFINDBUF3 ( malloc ( size_t( PathSize + sizeof(FILEFINDBUF3) ) ) ) ;
  725.    if ( Found == NULL ) {
  726.       free ( Path ) ;
  727.       return ( 0 ) ;
  728.    } /* endif */
  729.  
  730.    strcpy ( (PCHAR)Path, (PCHAR)SpoolPath ) ;
  731.    strcat ( (PCHAR)Path, "\\*.*" ) ;
  732.  
  733.    HDIR hDir = (HDIR) HDIR_CREATE ;
  734.    ULONG Count = 1 ;
  735.    ULONG TotalSize = 0 ;
  736.  
  737.    if ( !DosFindFirst2 ( Path, &hDir,
  738.       FILE_NORMAL | FILE_READONLY | FILE_DIRECTORY | FILE_ARCHIVED,
  739.       Found, PathSize+sizeof(FILEFINDBUF3), &Count, FIL_STANDARD ) ) {
  740.  
  741.       do {
  742.  
  743.          if ( !strcmp ( (PCHAR)Found->achName, "." ) OR !strcmp ( (PCHAR)Found->achName, ".." ) )
  744.             continue ;
  745.  
  746.          if ( Found->attrFile & FILE_DIRECTORY ) {
  747.  
  748.             HDIR hDir2 = (HDIR) HDIR_CREATE ;
  749.  
  750.             strcpy ( (PCHAR)Path, (PCHAR)SpoolPath ) ;
  751.             strcat ( (PCHAR)Path, "\\" ) ;
  752.             strcat ( (PCHAR)Path, (PCHAR)Found->achName ) ;
  753.             strcat ( (PCHAR)Path, "\\*.*" ) ;
  754.  
  755.             ULONG Count2 = 1 ;
  756.             if ( !DosFindFirst2 ( Path, &hDir2,
  757.                FILE_NORMAL | FILE_READONLY | FILE_ARCHIVED,
  758.                Found, PathSize+sizeof(FILEFINDBUF3), &Count2, FIL_STANDARD ) ) {
  759.                do {
  760.                   TotalSize += Found->cbFile ;
  761.                } while ( !DosFindNext ( hDir2, Found, PathSize+sizeof(FILEFINDBUF3), &Count2 ) ) ;
  762.                DosFindClose ( hDir2 ) ;
  763.             } /* endif */
  764.          } else {
  765.             TotalSize += Found->cbFile ;
  766.          } /* endif */
  767.       } while ( !DosFindNext ( hDir, Found, PathSize+sizeof(FILEFINDBUF3), &Count ) ) ;
  768.  
  769.       DosFindClose ( hDir ) ;
  770.  
  771.    } /* enddo */
  772.  
  773.    free ( Path ) ;
  774.    free ( Found ) ;
  775.  
  776.    return ( TotalSize ) ;
  777. }
  778.  
  779. void SpoolSize::FormatText ( char *Label, char *Text, ULONG Value ) {
  780.    strcpy ( Label, CurrentLabel ) ;
  781.    FormatValue ( Value, Text, CountryInfo, ShowK, ShowTrueK, ShowM ) ;
  782.    DdeUpdate ( Text ) ;
  783. }
  784.  
  785. void SpoolSize::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  786.    ULONG Size = NewValue ( ) ;
  787.    if ( Mandatory || ( Size != Value ) ) {
  788.       char Label[100], Text [100] ;
  789.       FormatText ( Label, Text, Size ) ;
  790.       Paint ( hPS, Rectangle, Label, Text, Size ) ;
  791.    } /* endif */
  792. }
  793.  
  794.  
  795. CpuLoad::CpuLoad ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  796.    Dde_Server *pDdeServer, char *Topic, ULONG maxcount, PULONG idlecount, ResourceString *error )
  797.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  798.    MaxCount(maxcount), IdleCount(idlecount), Error(error) { 
  799.    LevelSense = +1 ;
  800.    MinLevel = 0 ;
  801.    MaxLevel = 100 ;
  802.    DefaultLevels [0] = WarningLevel = 75 ;
  803.    DefaultLevels [1] = ErrorLevel = 90 ;
  804. } /* endmethod */
  805.  
  806. int CpuLoad::Measure ( HPS hPS, RECTL &Rectangle ) {
  807.    int Result ;
  808.    char Text [100] ;
  809.    Result = sprintf ( Text, "%s 100%", QueryCurrentLabel() ) ;
  810.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  811.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  812.    return ( Result ) ;
  813. }
  814.  
  815. ULONG CpuLoad::NewValue ( void ) {
  816.    if ( *IdleCount == 0xFFFFFFFF ) 
  817.       return ( 0xFFFFFFFF ) ;
  818.    MaxCount = (ULONG) max ( MaxCount, *IdleCount ) ;
  819.    ULONG Load = ( ( MaxCount - *IdleCount ) * 100 ) / MaxCount ;
  820.    return ( Load ) ;
  821. }
  822.  
  823. void CpuLoad::FormatText ( char *Label, char *Text, ULONG Value ) {
  824.    if ( Value == 0xFFFFFFFF ) {
  825.       strcpy ( Text, PCHAR(*Error) ) ;
  826.    } else {
  827.       strcpy ( Label, CurrentLabel ) ;
  828.       sprintf ( Text, "%lu%%", Value ) ;
  829.    } /* endif */
  830.    DdeUpdate ( Text ) ;
  831. }
  832.  
  833. void CpuLoad::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  834.    ULONG Load = NewValue ( ) ;
  835.    if ( Mandatory || ( Load != Value ) ) {
  836.       char Label[100], Text [100] ;
  837.       FormatText ( Label, Text, Load ) ;
  838.       Paint ( hPS, Rectangle, Label, Text, Load ) ;
  839.    } /* endif */
  840. }
  841.  
  842.  
  843. TaskCount::TaskCount ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  844.    Dde_Server *pDdeServer, char *Topic, HAB anchor )
  845.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  846.    Anchor(anchor) { 
  847.    LevelSense = +1 ;
  848.    MinLevel = 0 ;
  849.    MaxLevel = 256 ;     
  850.    DefaultLevels [0] = WarningLevel = 30 ;  
  851.    DefaultLevels [1] = ErrorLevel = 40 ;    
  852. } /* endmethod */
  853.  
  854. int TaskCount::Measure ( HPS hPS, RECTL &Rectangle ) {
  855.    int Result ;
  856.    char Text [100] ;
  857.    Result = sprintf ( Text, "%s 999 ", QueryCurrentLabel() ) ;
  858.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  859.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  860.    return ( Result ) ;
  861. }
  862.  
  863. ULONG TaskCount::NewValue ( void ) {
  864.    return ( WinQuerySwitchList ( Anchor, PSWBLOCK(NULL), 0 ) ) ;
  865. }
  866.  
  867. void TaskCount::FormatText ( char *Label, char *Text, ULONG Value ) {
  868.    strcpy ( Label, CurrentLabel ) ;
  869.    sprintf ( Text, "%lu ", Value ) ;
  870.    DdeUpdate ( Text ) ;
  871. }
  872.  
  873. void TaskCount::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  874.    ULONG Count = NewValue ( ) ;
  875.    if ( Mandatory || ( Count != Value ) ) {
  876.       char Label[100], Text [100] ;
  877.       FormatText ( Label, Text, Count ) ;
  878.       Paint ( hPS, Rectangle, Label, Text, Count ) ;
  879.    } /* endif */
  880. }
  881.  
  882.  
  883. DriveFree::DriveFree ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  884.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo, 
  885.    USHORT sk, USHORT stk, USHORT sm, USHORT drivenumber, ResourceString *driveerror, BOOL showfilesystemname, 
  886.    PSZ filesystem, BOOL showdisklabel, PSZ disklabel ) 
  887.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  888.    ShowK(sk), ShowTrueK(stk), ShowM(sm), DriveError(driveerror), DriveNumber(drivenumber),
  889.    ShowFileSystemName(showfilesystemname), ShowDiskLabel(showdisklabel), 
  890.    Error(FALSE) {
  891.    CountryInfo = countryinfo ;
  892.    strcpy ( PCHAR(FileSystem), PCHAR(filesystem) ) ;
  893.    strcpy ( PCHAR(DiskLabel), PCHAR(disklabel) ) ;
  894.    LevelSense = -1 ;
  895.    MinLevel = 0 ;
  896.    DosError ( FERR_DISABLEHARDERR ) ;
  897.    FSALLOCATE Allocation ;
  898.    DosQueryFSInfo ( DriveNumber, FSIL_ALLOC, (PBYTE)&Allocation, sizeof(Allocation) ) ;
  899.    DosError ( FERR_ENABLEHARDERR ) ;
  900.    MaxLevel = Allocation.cUnit*Allocation.cSectorUnit*Allocation.cbSector ;
  901.    DefaultLevels [0] = WarningLevel = MaxLevel / 5 ;
  902.    DefaultLevels [1] = ErrorLevel = MaxLevel / 10 ;
  903. } /* endmethod */
  904.  
  905. int DriveFree::Measure ( HPS hPS, RECTL &Rectangle ) {
  906.    char Label[100] ;
  907.    if ( ShowFileSystemName && *FileSystem ) {
  908.       if ( ShowDiskLabel && *DiskLabel ) {
  909.          sprintf ( Label, "%s (%s,%s)", QueryCurrentLabel(), DiskLabel, FileSystem ) ;
  910.       } else {
  911.          sprintf ( Label, "%s (%s)", QueryCurrentLabel(), FileSystem ) ;
  912.       } /* endif */
  913.    } else {
  914.       if ( ShowDiskLabel && *DiskLabel ) {
  915.          sprintf ( Label, "%s (%s)", QueryCurrentLabel(), DiskLabel ) ;
  916.       } else {
  917.          sprintf ( Label, "%s", QueryCurrentLabel() ) ;
  918.       } /* endif */
  919.    } /* endif */
  920.    char Text[100] ;
  921.    int Result = MeasureValue ( Text, Label, ShowK, ShowM ) ;
  922.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  923.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  924.    return ( Result ) ;
  925. }
  926.  
  927. ULONG DriveFree::NewValue ( void ) {
  928.  
  929.    if ( Error ) 
  930.       return ( 0 ) ;
  931.  
  932.    DosError ( FERR_DISABLEHARDERR ) ;
  933.  
  934.    FSALLOCATE Allocation ;
  935.    APIRET Status = DosQueryFSInfo ( DriveNumber, FSIL_ALLOC, (PBYTE)&Allocation, sizeof(Allocation) ) ;
  936.  
  937.    DosError ( FERR_ENABLEHARDERR ) ;
  938.  
  939.    if ( Status ) {
  940.       Error = TRUE ;
  941.       return ( 0 ) ;
  942.    } /* endif */
  943.  
  944.    return ( Allocation.cUnitAvail*Allocation.cSectorUnit*Allocation.cbSector ) ;
  945. }
  946.  
  947. void DriveFree::FormatText ( char *Label, char *Text, ULONG Value ) {
  948.  
  949.    if ( ShowFileSystemName && *FileSystem ) {
  950.       if ( ShowDiskLabel && *DiskLabel ) {
  951.          sprintf ( Label, "%s (%s,%s)", QueryCurrentLabel(), DiskLabel, FileSystem ) ;
  952.       } else {
  953.          sprintf ( Label, "%s (%s)", QueryCurrentLabel(), FileSystem ) ;
  954.       } /* endif */
  955.    } else {
  956.       if ( ShowDiskLabel && *DiskLabel ) {
  957.          sprintf ( Label, "%s (%s)", QueryCurrentLabel(), DiskLabel ) ;
  958.       } else {
  959.          sprintf ( Label, "%s", QueryCurrentLabel() ) ;
  960.       } /* endif */
  961.    } /* endif */
  962.  
  963.    if ( Error )
  964.       strcpy ( Text, PCHAR(*DriveError) ) ;
  965.    else
  966.       FormatValue ( Value, Text, CountryInfo, ShowK, ShowTrueK, ShowM ) ;
  967.  
  968.    DdeUpdate ( Text ) ;
  969. }
  970.  
  971. void DriveFree::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  972.    ULONG Size = NewValue ( ) ;
  973.    if ( Mandatory || ( Size != Value ) ) {
  974.       char Label[100], Text [100] ;
  975.       FormatText ( Label, Text, Size ) ;
  976.       Paint ( hPS, Rectangle, Label, Text, Size ) ;
  977.    } /* endif */
  978. }
  979.  
  980.  
  981. TotalFree::TotalFree ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  982.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo, 
  983.    USHORT sk, USHORT stk, USHORT sm, ULONG drives )
  984.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  985.    ShowK(sk), ShowTrueK(stk), ShowM(sm), Drives(drives) {
  986.    CountryInfo = countryinfo ;
  987.    LevelSense = -1 ;
  988.    MinLevel = 0 ;
  989.    MaxLevel = 64*1024*1024 ;    
  990.    DefaultLevels [0] = WarningLevel = 8*1024*1024 ;
  991.    DefaultLevels [1] = ErrorLevel = 4*1024*1024 ;
  992. } /* endmethod */
  993.  
  994. int TotalFree::Measure ( HPS hPS, RECTL &Rectangle ) {
  995.    char Text [100] ;
  996.    int Result = MeasureValue ( Text, QueryCurrentLabel(), ShowK, ShowM ) ;
  997.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  998.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  999.    return ( Result ) ;
  1000. }
  1001.  
  1002. ULONG TotalFree::NewValue ( void ) {
  1003.  
  1004.    ULONG Free = 0 ;
  1005.    ULONG Mask = Drives >> 2 ;
  1006.  
  1007.    for ( int Drive=3; Drive<=26; Drive++ ) {
  1008.       if ( Mask & 1 ) {
  1009.  
  1010.          DosError ( FERR_DISABLEHARDERR ) ;
  1011.  
  1012.          FSALLOCATE Allocation ;
  1013.          APIRET Status = DosQueryFSInfo ( Drive, FSIL_ALLOC, (PBYTE)&Allocation, sizeof(Allocation) ) ;
  1014.  
  1015.          DosError ( FERR_ENABLEHARDERR ) ;
  1016.  
  1017.          if ( Status )
  1018.             Drives &= ~ ( 1 << (Drive-1) ) ;
  1019.          else
  1020.             Free += Allocation.cUnitAvail*Allocation.cSectorUnit*(Allocation.cbSector/256) ;
  1021.       } /* endif */
  1022.       Mask >>= 1 ;
  1023.  
  1024.    } /* endfor */
  1025.  
  1026.    return ( Free ) ;
  1027. }
  1028.  
  1029. void TotalFree::FormatText ( char *Label, char *Text, ULONG Value ) {
  1030.    strcpy ( Label, CurrentLabel ) ;
  1031.    FormatValue ( Value, Text, CountryInfo, ShowK, ShowTrueK, ShowM, 256 ) ;
  1032.    DdeUpdate ( Text ) ;
  1033. }
  1034.  
  1035. void TotalFree::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  1036.    ULONG Size = NewValue ( ) ;
  1037.    if ( Mandatory || ( Size != Value ) ) {
  1038.       char Label[100], Text [100] ;
  1039.       FormatText ( Label, Text, Size ) ;
  1040.       Paint ( hPS, Rectangle, Label, Text, Size, 256 ) ;
  1041.    } /* endif */
  1042. }
  1043.  
  1044.  
  1045. SwapSlack::SwapSlack ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel, 
  1046.    Dde_Server *pDdeServer, char *Topic, COUNTRYINFO &countryinfo, 
  1047.    USHORT sk, USHORT stk, USHORT sm, VirtualFree *pvf, SwapFree *psf, MemoryFree *pmf ) 
  1048.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  1049.    ShowK(sk), ShowTrueK(stk), ShowM(sm), pVirtualFree(pvf), pSwapFree(psf), pMemFree(pmf) {
  1050.    CountryInfo = countryinfo ;
  1051. } /* endmethod */
  1052.  
  1053. int SwapSlack::Measure ( HPS hPS, RECTL &Rectangle ) {
  1054.    char Text [100] ;
  1055.    int Result = MeasureValue ( Text, QueryCurrentLabel(), ShowK, ShowM ) ;
  1056.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  1057.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  1058.    return ( Result ) ;
  1059. }
  1060.  
  1061. ULONG SwapSlack::NewValue ( void ) {
  1062.    LONG Slack = pVirtualFree->QueryFlag() ? pVirtualFree->QueryValue() : pVirtualFree->NewValue() ;
  1063.    Slack -= pSwapFree->QueryFlag() ? pSwapFree->QueryValue() : pSwapFree->NewValue() ;
  1064.    Slack -= pMemFree->QueryFlag() ? pMemFree->QueryValue() : pMemFree->NewValue() ;
  1065.    return ( ULONG ( max ( 0, Slack ) ) ) ;
  1066. }
  1067.  
  1068. void SwapSlack::FormatText ( char *Label, char *Text, ULONG Value ) {
  1069.    strcpy ( Label, CurrentLabel ) ;
  1070.    FormatValue ( Value, Text, CountryInfo, ShowK, ShowTrueK, ShowM ) ;
  1071.    DdeUpdate ( Text ) ;
  1072. }
  1073.  
  1074. void SwapSlack::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  1075.    ULONG Size = NewValue ( ) ;
  1076.    if ( Mandatory || ( Size != Value ) ) {
  1077.       char Label[100], Text[100] ;
  1078.       FormatText ( Label, Text, Size ) ;
  1079.       Paint ( hPS, Rectangle, Label, Text, Size ) ;
  1080.    } /* endif */
  1081. } /* endmethod */
  1082.  
  1083.  
  1084. ProcessCount::ProcessCount ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel,
  1085.    Dde_Server *pDdeServer, char *Topic )
  1086.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ) { 
  1087.    DosAllocMem ( (PPVOID)&DQPS_Buffer, 0x10000, PAG_READ | PAG_WRITE | PAG_COMMIT | OBJ_TILE ) ;
  1088.    LevelSense = +1 ;
  1089.    MinLevel = 0 ;
  1090.    MaxLevel = 256 ;    
  1091.    DefaultLevels [0] = WarningLevel = 30 ; 
  1092.    DefaultLevels [1] = ErrorLevel = 40 ;   
  1093. } /* endmethod */
  1094.  
  1095. ProcessCount::~ProcessCount ( ) { 
  1096.    DosFreeMem ( DQPS_Buffer ) ; 
  1097. } /* endmethod */
  1098.  
  1099. int ProcessCount::Measure ( HPS hPS, RECTL &Rectangle ) {
  1100.    int Result ;
  1101.    char Text [100] ;
  1102.    Result = sprintf ( Text, "%s 123 ", QueryCurrentLabel() ) ;
  1103.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  1104.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  1105.    return ( Result ) ;
  1106. } /* endmethod */
  1107.  
  1108. ULONG ProcessCount::NewValue ( void ) {
  1109.  
  1110.    if ( DosQProcStatus ( DQPS_Buffer, 0xFFFF ) ) 
  1111.       return ( 0 ) ;
  1112.  
  1113.    qsPrec_s *pProcRecord = ((qsPtrRec_s*)DQPS_Buffer)->pProcRec ;
  1114.    int ProcessCount = 0 ;
  1115.    while ( pProcRecord->RecType == 1 ) {
  1116.       int Size = sizeof(qsPrec_s) ;
  1117.       Size += pProcRecord->cTCB * sizeof(qsTrec_s) ;
  1118.       Size += pProcRecord->c16Sem * sizeof(short) ;
  1119.       Size += pProcRecord->cLib * sizeof(short) ;
  1120.       Size += pProcRecord->cShrMem * sizeof(short) ;
  1121.       pProcRecord = (qsPrec_s*) ( (char*)pProcRecord + Size ) ;
  1122.       ProcessCount ++ ;
  1123.    } /* endwhile */
  1124.    return ( ProcessCount ) ;
  1125. } /* endmethod */
  1126.  
  1127. void ProcessCount::FormatText ( char *Label, char *Text, ULONG Value ) {
  1128.    strcpy ( Label, CurrentLabel ) ;
  1129.    sprintf ( Text, "%lu ", Value ) ;
  1130.    DdeUpdate ( Text ) ;
  1131. } /* endmethod */
  1132.  
  1133. void ProcessCount::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  1134.    ULONG Count = NewValue ( ) ;
  1135.    if ( Mandatory || ( Count != Value ) ) {
  1136.       char Label[100], Text[100] ;
  1137.       FormatText ( Label, Text, Count ) ;
  1138.       Paint ( hPS, Rectangle, Label, Text, Count ) ;
  1139.    } /* endif */
  1140. } /* endmethod */
  1141.  
  1142.  
  1143. ThreadCount::ThreadCount ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel,
  1144.    Dde_Server *pDdeServer, char *Topic )
  1145.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ) { 
  1146.    DosAllocMem ( (PPVOID)&DQPS_Buffer, 0x10000, PAG_READ | PAG_WRITE | PAG_COMMIT | OBJ_TILE ) ;
  1147.    LevelSense = +1 ;
  1148.    MinLevel = 0 ;
  1149.    PSZ Threads = ScanSystemConfig ( 0, "THREADS" ) ;
  1150.    if ( Threads == 0 ) 
  1151.       Threads = (PSZ) "64" ;
  1152.    int MaxThreads = atoi ( Threads ) ;
  1153.    MaxLevel = MaxThreads ;
  1154.    DefaultLevels [0] = WarningLevel = ( MaxThreads * 3 ) / 4 ; 
  1155.    DefaultLevels [1] = ErrorLevel = ( MaxThreads * 9 ) / 10 ;   
  1156. } /* endmethod */
  1157.  
  1158. ThreadCount::~ThreadCount ( ) { 
  1159.    DosFreeMem ( DQPS_Buffer ) ; 
  1160. } /* endmethod */
  1161.  
  1162. int ThreadCount::Measure ( HPS hPS, RECTL &Rectangle ) {
  1163.    int Result ;
  1164.    char Text [100] ;
  1165.    Result = sprintf ( Text, "%s 123 ", QueryCurrentLabel() ) ;
  1166.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  1167.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  1168.    return ( Result ) ;
  1169. } /* endmethod */
  1170.  
  1171. ULONG ThreadCount::NewValue ( void ) {
  1172.  
  1173.    if ( DosQProcStatus ( DQPS_Buffer, 0xFFFF ) )
  1174.       return ( 0 ) ;
  1175.  
  1176.    return ( ((qsPtrRec_s*)DQPS_Buffer)->pGlobalRec->cThrds ) ;
  1177. } /* endmethod */
  1178.  
  1179. void ThreadCount::FormatText ( char *Label, char *Text, ULONG Value ) {
  1180.    strcpy ( Label, CurrentLabel ) ;
  1181.    sprintf ( Text, "%lu ", Value ) ;
  1182.    DdeUpdate ( Text ) ;
  1183. } /* endmethod */
  1184.  
  1185. void ThreadCount::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  1186.    ULONG Count = NewValue ( ) ;
  1187.    if ( Mandatory || ( Count != Value ) ) {
  1188.       char Label[100], Text[100] ;
  1189.       FormatText ( Label, Text, Count ) ;
  1190.       Paint ( hPS, Rectangle, Label, Text, Count ) ;
  1191.    } /* endif */
  1192. } /* endmethod */
  1193.  
  1194.  
  1195. Battery::Battery ( USHORT id, char *pName, char *pCurrentLabel, char *pDefaultLabel,
  1196.    Dde_Server *pDdeServer, char *Topic, ResourceString *error, ResourceString *charging, ResourceString *ac )
  1197.    : Item ( id, pName, pCurrentLabel, pDefaultLabel, pDdeServer, Topic ), 
  1198.    Handle(-1), Error(error), Charging(charging), AC(ac) { 
  1199.    LevelSense = -1 ;
  1200.    MinLevel = 0 ;
  1201.    MaxLevel = 100 ;
  1202.    DefaultLevels [0] = WarningLevel = 25 ; 
  1203.    DefaultLevels [1] = ErrorLevel = 10 ;   
  1204.    ULONG Action = 0;
  1205.    APIRET Status = DosOpen ( (PSZ) "APM$", &Handle, &Action, 0, FILE_NORMAL,
  1206.          FILE_OPEN, OPEN_ACCESS_READWRITE | OPEN_SHARE_DENYREADWRITE | OPEN_FLAGS_FAIL_ON_ERROR, 0 ) ;
  1207.    if ( Status ) 
  1208.       Handle = 0xFFFFFFFF ;
  1209. } /* endmethod */
  1210.  
  1211. Battery::~Battery ( ) {
  1212.    if ( Handle != 0xFFFFFFFF ) 
  1213.       DosClose ( Handle ) ;
  1214. } /* endmethod */
  1215.  
  1216. int Battery::Measure ( HPS hPS, RECTL &Rectangle ) {
  1217.    int Result ;
  1218.    char Text [100] ;
  1219.    Result = sprintf ( Text, "%s %s ", QueryCurrentLabel(), PCHAR(*Charging) ) ;
  1220.    WinQueryWindowRect ( HWND_DESKTOP, &Rectangle ) ;
  1221.    WinDrawText ( hPS, strlen(Text), PSZ(Text), &Rectangle, 0, 0, DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT ) ;
  1222.    return ( Result ) ;
  1223. } /* endmethod */
  1224.  
  1225. ULONG Battery::NewValue ( void ) {
  1226.  
  1227.    if ( Handle != 0xFFFFFFFF ) 
  1228.       return ( -1 ) ;
  1229.  
  1230.    struct {
  1231.       USHORT ParmLength ;
  1232.       USHORT PowerFlags ;
  1233.       UCHAR  ACStatus ;
  1234.       UCHAR  BatteryStatus ;
  1235.       UCHAR  BatteryLife ;
  1236.    } Parm ;
  1237.    Parm.ParmLength = sizeof(Parm) ;
  1238.    ULONG ParmLen = sizeof(Parm) ;
  1239.    USHORT Data ;
  1240.    ULONG DataLen = sizeof(Data) ;
  1241.    APIRET Status = DosDevIOCtl ( Handle, IOCTL_POWER, POWER_GETPOWERSTATUS, &Parm, sizeof(Parm), &ParmLen, &Data, sizeof(Data), &DataLen ) ;
  1242.    if ( Status ) {
  1243. //    Log ( "Unable to call APM$ for power status.  Status %i.", Status ) ;
  1244.       DosClose ( Handle ) ;
  1245.       Handle = 0xFFFFFFFF ;
  1246.       return ( -1 ) ;
  1247.    } else {
  1248.       if ( Parm.PowerFlags & 1 ) {                       // If APM enabled,
  1249.          if ( Parm.BatteryStatus == 3 ) {                //   If battery charging,
  1250.             if ( Parm.BatteryLife < 100 )                //     If not fully charged,
  1251.                return ( 101 ) ;                          //       Report CHARGING.
  1252.             else                                         //     Else
  1253.                return ( 100 ) ;                          //       Report 100%.
  1254.          } else if ( Parm.ACStatus == 1 ) {              //   Else if A/C,
  1255.             return ( 201 ) ;                             //     Report A/C.
  1256.          } else if ( Parm.BatteryLife <= 100 ) {         //   Else if not fully charged,
  1257.             return ( Parm.BatteryLife ) ;                //     Report percentage full.
  1258.          } else {                                        //   Else,
  1259.             return ( -1 ) ;                              //     Report error.
  1260.          } /* endif */                                   //
  1261.       } else {                                           // Else,
  1262.          return ( -1 ) ;                                 //   Report error.
  1263.       } /* endif */
  1264.    } /* endif */
  1265. } /* endmethod */
  1266.  
  1267. void Battery::FormatText ( char *Label, char *Text, ULONG Value ) {
  1268.    strcpy ( Label, CurrentLabel ) ;
  1269.    if ( (long)Value < 0 ) {
  1270.       strcpy ( Text, PCHAR(*Error) ) ;
  1271.       strcat ( Text, " " ) ;
  1272.    } else if ( Value > 200 ) {
  1273.       strcpy ( Text, PCHAR(*AC) ) ;
  1274.       strcat ( Text, " " ) ;
  1275.    } else if ( Value > 100 ) {
  1276.       strcpy ( Text, PCHAR(*Charging) ) ;
  1277.       strcat ( Text, " " ) ;
  1278.    } else { 
  1279.       sprintf ( Text, "%lu%%", Value ) ;
  1280.    } /* endif */
  1281.    DdeUpdate ( Text ) ;
  1282. } /* endmethod */
  1283.  
  1284. void Battery::Repaint ( HPS hPS, RECTL &Rectangle, BOOL Mandatory ) {
  1285.    ULONG Count = NewValue ( ) ;
  1286.    if ( Mandatory || ( Count != Value ) ) {
  1287.       char Label[100], Text[100] ;
  1288.       FormatText ( Label, Text, Count ) ;
  1289.       Paint ( hPS, Rectangle, Label, Text, Count ) ;
  1290.    } /* endif */
  1291. } /* endmethod */
  1292.  
  1293. int Battery::Discharging ( ) {
  1294.  
  1295.    if ( Handle != 0xFFFFFFFF ) 
  1296.       return ( FALSE ) ;
  1297.  
  1298.    struct {
  1299.       USHORT ParmLength ;
  1300.       USHORT PowerFlags ;
  1301.       UCHAR  ACStatus ;
  1302.       UCHAR  BatteryStatus ;
  1303.       UCHAR  BatteryLife ;
  1304.    } Parm ;
  1305.    Parm.ParmLength = sizeof(Parm) ;
  1306.    ULONG ParmLen = sizeof(Parm) ;
  1307.    USHORT Data ;
  1308.    ULONG DataLen = sizeof(Data) ;
  1309.    APIRET Status = DosDevIOCtl ( Handle, IOCTL_POWER, POWER_GETPOWERSTATUS, &Parm, sizeof(Parm), &ParmLen, &Data, sizeof(Data), &DataLen ) ;
  1310.    if ( Status ) {
  1311. //    Log ( "Unable to call APM$ for power status.  Status %i.", Status ) ;
  1312.       DosClose ( Handle ) ;
  1313.       Handle = 0xFFFFFFFF ;
  1314.    } else {
  1315.       if ( Parm.PowerFlags & 1 ) {
  1316.          if ( Parm.BatteryStatus == 3 ) {
  1317.             ;
  1318.          } else if ( Parm.ACStatus == 1 ) {     
  1319.             ;
  1320.          } else if ( Parm.BatteryLife <= 100 ) {
  1321.             return ( TRUE ) ;
  1322.          } /* endif */                          
  1323.       } /* endif */
  1324.    } /* endif */
  1325.  
  1326.    return ( FALSE ) ;
  1327. }
  1328.  
  1329.