Posted by jpluimers on 2018/10/17
Explains how to configure Nginx with SSL Passthrough on Linux or Unix-like system to encrypt traffic on all backends.
Uses the stream module ngx_stream_core_module.
Source: [WayBack] How to configure Nginx SSL/TLS passthrough with TCP load balancing – nixCraft
via: [WayBack] Learn how to setup TCP load balancing with Nginx and configure SSL Passthrough on Linux/Unix. – nixCraft – Google+
–jeroen
Posted in Communications Development, Development, HTTP, Internet protocol suite, TCP, TLS | Leave a Comment »
Posted by jpluimers on 2018/10/17
This has a really neat Windows API trick [WayBack] delphi – How can I sanitize a string for use as a filename? – Stack Overflow by [WayBack] Alex.
Via: [WayBack] Interesting use of MoveFile, with NIL as the first parameter. https://stackoverflow.com/a/961500/49925 – Thomas Mueller (dummzeuch) – Google+
function IsValidFilePath(const FileName: String): Boolean; var S: String; I: Integer; begin Result := False; S := FileName; repeat I := LastDelimiter('\/', S); MoveFile(nil, PChar(S)); if (GetLastError = ERROR_ALREADY_EXISTS) or ( (GetFileAttributes(PChar(Copy(S, I + 1, MaxInt))) = INVALID_FILE_ATTRIBUTES) and (GetLastError=ERROR_INVALID_NAME) ) then Exit; if I>0 then S := Copy(S,1,I-1); until I = 0; Result := True; end;
–jeroen
Posted in Delphi, Development, Software Development, Windows Development | 3 Comments »
Posted by jpluimers on 2018/10/16
At [WayBack] Error when trying to signup using an email address with uppercase letters (#27898) · Issues · GitLab.org / GitLab Community Edition · GitLab, I commented this:
Both the
:email_confirmationfields should get the same case processing treatment.That treatment should consist of this:
- The part before the @ should be treated as case sensitive
- The part after the @ should be treated as case insensitive
This means that:
Foo@Example.OrgandFoo@example.orgare the sameFoo@example.organdfoo@example.orgare differentThe main reason is that there are email systems expecting case sensitivity in the part before the @ sign.
I think excluding those users from being able to use GitLab is a bad idea.
See especially the comments at the Stack Overflow answer to Are email addresses case sensitive?
Relevant RFC 5321: Simple Mail Transfer Protocol sections:
Important comments:
I work at a large company and there is another person with the same first and last name. I discovered today that his local-part differs from mine only in capitalization. This has been working properly, so I was surprised to see “no widely used mail systems distinguish different addresses based on case”. We use MS Exchange which I would call “widely used”. – Matthew James Briggs Nov 24 ’15 at 20:14
RFC 5321 2.4. General Syntax Principles and Transaction Model – SMTP implementations MUST take care to preserve the case of mailbox local-parts. In particular, for some hosts, the user “smith” is different from the user “Smith”. Mailbox domains follow normal DNS rules and are hence not case sensitive. – Adam111p Apr 27 ’16 at 10:02
Most important parts of the answer:
From RFC 5321, section-2.3.11:
The standard mailbox naming convention is defined to be “local-part@domaiN“; contemporary usage permits a much broader set of applications than simple “user names”. Consequently, and due to a long history of problems when intermediate hosts have attempted to optimize transport by modifying them, the local-part MUST be interpreted and assigned semantics only by the host specified in the domain part of the address.
So yes, the part before the “@” could be case-sensitive, since it is entirely under the control of the host system. In practice though, no widely used mail systems distinguish different addresses based on case.
The part after the @ sign however is the domain and according to RFC 1035, section 3.1,
“Name servers and resolvers must compare [domains] in a case-insensitive manner”
–jeroen
Posted in Communications Development, Development, Internet protocol suite, SMTP, Software Development | Leave a Comment »
Posted by jpluimers on 2018/10/16
[WayBack] Delphi Unit Dependency Scanner with sources at [WayBack] GitHub – norgepaul/DUDS
via:
Note the scanner mentioned by Stefan now generates a 404; however there is an archived page.
Future idea: use Delphi AST as parser instead of the current internal tokeniser/parser combination.
And of course there is one in MMX (which has been free for a while now): [WayBack] Unit Dependency Analyzer – MMX
–jeroen
Posted in Delphi, Development, Software Development | 3 Comments »
Posted by jpluimers on 2018/10/16
tl;dr: Finding event handlers registered using jQuery can be tricky. findHandlersJS makes finding them easy, all you need is the event type and a jQuery selector for the elements where the events might originate.
I need to invest some time in using this: [WayBack] Quickly finding and debugging jQuery event handlers with findHandlersJS – The Blinking Caret
Sourcecode: [WayBack] raw.githubusercontent.com/ruidfigueiredo/findHandlersJS/master/findEventHandlers.js
References:
Via: [WayBack] javascript – Chrome Dev Tools : view all event listeners used in the page – Stack Overflow
–jeroen
Posted in Chrome, Development, Google, JavaScript/ECMAScript, jQuery, Power User, Scripting, Software Development, Web Browsers, Web Development | Leave a Comment »
Posted by jpluimers on 2018/10/11
Hopefully I get this to work after fixing
The first part of the fix was to
The second part is getting the USB web cameras to work.
I’ve got two types, but the label on them doesn’t list their common name, only their P/N sometimes with M/N:
The MotionEyeOS web interface didn’t list any working cameras so I had to do some digging.
Luckily [WayBack] Webcam software and driver support for Windows has a table of part and model numbers combined with product names, so they got revealed them as these:
Both are supported by motion according to [WayBack] Logitech < Motion < Foswiki though the Quick Cam Messenger needs [WayBack] Quickcam Messenger & Communicate driver for Linux which I should try to cross-compile one day.
The latter works fine. Below are some settings I used.
Posted in *nix, Development, Hardware Development, Linux, Odroid, Power User | Leave a Comment »
Posted by jpluimers on 2018/10/11
What is the proper way for pooling of TCustomConnection instances in Delphi, that allows to distinguish between instances that have effectively equal connection properties and the ones that are effectively unequal?
I’ve tried searching the RTL and VCL sources and didn’t find a generic way.
I could copy either of the specific ones I found (see list below) and adapt them to a more generic solution or adapt one of the answers in #16404051 to be for TCustomConnection, but I wonder if there is an existing solution for TCustomConnection in the first place.
Specific ones I found in Delphi XE8:
- DBX: unit Data.DBXPool
- FireDAC: unit FireDAC.Stan.Pool
- IBX: unit IBX.IBConnectionBroker
Source [WayBack] database connection – Looking for a generic way to pool TCusomConnection in Delphi – Stack Overflow
Hopefully by now I’ve some implementation for this that works nicely.
If not, these might get me started too:
In the .NET world, I take these things for granted, and it looks like ADO already does it out of the box as well:
–jeroen
via: [WayBack] Is there a Delphi library that allows for pooling of TCustomConnection… – Jeroen Wiert Pluimers – Google+
Posted in Delphi, Delphi XE8, Development, Software Development | 2 Comments »
Posted by jpluimers on 2018/10/10
The below came in really useful in an old project I took over that was full of bugs having to do with improper casts and FreeAndNil usage.
EDIT 20181010: WordPress.com keeps mangling angle-brackets in pre and code sections, so I added the code to a gist; see link below.
First the examples.
procedure TMyServer.UnbindFromIdTcpServerStatusContext(const aContext: TIdContext);
var
lClientSession: TClientSession;
begin
lClientSession := TObjectHelper.Cast<TClientSession>(aContext.Data);
...
end;
type
TBaseDataInterface = class(TObject)
strict private
FDatabase: TIBDatabase;
FTransaction: TIBTransaction;
...
end;
destructor TBaseDataInterface.Destroy();
begin
TObjectHelper.FreeAndNil(FDatabase);
TObjectHelper.FreeAndNil(FTransaction);
...
inherited Destroy();
end;
And the implementation.
unit ObjectHelperUnit;
interface
type
TObjectHelper = record
class function Cast<T: class>(const aValue: TObject): T; static;
class procedure FreeAndNil<T: class>(var Value: T); static;
end;
implementation
uses
System.SysConst,
System.SysUtils;
class function TObjectHelper.Cast<T>(const aValue: TObject): T;
var
lException: Exception;
begin
if Assigned(aValue) then
begin
if aValue is T then
Result := T(aValue)
else
begin
lException := EInvalidCast.CreateFmt('%s; actual type %s but expected %s.',
[SInvalidCast, aValue.QualifiedClassName, T.QualifiedClassName]);
raise lException;
end;
end
else
Result := nil;
end;
class procedure TObjectHelper.FreeAndNil<T>(var Value: T);
begin
System.SysUtils.FreeAndNil(Value);
end;
end.
–jeroen
Gist:
| unit ObjectHelperUnit; | |
| interface | |
| type | |
| TObjectHelper = record | |
| class function Cast<T: class>(const aValue: TObject): T; static; | |
| class procedure FreeAndNil<T: class>(var Value: T); static; | |
| end; | |
| implementation | |
| uses | |
| System.SysConst, | |
| System.SysUtils; | |
| class function TObjectHelper.Cast<T>(const aValue: TObject): T; | |
| var | |
| lException: Exception; | |
| begin | |
| if Assigned(aValue) then | |
| begin | |
| if aValue is T then | |
| Result := T(aValue) | |
| else | |
| begin | |
| lException := EInvalidCast.CreateFmt('%s; actual type %s but expected %s.', | |
| [SInvalidCast, aValue.QualifiedClassName, T.QualifiedClassName]); | |
| raise lException at ReturnAddress; | |
| end; | |
| end | |
| else | |
| Result := nil; | |
| end; | |
| class procedure TObjectHelper.FreeAndNil<T>(var Value: T); | |
| begin | |
| System.SysUtils.FreeAndNil(Value); | |
| end; | |
| end. |
| procedure TMyServer.UnbindFromIdTcpServerStatusContext(const aContext: TIdContext); | |
| var | |
| lClientSession: TClientSession; | |
| begin | |
| lClientSession := TObjectHelper.Cast<TClientSession>(aContext.Data); | |
| … | |
| end; | |
| type | |
| TBaseDataInterface = class(TObject) | |
| strict private | |
| FDatabase: TIBDatabase; | |
| FTransaction: TIBTransaction; | |
| … | |
| end; | |
| destructor TBaseDataInterface.Destroy(); | |
| begin | |
| TObjectHelper.FreeAndNil(FDatabase); | |
| TObjectHelper.FreeAndNil(FTransaction); | |
| … | |
| inherited Destroy(); | |
| end; |
Posted in Delphi, Development, Software Development | 16 Comments »
Posted by jpluimers on 2018/10/09
Netcat to the rescue waiting for a Windows 10 upgrade to finish (which can take hours):
while ! nc -z 172.22.0.67 3389; do echo "sleeping"; sleep 10; done; echo 'The server is up!'
Via: [WayBack] tcp – How can I trigger a script when a certain port becomes available for requests? – Unix & Linux Stack Exchange, quoting from the answer:
ncis Netcat, “the Swiss-army knife for TCP/IP”,-zmeans: do not send any data, just check if the port is open,while ! nc -z …; do sleep 0.1; done: keep checking and sleeping for one tenth of a second until the port opens up, i.e. Netcat returns with a zero (success) status.
–jeroen
Posted in *nix, *nix-tools, Communications Development, Development, Internet protocol suite, Power User, TCP, Windows | Leave a Comment »
Posted by jpluimers on 2018/10/09
After the trouble in Ubuntu: Fixing the myserious “Failed to stop apt-daily.timer: Connection timed out” I got into more trouble:
apt-get update && apt-get upgrade hung the device.
It booted fine, but a new update showed it was in a hosed state.
I don’t expect vendor supported distributions to fail this way, so I gave up on the ubuntu-16.04-minimal-odroid-c1-20160817.img.xz .
–jeroen
| root@odroidC1:~# apt-get update && apt-get upgrade | |
| Hit:1 http://ports.ubuntu.com/ubuntu-ports xenial InRelease | |
| Hit:2 http://ports.ubuntu.com/ubuntu-ports xenial-updates InRelease | |
| Hit:3 http://ports.ubuntu.com/ubuntu-ports xenial-backports InRelease | |
| Hit:4 http://ports.ubuntu.com/ubuntu-ports xenial-security InRelease | |
| Hit:5 http://deb.odroid.in/c1 xenial InRelease | |
| Reading package lists… Done | |
| E: dpkg was interrupted, you must manually run 'dpkg –configure -a' to correct the problem. | |
| root@odroidC1:~# dpkg –configure -a | |
| Processing triggers for ureadahead (0.100.0-19) … | |
| Setting up initramfs-tools (0.122ubuntu8.8) … | |
| update-initramfs: deferring update (trigger activated) | |
| Processing triggers for systemd (229-4ubuntu17) … | |
| Processing triggers for initramfs-tools (0.122ubuntu8.8) … | |
| update-initramfs: Generating /boot/initrd.img-4.4.0-28-generic | |
| WARNING: missing /lib/modules/4.4.0-28-generic | |
| Ensure all necessary drivers are built into the linux image! | |
| depmod: ERROR: could not open directory /lib/modules/4.4.0-28-generic: No such file or directory | |
| depmod: FATAL: could not search modules: No such file or directory | |
| depmod: WARNING: could not open /var/tmp/mkinitramfs_FQEGW2/lib/modules/4.4.0-28-generic/modules.order: No such file or directory | |
| depmod: WARNING: could not open /var/tmp/mkinitramfs_FQEGW2/lib/modules/4.4.0-28-generic/modules.builtin: No such file or directory | |
| root@odroidC1:~# df -h | |
| Filesystem Size Used Avail Use% Mounted on | |
| udev 396M 0 396M 0% /dev | |
| tmpfs 81M 3.3M 78M 5% /run | |
| /dev/mmcblk0p2 59G 1.1G 55G 2% / | |
| tmpfs 403M 0 403M 0% /dev/shm | |
| tmpfs 5.0M 0 5.0M 0% /run/lock | |
| tmpfs 403M 0 403M 0% /sys/fs/cgroup | |
| /dev/mmcblk0p1 128M 11M 118M 9% /media/boot |
Posted in Development, Hardware Development, Odroid | 3 Comments »
The Wiert Corner - irregular stream of stuff 