/*====================================================================*\
FILE    : TestInstall.c
PURPOSE : Check Pro/TOOLKIT installation

HISTORY..
DATE      BUILD   AUTHOR   MODIFICATIONS
19 Apr 96 G-03-11 Michael  $$1 Adapted from Pro/DEVELOP install test
08-MAY-96 G-03-12+ DLT     $$2 ProSreprule.h -> ProRule.h 
18-MAY-96 G-03-14+ Amin    $$3 Renamed header files
19-JUN-96 G-03-18  Amin    $$4 Renamed ProSecDimTypes.h ProSecdimType.h
13-Sep-96 H-01-08  Xuekai  $$5 ProErr => ProError
24-Sep-96 H-01-10  Xuekai  $$6 Remove "protk.h"
28-Sep-96 H-01-11  amin    $$7 ProElem.h -> ProElement.h
21-Oct-96 H-01-14  CHI     $$8 use PRODEV_PATH_SIZE for paths
23-Oct-96 H-01-14  Bojan   $$9 Fixed ProSimprepdata.h
26-Oct-96 H-01-15  amin   $$10 Removed ProAppfeature.h, ProSecinput.h,
                               ProFeatref.h, ProGroup.h ProConst.h
30-Oct-96 H-01-15  amin   $$11 Removed ProGpinput.h
12-Nov-96 H-01-16  amin   $$12 Removed ProUdfinput.h, ProSldfeatinput.h
                               ProSldfeatElem.h, ProFeatdef.h
19-Nov-96 H-01-17  mgs    $$13 Completely converted to Pro/TOOLKIT funcs
21-Nov-96 H-01-17  amin   $$14 Fix ProPeckTable.h => ProPecktable.h
04-Dec-96 H-01-19  amin   $$15 Changed order of arg for ProWstringToString
                               & ProStringToWstring
06-Dec-96 H-01-20  amin   $$16 ProCurrentTextAttributesGet ->
                                      ProTextAttributesCurrentGet
16-Dec-96 H-01-21  Bojan  $$17 Added all #includes, foreign lang, error macros.
18-Dec-96 H-01-21  amin   $$18 Removed call to ProCurrentTextAttributesSet
14-Apr-97 H-03-06  CHI    $$19 remove 1 xs #include
21-Jul-97 H-03-17  Pavel  $$20 Modified to add button to menu bar
24-Jul-97 H-03-17  Alexey $$21 Bug fixed
28-Jul-97 H-03-17  amin   $$22 Update arg list for ProCmdAction
12-Jan-98 H-03-36  ljl    $$23  Changed menubar function names
                    ProCmdAddAction() -> ProCmdActionAdd()
                    ProMenuAddPushButton() -> ProMenubarmenuPushbuttonAdd()
03-Fab-98 h-03-38  aab    $$24 Added all Pro/Toolkit include files
04-May-98 i-01-06  Pavel  $$25 Do not ProExtdatafile.h
29-Dec-98 I-01-28  Alexey $$26 Fix TEST_CALL_REPORTs to accept
        PRO_TK_BAD_CONTEXT as valid return value of ProMdlCurrentGet and
        all the return values of ProMessageStringRead.
05-Apr-00 J-01-06  CHI    $$27 Fix error printout
*====================================================================*/

