mORMot Open Source

Thank you I found the solution: I had to to set AServer.RootRedirectGet which wasn’t required before.

One Question where can i set this Option globally ?

atm i us a SOA call which gives blob for guid to solve problem

Hi Arnaud, via ChatGPT i found this and it seems to help:

In Registry:
HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Debugging

Add EnableWaitChainDetection as DWORD with value 0

it disables the Thread Wait Chain Feature from Delphi.

After a long time i had to debug my m2 service with 64Bit again today.

and there is a delay of 55s at the moment. Starting Service in RS 12.3 64Bit Debugger

https://imgtr.ee/image/image.SE1M

Using the 32Bit exe with RS 12.3 Debugger it only takes 1s at the same function

Int the Picture there is a gap in the log at 12:14:12.528 -> 12.15.02.944 of 50s I don't know what the programm does at this point ???

Hi i found the Error

My Enum is like this:
TEinheitEnum = (
first,
second,
third,
fourth
);

in class constructor i set member fEinheit to "third" (Because i like it initialized with third value) The Enum is kind of sorted
Now in client its set to "first"

if its set to first, the value is missing in JSON - Data send to server (as you said its optimized)
Because of this the expected Value is not sent to server.

As Solution i put my desired default value in top of enum
enum is now : (third, first, second, fourth)
It does not look good, but it works now.

Hi Arnaud,

i have the same problem in
TRestServerUriContext.InternalExecuteSoaByInterface

Here you call DoLog and DoLog cuts the the received string, is it possible to add something like LogResponseMaxBytes here ?
Else i have to look at client Log what's send and this is not possible in many times.

I too asked this question long time ago and actually using SynCrossPlatform Client with some Patches. It works generally great.

The Problem is that you have to generate special Client.pas Unit from Server. And it would be great if this step can be removed.
for the iOS/Android it is not neccessary to port the whole m2. only the client stuff and rtti because i think no one will make a server on mobile platform.

Hi Arnaud, ty for your patch.

Today we wanted to see the Result of a SOA Call in Log. In former Versions there was the complete JSON Array.
In the new m2 there is only 1 line saying Response with 1.7MB

Is it possible to add the complete JSON to Log again. We need it to debug problems. Log Size and Performance does not matter in our case ! More important is to log the Information.
A switch to enable / Disable Big Data would be ok too.

Hi As BUGFix i commented the Lines 1539-1541 in mormot.rest.mvc

  result := fContext.Validate(
    cookie, PRecordData, PRecordTypeInfo, PExpires, nil, Invalidate);
//  if result <= 0 then
//    // delete any invalid/expired cookie on server side
//    Finalize;
end;

I think both Variants are to complicated. I genereate ContentSecurityPolicy in GetViewInfo which generates 2 Nonce Values for script and style
This both values i give to mustache {{main.cspnonce}}

if i use callback it is called after mvc, how could i add my nonces to main.xy ?
if i use ttomas version i have to add my code to every function, i have a lot

To make it easy, i made a little patch to TRestUriParams and added a new value: ContentSecurityPolicy

   LowLevelUserAgent: RawUtf8;
    /// itSDS: für ContentSecurityPolicy !
    ContentSecurityPolicy: RawUtf8; // itSDS
    /// initialize the non RawUtf8 values
    procedure Init; overload;

Then i added a little bit of code to mormot.rest.http.server.pas

  call.LowLevelUserAgent := Ctxt.UserAgent;
  call.ContentSecurityPolicy := ''; // itSDS
  if fHosts.Count > 0 then

  Ctxt.OutCustomHeaders := call.OutHead;

  if call.ContentSecurityPolicy <> '' then // itSDS
    Ctxt.AddOutHeader(['Content-Security-Policy: ', call.ContentSecurityPolicy]);

  if call.OutInternalState <> 0 then

what do you think ?

Sry i must correct me, I changed above line without effect. Make new Ticket for my problem

I think you renamed it to mormot.core.base.concat

There was one thing, happened to me
I changed CookieName to "DIT Test" and later got error in Reverse Proxy:

  Description
  This violation occurs when HTTP cookies contain at least one of the following components:
  - Quotation marks in the cookie name.
  - A space in the cookie name.
  - An equal sign (=) in the cookie name.
  Note: A space between the cookie name and the equal sign (=), and between the equal sign (=) and cookie value is allowed.
  - An equal sign (=) before the cookie name.
  - A carriage return (hexadecimal value of 0xd) in the cookie name.

may be there should be a Check-Routine in SetCookieName throwing Exception if name does not match the rules für Cookie Names

I have the same observation

I was just looking fpr a reason, that the Log Files behave the described way.
The Problem is, if the BUG occurs, the Service seems to hang for the connected clients

Yes Timeout is set to 240min