mORMot Open Source

The database server is just a standard MySQL database server. The tricky part is that - there is a separate, independent service not under my control which will constantly check the database server, and if the relevant tables have not been rotated (for example, at the beginning midnight of a new rotation time such as start of a new month), that service will CREATE new rotated table automatically.  This process is not controlled or managed within mORMot framework.

So, from mORMot side,  if the target table has already been rotated, it will do nothing and just connect to that table.  If the table SHOULD have been rotated, but has NOT been,  mORMot will create a new rotated table.  Is this doable?  Any advice?  Or there is some fundamental problem with the overall scheme?

Thank you for the heads up.  I am looking at the documentation.  For helping dummy users like me to jump start - would it be possible to have a demo project to illustrate the usage?

I would like to have both the Server, and Client in the same process, thus in the following code, which client class had I best use?

var
  client: TSQLRest;
  server: TSQLRestServerDB;
  model: TSQLModel;
begin
  model := TSQLModel.Create([TSQLAuthUser, TSQLAuthGroup]);
  server := TSQLRestServerDB.Create(model, 'test.db3', False);
  client := ?.Create()    // Which proper client class should I use?
  ... ...
end;

Thank you for the heads up.  I edited the post and removed the source code.   The source code is now posted at gist.

Update:  previous testing results are 64bit.  I switched to 32 bit, and mORMot virtual table seems to have better performance.

To insert 100000 records

FDMemTable Rio 10.3 UP1   -  187 ms
UniDAC Virtual Table v7.4.12 - 195 ms
mORMot TSQLRestServerFullMemory - 178 ms
DevExpress MemDataTable - 155 ms

So not bad.  I am a bit surprise that DevExpress TMemData is so fast.

I tried to compare the performance of mORMot In Memory server versus UniDAC TVirtualTable. 

Here is the code:

**** For UniDAC **********
FUniDacVirtualTable.Clear;
  FUniDacVirtualTable.Open;

  BeginTest(Sender);
 
  FUniDacVirtualTable.DisableControls;
  try
    Field1 := FUniDacVirtualTable.FieldByName('ID');
    Field2 := FUniDacVirtualTable.FieldByName('Status');
    Field3 := FUniDacVirtualTable.FieldByName('Created');
    Field4 := FUniDacVirtualTable.FieldByName('Volume');

    for I := 1 to 100000 do
    begin
        FUniDacVirtualTable.Insert;
        Field1.AsInteger := I;
        Field2.AsString := 'Code' + IntToStr(I);
        Field3.AsDateTime := Date();
        Field4.AsFloat := Random(10000);
        FUniDacVirtualTable.Post;
    end;
  finally
    FUniDacVirtualTable.EnableControls;
    EndTest(Sender);
  end;
end;

******* For mORMot ***********

procedure TForm1.btnmORMotTestClick(Sender: TObject);
var
  I: Integer;
  recData: TmORMotTestRecord;
  IDs: TIDDynArray;
  restClient: TSQLRestClientDB;
  model: TSQLModel;
begin
  model := TSQLModel.Create([TmORMotTestRecord]);
  model.VirtualTableRegister(TmORMotTestRecord, TSQLVirtualTableBinary);
  restClient := TSQLRestClientDB.Create(model, nil, 'mORMotTes.data', TSQLRestServer. False, '');
  restClient.Server.CreateMissingTables;
  recData := TmORMotTestRecord.Create;

  BeginTest(Sender);
  try
    restClient.BatchStart(TmORMotTable);
    for I := 1 to 100000 do
    begin
      with recData do
      begin
        SeqID := I;
        Status := 'Code' + IntToStr(I);
        CreatedDate := Now;
        Volume := Random(10000);
      end;

      restClient.BatchAdd(recData, True);
    end;
    restClient.BatchSend(IDs);
  finally
    EndTest(Sender);
    recData.Free;
  end;
end;

------------------
The result is
UniDac: 208 ms
mORMoT: 265 ms

What am I missing here?  I expect mORMot to be faster!  Why it is slower than UniDAC's virtual table?

Also - how can I Save the data to File?  restClient.Server.StaticVirtualTable[TmORMotTestRecord].UpdateToFile doesn't exist.
       - Again, how can I load the data from a file?  I am asking because I want to bench marking the data loading time versus UniDAC's virtual table.
       -  How to save to a stream? Load from a stream?

Hi edwinsn - it is a simulation application for academic use.

i did, and got lost by the document. It is not beginner friendly.

the PROJECT01 used it standalone, is it the right way to have a fast in memory single table db? What you said made me more confused

Thank you again. How can I automatically generate the mab file (as a post build event) and merge the exe/DLL with the mab file?