home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1995 November / PCWK1195.iso / inne / podstawy / os2 / ssaver / ssaver23.exe / SAMPLE.ZIP / sample.c < prev    next >
C/C++ Source or Header  |  1995-05-30  |  23KB  |  677 lines
  1. /*
  2.     sample.c
  3.     sample saver module C source file version 2.3
  4.     (C) 1993-95 Siegfried Hanisch
  5. */
  6.  
  7. #define INCL_DOS
  8. #define INCL_DOSERRORS
  9. #define INCL_WIN
  10. #define INCL_GPI
  11. #include <os2.h>
  12. #include <stdio.h>
  13. #include <stdlib.h>
  14. #include <string.h>
  15. #include <limits.h>
  16. #include <process.h>
  17.  
  18. #include "sample.h"
  19.  
  20.  
  21. // ===== preprocessor definitions
  22.  
  23. #define MODULEVERSION        0x00020003
  24. #define STACKSIZE        (64*1024)
  25. #define SAVER_NAME_MAXLEN    32
  26. #define ZORDERTIMERSTEP     30000L
  27. #define FUNCTION_CONFIGURE    1
  28. #define FUNCTION_STARTSAVER    2
  29. #define FUNCTION_STOPSAVER    3
  30. #define FUNCTION_QUERYNAME    4
  31. #define FUNCTION_QUERYENABLED    5
  32. #define FUNCTION_SETENABLED    6
  33. #define FUNCTION_SETINIFILENAME 7
  34. #define WMP_MODULECRASH     WM_USER + 13
  35. #define CONFIGURATION_DEFAULT_ANIMATIONSPEED 4    // 0=slow .. 4=fast
  36. /*
  37.     $$$$$ insert code here $$$$$
  38.     This is the place for your preprocessor definitions.
  39.  
  40.     $$$$$ for example $$$$$
  41. #define CONFIGURATION_MINIMUM_COUNT 1
  42. #define CONFIGURATION_DEFAULT_COUNT 32
  43. #define CONFIGURATION_MAXIMUM_COUNT 100
  44. */
  45.  
  46. // ===== prototypes
  47.  
  48. void    EXPENTRY SAVER_PROC(int function, HAB _hab, HWND hwndOwner, char *appname, void *buffer);
  49. static    MRESULT EXPENTRY SaverWindowProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2);
  50. static    MRESULT EXPENTRY ConfigureDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2);
  51. #if defined(__IBMC__) || defined(__EMX__)
  52. static    void    _Optlink draw_thread(void *args);
  53. static    void    _Optlink priority_thread(void *args);
  54. #elif defined(__BORLANDC__)
  55. static    void    _USERENTRY draw_thread(void *args);
  56. static    void    _USERENTRY priority_thread(void *args);
  57. #endif
  58. static    void    load_configuration_data(void);
  59. static    void    write_profile_data(void);
  60. static    ULONG    query_profile_data(void);
  61. ULONG    GPFHandler(PEXCEPTIONREPORTRECORD pxcptrec, PEXCEPTIONREGISTRATIONRECORD prr, PCONTEXTRECORD pcr, PVOID pv);
  62. void    print_contextrecord(FILE *logfile, PCONTEXTRECORD pcr);
  63.  
  64.  
  65. // ===== global data
  66.  
  67. ULONG    MODULESOURCE_VERSION = 0x00020003;    // EXPORTED: ScreenSaver 2.3/Pro 1.1 module source code (do not change)
  68.  
  69. static    LONG    screenSizeX = 0;        // screen size x
  70. static    LONG    screenSizeY = 0;        // screen size y
  71. static    HWND    hwndSaver = NULLHANDLE;     // saver window handle
  72. static    HMODULE hmodDLL = NULLHANDLE;        // saver module dll handle
  73. static    HWND    hwndApplication = NULLHANDLE;    // window handle if ScreenSaver options dialog (main window)
  74. static    char    *application_name;        // name of ScreenSaver app
  75. static    TID    tidDraw;            // drawing-thread ID
  76. static    TID    tidPriority;            // priority regulation thread ID
  77. static    HDC    hdc;                // device context handle
  78. static    HPS    hps;                // presentation space handle
  79. static    HAB    hab;                // anchor block handle
  80. static    BOOL    low_priority = TRUE;        // low-priority flag
  81. static    BOOL    configuration_data_loaded = FALSE; // config data loaded flag
  82. static    volatile BOOL stop_draw_thread;     // stop flag
  83. static    char    modulename[SAVER_NAME_MAXLEN+1]; // module name buffer
  84. static    volatile BOOL stop_priority_thread = FALSE;
  85. static    char    ini_filename[CCHMAXPATH] = "";  // name of INI file if other than OS2.INI
  86.  
  87. static    struct    _configuration_data {
  88.     ULONG    version;
  89.     char    modulename[SAVER_NAME_MAXLEN+1];
  90.     BOOL    enabled;
  91.     int    animation_speed;
  92. /*
  93.     $$$$$ insert code here $$$$$
  94.     If your saver module needs some additional configuration data,
  95.     insert it here. It is automatically loaded and saved.
  96.  
  97.     $$$$$ for example $$$$$
  98.     int    count;
  99. */
  100. } configuration_data;
  101.  
  102.  
  103. // ===== code
  104.  
  105. /*
  106.     GPFHandler - general protection fault exception handler
  107.     There should be no reason to alter the code.
  108. */
  109.  
  110. ULONG    GPFHandler(PEXCEPTIONREPORTRECORD pxcptrec, PEXCEPTIONREGISTRATIONRECORD prr, PCONTEXTRECORD pcr, PVOID pv)
  111. {
  112.     if(pxcptrec->ExceptionNum == XCPT_ACCESS_VIOLATION){
  113.         time_t    t;
  114.         FILE    *logfile = fopen("crash.log", "a");
  115.         t = time(NULL);
  116.         fprintf(logfile, "Module %s crashed at %s", modulename, ctime(&t));
  117.         fprintf(logfile, "ACCESS VIOLATION (xcpt # 0x%X)\n", (unsigned int)pxcptrec->ExceptionNum);
  118.         fprintf(logfile, "xcpt info[0] flags = 0x%02X\n", (unsigned int)pxcptrec->ExceptionInfo[0]);
  119.         fprintf(logfile, "xcpt info[1] faultaddr = 0x%08X\n", (unsigned int)pxcptrec->ExceptionInfo[1]);
  120.         print_contextrecord(logfile, pcr);
  121.         fclose(logfile);
  122.         WinPostMsg(hwndApplication, WMP_MODULECRASH, MPVOID, MPVOID);
  123.         _endthread();
  124. //          DosExit(EXIT_THREAD, 1);
  125.     }
  126.     return(XCPT_CONTINUE_SEARCH);
  127. }
  128.  
  129. /*
  130.     print_contextrecord - helper function for GPFHandler
  131.     There should be no reason to alter the code.
  132. */
  133. void    print_contextrecord(FILE *logfile, PCONTEXTRECORD pcr)
  134. {
  135.     fprintf(logfile, "  ContextFlags = 0x%08lX\n", pcr->ContextFlags);
  136.     if(pcr->ContextFlags & CONTEXT_SEGMENTS){
  137.         fprintf(logfile, "  GS = 0x%08lX\n", pcr->ctx_SegGs);
  138.         fprintf(logfile, "  FS = 0x%08lX\n", pcr->ctx_SegFs);
  139.         fprintf(logfile, "  ES = 0x%08lX\n", pcr->ctx_SegEs);
  140.         fprintf(logfile, "  DS = 0x%08lX\n", pcr->ctx_SegDs);
  141.     }
  142.     if(pcr->ContextFlags & CONTEXT_INTEGER){
  143.         fprintf(logfile, "  EAX = 0x%08lX\n", pcr->ctx_RegEax);
  144.         fprintf(logfile, "  EBX = 0x%08lX\n", pcr->ctx_RegEbx);
  145.         fprintf(logfile, "  ECX = 0x%08lX\n", pcr->ctx_RegEcx);
  146.         fprintf(logfile, "  EDX = 0x%08lX\n", pcr->ctx_RegEdx);
  147.         fprintf(logfile, "  EDI = 0x%08lX\n", pcr->ctx_RegEdi);
  148.         fprintf(logfile, "  ESI = 0x%08lX\n", pcr->ctx_RegEsi);
  149.     }
  150.     if(pcr->ContextFlags & CONTEXT_CONTROL){
  151.         fprintf(logfile, "  SS = 0x%08lX\n", pcr->ctx_SegSs);
  152.         fprintf(logfile, "  ESP = 0x%08lX\n", pcr->ctx_RegEsp);
  153.         fprintf(logfile, "  EBP = 0x%08lX\n", pcr->ctx_RegEbp);
  154.         fprintf(logfile, "  EFLAGS = 0x%08lX\n", pcr->ctx_EFlags);
  155.         fprintf(logfile, "  CS = 0x%08lX\n", pcr->ctx_SegCs);
  156.         fprintf(logfile, "  EIP = 0x%08lX\n", pcr->ctx_RegEip);
  157.     }
  158. }
  159.  
  160. /*
  161.     SAVER_PROC
  162.     This is the entry point into the saver module that is called by
  163.     the ScreenSaver program.
  164.     There should be no reason to alter the code.
  165.     Depending on the requested function, the following tasks
  166.     are performed:
  167.     * set the name of the INI file to store and query settings
  168.     * call the configuration dialog of the saver module
  169.     * copy the name of the saver module into the supplied buffer
  170.     * tell if the saver module is enabled
  171.     * set the "enabled" state of the saver module
  172.     * start the saver
  173.     * stop the saver
  174.     Note that before any processing is done, module configuration data is
  175.     loaded from the INI-files.
  176. */
  177. void    EXPENTRY SAVER_PROC(int function, HAB _hab, HWND hwndOwner, char *appname, void *buffer)
  178. {
  179. #if defined(__BORLANDC__)
  180.     extern ULONG __os2hmod;
  181.     hmodDLL = __os2hmod;
  182. #endif
  183.     hab = _hab;
  184.     application_name = appname;
  185.     hwndApplication = hwndOwner;
  186.     // load all configuration data from INI-file
  187.     if(function != FUNCTION_SETINIFILENAME)
  188.         load_configuration_data();
  189.     switch(function){
  190.     case FUNCTION_SETINIFILENAME:
  191.         if(buffer != NULL)
  192.             strcpy(ini_filename, (char *)buffer);
  193.         else
  194.             strcpy(ini_filename, "");
  195.         return;
  196.     case FUNCTION_CONFIGURE:
  197.         // call the configuration dialog
  198.         WinDlgBox(HWND_DESKTOP, hwndOwner, ConfigureDlgProc,
  199.           hmodDLL, IDD_CONFIGURE, application_name);
  200.         return;
  201.     case FUNCTION_STARTSAVER:
  202.         // start the saver
  203.         // get "low priority" state from supplied buffer (BOOL *)
  204.         low_priority = *((BOOL *)buffer);
  205.         // query size of screen
  206.         screenSizeX = WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN);
  207.         screenSizeY = WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN);
  208.         // register window class for the saver window
  209.         WinRegisterClass(hab, (PSZ)modulename,
  210.           (PFNWP)SaverWindowProc, 0, 0);
  211.         // create the saver window
  212.         hwndSaver = WinCreateWindow(HWND_DESKTOP, (PSZ)modulename,
  213.           (PSZ)NULL, WS_VISIBLE, 0, 0, screenSizeX, screenSizeY,
  214.           HWND_DESKTOP, HWND_TOP, 0, NULL, NULL);
  215.         return;
  216.     case FUNCTION_STOPSAVER:
  217.         // stop the saver
  218.         if(low_priority){
  219.             stop_priority_thread = TRUE;
  220.             DosSetPriority(PRTYS_THREAD, PRTYC_REGULAR, 0, tidPriority);
  221.             DosSetPriority(PRTYS_THREAD, PRTYC_REGULAR, 0, tidDraw);
  222.             DosWaitThread(&tidPriority, DCWW_WAIT);
  223. //              DosKillThread(tidPriority);    ***** kills thread 1 under OS/2 2.11
  224.         }
  225.         // tell drawing-thread to stop
  226.         stop_draw_thread = TRUE;
  227.         if(DosWaitThread(&tidDraw, DCWW_NOWAIT) == ERROR_THREAD_NOT_TERMINATED){
  228.             // if priority of drawing-thread was set to idle time
  229.             // priority, set it back to normal value
  230.             DosSetPriority(PRTYS_THREAD, PRTYC_REGULAR, PRTYD_MAXIMUM, tidDraw);
  231.             // wait until drawing-thread has ended
  232.             DosWaitThread(&tidDraw, DCWW_WAIT);
  233.         }
  234.  
  235.         if(hwndSaver != NULLHANDLE){
  236.             // move saver window to front
  237.             WinSetWindowPos(hwndSaver, HWND_TOP,
  238.               0, 0, 0, 0, SWP_ZORDER);
  239.             // destroy saver window
  240.             WinDestroyWindow(hwndSaver);
  241.             hwndSaver = NULLHANDLE;
  242.         }
  243.         return;
  244.     case FUNCTION_QUERYNAME:
  245.         // copy module name to supplied buffer (CHAR *)
  246.         strcpy(buffer, modulename);
  247.         return;
  248.     case FUNCTION_QUERYENABLED:
  249.         // copy "enabled" state to supplied buffer (BOOL *)
  250.         *((BOOL *)buffer) = configuration_data.enabled;
  251.         return;
  252.     case FUNCTION_SETENABLED:
  253.         // get new "enabled" state from supplied buffer (BOOL *)
  254.         configuration_data.enabled = *((BOOL *)buffer);
  255.         write_profile_data();
  256.         return;
  257.     }
  258.  
  259.     // illegal function request
  260.     WinAlarm(HWND_DESKTOP, WA_ERROR);
  261.     return;
  262. }
  263.  
  264. #if !defined(__BORLANDC__)
  265. /*
  266.     _DLL_InitTerm
  267.     This procedure is called at DLL initialization and termination.
  268.     There should be no reason to alter the code.
  269. */
  270. ULONG    _DLL_InitTerm(HMODULE hmod, ULONG flag)
  271. {
  272.     switch(flag){
  273.     case 0: // initializing DLL
  274.         hmodDLL = hmod;
  275.         return 1;
  276.     case 1: // terminating DLL
  277.         return 1;
  278.     default:
  279.         // return error
  280.         return 0;
  281.     }
  282. }
  283. #endif
  284.  
  285. /*
  286.     ConfigureDlgProc
  287.     This is the dialog procedure for the module configuration dialog.
  288.     The dialog contains a check box for enabling/disabling the module
  289.     and two push buttons ("OK" and "Cancel") to close/cancel the dialog.
  290.     Since version 1.2, it contains a slider to set the animation speed;
  291.     if you don't want this slider, change the '#if 0' line in the
  292.     WM_INITDLG part of this dialog procedure.
  293.  
  294.     This is enough for simple saver modules, but can easily be expanded
  295.     for more saver modules that need more settings.
  296. */
  297. MRESULT EXPENTRY ConfigureDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
  298. {
  299.     char    buf[sizeof(modulename)+20];
  300.     static    HWND    hwndEnabled;
  301.     static    HWND    hwndSpeed;
  302. /*
  303.     $$$$$ insert code here $$$$$
  304.     If you need additional data for dialog processing, insert it here.
  305.  
  306.     $$$$$ for example $$$$$
  307.     static    HWND    hwndCount;
  308. */
  309.     switch(msg){
  310.     case WM_INITDLG:
  311.         // set titlebar of the dialog window
  312.         // to "MODULENAME configuration"
  313.         strcpy(buf, modulename);
  314.         strcat(buf, " configuration");
  315.         WinSetWindowText(hwnd, (PSZ)buf);
  316.  
  317.         // get window handles of the dialog controls
  318.         // and set initial state of the controls
  319.         hwndEnabled = WinWindowFromID(hwnd, IDC_ENABLED);
  320.         WinSendMsg(hwndEnabled, BM_SETCHECK,
  321.           MPFROMLONG(configuration_data.enabled), MPVOID);
  322.         hwndSpeed = WinWindowFromID(hwnd, IDC_SPEED);
  323.         WinSendMsg(hwndSpeed, SLM_SETTICKSIZE, MPFROM2SHORT(SMA_SETALLTICKS, 3), MPVOID);
  324.         WinSendMsg(hwndSpeed, SLM_SETSLIDERINFO, MPFROM2SHORT(SMA_SLIDERARMPOSITION, SMA_INCREMENTVALUE), MPFROMLONG(configuration_data.animation_speed));
  325.         WinSendMsg(hwndSpeed, SLM_SETSCALETEXT, MPFROMSHORT(0), MPFROMP("slow"));
  326.         WinSendMsg(hwndSpeed, SLM_SETSCALETEXT, MPFROMSHORT(4), MPFROMP("fast"));
  327. /*
  328.         $$$$$ insert code here $$$$$
  329.         Get window handles of your dialog controls.
  330.         Set initial state of your controls.
  331.  
  332.         $$$$$ for example $$$$$
  333.         hwndCount = WinWindowFromID(hwnd, IDC_COUNT);
  334.         WinSendMsg(hwndCount, SPBM_SETLIMITS, (MPARAM)CONFIGURATION_MAXIMUM_COUNT, (MPARAM)CONFIGURATION_MINIMUM_COUNT);
  335.         WinSendMsg(hwndCount, SPBM_SETCURRENTVALUE, MPFROMLONG(configuration_data.count), MPVOID);
  336. */
  337. #if 0        // if yoy don't use speed setting, replace the 0 with a 1
  338.         WinShowWindow(WinWindowFromID(hwnd, IDC_SPEED), FALSE);
  339.         WinShowWindow(WinWindowFromID(hwnd, IDC_SPEEDTEXT), FALSE);
  340. #endif
  341.         // return FALSE since we did not change the focus
  342.         return (MRESULT)FALSE;
  343.     case WM_COMMAND:
  344.         switch(SHORT1FROMMP(mp1)){
  345.         case IDC_OK:
  346.             // OK button was pressed. query the control settings
  347.             configuration_data.enabled = SHORT1FROMMR(WinSendMsg(hwndEnabled, BM_QUERYCHECK, MPVOID, MPVOID));
  348.             configuration_data.animation_speed = SHORT1FROMMR(WinSendMsg(hwndSpeed, SLM_QUERYSLIDERINFO, MPFROM2SHORT(SMA_SLIDERARMPOSITION, SMA_INCREMENTVALUE), MPVOID));
  349. /*
  350.             $$$$$ insert code here $$$$$
  351.             Query control settings of your controls.
  352.  
  353.             $$$$$ for example $$$$$
  354.             WinSendMsg(hwndCount, SPBM_QUERYVALUE, MPFROMP(&configuration_data.count), MPFROM2SHORT(0, SPBQ_ALWAYSUPDATE));
  355. */
  356.             // write all configuration data to INI-file
  357.             write_profile_data();
  358.  
  359.             // end dialog
  360.             WinDismissDlg(hwnd, TRUE);
  361.             return (MRESULT)0;
  362.         case IDC_CANCEL:
  363.             // dialog was cancelled; end it
  364.             WinDismissDlg(hwnd, FALSE);
  365.             return (MRESULT)0;
  366.         default:
  367.             return (MRESULT)0;
  368.         }
  369.     }
  370.     return WinDefDlgProc(hwnd, msg, mp1, mp2);
  371. }
  372.  
  373. /*
  374.     SaverWindowProc
  375.     This is the window procedure of the screen-size window that is
  376.     created when the saver starts.
  377.     There should be no reason to alter the code.
  378.     Note that we do not process WM_PAINT messages. They are forwarded to
  379.     the default window procedure, which just validates the window area
  380.     and does no drawing. All drawing to the window should be done in
  381.     the drawing-thread. Therefore, if you want to blank the screen before
  382.     drawing on it for instance, issue a WinFillRect call at the beginning
  383.     of your drawing-thread.
  384. */
  385. MRESULT EXPENTRY SaverWindowProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
  386. {
  387.     static    SIZEL    pagesize={0, 0};
  388.     switch(msg){
  389.     case WM_CREATE:
  390.         // reset the "stop" flag
  391.         stop_draw_thread = FALSE;
  392.         // store window handle
  393.         hwndSaver = hwnd;
  394.         // get hdc and create normal presentation space
  395.         hdc = WinOpenWindowDC(hwnd);
  396.         hps = GpiCreatePS(hab, hdc, &pagesize, GPIA_ASSOC|PU_PELS|GPIT_NORMAL);
  397.         // start the drawing-thread
  398. /*
  399.         $$$$$ note $$$$$
  400.         Some compilers use another parameter ordering for
  401.         _beginthread. The _beginthread call below works with EMX,
  402.         ICC and BCC. Check your compiler docs for other compilers.
  403. */
  404. #if defined(__BORLANDC__)
  405.         // for Borland C++
  406.         tidDraw = _beginthread(draw_thread, STACKSIZE, NULL);
  407. #elif defined(__EMX__) || defined(__IBMC__)
  408.         // for EMX and ICC
  409.         tidDraw = _beginthread(draw_thread, NULL, STACKSIZE, NULL);
  410. #endif
  411.         // create thread to control priority of drawing thread
  412.         if(low_priority){
  413.             stop_priority_thread = FALSE;
  414.             DosCreateThread(&tidPriority, (PFNTHREAD)priority_thread, 0, 2L, 1000);
  415.         }
  416.         // create timer that moves the saver window to top regularly
  417.         WinStartTimer(hab, hwndSaver, IDT_ZORDERTIMER, ZORDERTIMERSTEP);
  418.         return (MRESULT)FALSE;
  419.     case WM_TIMER:
  420.         if(SHORT1FROMMP(mp1) == IDT_ZORDERTIMER){
  421.             // move saver window to top
  422.             WinSetWindowPos(hwnd, HWND_TOP, 0, 0, 0, 0, SWP_ZORDER);
  423.             return (MRESULT)0;
  424.         }
  425.         break;
  426.     case WM_DESTROY:
  427.         // destroy the presentation space
  428.         GpiDestroyPS(hps);
  429.         // stop the z-order timer
  430.         WinStopTimer(hab, hwndSaver, IDT_ZORDERTIMER);
  431.         break;
  432.     case WM_PAINT:
  433.         // just validate the update area. all drawing is done
  434.         // in the drawing-thread.
  435.         return WinDefWindowProc(hwnd, msg, mp1, mp2);
  436.     }
  437.     return WinDefWindowProc(hwnd, msg, mp1, mp2);
  438. }
  439.  
  440. /*
  441.     priority_thread
  442.     This thread controls the priority of the drawing thread.
  443.     With these changes, if a saver module runs on low priority (this is
  444.     the default setting), it rises to normal priority twice a second
  445.     for 0.1 seconds. This should solve the problem that, when very
  446.     time-consuming processes were running, the module seemed not to become
  447.     active at all (in fact it became active, but did not get enough CPU
  448.     time to do its saver action).
  449.     There should be no reason to alter the code.
  450. */
  451. void    priority_thread(void *args)
  452. {
  453.     DosSetPriority(PRTYS_THREAD, PRTYC_TIMECRITICAL, 0, 0);
  454.     for(;!stop_priority_thread;){
  455.         int    i;
  456.         DosSetPriority(PRTYS_THREAD, PRTYC_REGULAR, 0, tidDraw);
  457.         DosSleep(100);
  458.         DosSetPriority(PRTYS_THREAD, PRTYC_IDLETIME, 0, tidDraw);
  459.         for(i=0;!stop_priority_thread && i<4;i++)
  460.             DosSleep(100);
  461.     }
  462. }
  463.  
  464. /*
  465.     load_configuration_data
  466.     Load all module configuration data from the INI-file into the
  467.     configuration_data structure, if not done already loaded.
  468. */
  469. void    load_configuration_data(void)
  470. {
  471.     if(configuration_data_loaded == FALSE){
  472.         // data not loaded yet
  473.         ULONG    size;
  474.         // get name of the saver module (stored as resource string)
  475.         if(WinLoadString(hab, hmodDLL, IDS_MODULENAME,
  476.           SAVER_NAME_MAXLEN, (PSZ)modulename) == 0){
  477.             // resource string not found. indicate error by
  478.             // setting module name to empty string (the name
  479.             // "" is interpreted as an error by SSDLL.DLL and
  480.             // the module does not show up in the list box).
  481.             strcpy(modulename, "");
  482.             return;
  483.         }
  484.         // load data from INI-file. the key name is the name of the
  485.         // saver module
  486.         size = query_profile_data();
  487.         if(size != sizeof(configuration_data)
  488.           || configuration_data.version != MODULEVERSION
  489.           || strncmp(modulename, configuration_data.modulename, sizeof(modulename)) != 0){
  490.             // if entry is not found or entry has invalid size or
  491.             // entry has wrong version number, create a new entry
  492.             // with default values and write it to the INI-file
  493.             configuration_data.version = MODULEVERSION;
  494.             configuration_data.enabled = TRUE;
  495.             configuration_data.animation_speed = CONFIGURATION_DEFAULT_ANIMATIONSPEED;
  496.             strncpy(configuration_data.modulename, modulename, sizeof(configuration_data.modulename));
  497. /*
  498.             $$$$$ insert code here $$$$$
  499.             If you have added data to the configuration_data
  500.             structure, insert code here to set the default
  501.             values for your data items.
  502.  
  503.             $$$$$ for example $$$$$
  504.             configuration_data.count = CONFIGURATION_DEFAULT_COUNT;
  505. */
  506.             write_profile_data();
  507.         }
  508.         configuration_data_loaded = TRUE;
  509.     }
  510. }
  511.  
  512. /*
  513.     write_profile_data
  514.     Write configuration data to the selected INI file.
  515.     There should be no reason to alter the code.
  516. */
  517. void    write_profile_data()
  518. {
  519.     if(*ini_filename)
  520.         return;     // don't write if not OS2.INI
  521.  
  522.     PrfWriteProfileData(HINI_USER, (PSZ)application_name, (PSZ)modulename, (PSZ)&configuration_data, sizeof(configuration_data));
  523. }
  524.  
  525. /*
  526.     query_profile_data
  527.     Read configuration data from the selected INI file.
  528.     There should be no reason to alter the code.
  529. */
  530. ULONG    query_profile_data()
  531. {
  532.     HINI    ini_file;
  533.     BOOL    fSuccess;
  534.     ULONG    size;
  535.  
  536.     if(*ini_filename){
  537.         ini_file = PrfOpenProfile(hab, (PSZ)ini_filename);
  538.         if(ini_file == NULLHANDLE)
  539.             ini_file = HINI_USER;
  540.     }else
  541.         ini_file = HINI_USER;
  542.  
  543.     size = sizeof(configuration_data);
  544.     fSuccess = PrfQueryProfileData(ini_file,
  545.       (PSZ)application_name, (PSZ)modulename,
  546.       (PSZ)&configuration_data, &size);
  547.  
  548.     if(ini_file != HINI_USER)
  549.         PrfCloseProfile(ini_file);
  550.     if(fSuccess == FALSE)
  551.         return 0;
  552.     else
  553.         return size;
  554. }
  555.  
  556. /*
  557.     draw_thread
  558.     This is the drawing-thread.
  559.     You have a valid presentation space handle (hps), a valid window
  560.     handle (hwndSaver) and the configuration_data structure is loaded.
  561.     The screen size is stored in "screenSizeX" and "screenSizeY".
  562.     IMPORTANT NOTE 1:
  563.     You must check the "stop_draw_thread" flag regularly. If it is set,
  564.     free all resources you have allocated and call _endthread (or just
  565.     return) to end the drawing-thread.
  566.     IMPORTANT NOTE 2:
  567.     If the "low_priority" flag is NOT set (that means you run with
  568.     regular priority, sharing CPU usage with other programs), you should
  569.     call DosSleep(x) with "x" set at least to 1 as often as possible, to
  570.     allow other programs to do their work. A screen saver should not eat
  571.     up other program's CPU time!
  572.     IMPORTANT NOTE 3:
  573.     For some of the PM calls to work properly, your thread needs an
  574.     own HAB and maybe even a message queue. You have to get and release
  575.     both of them here if you use such PM calls.
  576.  
  577.     The following sample code is from the "Pyramids" module that comes
  578.     with the ScreenSaver distribution.
  579.     It selects a random color and a random point on the screen, then
  580.     draws lines in the selected color from each corner of the screen
  581.     to the selected point (looks somewhat like a pyramid).
  582.     It remembers a number of points (this number can be set in the
  583.     configuration dialog). Having filled the point memory, it redraws
  584.     the "oldest" visible pyramid in black. This has the effect that more
  585.     and more pixels on the screen get black, only a few constantly
  586.     changing colored lines remain.
  587. */
  588. void    draw_thread(void *args)
  589. {
  590. /*
  591.     $$$$$ replace or change the following example code $$$$$
  592.     int    i, j;
  593.     POINTL    pt_corner[4];
  594.     BOOL    point_buffer_filled;
  595.     POINTL    *pt;
  596.  
  597. //    HAB    drawingthread_hab = WinInitialize(0);
  598. //    HMQ    drawingthread_hmq = WinCreateMsgQueue(drawingthread_hab, 0);
  599.  
  600.     EXCEPTIONREGISTRATIONRECORD    xcpthand = { (PEXCEPTIONREGISTRATIONRECORD)0, GPFHandler };
  601.     DosSetExceptionHandler(&xcpthand) ;
  602.  
  603.     // random seed (needed for each thread)
  604.     srand(WinGetCurrentTime(hab));
  605.  
  606.     i = 0;
  607.     point_buffer_filled = FALSE;
  608.     // allocate stack memory for circular point buffer
  609.     pt = alloca(configuration_data.count * sizeof(POINTL));
  610.     if(pt == NULL){
  611.         DosUnsetExceptionHandler(&xcpthand);
  612.         _endthread();
  613.     }
  614.  
  615.     // set the corner coordinates
  616.     pt_corner[0].x = 0;
  617.     pt_corner[0].y = 0;
  618.     pt_corner[1].x = 0;
  619.     pt_corner[1].y = screenSizeY-1;
  620.     pt_corner[2].x = screenSizeX-1;
  621.     pt_corner[2].y = 0;
  622.     pt_corner[3].x = screenSizeX-1;
  623.     pt_corner[3].y = screenSizeY-1;
  624.  
  625.     while(!stop_draw_thread){
  626.         if(point_buffer_filled){
  627.             // redraw old pyramid in black
  628.             GpiSetColor(hps, CLR_BLACK);
  629.             for(j=0;j<4;j++){
  630.                 GpiMove(hps, &pt[i]);
  631.                 GpiLine(hps, &pt_corner[j]);
  632.             }
  633.         }
  634.  
  635.         // select random color
  636.         GpiSetColor(hps, ((unsigned)rand()) % 16);
  637.  
  638.         // select random point and store it in buffer
  639.         pt[i].x = ((unsigned)rand()) % screenSizeX;
  640.         pt[i].y = ((unsigned)rand()) % screenSizeY;
  641.  
  642.         // draw pyramid
  643.         for(j=0;j<4;j++){
  644.             GpiMove(hps, &pt[i]);
  645.             GpiLine(hps, &pt_corner[j]);
  646.         }
  647.  
  648.         // move circular buffer index
  649.         i++;
  650.         if(i == configuration_data.count)
  651.             point_buffer_filled = TRUE;
  652.         i %= configuration_data.count;
  653.  
  654.         // sleep if necessary
  655.         if(low_priority == FALSE)
  656.             DosSleep(1);
  657.  
  658.         // sleep if user requests slower animation
  659.         switch(configuration_data.animation_speed){
  660.         case 4: break;
  661.         case 3: DosSleep(10); break;
  662.         case 2: DosSleep(30); break;
  663.         case 1: DosSleep(50); break;
  664.         case 0: DosSleep(70); break;
  665.         }
  666.     }
  667.  
  668.     // free resources
  669.  
  670. //    WinDestroyMsgQueue(drawingthread_hmq);
  671. //    WinTerminate(drawingthread_hab);
  672.  
  673.     DosUnsetExceptionHandler(&xcpthand);
  674. */
  675.     _endthread();
  676. }
  677.