Entry point object

For objects that mark the "entry point" or that we use as the first object we open when we connect to a database, we have to store them in a special list within the storage. Such "entry points" are called "named objects" in DataFS because we give the object a unique GUID, which will be its "name".

Tutorial.cpp

Tutorial.cs

const GUID guidEntryPoint
{ 0x71e456a5, 0x6a4e, 0x46aa, { 0xa7, 0x27, 0x10, 0x5d, 0x58, 0x4c, 0x79, 0x17 } };

public static readonly Guid guidEntryPoint = new Guid("71E456A5-6A4E-46aa-A727-105D584C7917");

About links

An object in DataFS only exists if it is sustainably linked from somewhere. There are also lazy links, which do not sustain the object the link points to. This means that lazy-linked objects have to be sustainably linked from somewhere else, or the object will be deleted.

Create an object and link it

First, we create a new object without any relations to another object.

WSupplies* pSupplies;
WSupplies::Create(&pSupplies, pDomain, &DataFS::OBJECTID_NULL);

WSupplies pSupplies;
WSupplies.Create(out pSupplies, pDomain, DataFS.ObjectId.OBJECTID_NULL);

Then, make it an entry point or a named object using the InsertNamedObjectInsertNamedObject function. The GUID or name of the named object must be unique, and no two objects can be named with the same GUID.

We can use the "BuildLink" function to build the necessary parameter for the function call. By passing true as the parameter we specify, this link is a sustainable link and not a lazy link.

pDomain->InsertNamedLink(&pSupplies->BuildLink(true), &guidEntryPoint, L"basic entry point");

pDomain.InsertNamedLink(pSupplies.BuildLink(true), guidEntryPoint, "basic entry point", Transaction.Store);

Open a named object

If we later want to open our "Supplies" object again, we need to find out its ObjectID first (not to be confused with the GUID). There are several functions available to do this. One is the QueryNamedLinkQueryNamedLink function that we will use now.

DataFS::stcObjectLink* pSuppliesLink;
pDomain->QueryNamedLink(&guidEntryPoint, 1, &pSuppliesLink, NULL);

WSupplies* pSupplies = NULL;
WSupplies::Open(&pSupplies, pDomain, *pSuppliesLink);

DataFS.Array<DataFS.stcObjectLink> apSuppliesLink = new DataFS.Array<DataFS.stcObjectLink>();
pDomain.QueryNamedLink(aguidEntryPoint, apSuppliesLink, null);

WSupplies pSupplies = null;
WSupplies.Open(out pSupplies, pDomain, apSuppliesLink.pData[0].oiObjectId, 0, Transaction.Load);

Final code

The code in our main file for opening the Inventory might look something like the next code segment.

Tutorial.cpp

Tutorial.cs

WSupplies* pSupplies = NULL;

DataFS::stcObjectLink* pSuppliesLink;
if(S_OK == pDomain->QueryNamedLink(&guidEntryPoint, 1, &pSuppliesLink, NULL))
{
	if(WSupplies::IsOfType(pSuppliesLink))
	{
		WSupplies::Open(&pSupplies, pDomain, *pSuppliesLink);
		pSupplies->Load();

		DataFSAccess::MemFree(pSuppliesLink);

		if(FAILED(pDomain->Execute(Transaction::Load, NULL)))
		{
			wprintf(L"Execute failed...\n");
			uninit(pConnection, pDomain, ulStorageId);
			return -1;
		}
	}
	else
	{
		DataFSAccess::MemFree(pSuppliesLink);

		wprintf(L"Object is not of type WSupplies\n");
	}
}
else
{
	WSupplies::Create(&pSupplies, pDomain, &DataFS::OBJECTID_NULL);

	pDomain->InsertNamedLink(&pSupplies->BuildLink(true), &guidEntryPoint, L"basic entry point");

	// Store
	pSupplies->Store();

	// Execute
	HRESULT hRes;
	if(FAILED(hRes = pDomain->Execute(Transaction::Store, NULL)))
	{
		wprintf(L"Domain failed to execute the transaction (0x%x)\n", hRes);

		pSupplies->Release();
		pSupplies = NULL;
	}
}

WSupplies pSupplies = null;

DataFS.Array<DataFS.stcObjectLink> apSuppliesLink = new DataFS.Array<DataFS.stcObjectLink>();
if (0 == pDomain.QueryNamedLink(aguidEntryPoint, apSuppliesLink, null))
{
	if (WSupplies.IsOfType(apSuppliesLink.pData[0]))
	{
		WSupplies.Open(out pSupplies, pDomain, apSuppliesLink.pData[0].oiObjectId, 0, Transaction.Load);
		pSupplies.Load(_WSupplies.ALL_ATTRIBUTES, Transaction.Load);

		if (0 > pDomain.Execute(Transaction.Load, null))
		{
			Console.WriteLine("Execute failed...");
			uninit(pDomain, ulStorageId);
			return;
		}
	}
	else
		Console.WriteLine("Object is not of type WSupplies");
}
else
{
	WSupplies.Create(out pSupplies, pDomain, DataFS.ObjectId.OBJECTID_NULL);

	pDomain.InsertNamedLink(pSupplies.BuildLink(true), guidEntryPoint, "basic entry point", Transaction.Store);

	// Store
	pSupplies.Store(Transaction.Store);

	// Execute
	int hRes;
	if (0 > (hRes = pDomain.Execute(Transaction.Store, null)))
	{
		Console.WriteLine("Domain failed to execute the transaction (0x{0:x})", hRes);

		pSupplies = null;
	}
}