paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-08-25 12:09:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Use node.mod.pas naming schedule

Browse Source
This commit is contained in:
michael 2020-02-23 12:59:40 +00:00
parent 1532b6aac2
commit f42303383d
7 changed files with 79 additions and 77 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/nodejs/nodejsfs.pas → packages/nodejs/node.fs.pas
View File

@ -10,7 +10,7 @@
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************} **********************************************************************}
unit NodeJSFS; unit node.fs;
{$mode objfpc} {$mode objfpc}
{$ModeSwitch externalclass} {$ModeSwitch externalclass}

49
packages/nodejs/nodejshttp.pp → packages/nodejs/node.http.pas
View File

@ -12,7 +12,7 @@
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************} **********************************************************************}
unit nodejshttp; unit node.http;
{$mode objfpc} {$mode objfpc}
{$modeswitch externalclass} {$modeswitch externalclass}
@ -20,53 +20,10 @@ unit nodejshttp;
interface interface
uses uses
js, nodejs, types; js, nodejs, types, node.net;
Type Type
TNJSStreamDuplex = class external name 'stream.Duplex' (TJSObject); { TNJSHTTPIncomingMessage }
TJSHandleObj = class external name 'Object' (TJSObject);
TJSNetSocket = class external name 'net.Socket' (TJSObject);
TNJSNetCallback = reference to procedure(Obj : TJSObject);
TNJSNetGetConnectionsCallback = reference to procedure(err : TJSObject; count : Integer);
TNJSNetListenCallBack = reference to procedure(err : TJSObject);
TJSNetServerOptions = class external name 'Object' (TJSObject)
port : cardinal;
host : string;
path : string;
backlog : Cardinal;
exclusive : boolean;
readableAll : Boolean;
writableAll : Boolean;
ipv6only : Boolean;
end;
TNJSNetServer = class external name 'net.Server' (TJSObject)
listening : boolean;
maxConnections : NativeInt;
procedure close(Callback : TNJSNetCallback = Nil);
procedure getConnections(CallBack : TNJSNetGetConnectionsCallback);
function listen(handle : TJSHandleObj) : TNJSNetServer;
function listen(handle : TJSHandleObj; BackLog : Cardinal) : TNJSNetServer;
function listen(handle : TJSHandleObj; BackLog : Cardinal; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Options : TJSObject) : TNJSNetServer;
function listen(Options : TJSObject; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Options : TJSNetServerOptions) : TNJSNetServer;
function listen(Options : TJSNetServerOptions; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Port : Cardinal) : TNJSNetServer;
function listen(Port : Cardinal; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Port : Cardinal; Host : string) : TNJSNetServer;
function listen(Port : Cardinal; Host : string; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Port : Cardinal; Host : string; backlog : Cardinal) : TNJSNetServer;
function listen(Port : Cardinal; Host : string; backlog : Cardinal; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
procedure ref;
procedure unref;
end;
{ TNJSHTTPIncomingMessage }
TNJSHTTPIncomingMessage = class external name 'http.IncomingMessage' (TJSObject) TNJSHTTPIncomingMessage = class external name 'http.IncomingMessage' (TJSObject)
private private

72
packages/nodejs/node.net.pas Normal file
View File

@ -0,0 +1,72 @@
{
This file is part of the Pas2JS run time library.
Copyright (c) 2020 by Michael Van Canneyt
NodeJS net module import.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
unit node.net;
{$mode objfpc}
{$modeswitch externalclass}
interface
uses
Classes, SysUtils, js, nodejs;
type
TNJSStreamDuplex = class external name 'stream.Duplex' (TJSObject);
TJSHandleObj = class external name 'Object' (TJSObject);
TJSNetSocket = class external name 'net.Socket' (TJSObject);
TNJSNetCallback = reference to procedure(Obj : TJSObject);
TNJSNetGetConnectionsCallback = reference to procedure(err : TJSObject; count : Integer);
TNJSNetListenCallBack = reference to procedure(err : TJSObject);
TJSNetServerOptions = class external name 'Object' (TJSObject)
port : cardinal;
host : string;
path : string;
backlog : Cardinal;
exclusive : boolean;
readableAll : Boolean;
writableAll : Boolean;
ipv6only : Boolean;
end;
TNJSNetServer = class external name 'net.Server' (TJSObject)
listening : boolean;
maxConnections : NativeInt;
procedure close(Callback : TNJSNetCallback = Nil);
procedure getConnections(CallBack : TNJSNetGetConnectionsCallback);
function listen(handle : TJSHandleObj) : TNJSNetServer;
function listen(handle : TJSHandleObj; BackLog : Cardinal) : TNJSNetServer;
function listen(handle : TJSHandleObj; BackLog : Cardinal; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Options : TJSObject) : TNJSNetServer;
function listen(Options : TJSObject; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Options : TJSNetServerOptions) : TNJSNetServer;
function listen(Options : TJSNetServerOptions; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Port : Cardinal) : TNJSNetServer;
function listen(Port : Cardinal; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Port : Cardinal; Host : string) : TNJSNetServer;
function listen(Port : Cardinal; Host : string; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
function listen(Port : Cardinal; Host : string; backlog : Cardinal) : TNJSNetServer;
function listen(Port : Cardinal; Host : string; backlog : Cardinal; ErrCallback : TNJSNetListenCallBack) : TNJSNetServer;
procedure ref;
procedure unref;
end;
implementation
end.

2
packages/nodejs/nodejsonoff.pas → packages/nodejs/node.onoff.pas
View File

@ -13,7 +13,7 @@
**********************************************************************} **********************************************************************}
unit nodejsonoff; unit node.onoff;
{$mode objfpc} {$mode objfpc}
{$modeswitch externalclass} {$modeswitch externalclass}

2
packages/nodejs/nodejsspidevice.pas → packages/nodejs/node.spidevice.pas
View File

@ -12,7 +12,7 @@
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************} **********************************************************************}
unit nodejsspidevice; unit node.spidevice;
{$mode objfpc} {$mode objfpc}
{$modeswitch externalclass} {$modeswitch externalclass}

2
packages/nodejs/nodejsurl.pp → packages/nodejs/node.url.pas
View File

@ -13,7 +13,7 @@
**********************************************************************} **********************************************************************}
unit nodejsurl; unit node.url;
{$mode objfpc} {$mode objfpc}
{$ModeSwitch externalclass} {$ModeSwitch externalclass}

27
packages/nodejs/nodejsnet.pp
View File

@ -1,27 +0,0 @@
{
This file is part of the Pas2JS run time library.
Copyright (c) 2020 by Michael Van Canneyt
NodeJS net module import.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
unit nodejsnet;
{$mode objfpc}
interface
uses
Classes, SysUtils;
implementation
end.