Recent

Author Topic: Corona outbreak  (Read 9488 times)

Fred vS

  • Hero Member
  • *****
  • Posts: 3158
    • StrumPract is the musicians best friend
Re: Corona outbreak
« Reply #30 on: March 21, 2020, 10:45:52 pm »
About OpenSLL problems (and similar) this is the guilty:

https://bugs.freepascal.org/view.php?id=32367

I really hope than one day (or year or century or millennium) it will be fixed (all the fixes are there, ready to be committed).

Fre;D
I use Lazarus 2.2.0 32/64 and FPC 3.2.2 32/64 on Debian 11 64 bit, Windows 10, Windows 7 32/64, Windows XP 32,  FreeBSD 64.
Widgetset: fpGUI, MSEgui, Win32, GTK2, Qt.

https://github.com/fredvs
https://gitlab.com/fredvs
https://codeberg.org/fredvs

dbannon

  • Hero Member
  • *****
  • Posts: 2786
    • tomboy-ng, a rewrite of the classic Tomboy
Re: Corona outbreak
« Reply #31 on: March 21, 2020, 11:42:12 pm »
I really hope than one day (or year or century or millennium) it will be fixed (all the fixes are there, ready to be committed).

I think all the problems are fixed in FPC320, just not something that can or should be retro fitted to FPC304.  So, what you are hoping for is FPC320 to be formally released. That would be nice.

Davo
Lazarus 3, Linux (and reluctantly Win10/11, OSX Monterey)
My Project - https://github.com/tomboy-notes/tomboy-ng and my github - https://github.com/davidbannon

Fred vS

  • Hero Member
  • *****
  • Posts: 3158
    • StrumPract is the musicians best friend
Re: Corona outbreak
« Reply #32 on: March 21, 2020, 11:52:45 pm »
Quote
I think all the problems are fixed in FPC320,

Are you talking about the "so.num" problems?:
https://bugs.freepascal.org/view.php?id=32367

In the last fork I did today of fpc 3.2.0 beta, it was not yet fixed (the same for fpc 3.3.1 trunk).

Fre;D
« Last Edit: March 22, 2020, 12:31:53 am by Fred vS »
I use Lazarus 2.2.0 32/64 and FPC 3.2.2 32/64 on Debian 11 64 bit, Windows 10, Windows 7 32/64, Windows XP 32,  FreeBSD 64.
Widgetset: fpGUI, MSEgui, Win32, GTK2, Qt.

https://github.com/fredvs
https://gitlab.com/fredvs
https://codeberg.org/fredvs

dbannon

  • Hero Member
  • *****
  • Posts: 2786
    • tomboy-ng, a rewrite of the classic Tomboy
Re: Corona outbreak
« Reply #33 on: March 22, 2020, 08:13:57 am »
Quote
I think all the problems are fixed in FPC320,

Are you talking about the "so.num" problems?:
https://bugs.freepascal.org/view.php?id=32367

In the last fork I did today of fpc 3.2.0 beta, it was not yet fixed (the same for fpc 3.3.1 trunk).

Fre;D

No, the discussion was about OpenSSL and its issues in 3.0.4 using certain newer protocols.  Perhaps my 'all the problems" was a little expansive.

Davo
Lazarus 3, Linux (and reluctantly Win10/11, OSX Monterey)
My Project - https://github.com/tomboy-notes/tomboy-ng and my github - https://github.com/davidbannon

d.ioannidis

  • Full Member
  • ***
  • Posts: 221
    • Nephelae
Re: Corona outbreak
« Reply #34 on: March 24, 2020, 01:34:36 pm »
Hi,
 
  a little ssl ( again ) fix to compile corona with fpc trunk ...

