-
Content Count
1881 -
Joined
-
Last visited
-
Days Won
33
Everything posted by Angus Robertson
-
SSL GetRemoteFile not transferring the whole image
Angus Robertson replied to Brian Culverwell's topic in ICS - Internet Component Suite
THttpsGetFile was probably one of the many Usermade components written 20 years ago and not touched since. But he now has a modern version. TIcsHttpMulti. Angus -
SSL GetRemoteFile not transferring the whole image
Angus Robertson replied to Brian Culverwell's topic in ICS - Internet Component Suite
As I said, it may use ICS components, but is not part of the ICS distribution. Need to see the source code to know who wrote it and how. For simple file downloads build the OverbyteIcsXferTst.dpr sample and try HTTP Downloads. Angus -
SSL GetRemoteFile not transferring the whole image
Angus Robertson replied to Brian Culverwell's topic in ICS - Internet Component Suite
THttpsGetFile is not an ICS component. It may be derived from an ICS component, but you need to ask whoever wrote it. Angus -
HTTP/1.1 + 302 + Cloudflare = 404
Angus Robertson replied to Shira's topic in ICS - Internet Component Suite
If you really need progress indication, make sure you don't update it more than once a second, certainly not every time the onDocData event is called. Doing so will slow down your transfers due to the overhead of updating the screen control so often. Look at the TIcsHttpMulti.onHttpDataEvent function in OverbyteIcsHttpMulti.pas, which is another new component specifically designed for downloading files, from a list of URLs or by parsing an HTML page, it checks for existing older versions of the files which are updated if newer. The sample is OverbyteIcsXferTst1.dpr. Angus -
HTTP/1.1 + 302 + Cloudflare = 404
Angus Robertson replied to Shira's topic in ICS - Internet Component Suite
I used your URL with the OverbyteIcsHttpRestTst sample, and it works perfectly with http/1.1 and Cloudfare and correctly redirects to your executable and downloads it: < Content-Type: application/x-executable < Content-Length: 5286400 You are assuming DocBegin is only called for a successful 200 request, when it is called otherwise. Not sure why you want a download bar, they were useful 20 years ago with slow downloads, or for very large files, but 5MB comes down in a couple of seconds in the modern world. You may want to consider changing to use TSslHttpRest which will simplify your application and make it more robust and future proof, you don't really need any events. Angus -
HTTP/1.1 + 302 + Cloudflare = 404
Angus Robertson replied to Shira's topic in ICS - Internet Component Suite
It is unlikely to be related to chunking, this fails before the body is processed. You can not disable chunking at the client, only the server. All I need is the URL that fails, not demos. Angus -
HTTP/1.1 + 302 + Cloudflare = 404
Angus Robertson replied to Shira's topic in ICS - Internet Component Suite
Looks like a bug in the ICS relocation code, which is quite complex, messy and hard to maintain, but I will not look at it without being able to reproduce the problem, not interested in logs, although someone else may spot the problem from them. Angus -
Class TSslHttpCli not found - DELPHI5
Angus Robertson replied to 2nd-Snoopy's topic in ICS - Internet Component Suite
The most common reason for altering HttpPror.pas was to add extra HTTP headers that the early versions did not support directly, although they could be added using events. Typically authentication headers. But a lot has changed over the years, there are many new authentication methods supported and a new property ExtraHeaders for unusual headers. Angus -
Class TSslHttpCli not found - DELPHI5
Angus Robertson replied to 2nd-Snoopy's topic in ICS - Internet Component Suite
Not sure which certificates you are referring to, HTTPS clients receive certificates from servers, and can check they are legitimate, but can accept them anyway. In rare high security cases HTTPS clients have a certificate to prove their identity issued by a company they want to access, mostly VPNs, but any you had 13 years ago will be useless now. Angus -
Yes, OnSessionConnected event is fired for UDP, but should be virtually instantaneous since no traffic is sent, you should have waited until the state changed before sending anything, but send would just fail and you are ignoring errors and it would not explain the exception. Angus
-
Using a redundant MessagePump without threads is untested and certainly serves no purpose before making any requests or listening. If you remove it, does the code work? The LocalIPList function is an easier way to get a list of addresses as strings, you need to set family and IPPROTO_UDP protocol, the default is TCP only. Angus
-
I have never seen a message pump crash with ICS. But I know using a non-existent interface will fail. Been a long time since I did a project with UDP broadcasts. Angus
-
If you are connecting to another device, you don't need to set a local IP address, use 0.0.0.0 and let Windows worry about it. Sometimes interfaces come and go, that could cause an error. Local address is really for listening sockets, although can be used on servers with multiple IP addresses to select an outgoing address. Angus
-
Class TSslHttpCli not found - DELPHI5
Angus Robertson replied to 2nd-Snoopy's topic in ICS - Internet Component Suite
The version of OpenSSL that ICS v5 used will not work today, the protocols have changed since then. It may be worth trying to build a subset of ICS v8 with Delphi 5, language wise it was really 64-bit streams I think which you could change, not sure when Int64 came in, that would be harder. There are also minimum version checks you'd have to disable. Or get Delphi 7 or 2007 and upgrade your project, fewer changes and testing than unicode versions, unless a simple project. Angus -
TWSocketClient.OnDataAvailable not firing off after a day or two
Angus Robertson replied to aehimself's topic in Network, Cloud and Web
I have a stress testing tool ComGen, written using ICS, that will generate multiple TCP or UDP streams (or serial RS232), short or long, sending variable volumes of custom data including HTTP,, with or without SSL/TLS. It will create up to 2,000 client simultaneous connections, with x per second, that was used for testing SSL Socket Server where the SSL connection overhead restricts how many connections a single thread can accept per second. This is all done in a single thread. ComGen is part of my ComCap package (ComCap collects data) but can be used on it;s own. Angus -
There is a new ICS Multi Host FTP Server sample using IcsHosts in the overnight zip, really designed to be a Windows service application. It supports multiple SSL hosts with multiple listeners, can order it's own SSL certificates and will create self signed certificates for any missing, and will email status information and errors to an administrator. Angus
-
If you connect on port 21, SSL only starts if you send the AUTH command, The SslType method specifies how AUTH is used, but won't stop it. Angus
-
general question about embedding docs in an app
Angus Robertson replied to David Schwartz's topic in VCL
Because pure Delphi renderers are far less likely to have security holes than proper browsers, partly because they don't usually run scripts, but you also have control over what external links they load if any. We all know clicking on dodgy email links is the main way nasties like ransomware gets onto networks, sometimes just displaying an external web page. Sure they don't usually handle all the latest browser capabilities, but that is the compromise you make for safely, and you design your pages to match their capability. ICS includes a Web Browser sample using the THtmlViewer component with tick boxes to enable or disable links and external graphics. and also log all HTML and HTTPS protocol. Angus- 19 replies
-
- webbrowser
- sqllite
-
(and 1 more)
Tagged with:
-
Automatically killing a service when stuck
Angus Robertson replied to Thijs van Dien's topic in Windows API
While services should be stopped by the service manager, this won't work if if the main thread in the service has stopped and messages are not being processed. So you need a backup after repeated stop attempts with timeouts fail. the equivalent of End Task in Task Manager which sometimes is needed to stop non-responding applications. I've done this with TerminateProcess which needs a process handle which you can get from a process ID, which requires searching the process list to match exe names. I did this from a second service that monitored the first, making sure the message queue was working and a few other things. The second service also sent emails so this could be checked manually to make sure it restarted ok. Service manager should already be set-up to immediately restart a stopped service, so that part is easy once it stops. Angus -
Build and test the OverbyteIcsHttpRestTst.dpr sample. The OverbyteIcsSslHttpRest.pas unit itself has several examples of how to create new components using TSslHttpRest like TIcsSMS, ,TIcsTwitter, TDnsQueryHttps (DoH) and real soon TIcsRestEmail for GMail. All with demos in OverbyteIcsHttpRestTst.dpr. Angus
-
Contributing to projects on GitHub with Subversion
Angus Robertson replied to dummzeuch's topic in Tips / Blogs / Tutorials / Videos
Totally agree, I have no intention of vegatating in front of day time TV, which is why I still work on ICS. At leat while Moorfields Hospital keeps my eyes working, victims of diabetes. Angus -
Contributing to projects on GitHub with Subversion
Angus Robertson replied to dummzeuch's topic in Tips / Blogs / Tutorials / Videos
You reach an age where you really don't want to learn new stuff. I had one of the first brick sized mobiles back when UK mobile phone numbers were six digits long, but only got a modern smart phone four years ago, had to catch up. Angus -
Contributing to projects on GitHub with Subversion
Angus Robertson replied to dummzeuch's topic in Tips / Blogs / Tutorials / Videos
Not much maintenance, someone else set-up SVN on my public server 12 years ago and I barely touched it until Windows 2008 support ceased and I had to move it to a new server. Took a while to find out why svn; was not responding finally discovered a service svnserver.exe had been running for 12 years which I never noticed. I tried a git pull once, put me off Git for life, so complicated. Angus -
OverbyteIcsLIBEAY.hpp Line 58 typedef void __cdecl (*TCryptoThreadIDCallback)(Overbyteicsssleay::PCRYPTO_THREADID ID);
Angus Robertson replied to ICS_NEW's topic in General Help
Sorry I can not help. I do not use C++ Builder and have never supported it. ICS is dependent upon end users to help us support C++ and no-one did until 10.2. Also, USE_SSL support will be ceasing in ICS, it is historic and in future ICS will always support SSL/TLS as do all the new components added in recent years. Angus -
OverbyteIcsLIBEAY.hpp Line 58 typedef void __cdecl (*TCryptoThreadIDCallback)(Overbyteicsssleay::PCRYPTO_THREADID ID);
Angus Robertson replied to ICS_NEW's topic in General Help
For Delphi, we test without USE_SSL maybe every couple of years, never tested it for C++. We really don't have time or inclination to support 20 or different compilers with and without SSL. This is a free package. SSL code is embedded in almost every unit, removing a couple of SSL only files will not help. Angus