mORMot Open Source

mORMot and DDD changed my mind. Now, I have two data models, one for database aggregation with simple types (Arrays and records) and another model for frontend representation and logic (ObjectList, Methods). It's better to separate models than have only one model for logic and aggregation. Correct me Arnaud if I am wrong.

No, we are using bare TCP THTTPServer because Azure AppServices applications can't use administrator called apis... But we have an IIS proxy (ARR) above. Our constructor is called with 256 value on threadpool parameter.

Thank you very much! Very nice way to deploy custom .exe WebServers using IIS as frontend web server.

Currently I'm using LinuxMint and Ubuntu + Debian. With NewPascal of course

FPC is the way to go I am migrating my projects to it. Compiler is getting strong and native cross-platform cross-architecture support. Some day in the future FPC will be the natural replacement to Delphi. IMHO.

Great! Thank you very much!

GetBooks is fired when you need to get the books of the student at runtime. ( StudentInstance.GetBooks ).

The purpose of TArrayHelper is a simple helper of arrays using Synopse awesome dynamic array wrapper.

Thanks Arnaud I appreciate your fast response

I will use another pattern/method to populate non persistent values.

Hi,

You need to study all samples embedded and learn how all layers of mORMot works. Your project is one of the easiest projects to achieve, but we can't help you to write all the code for it.

You need server side (the most important thing) a REST Server with persistence SQLite3 for example (you can implement TSQLRestServerDB with a TSQLHttpServer). And on the client side you will need a consumer TSQLHttpClient.

Useful after TRUNCATE or masive delete of pages, VACUMM works well to free database pages.

I made this working using mORMot HTTPApiSockets fork without problems.

More documentation here : https://github.com/projectkudu/kudu/wik … pp-sandbox

Not at all. HTTP_PLATFORM_PORT is not a enviroment variable... I tried to do and nothing found.

PS D:\home> echo %HTTP_PLATFORM_PORT% 

MS is hiding things and wants you code in .NET and popular languajes like JS with Node. But no... I continue to do things natively with C++ and Object Pascal.

Did!

We are using autoscalable Azure App Services (not VM's).

What do you need to know about this?

  - You have an sandbox enviorment with an IIS acting like a proxy. ex. x.x.x.x:80 -> 127.0.0.1:25000
  - You do not control any machine or VM.
  - You can control vertical and horizontal scalability.
  - You can't do administrative actions on your server.
  - Every console out on your program will be flushed on log file.
  - Your application needs to accept parameters (paramstr[1] -> TCP port forwarded by IIS)
  - You need to bind server on 127.0.0.1 with paramstr[1]

(Only works with non-based HTTPApiServer because you have an IIS-Proxy above)

Here are the instructions :

- Compile your custom .exe HTTP server
- Upload exe to /site/wwwroot folder
- Generate a webconfig file at /site/wwwroot folder with the next content :

<?xml version="1.0" encoding="UTF-8"?>
<configuration>
  <system.webServer>
    <handlers>
      <remove name="httpplatformhandler" />
      <add name="httpplatformhandler" path="*" verb="*" modules="httpPlatformHandler" resourceType="Unspecified"/>
    </handlers>
    <httpPlatform stdoutLogEnabled="true" stdoutLogFile=".\YOUREXE.log" startupTimeLimit="20" processPath="%HOME%\site\wwwroot\YOUR EXE" arguments="%HTTP_PLATFORM_PORT%"/>
  </system.webServer>
</configuration>

- Restart azure AppService instance
- Open a HTTP/s request to your service
- Voilà

How can be faster binary compiled with Delphi 7 than 10.1?

Obviously it is not a replacement... but a way to share realtime experience and thoughts about this framework. For example know better the community

No problem mohsenti

What is your mORMot goal? What do you need to achieve? mORMot's JSON Serializer is very easy to understand (i think) what is your problem with serializer? I can help you if you want.

Where is this Unit? I'm very interested to use your implementation.

Problem comes this way at SynBidirSock.pas

  prot.fRemoteIP := ClientSock.RemoteIP;
  prot.fRemoteLocalhost := ClientSock.RemoteIP='127.0.0.1';
  extin := ClientSock.HeaderValue('Sec-WebSocket-Extensions');
  if extin<>'' then begin
    CSVToRawUTF8DynArray(pointer(extin),extins,';',true);
    if not prot.ProcessHandshake(extins,extout,nil) then begin
      prot.Free;
      result := STATUS_UNAUTHORIZED;
      exit;
    end;
  end;

I'm going to compare IExplorer requests with Chrome and Firefox.

Solved by this way : http://pastebin.com/UrMHSneL

Another question... Chrome and Firefox returns a 401 and 400 when try to access : http://localhost:8888/whatever/

IExplorer goes well.