Dodal sem še tabele Binary, CustomAction in InstallExecuteSequence ter usposobil pripravo namestitvenega paketa, da lahko začnem s pravim razvojem orodja MSITSCA.dll.

MSICALib/MSI/Makefile

@@ -1,6 +1,13 @@
 !INCLUDE "..\..\include\MSINast.mak"
 
 #MSM_IMA_LOKALIZACIJO=1
+!IF "$(CFG)" == "ReleaseU"
+CFG_VC=Unicode Release
+!ELSEIF "$(CFG)" == "DebugU"
+CFG_VC=Unicode Debug
+!ELSE
+CFG_VC=$(CFG)
+!ENDIF
 
 
 ######################################################################
@@ -46,6 +53,62 @@ TaskTrigger	Task_	N			ScheduledTask	1	Identifier		Key of the Trigger's task.
 <<NOKEEP
 
 
+######################################################################
+# Binary
+
+Vse :: \
+	"$(JEZIK).$(CFG).$(PLAT).Binary-1.idt" \
+	"$(JEZIK).$(CFG).$(PLAT).Binary-1\MSITSCA.dll"
+
+"$(JEZIK).$(CFG).$(PLAT).Binary-1.idt" : "Makefile" "..\..\include\MSINast.mak" "$(JEZIK).$(CFG).$(PLAT).Binary-1"
+	-if exist $@ del /f /q $@
+	move /y << $@ > NUL
+Name	Data
+s$(MSI_TIP_ID)	v0
+Binary	Name
+binMSITSCA.dll	MSITSCA.dll
+<<NOKEEP
+
+"$(JEZIK).$(CFG).$(PLAT).Binary-1\MSITSCA.dll" : "..\..\Test\$(CFG_VC).$(PLAT)\MSITSCA.dll"
+	copy /y $** $@ > NUL
+
+
+######################################################################
+# CustomAction
+
+Vse :: "$(JEZIK).$(CFG).$(PLAT).CustomAction-1.idt"
+
+"$(JEZIK).$(CFG).$(PLAT).CustomAction-1.idt" : "Makefile" "..\..\include\MSINast.mak"
+	-if exist $@ del /f /q $@
+	move /y << $@ > NUL
+Action	Type	Source	Target
+s$(MSI_TIP_ID)	i2	S$(MSI_TIP_ID)	S255
+CustomAction	Action
+caEvaluateScheduledTasks	1	binMSITSCA.dll	EvaluateScheduledTasks
+caInstallScheduledTasks	1025	binMSITSCA.dll	InstallScheduledTasks
+caRollbackScheduledTasks	1281	binMSITSCA.dll	RollbackScheduledTasks
+caCommitScheduledTasks	1537	binMSITSCA.dll	CommitScheduledTasks
+<<NOKEEP
+
+
+######################################################################
+# InstallExecuteSequence
+
+Vse :: "$(JEZIK).$(CFG).$(PLAT).InstallExecuteSequence-1.idt"
+
+"$(JEZIK).$(CFG).$(PLAT).InstallExecuteSequence-1.idt" : "Makefile" "..\..\include\MSINast.mak"
+	-if exist $@ del /f /q $@
+	move /y << $@ > NUL
+Action	Condition	Sequence
+s$(MSI_TIP_ID)	S255	I2
+InstallExecuteSequence	Action
+caEvaluateScheduledTasks		6580
+caInstallScheduledTasks		6581
+caRollbackScheduledTasks		6582
+caCommitScheduledTasks		6583
+<<NOKEEP
+
+
 ######################################################################
 # ScheduledTask
 

MSICALib/MSITSCA.cpp

@@ -78,7 +78,10 @@ UINT MSITSCA_API CommitScheduledTasks(MSIHANDLE hInstall)
 
     UINT uiResult;
     BOOL bIsCoInitialized = SUCCEEDED(::CoInitialize(NULL));
+    CString msg;
 
+    msg.Format(_T("Pripni razhrošèevalnik na proces %u."), ::GetCurrentProcessId());
+    ::MessageBox(NULL, msg, _T("MSITSCA"), MB_OK);
     uiResult = ERROR_SUCCESS;
 
     if (bIsCoInitialized) ::CoUninitialize();
@@ -91,21 +94,6 @@ UINT MSITSCA_API RollbackScheduledTasks(MSIHANDLE hInstall)
     UNREFERENCED_PARAMETER(hInstall);
     assert(::MsiGetMode(hInstall, MSIRUNMODE_ROLLBACK));
 
-    UINT uiResult;
-    BOOL bIsCoInitialized = SUCCEEDED(::CoInitialize(NULL));
-
-    uiResult = ERROR_SUCCESS;
-
-    if (bIsCoInitialized) ::CoUninitialize();
-    return uiResult;
-}
-
-
-
-UINT MSITSCA_API RemoveScheduledTasks(MSIHANDLE hInstall)
-{
-    UNREFERENCED_PARAMETER(hInstall);
-
     UINT uiResult;
     BOOL bIsCoInitialized = SUCCEEDED(::CoInitialize(NULL));
     CString msg;

MSICALib/MSITSCA.h

@@ -49,10 +49,10 @@
 extern "C" {
 #endif
 
+    UINT MSITSCA_API EvaluateScheduledTasks(MSIHANDLE hInstall);
     UINT MSITSCA_API InstallScheduledTasks(MSIHANDLE hInstall);
     UINT MSITSCA_API CommitScheduledTasks(MSIHANDLE hInstall);
     UINT MSITSCA_API RollbackScheduledTasks(MSIHANDLE hInstall);
-    UINT MSITSCA_API RemoveScheduledTasks(MSIHANDLE hInstall);
 
 #ifdef __cplusplus
 }