/*--------------------------------------------------------------------*\
Pro/Toolkit includes
\*--------------------------------------------------------------------*/
#include<ProToolkit.h>
#include<Pro2dEntdef.h>
#include<ProANSI.h>
#include<ProAnimate.h>
#include<ProArray.h>
#include<ProAsmcomp.h>
#include<ProAsmcomppath.h>
#include<ProAssembly.h>
#include<ProAxis.h>
#include<ProChamfer.h>
#include<ProClCmd.h>
/*#include<ProClcmdElem.h>*/
#include<ProColor.h>
#include<ProComm.h>
#include<ProConst.h>
#include<ProContour.h>
#include<ProContourdata.h>
#include<ProCore.h>
#include<ProCsys.h>
#include<ProCsysdata.h>
#include<ProCurve.h>
#include<ProCurvedata.h>
#include<ProDatumdata.h>
#include<ProDisplist.h>
#include<ProDtmAxis.h>
#include<ProDtmCrv.h>
#include<ProDtmCrvSketch.h>
#include<ProDtmCsys.h>
#include<ProDtmPln.h>
#include<ProEdge.h>
#include<ProEdgedata.h>
#include<ProElemId.h>
#include<ProElement.h>
#include<ProElempath.h>
#include<ProExpldstate.h>
#include<ProExtdata.h>
#include<ProExtobj.h>
#include<ProExtobjCB.h>
#include<ProExtobjDisp.h>
#include<ProExtobjRef.h>
#include<ProExtobjSel.h>
#include<ProExtrude.h>
#include<ProFaminstance.h>
#include<ProFamtable.h>
#include<ProFeatForm.h>
#include<ProFeatType.h>
#include<ProFeature.h>
#include<ProFixture.h>
#include<ProFlatSrf.h>
#include<ProForeignCurve.h>
#include<ProGeomitem.h>
#include<ProGeomitemdata.h>
#include<ProGraphic.h>
#include<ProGroup.h>
#include<ProHardware.h>
#include<ProImportfeat.h>
#include<ProIntfData.h>
#include<ProItemerr.h>
#include<ProLayer.h>
#include<ProLayerR19.h>
#include<ProMaterial.h>
#include<ProMdl.h>
#include<ProMenu.h>
#include<ProMenuBar.h>
#include<ProMessage.h>
#include<ProMfg.h>
#include<ProMfgoper.h>
#include<ProModFeat.h>
#include<ProMode.h>
#include<ProModelitem.h>
#include<ProNcseq.h>
#include<ProNcseqElem.h>
#include<ProNote.h>
#include<ProNotify.h>
#include<ProObjects.h>
#include<ProParameter.h>
#include<ProParamval.h>
#include<ProPart.h>
#include<ProPattern.h>
#include<ProPecktable.h>
#include<ProPoint.h>
#include<ProProcstep.h>
#include<ProQuilt.h>
#include<ProQuiltdata.h>
#include<ProRelSet.h>
#include<ProReplace.h>
#include<ProRevolve.h>
#include<ProRmdt.h>
#include<ProRule.h>
#include<ProSecConstr.h>
#include<ProSecdim.h>
#include<ProSecdimType.h>
#include<ProSecerror.h>
#include<ProSection.h>
#include<ProSelection.h>
#include<ProSheetmetal.h>
#include<ProSimprep.h>
#include<ProSimprepdata.h>
#include<ProSizeConst.h>
#include<ProSolid.h>
#include<ProStdSection.h>
#include<ProSurface.h>
#include<ProSurfacedata.h>
#include<ProSweep.h>
#include<ProTool.h>
#include<ProToolElem.h>
#include<ProToolinput.h>
#include<ProUICmd.h>
#include<ProUtil.h>
#include<ProValue.h>
#include<ProVerstamp.h>
#include<ProView.h>
#include<ProWcell.h>
#include<ProWchar.h>
#include<ProWindows.h>
#include<ProWorkspace.h>
#include<ProWstring.h>

/*--------------------------------------------------------------------*\
Application includes
\*--------------------------------------------------------------------*/
#include "TestError.h"
#include <time.h>

/*--------------------------------------------------------------------*\
Application global/external data
\*--------------------------------------------------------------------*/
static wchar_t  MSGFIL[] = {'u','s','e','r','m','s','g','.','t','x','t','\0'};
static char revcode[PRO_LINE_SIZE];

static uiCmdAccessState TestAccessDefault(uiCmdAccessMode access_mode)
{
    return (ACCESS_AVAILABLE);
}

/*===========================================================================*\
  Function : main
  Purpose  : Test the ProToolkitMain() function. main is optional function.
\*===========================================================================*/
main(argc, argv)
int  argc;
char **argv;
{
    fprintf(stderr, "\n\tWelcome to Pro/TOOLKIT  -  The \"pt_install_test\" program\n");

    ProToolkitMain(argc, argv);

    return(0);
}