Code: Diff  [Select][+][-]
  1.  source/cmain.pas | 7 ++++++-
  2.  1 file changed, 6 insertions(+), 1 deletion(-)
  3.  
  4. diff --git a/source/cmain.pas b/source/cmain.pas
  5. index e788b09..28fef7e 100644
  6. --- a/source/cmain.pas
  7. +++ b/source/cmain.pas
  8. @@ -160,7 +160,7 @@ uses
  9.    Math, IniFiles,
  10.    OpenSSL,
  11.    {$IF FPC_FullVersion >= 30200}        // needed for SSL to work in general
  12. -  OpenSSLSockets, FpHttpClient,
  13. +  sslbase, OpenSSLSockets, FpHttpClient,
  14.    {$ELSE}
  15.    opkman_httpclient,
  16.    {$ENDIF}
  17. @@ -762,8 +762,13 @@ end;
  18.  procedure TMainForm.GetSocketHandler(Sender: TObject; const UseSSL: Boolean; out
  19.    AHandler: TSocketHandler);
  20.  begin
  21. +  {$IF FPC_FullVersion >= 30200}        // needed for SSL to work in general
  22. +  AHandler := TOpenSSLSocketHandler.Create;
  23. +  TOpenSSLSocketHandler(AHandler).SSLType := stTLSv1_2;
  24. +  {$ELSE}
  25.    AHandler := TSSLSocketHandler.Create;
  26.    TSSLSocketHandler(AHandler).SSLType := stTLSv1_2;
  27. +  {$ENDIF}
  28.  end;
  29.  
  30.  procedure TMainForm.GridDrawCell(Sender: TObject; aCol, aRow: Integer;


EDIT: I created a pull request. .


regards,
« Last Edit: March 24, 2020, 01:43:32 pm by Dimitrios Chr. Ioannidis »

minesadorada

  • Sr. Member
  • ****
  • Posts: 452
  • Retired
Re: Corona outbreak
« Reply #35 on: March 24, 2020, 01:36:35 pm »
Works perfectly for me - thanks!
A little worrying to see the exponential curves...
GPL Apps: Health MonitorRetro Ski Run
OnlinePackageManager Components: LazAutoUpdate, LongTimer, PoweredBy, ScrollText, PlaySound, CryptINI

lucamar

  • Hero Member
  • *****
  • Posts: 4219
Re: Corona outbreak
« Reply #36 on: March 24, 2020, 02:10:31 pm »
A little worrying to see the exponential curves...

Would be more worrying if they were otherwise; all epidemies grow (more or less) like that: 1 person infects 2, those two infect 4, those four infect 8, and so on. What is realy important (say my friends in that field) is the rythm of growth (how many other people each infected person manages to infect) and (for cure development) the inmunity ratio. And lots more things too "technical" for us, mere mortals ;)

And take into account that we suffer a "severe pandemic" every year: few people doesn't get a cold each winter, do they? :D

