80 lines
2.2 KiB
C++
80 lines
2.2 KiB
C++
|
//+---------------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Microsoft Windows
|
||
|
|
// Copyright (C) Microsoft Corporation, 1992 - 1993.
|
||
|
|
//
|
||
|
|
// File: memt.cxx
|
||
|
|
//
|
||
|
|
// Contents: Basic memory leak check
|
||
|
|
//
|
||
|
|
// History: 03-Sep-93 DrewB Created
|
||
|
|
//
|
||
|
|
//----------------------------------------------------------------------------
|
||
|
|
|
||
|
|
#include "pch.cxx"
|
||
|
|
#pragma hdrstop
|
||
|
|
|
||
|
|
void _CRTAPI1 main(int argc, char *argv[])
|
||
|
|
{
|
||
|
|
IStorage *pstg, *pstgEm;
|
||
|
|
IStream *pstRt, *pstEm;
|
||
|
|
HRESULT hr;
|
||
|
|
|
||
|
|
StartTest("memt");
|
||
|
|
CmdArgs(argc, argv);
|
||
|
|
|
||
|
|
CreateTestFile(NULL, ROOTP(STGM_RW) | STGM_CREATE, FALSE, &pstg, NULL);
|
||
|
|
hr = pstg->CreateStream(TTEXT("TestSt"), STMP(STGM_RW) |
|
||
|
|
STGM_FAILIFTHERE, 0, 0, &pstRt);
|
||
|
|
Result(hr, "Create root stream");
|
||
|
|
hr = pstg->CreateStorage(TTEXT("TEST"), STGP(STGM_RW) |
|
||
|
|
STGM_FAILIFTHERE, 0, 0, &pstgEm);
|
||
|
|
Result(hr, "Create embedded docfile");
|
||
|
|
hr = pstgEm->CreateStream(TTEXT("TestEmSt"), STMP(STGM_RW) |
|
||
|
|
STGM_FAILIFTHERE, 0, 0, &pstEm);
|
||
|
|
Result(hr, "Create embedded stream");
|
||
|
|
|
||
|
|
#if DBG == 1
|
||
|
|
printf("Memory used = %ld\n", DfGetMemAlloced());
|
||
|
|
#endif
|
||
|
|
|
||
|
|
hr = pstEm->Commit(0);
|
||
|
|
Result(hr, "Commit embedded stream");
|
||
|
|
pstEm->Release();
|
||
|
|
|
||
|
|
hr = pstgEm->Commit(0);
|
||
|
|
Result(hr, "Commit embedded docfile");
|
||
|
|
pstgEm->Release();
|
||
|
|
|
||
|
|
hr = pstRt->Commit(0);
|
||
|
|
Result(hr, "Commit root stream");
|
||
|
|
pstRt->Release();
|
||
|
|
|
||
|
|
hr = pstg->Commit(0);
|
||
|
|
Result(hr, "Commit root docfile");
|
||
|
|
pstg->Release();
|
||
|
|
|
||
|
|
CheckMemory();
|
||
|
|
|
||
|
|
OpenTestFile(NULL, ROOTP(STGM_RW), FALSE, &pstg, NULL);
|
||
|
|
hr = pstg->OpenStream(TTEXT("TestSt"), NULL, STMP(STGM_RW), 0, &pstRt);
|
||
|
|
Result(hr, "Open root stream");
|
||
|
|
hr = pstg->OpenStorage(TTEXT("TEST"), NULL, STGP(STGM_RW),
|
||
|
|
NULL, 0, &pstgEm);
|
||
|
|
Result(hr, "Open embedded docfile");
|
||
|
|
hr = pstgEm->OpenStream(TTEXT("TestEmSt"), NULL,
|
||
|
|
STMP(STGM_RW), 0, &pstEm);
|
||
|
|
Result(hr, "Open embedded stream");
|
||
|
|
|
||
|
|
#if DBG == 1
|
||
|
|
printf("Memory used = %ld\n", DfGetMemAlloced());
|
||
|
|
#endif
|
||
|
|
|
||
|
|
pstEm->Release();
|
||
|
|
pstgEm->Release();
|
||
|
|
pstRt->Release();
|
||
|
|
pstg->Release();
|
||
|
|
|
||
|
|
EndTest(0);
|
||
|
|
}
|