/*====================================================================*\
FUNCTION : user_initialize()
PURPOSE  : Pro/DEVELOP standard initialize - define menu button
\*====================================================================*/
int user_initialize(
    int argc,			
    char *argv[],
    char *version, 
    char *build,
    wchar_t errbuf[80])
{
    /* Declare function */
    int ProTestInstallationCheck();

    char cbuff1[PRO_PATH_SIZE], cbuff2[PRO_PATH_SIZE];
    char astr1[PRO_LINE_SIZE];
    int i, menu_id;
    ProPath wbuff1, wbuff2;
    ProError status;
    uiCmdCmdId	cmd_id;


/*---------------------------------------------------------------------*\
   Loging file open. 
\*---------------------------------------------------------------------*/
    if(argc > 4)
        ProTestErrlogOpen(argv[4], version, build);
    else
        ProTestErrlogOpen("pt_toolkit", version, build);


/*---------------------------------------------------------------------*\
    First confirm the size of wchar_t
\*---------------------------------------------------------------------*/
    status = ProWcharSizeVerify (sizeof (wchar_t), &i);
    TEST_CALL_REPORT("ProWcharSizeVerify", "user_initialize",
                      status, status != PRO_TK_NO_ERROR);

    if ( status != PRO_TK_NO_ERROR || (i != sizeof (wchar_t)) )
    {
         sprintf(astr1,"ERROR wchar_t Incorrect size (%d). Should be: %d",
		sizeof(wchar_t), i );
         status = ProMessageDisplay(MSGFIL, "USER %0s", astr1);
         TEST_CALL_REPORT("ProMessageDisplay", "user_initialize",
                           status, status != PRO_TK_NO_ERROR);

	 printf("%s\n", astr1);
	 ProStringToWstring(errbuf, astr1);
	 return(-1);
    }

/*---------------------------------------------------------------------*\
    Add new button to the menu bar
\*---------------------------------------------------------------------*/
    sprintf(revcode, "%s - %s", version, build);

    ProMessageDisplay( MSGFIL, "USER %0s", "" );
    status = ProCmdActionAdd("-Install Test",
	(uiCmdCmdActFn)ProTestInstallationCheck,
	uiProe2ndImmediate, TestAccessDefault,
	PRO_B_TRUE, PRO_B_TRUE, &cmd_id);
    TEST_CALL_REPORT("ProCmdActionAdd", "user_initialize",
                      status, status != PRO_TK_NO_ERROR);

    status = ProMenubarmenuPushbuttonAdd(
	"File", "-Install Test", "-Install Test", "Installation test",
	"File.psh_rename", PRO_B_TRUE, cmd_id, MSGFIL);
    TEST_CALL_REPORT("ProMenubarmenuPushbuttonAdd", "user_initialize",
                      status, status != PRO_TK_NO_ERROR);

    /*  Print the protk.dat  info  */
    status = ProToolkitApplExecPathGet(wbuff1);
    TEST_CALL_REPORT("ProToolkitApplExecPathGet", "user_initialize",
                      status, status != PRO_TK_NO_ERROR);

    status = ProToolkitApplTextPathGet(wbuff2);
    TEST_CALL_REPORT("ProToolkitApplTextPathGet", "user_initialize",
                      status, status != PRO_TK_NO_ERROR);

    ProWstringToString(cbuff1, wbuff1);
    ProWstringToString(cbuff2, wbuff2);
    printf("\n     Exec_path:  %s\n", cbuff1);
    printf("     Text_path:  %s\n\n", cbuff2);

    for(i=0; i<argc; i++)
        printf("   argv[%d]: %s\n", i, argv[i]);

    /* Upon success */
    return (0);

#if 0
    /* If unsuccessful, return non-zero.
     * You may store an error message in errbuf.
     * The return value and error message will be displayed to the user.
     * Pro/ENGINEER will call user_terminate() and shut down your application
     */
     ProStringToWstring(errbuf, "Sample error message");
     return(-1);
#endif
}

/*====================================================================*\
FUNCTION : user_terminate()
PURPOSE  : To handle any termination actions
\*====================================================================*/
void user_terminate()
{
/*---------------------------------------------------------------------*\
   Loging file close. 
\*---------------------------------------------------------------------*/
    ProTestErrlogClose();

    printf("user_terminate\n");
}