The moral, really, is that (provided you're not of any high-risk group) there is little to worry about: very basically just keep home as much as possible, follow the instructions of the sanitary autorities to prevent/mitigate contagion and you are all set.
Turbo Pascal 3 CP/M - Amstrad PCW 8256 (512 KB !!!) :P
Lazarus/FPC 2.0.8/3.0.4 & 2.0.12/3.2.0 - 32/64 bits on:
(K|L|X)Ubuntu 12..18, Windows XP, 7, 10 and various DOSes.

minesadorada

  • Sr. Member
  • ****
  • Posts: 452
  • Retired
Re: Corona outbreak
« Reply #37 on: March 24, 2020, 02:45:10 pm »
We are programmers - for the most part we can do basic maths.
If the mortality is 1% and half of a population gets infected this year, it is a simple calculation.
I am in a very high risk group, so did the maths early - hence the worry.

I live in Tenerife, Spain where a total lockdown has been in place for more than a week.  Even so, I will be at risk for a long time.

When the fatalities are in the hundreds of thousands maybe folk will take it more seriously.
For me, the most dangerous people are folk under 40 - especially asymptomatic young children.  They are the current superspreaders.
For those counting on an effective vaccine - remember Darwinian evolution:  Mutations are proportional to the number of hosts, and there will be billions.
My greatest hope is that the best mutation (from the virus's point of view) will be benign to Human Beings.  Killing the host is the worst outcome for a virus.

Once again - thank you for the app.
« Last Edit: March 24, 2020, 03:31:54 pm by minesadorada »
GPL Apps: Health MonitorRetro Ski Run
OnlinePackageManager Components: LazAutoUpdate, LongTimer, PoweredBy, ScrollText, PlaySound, CryptINI

Bart

  • Hero Member
  • *****
  • Posts: 5275
    • Bart en Mariska's Webstek
Re: Corona outbreak
« Reply #38 on: March 24, 2020, 03:15:24 pm »
The moral, really, is that (provided you're not of any high-risk group) there is little to worry about

Hmm, mortality rates for the young and healthy vary between 0.1 and 1%, so reason to worry even for those.
If you're in a high-risk group (like all of my patients), mortality goes up to 40% and more.
That scares the bejesus out of me.

My patients are almost never eligible for admittence on an IC ward, let alone for invasive ventilation therapie.
They literally choke to death if they get severely ill bij this virus.

And in my line of work, we almost have no face mask etc. left. We even ran out of alcohol for desinfecting our hands.

So, yes: I worry.

Bart

zeljko

  • Hero Member
  • *****
  • Posts: 1594
    • http://wiki.lazarus.freepascal.org/User:Zeljan
Re: Corona outbreak
« Reply #39 on: March 26, 2020, 02:40:57 pm »
@wp, please change StatusBar.Refresh to StatusBar.Invalidate or StatusBar.Update since Qt,Qt5 crashes when an point is clicked (don't know reason why but it completely crashes), maybe cocoa/carbon too (all widgetsets that paint outside of paint event isn't supported). Even without any StatusBar.Update/Invalidate/Refresh it works ok (win32 tested under wine)

wp

  • Hero Member
  • *****
  • Posts: 11858
Re: Corona outbreak
« Reply #40 on: March 26, 2020, 02:59:17 pm »
Replaced it by Statusbar.Update. Please report if the issue still exists. Repainting the statusbar is required because of Statusbar text is changed several times during the download procedure - calling Application.Invalidate would fix this, but then the TAChart measurement tool seems to hang. Statusbar.Update seems to do well, at least on windows; did not check others.

zeljko

  • Hero Member
  • *****
  • Posts: 1594
    • http://wiki.lazarus.freepascal.org/User:Zeljan
Re: Corona outbreak
« Reply #41 on: March 26, 2020, 03:05:09 pm »
It works fine with update (tested qt and qt5 on linux 64bit). Thanks :)

zeljko

  • Hero Member
  • *****
  • Posts: 1594
    • http://wiki.lazarus.freepascal.org/User:Zeljan
Re: Corona outbreak
« Reply #42 on: March 26, 2020, 03:23:24 pm »
gtk2 is also fine

circular

  • Hero Member
  • *****
  • Posts: 4196
    • Personal webpage
Re: Corona outbreak
« Reply #43 on: March 27, 2020, 10:18:43 am »
We are programmers - for the most part we can do basic maths.
If the mortality is 1% and half of a population gets infected this year, it is a simple calculation.
I am in a very high risk group, so did the maths early - hence the worry.
Yeah we need to take precautions.

Also the problem is that lots of people, even under 50, need to go to hospital. According to a study in America, 20% of people that need medical care are in the range 20-44. But if hospitals are overcrowded, they can't get help and they may die.

So we need to slow down the spread. In the meantime, we can try some cures, like hydroxychloroquine. By the way my government did not test people coming from China even when the first cases were discovered in France, not even take their temperature.
Conscience is the debugger of the mind

six1

  • Full Member
  • ***
  • Posts: 117
Re: Corona outbreak
« Reply #44 on: March 27, 2020, 10:50:24 am »
So we need to slow down the spread. In the meantime, we can try some cures, like hydroxychloroquine. By the way my government did not test people coming from China even when the first cases were discovered in France, not even take their temperature.

that's a realy bad idea!

https://theintercept.com/2020/03/24/trump-hyped-chloroquine-cure-covid-19-man-arizona-took-died/

 

TinyPortal © 2005-2018