#define INCL_DOS
#define INCL_WIN
#define INCL_GPI

#include <os2.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <stddef.h>
#include "fm3dll.h"
#include "fm3dlg.h"
#include "fm3str.h"

#pragma alloc_text(OBJWIN,ObjectWndProc,MakeObjWin)


MRESULT EXPENTRY ObjectWndProc (HWND hwnd,ULONG msg,MPARAM mp1,MPARAM mp2) {

  DIRCNRDATA *dcd;

  dcd = WinQueryWindowPtr(hwnd,0);
  if(dcd) {
    switch(dcd->type) {
      case DIR_FRAME:
        return DirObjWndProc(hwnd,msg,mp1,mp2);
      case TREE_FRAME:
        return TreeObjWndProc(hwnd,msg,mp1,mp2);
      case COLLECTOR_FRAME:
        return CollectorObjWndProc(hwnd,msg,mp1,mp2);
      case ARC_FRAME:
        return ArcObjWndProc(hwnd,msg,mp1,mp2);
    }
  }
  return WinDefWindowProc(hwnd,msg,mp1,mp2);
}


VOID MakeObjWin (VOID *args) {

  HWND        ObjectHwnd;
  HAB         hab2;
  HMQ         hmq2;
  QMSG        qmsg2;

  hab2 = WinInitialize(0);
  if(hab2) {
    hmq2 = WinCreateMsgQueue(hab2,512);
    if(hmq2) {
      DosError(FERR_DISABLEHARDERR);
      WinRegisterClass(hab2,
                       GetPString(IDS_WCOBJECTWINDOW),
                       ObjectWndProc,
                       0,
                       sizeof(PVOID));
      ObjectHwnd = WinCreateWindow(HWND_OBJECT,
                                   GetPString(IDS_WCOBJECTWINDOW),
                                   (PSZ)NULL,
                                   0,
                                   0L,
                                   0L,
                                   0L,
                                   0L,
                                   0L,
                                   HWND_TOP,
                                   OBJ_FRAME,
                                   NULL,
                                   NULL);
      if(ObjectHwnd) {
        WinSetWindowPtr(ObjectHwnd,0,args);
        /* initially populate container */
        WinSendMsg(ObjectHwnd,UM_SETUP,MPVOID,MPVOID);
        PostMsg(ObjectHwnd,UM_RESCAN,MPVOID,MPVOID);
        priority_normal();
        while(WinGetMsg(hab2,&qmsg2,(HWND)0,0,0))
          WinDispatchMsg(hab2,&qmsg2);
        WinDestroyWindow(ObjectHwnd);
      }
      WinDestroyMsgQueue(hmq2);
    }
    WinTerminate(hab2);
  }
}