#define HEIGHT	35
#define GAP	6
#define DEC	5
/*====================================================================*\
FUNCTION : ProTestInstallationCheck
PURPOSE  : Draw graphics and call a Pro/TOOLKIT function 
\*====================================================================*/
int ProTestInstallationCheck()
{
    ProMdl model;
    ProError status = PRO_TK_BAD_INPUTS;
    ProPoint2d pnts[5];
    ProPoint3d pnt;
    ProTextAttribute attrs;
    ProColortype old_text_color;
    ProLine wtext;
    int n;
    time_t t;

    /* Draw the PTC logo */
    pnts[0][0] = pnts[3][0] = pnts[4][0] = 355;
    pnts[1][0] = pnts[2][0] = 595;
    pnts[2][1] = pnts[3][1] = 550;
    pnts[0][1] = pnts[1][1] = pnts[4][1] = pnts[2][1] + HEIGHT;
    for (n = 1; n < 7; n++)
    {
        status = ProGraphicsPolygonDraw(pnts, 5, PRO_COLOR_DRAWING);
        TEST_CALL_REPORT("ProGraphicsPolygonDraw", "ProTestInstallationCheck",
                          status, status != PRO_TK_NO_ERROR);

        pnts[2][1] = pnts[3][1] = pnts[0][1] + GAP;
        pnts[0][1] = pnts[1][1] = pnts[4][1] = pnts[2][1] + HEIGHT - DEC * n;
    }

    /* Draw & clear a rectangle to enclose the text */
    pnts[0][0] = pnts[3][0] = pnts[4][0] = 100;
    pnts[1][0] = pnts[2][0] = 850;
    pnts[0][1] = pnts[1][1] = pnts[4][1] = 500;
    pnts[2][1] = pnts[3][1] = 300;
    status = ProGraphicsPolygonDraw(pnts, 5, PRO_COLOR_BACKGROUND);
    TEST_CALL_REPORT("ProGraphicsPolygonDraw", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);

    /* Set the text attrs */
    status = ProTextAttributesCurrentGet(&attrs);
    TEST_CALL_REPORT("ProTextAttributesCurrentGet", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);

    attrs.height *= 3.0;
    attrs.width_factor *= .8;
    ProTextHeightCurrentSet(attrs.height);
    TEST_CALL_REPORT("ProTextHeightCurrentSet", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);
    ProTextWidthFactorCurrentSet(attrs.width_factor);
    TEST_CALL_REPORT("ProTextWidthFactorCurrentSet", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);

    status = ProTextColorSet(PRO_COLOR_LETTER, &old_text_color);
    TEST_CALL_REPORT("ProTextColorSet", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);


    /* Statement of purpose  */
    pnt[0] = 150;
    pnt[1] = 425;
    pnt[2] = 0;
    status = ProMessageToBuffer(wtext, MSGFIL, "USER Pro/TOOLKIT Installation Test");
    TEST_CALL_REPORT("ProMessageToBuffer", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);
    status = ProGraphicsTextDisplay(pnt, wtext);
    TEST_CALL_REPORT("ProGraphicsTextDisplay", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);

    /* Add time of day */
    t = time(NULL);
    ProStringToWstring(wtext, ctime(&t));
    pnt[1] -= 50;
    status = ProGraphicsTextDisplay(pnt, wtext);
    TEST_CALL_REPORT("ProGraphicsTextDisplay", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);

    /* Add revision code */
    ProStringToWstring(wtext, (char*) revcode);
    pnt[1] -= 50;
    status = ProGraphicsTextDisplay(pnt, wtext);
    TEST_CALL_REPORT("ProGraphicsTextDisplay", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);

    /* Add Welcome Message */
    pnt[0]  += -25;
    pnt[1] -= 150;
    status = ProMessageToBuffer(wtext, MSGFIL, "USER Welcome to the finest MCAE System");
    TEST_CALL_REPORT("ProMessageToBuffer", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);
    status = ProGraphicsTextDisplay(pnt, wtext);
    TEST_CALL_REPORT("ProGraphicsTextDisplay", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);

    pnt[0]  += 160;
    pnt[1] -= 50;
    status = ProMessageToBuffer(wtext, MSGFIL, "USER in the world !");
    TEST_CALL_REPORT("ProMessageToBuffer", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);
    status = ProGraphicsTextDisplay(pnt, wtext);
    TEST_CALL_REPORT("ProGraphicsTextDisplay", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);

    /* Re-Set the text color */
    attrs.height /= 3.0;
    attrs.width_factor /= .8;
    ProTextHeightCurrentSet(attrs.height);
    TEST_CALL_REPORT("ProTextHeightCurrentSet", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);
    ProTextWidthFactorCurrentSet(attrs.width_factor);
    TEST_CALL_REPORT("ProTextWidthFactorCurrentSet", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);
    status = ProTextColorSet(old_text_color, &old_text_color);
    TEST_CALL_REPORT("ProTextColorSet", "ProTestInstallationCheck",
                      status, status != PRO_TK_NO_ERROR);


    /* Call a token Pro/TOOLKIT feature */
    status = ProMdlCurrentGet(&model);
    TEST_CALL_REPORT("ProMdlCurrentGet", "ProTestInstallationCheck",
	status, status != PRO_TK_NO_ERROR && status != PRO_TK_BAD_CONTEXT );
    

    /* Scroll one line in the message window and display install message. */
    ProMessageClear();

    if (status == PRO_TK_BAD_CONTEXT || status == PRO_TK_NO_ERROR )
    {
       status = ProMessageDisplay(MSGFIL, "USER The installation test works");
       TEST_CALL_REPORT("ProMessageDisplay", "ProTestInstallationCheck",
                         status, status != PRO_TK_NO_ERROR);
    }
    else
    {
       status = ProMessageDisplay(MSGFIL, "User %0s",
                                 "Error - ProMdlCurrentGet returns bad status");
       TEST_CALL_REPORT("ProMessageDisplay", "ProTestInstallationCheck",
                         status, status != PRO_TK_NO_ERROR);
    }

    status = ProMessageStringRead(PRO_NAME_SIZE, wtext);
    TEST_CALL_REPORT("ProMessageStringRead", "ProTestInstallationCheck",
	status, 
	status != PRO_TK_NO_ERROR && 
	status != PRO_TK_MSG_USER_QUIT && 
	status != PRO_TK_GENERAL_ERROR );

  return (1);
}