You are not logged in.
Pages: 1
hi ab:
I need TZipRead to read from TStream as follows:
TZipRead. Create (AStream: TStream; Size: PtrInt; Offset: Int64);
I can modify the mormot.core.zip source code and add it myself, but it will be overwritten after the update.
As per the question, how to use SynBigTable in mORMot 2 ? Is there a replacement?
Thank you, hard work
When reusing THttpServerRequest in TWebSocketAsyncServer, RespStatus was not reset:=0;
Causing subsequent judgment errors
Thank you ab, I only use the THttpServerGeneric framework
I need to add a find method to the TURiRouter class to determine whether it exists in the OnBeforeBody event. If it does not, access will be denied.
function TURiRouter.Find(const aUri, aMethod: RawUtf8): TUriTreeNode;
or
function TURiRouter.Find(const aUri, aMethod: RawUtf8): TUriTreeNodeData;
Is the proposal feasible
If possible, it is best to temporarily store the find results for use by THttpServerRequest, such as: THttpServerRequest. fRoute?
I need to implement the interface and try it out for the dll. Let me handle it in a different way, thank you
THttpServerRequest.create ?
mormot.net.async.pas: (row 3366)
3364 HTTP_UPG_FLAGS[hfConnectionUpgrade in fHttp.HeaderFlags];
3365 if fRequest = nil then // created once, if not rejected by OnBeforeBody
3366: fRequest := THttpServerRequest.Create(
3367 fServer, fConnectionID, fReadThread, flags, @fConnectionOpaque)
3368 else
mormot.net.server.pas: (3082; 4088)
3081 // compute the response
3082: req := THttpServerRequest.Create(self, ConnectionID, ConnectionThread,
3083 HTTP_TLS_FLAGS[ClientSock.TLS.Enabled] +
3084 HTTP_UPG_FLAGS[hfConnectionUpgrade in ClientSock.Http.HeaderFlags],
....
4086 if global_verbs[hvOPTIONS] = '' then
4087 global_verbs := VERB_TEXT;
4088: ctxt := THttpServerRequest.Create(self, 0, self, [], nil);
4089 // main loop reusing a single ctxt instance for this thread
4090 reqid := 0;
Thank you. I didn't find the ComputeContext method before.
Hello Ab,
I want to implement THttpServerRequest inheritance,
For example: TWebSocketAsyncServer.ProcessClass
until P^ <> ' ';
test ok, thanks
CONNECTION: KEEP-ALIVE, UPGRADE
mormot.net.http
1374 repeat
1375 inc(P);
1376 until P^ <= ' ';
Inc(P); // add ok
Pages: 1