Todos teníamos buenos recuerdos, compañero Aincrad, antes de que Softonic se convirtiese en lo que se convirtió. Al final les pudo la avaricia.

Pero en teoría se supone que desde hace un par de ¿años? se han redimido y ya no incluyen adware ni nada malicioso en sus instaladores... dicen.

Comparto dos videos rescatados de mi historial de Youtube, que resumen la historia por la que pasó Softonic:

 ⬤ Como Softonic nos HACKEO y nos LLENO DE VIRUS a TODOS | @Facu Peralta
 ⬤ El ASCENSO y CAÍDA de SOFTONIC | @BaityLive

La única "página oficial" de mucho software es, precisamente, SourceForge. Por ejemplo: https://sourceforge.net/projects/megui/

La vinculación o atribución maliciosa que haces con este sitio web es bastante injusta, ya que SourceForge es un sitio legítimo y con una finalidad transparente: Es un repositorio legendario de proyectos de código abierto, como GitHub, pero más... "clásico" (antiguo), desde el año 1999.

Claro que, tanto en SourceForge como en GitHub, cualquiera podría subir un virus (una release maliciosa). Pero con la cantidad de usuarios que tienen estas dos plataformas, con el tiempo lo deberían detectar, reportar, eliminar, y terminar sancionando / baneando a su autor... supongo.

En cualquier caso, nunca puede asumirse que todo lo publicado en sitios web de repositorios de código abierto sea automáticamente seguro. Precisamente algunos autores jugarán con esa premisa de "transparencia" para intentar colarte un regalito, no en el código fuente sino en las releases. Además, recuerdo noticias del pasado, donde hackers llegaron a infectar miles de repositorios, y lo que descargabas en las releases llevaba virus. Incluso noticias recientes relacionadas con NPM (https://www.npmjs.com/) donde al instalar paquetes de NPM te infectabas con virus por que unos hackers infectaron la plataforma (los paquetes). Yo no sé mucho sobre programación web, pero me entero de estas cositas por un youtuber español que habla mucho de IA y está especializado en programación web. Y con los paquetes de Ruby, pasó lo mismo. Con los de Python juraría que también hubo alguna infección grande que afectó a muchos paquetes, pero eso no lo recuerdo bien.

Nunca puedes estar seguro de nada. Así que siempre que sea posible, compilar por uno mismo las cosas.

No se presenta como un servicio con limitaciones ni fecha de caducidad configurable, por lo que, en principio, el enlace por sí solo no tendría por qué tener "tiempo de validez".

Los enlaces se pueden gestionar desde la sección "Tus enlaces públicos" dentro de Gemini. Supongo que un enlace es permanente hasta que decidas eliminarlo manualmente. O hasta que decidas eliminar la conversación. En ese caso, el enlace además se borra de forma automática (lo acabo de comprobar), por lo que no hay que preocuparse de gestionar enlaces "muertos" que apuntan a conversaciones que han dejado de existir, por que eso ya lo hace Google automáticamente. Esto es lo que pone en la interfaz de la sección "Tus enlaces públicos" en Gemini:

---

A lo mejor podría existir algún límite "oculto" relacionado, como por ejemplo una cantidad máxima permitida de enlaces generados (¿100, 1.000, 2.000?), pero saberlo con certeza es complicado por la opacidad de Google. Habría que terminar leyendo textos densos sobre políticas de la plataforma y documentación del servicio / producto en específico, o documentación oficial de sus APIs para programación. A veces son cosas que están bastante ocultas en un rincón entre textos desplegables que nadie lee, como ese otro límite "oculto" y dinámico en el que nadie piensa respecto al límite de suscripciones a canales de Youtube que una persona puede tener y que se especifica de forma bastante escondida aquí: https://support.google.com/youtube/answer/4489286 en los textos desplegables de abajo (spoiler: son 2.000 canales, pero es un límite que "evoluciona", signifique lo que cojones signifique eso). Eso por poner como ejemplo lo que cuesta a veces averiguar fuentes oficiales que expliquen limitaciones técnicas de los productos y servicios de Google.

Usa el botón de compartir chat para generar enlaces así de cortos:

👉 https://gemini.google.com/share/ae2c390e1a4e

Y desde ahí puedes continuar tu conversación con la IA.

PD: Quería que la respuesta de la IA en esa consversación te sirviera, pero se ha ido un poco por las ramas... por que se me pasó por alto mostrarle el título de tu hilo ("Los links de la IA de Google ¡son larguísimos!") para añadirle mayor contexto.

Visto en Reddit:



Malditas IA. Esta imagen está mejor hecha. Pronto no distinguiremos realidad, de ficción.

¿De verdad no lo asimilas?. Son grilletes, como los que lleva en los tobillos. La cadena que debería unir los grilletes de la muñecas, la IA simplemente lo hizo mal, y se quedó suspendida en el aire.

También llevan "preparándonos" con catástrofes sobre el calentamiento global   enfriamiento global   crisis climática   emergencia climática   cuento climático   chiringuito corporativo   impuesto al aire   eco-ansiedad   cambio climático desde el siglo XIX, cuando los periódicos empezaron a imprimirse masivamente y se vendían en la calle. Lo puedes buscar, hay muchos registros públicos en Internet que recopilan estas publicaciones sobre apocalipsis climáticos desde el siglo XIX hasta la actualidad...

Siempre predicen un año, y un escenario catastrófico, generalmente la Antártida derretida completamente, o mencionando alguna isla que se hundirá bajo el agua, y así cada pocos años. Pero al final, sucede lo mismo que con el calendario Maya: Llega el año del apocalipsis, y no sucede nada, todo sigue igual de vivo.

El problema es que la gente tiene memoria de pez:



Volviendo al tema, compañero Flamer (aunque todo esto que he explicado tiene mucho que ver para entender mejor el propósito), no te están preparando para un contacto alienígena, solo te están vendiendo el relato del miedo (humo), con el fin de mantenerte más manipulable cuando los políticos lo necesiten, ya que está muy demostrado que el alarmismo vende, y sirve para mantener manipulable a la población. Eso, y también para montar todo un negocio alrededor del cuento, claro está, el dinero es un motivo y motor igual de principal, sino más, que controlar a una sociedad o influir en su voluntad.

Cuando se les agote un tema, es decir, cuando ya la mayoría de la gente cuestione un relato, entonces empezarán a impulsar fuertemente el alarmismo alienígena, pero solo será otro relato con el mismo objetivo que el anterior.

¡Un saludo!

El siguiente script, desarrollado en PowerShell, sirve para desactivar las directivas de caché de escritura en todos los discos físicos actualmente conectados, para evitar que cada disco tenga una configuración distinta y asegurarse de que el comportamiento de escritura en disco sea coherente y seguro en todo el sistema, evitando riesgo de pérdida de datos o fallo del disco por un corte de luz. Y sí, uso la palabra evitar, y lo hago en modo afirmativo, ya que en más de 15 años con la caché desactivada y muchos cortes de luz (y un apagón en España) no he sufrido pérdida de datos ni fallos en ninguno de mis discos ni una sola vez. Antes de adquirir el hábito de desactivar la caché, sí tuve muchos problemas con cada corte de luz, pero después de adquirir el hábito, ni uno solo. Por ese motivo recomiendo encarecidamente mantener siempre desactivada la caché de escritura en todos los discos. El disco irá más lento, pero eso que pierdes lo ganas multiplicado en seguridad.



La primera casilla de arriba viene activada por defecto en Windows cuando se detecta un nuevo disco conectado.

---

El script se ha desarrollado mediante vibe coding con inteligencia artificial, y un poco de edición manual en el código resultante. Lo hice para un amigo y lo comparto tal cual.

#Requires -RunAsAdministrator
 
Set-StrictMode -Version Latest
$ErrorActionPreference = "Stop"
 
#  Disable both write-cache options on ALL connected disk drives
#  Option 1: Turn off write caching on the device  > UserWriteCacheSetting = 0
#  Option 2: Turn off Windows write-cache flushing > CacheIsPowerProtected  = 0
 
[int] $successCount = 0
[int] $failCount    = 0
 
Write-Host ""
Write-Host "============================================================" -ForegroundColor Cyan
Write-Host "  Disable Write-Cache Options - All Physical Disks" -ForegroundColor Cyan
Write-Host "============================================================" -ForegroundColor Cyan
Write-Host ""
 
[System.Object[]] $diskDevices = @(
    Get-PnpDevice -Class DiskDrive -Status OK -ErrorAction SilentlyContinue
)
 
if ($diskDevices.Count -eq 0) {
    Write-Warning "No disk drives found with status OK."
    Write-Host "Press any key to exit..."
    $null = $Host.UI.RawUI.ReadKey("NoEcho,IncludeKeyDown")
    exit 1
}
 
[System.Collections.Hashtable] $driveLetterMap = @{}
[System.Collections.Hashtable] $diskSizeMap = @{}
[System.Collections.Hashtable] $diskLabelMap = @{}
 
function Format-DiskSize {
    param([uint64] $sizeBytes)
    if ($sizeBytes -ge 1TB) { return "$([math]::Round($sizeBytes / 1TB, 2)) TB" }
    elseif ($sizeBytes -ge 1GB) { return "$([math]::Round($sizeBytes / 1GB, 2)) GB" }
    else { return "$([math]::Round($sizeBytes / 1MB, 2)) MB" }
}
 
Get-CimInstance -ClassName Win32_LogicalDisk -ErrorAction SilentlyContinue | ForEach-Object {
    [string] $letter    = $_.DeviceID
    [object] $diskDrive = $_ |
                          Get-CimAssociatedInstance -ResultClassName Win32_DiskPartition -ErrorAction SilentlyContinue |
                          Get-CimAssociatedInstance -ResultClassName Win32_DiskDrive     -ErrorAction SilentlyContinue |
                          Select-Object -First 1
    if ($null -ne $diskDrive) {
        [string] $pnpId = $diskDrive.PNPDeviceID.ToUpper()
        if (-not $driveLetterMap.ContainsKey($pnpId)) {
            $driveLetterMap[$pnpId] = $letter
        }
 
        if (-not $diskSizeMap.ContainsKey($pnpId)) {
            $diskSizeMap[$pnpId] = [uint64]$diskDrive.Size
        }        
        if (-not $diskLabelMap.ContainsKey($pnpId)) {
            $diskLabelMap[$pnpId] = [string]$_.VolumeName
        }
    }
}
 
# Sort disk devices by their first drive letter; disks without letter go last
[System.Object[]] $sortedDevices = @(
    $diskDevices | Sort-Object -Property {
        [string] $key = $_.InstanceId.ToUpper()
        if ($driveLetterMap.ContainsKey($key)) { $driveLetterMap[$key] } else { 'ZZ:' }
    }
)
 
Write-Host "Found $($sortedDevices.Count) disk(s). Processing...`n" -ForegroundColor Yellow
 
foreach ($device in $sortedDevices) {
 
    [string] $friendlyName = $device.FriendlyName
    [string] $instanceId   = $device.InstanceId
    [string] $driveLetter = $driveLetterMap[$instanceId.ToUpper()]
    [string] $diskSize    = Format-DiskSize -sizeBytes $diskSizeMap[$instanceId.ToUpper()]
    [string] $diskLabel   = $diskLabelMap[$instanceId.ToUpper()]
    [string] $regPath      = "HKLM:\SYSTEM\CurrentControlSet\Enum\$instanceId\Device Parameters\Disk"
 
    Write-Host "-----------------------------------------------------" -ForegroundColor DarkGray
    Write-Host "  Disk : [$driveLetter] $diskLabel - $friendlyName ($diskSize)" -ForegroundColor White
    Write-Host "  ID   : $instanceId"  -ForegroundColor DarkGray
    if (-not (Test-Path -Path $regPath)) {
        Write-Warning "  Registry path not found - skipping: $regPath"
        $failCount++
        continue
    }
 
    # Option 1: Disable write caching
    #    UserWriteCacheSetting:
    #      0 = System default  |  1 = Force ENABLE  |  2 = Force DISABLE
    try {
        Set-ItemProperty -Path $regPath `
                         -Name  "UserWriteCacheSetting" `
                         -Value 0 `
                         -Type  DWord `
                         -Force
        Write-Host "  [OK] Enable write caching DISABLED (UserWriteCacheSetting = 0)" -ForegroundColor Green
    } catch {
        Write-Warning "  [FAIL] UserWriteCacheSetting - $_"
        $failCount++
    }
 
    # Option 2: Re-enable buffer flushing (uncheck "turn off flushing") 
    #    CacheIsPowerProtected:
    #      0 = Flushing ENABLED (checkbox unchecked - safe mode)
    #      1 = Flushing DISABLED (checkbox checked - risky, power-loss danger)
    try {
        Set-ItemProperty -Path $regPath `
                         -Name  "CacheIsPowerProtected" `
                         -Value 0 `
                         -Type  DWord `
                         -Force
        Write-Host "  [OK] Turn off write-cache buffer flushing DISABLED (CacheIsPowerProtected = 0)" -ForegroundColor Green
        $successCount++
    } catch {
        Write-Warning "  [FAIL] CacheIsPowerProtected - $_"
        $failCount++
    }
}
 
#  Summary
Write-Host ""
Write-Host "============================================================" -ForegroundColor Cyan
Write-Host "  Summary" -ForegroundColor Cyan
Write-Host "============================================================" -ForegroundColor Cyan
Write-Host "  Disks processed successfully : $successCount" -ForegroundColor Green
if ($failCount -gt 0) {
    Write-Host "  Disks with errors            : $failCount" -ForegroundColor Red
}
Write-Host ""
Write-Host "  NOTE: A system RESTART is required for changes" -ForegroundColor Yellow
Write-Host "        to take effect on all devices." -ForegroundColor Yellow
Write-Host ""
 
Write-Host "Press any key to exit..."
$null = $Host.UI.RawUI.ReadKey("NoEcho,IncludeKeyDown")

Por último, les muestro tres métodos de extensión: WaitForPageReady, WaitForElement e IsCloudflareChallengeRequired, para usar con la interfaz IWebDriver de Selenium, implementada en el tipo ChromeDriver. Loss tres muy útiles, y para mi son de uso muy común.

WaitForPageReady y WaitForElement encapsulan patrones habituales de espera y validación que normalmente se terminan reescribiendo en múltiples proyectos, centralizando la lógica en una capa reutilizable y consistente.

WaitForPageReady permite esperar a que la página web alcance el estado de carga completa (document.readyState = "complete"), asegurando que el navegador ha finalizado la carga inicial del documento HTML. Adicionalmente, incorpora mecanismos opcionales para esperar un tiempo adicional tras la carga inicial y detectar estabilidad del DOM (evitando cambios asíncronos posteriores).

WaitForElement implementa un patrón de espera explícita para elementos del DOM. Su funcionalidad es simple pero crítica: Espera hasta que un elemento exista en el DOM, verifica que esté visible (Displayed), verifica que sea interactuable (Enabled), y devuelve directamente el elemento listo para su uso.

La tercerca extensión, IsCloudflareChallengeRequired, permite detectar si la página actual está bloqueada por un desafío de Cloudflare. Este tipo de protección puede impedir completamente la automatización web si no se detecta correctamente, por lo que esta función actúa como una capa de diagnóstico temprano. Nota: Puede que mi implementación de detección no sea sofisticada, es realmente una heurística muy simple basada en validación de texto, la cual ha sido eficaz 100% en todos los escenarios que he probado, pero no sé si abarcará escenarios variantes que puedan ocasionar las páginas protegidas por Cloudflare.

Módulo IWebDriverExtensions:

#Region " Option Statements "
 
Option Strict On
Option Explicit On
Option Infer Off
 
#End Region
 
#Region " Imports "
 
Imports OpenQA.Selenium
Imports OpenQA.Selenium.Internal
Imports OpenQA.Selenium.Support.UI
 
#End Region
 
#Region " IWebDriver Extensions "
 
' ReSharper disable once CheckNamespace
 
'Namespace DevCase.ThirdParty.Selenium.Extensions.IWebDriverExtensions
 
    ''' <summary>
    ''' Provides extension methods to use with the <see cref="IWebDriver"/> interface.
    ''' </summary>
    '''
    ''' <remarks>
    ''' Note: Some functionalities of this assembly may require to install one or all of the listed NuGet packages:
    ''' <para></para>
    ''' <see href="https://www.nuget.org/packages/Selenium.Support">Selenium.Support by Selenium Committers</see>
    ''' <para></para>
    ''' <see href="https://www.nuget.org/packages/Selenium.WebDriver">Selenium.WebDriver by Selenium Committers</see>
    ''' <para></para>
    ''' </remarks>
    <HideModuleName>
    Public Module IWebDriverExtensions
 
#Region " Public Extension Methods "
 
        ''' <summary>
        ''' Waits for the current web page in the specified <see cref="IWebDriver"/> instance 
        ''' to report a ready state of <c>"complete"</c>. And optionally, it can also 
        ''' wait for any pending dynamic updates in the DOM to complete after the page 
        ''' has reported a ready state of <c>"complete"</c>.
        ''' </summary>
        ''' 
        ''' <remarks>
        ''' Note: Some functionalities of this assembly may require to install one or all of the listed NuGet packages:
        ''' <para></para>
        ''' <see href="https://www.nuget.org/packages/Selenium.Support">Selenium.Support by Selenium Committers</see>
        ''' <para></para>
        ''' <see href="https://www.nuget.org/packages/Selenium.WebDriver">Selenium.WebDriver by Selenium Committers</see>
        ''' <para></para>
        ''' </remarks>
        '''
        ''' <param name="driver">
        ''' The <see cref="IWebDriver"/> instance.
        ''' </param>
        ''' 
        ''' <param name="afterPageReadyDelay">
        ''' Optional. A <see cref="TimeSpan"/> representing the delay to wait 
        ''' <b>after</b> the web page reports a ready state of <c>"complete"</c>, 
        ''' before the method returns.
        ''' <para></para>
        ''' This can be useful to allow background scripts, animations, or 
        ''' asynchronous content to finish initializing after the document is loaded.
        ''' <para></para>
        ''' Default value is null.
        ''' </param>
        ''' 
        ''' <param name="waitForDomIdle">
        ''' Optional. When set to <see langword="True"/>, the method starts waiting for any pending dynamic updates in the DOM 
        ''' to complete after the page has reported a ready state of <c>"complete"</c>.
        ''' <para></para>
        ''' Default value is <see langword="False"/>.
        ''' <para></para>
        ''' &#9888;&#65039; Do not set this parameter to <see langword="True"/> for web pages with continuously changing DOM elements 
        ''' (e.g., pages with animations, snow effects, or real-time updates).
        ''' </param>
        ''' 
        ''' <param name="timeoutSeconds">
        ''' Optional. The maximum time in seconds to wait for the page to report a ready state of <c>"complete"</c>, 
        ''' and for any pending dynamic updates in the DOM to complete if 
        ''' <paramref name="waitForDomIdle"/> is set to <see langword="True"/>.
        ''' <para></para>
        ''' Default value is 30 seconds.
        ''' <para></para>
        ''' If the condition is not met within this time, a <see cref="WebDriverTimeoutException"/> is thrown.
        ''' </param>
        ''' 
        ''' <param name="throwOnTimeout">
        ''' Optional. When set to <see langword="True"/>, 
        ''' a <see cref="WebDriverTimeoutException"/> will be thrown if the time specified in 
        ''' <paramref name="timeoutSeconds"/> parameter reaches while waiting the
        ''' web page to report a ready state of <c>"complete"</c>,
        ''' or while waiting for any pending dynamic updates in the DOM to complete after the 
        ''' page has reported a ready state of <c>"complete"</c>.
        ''' <para></para>
        ''' Default value is <see langword="True"/>.
        ''' </param>
        <DebuggerStepThrough>
        <Extension>
        <EditorBrowsable(EditorBrowsableState.Always)>
        Public Sub WaitForPageReady(driver As IWebDriver,
                           Optional afterPageReadyDelay As TimeSpan = Nothing,
                           Optional waitForDomIdle As Boolean = False,
                           Optional timeoutSeconds As Integer = 30,
                           Optional throwOnTimeout As Boolean = True)
 
            If timeoutSeconds <= 0 Then
                Throw New ArgumentException("Timeout must be a value greater than zero.", NameOf(timeoutSeconds))
            End If
 
            Dim js As IJavaScriptExecutor = TryCast(driver, IJavaScriptExecutor)
            If js Is Nothing Then
                Throw New ArgumentException("Driver must support javascript execution", NameOf(driver))
            End If
 
            Dim wait As New WebDriverWait(driver, TimeSpan.FromSeconds(timeoutSeconds)) With {
                .PollingInterval = TimeSpan.FromMilliseconds(500)
            }
 
            Dim startTime As Date = Date.Now
            Dim domLength As Integer
 
            wait.Until(
                Function(d As IWebDriver)
                    Try
                        Dim readyState As String = js.ExecuteScript("if (document.readyState) return document.readyState;").ToString()
                        If readyState.Equals("complete", StringComparison.OrdinalIgnoreCase) Then
                            domLength = d.PageSource.Length
                            Return True
                        Else
                            Return False
                        End If
 
                    Catch ex As WebDriverTimeoutException
                        If throwOnTimeout Then
                            Throw
                        End If
                        Return True
 
                    Catch ex As InvalidOperationException ' Window is no longer available
#If Not NETCOREAPP Then
                        Return ex.Message.IndexOf("unable to get browser", StringComparison.OrdinalIgnoreCase) >= 0
#Else
                        Return ex.Message.Contains("unable to get browser", StringComparison.OrdinalIgnoreCase)
#End If
 
                    Catch ex As WebDriverException ' Browser is no longer available
#If Not NETCOREAPP Then
                        Return ex.Message.IndexOf("unable to connect", StringComparison.OrdinalIgnoreCase) >= 0
#Else
                        Return ex.Message.Contains("unable to connect", StringComparison.OrdinalIgnoreCase)
#End If
 
                    Catch ex As Exception
                        Return True
 
                    End Try
                End Function)
 
            If afterPageReadyDelay <> Nothing Then
                Thread.Sleep(afterPageReadyDelay)
            End If
 
            ' Even when "document.readyState()" returns "complete", web pages can continue to modify
            ' the DOM dynamically after the initial load. This can occur due to asynchronous scripts,
            ' client-side rendering frameworks (such as React, Angular, or Vue), AJAX/fetch requests
            ' that inject additional content and rewrites portions of the page, etc.
            '
            ' As a result, the page source may still change for a short period of time even though the 
            ' web browser reports that the document has finished loading.
            '
            ' This check ensures that the HTML content remains stable (IDLE) before exiting.
            If waitForDomIdle Then
 
                Dim newDomLength As Integer = driver.PageSource.Length
                If newDomLength <> domLength Then
 
                    Dim elapsedTime As TimeSpan = Date.Now - startTime
                    timeoutSeconds -= CInt(elapsedTime.TotalSeconds)
                    If timeoutSeconds <= 0 Then
                        timeoutSeconds = 1
                    End If
 
                    Dim domWait As New WebDriverWait(driver, TimeSpan.FromSeconds(timeoutSeconds)) With {
                        .PollingInterval = TimeSpan.FromSeconds(1)
                    }
 
                    domWait.Until(Function(d As IWebDriver)
                                      Try
                                          Dim length As Integer = d.PageSource.Length
                                          Dim idle As Boolean = (length = newDomLength)
                                          newDomLength = length
                                          Return idle
 
                                      Catch ex As WebDriverTimeoutException
                                          If throwOnTimeout Then
                                              Throw
                                          End If
                                          Return True
 
                                      Catch ex As InvalidOperationException ' Window is no longer available
#If Not NETCOREAPP Then
                                          Return ex.Message.IndexOf("unable to get browser", StringComparison.OrdinalIgnoreCase) >= 0
#Else
                                          Return ex.Message.Contains("unable to get browser", StringComparison.OrdinalIgnoreCase)
#End If
 
                                      Catch ex As WebDriverException ' Browser is no longer available
#If Not NETCOREAPP Then
                                          Return ex.Message.IndexOf("unable to connect", StringComparison.OrdinalIgnoreCase) >= 0
#Else
                                          Return ex.Message.Contains("unable to connect", StringComparison.OrdinalIgnoreCase)
#End If
 
                                      Catch ex As Exception
                                          Return True
 
                                      End Try
                                  End Function)
                End If
            End If
        End Sub
 
        ''' <summary>
        ''' Waits until an element matching the specified <see cref="By"/> selector is present 
        ''' in the DOM of the specified <see cref="IWebDriver"/>.
        ''' </summary>
        ''' 
        ''' <param name="driver">
        ''' The <see cref="IWebDriver"/> instance.
        ''' </param>
        ''' 
        ''' <param name="by">
        ''' The <see cref="By"/> selector used to locate the element.
        ''' </param>
        ''' 
        ''' <param name="timeoutSeconds">
        ''' Optional. The maximum number of seconds to wait. Default is 30 seconds.
        ''' <para></para>
        ''' If the condition is not met within this time, a <see cref="WebDriverTimeoutException"/> is thrown.
        ''' </param>
        ''' 
        ''' <returns>
        ''' If the function succeds, returns the found <see cref="IWebElement"/>.
        ''' </returns>
        <Extension>
        <DebuggerStepThrough>
        <EditorBrowsable(EditorBrowsableState.Always)>
        Public Function WaitForElement(driver As IWebDriver, by As By, Optional timeoutSeconds As Integer = 30) As IWebElement
 
            If timeoutSeconds <= 0 Then
                Throw New ArgumentException("Timeout must be a value greater than zero.", NameOf(timeoutSeconds))
            End If
 
            Dim wait As New WebDriverWait(driver, TimeSpan.FromSeconds(timeoutSeconds)) With {
                .PollingInterval = TimeSpan.FromMilliseconds(250)
            }
 
            Return wait.Until(Function(d As IWebDriver)
                                  Try
                                      Dim element As IWebElement = d.FindElement(by)
                                      ' Check if element is displayed and enabled (interactable).
                                      If (element IsNot Nothing) AndAlso
                                          element.Displayed AndAlso
                                          element.Enabled Then
 
                                          Return element
                                      End If
 
                                  Catch ex As NoSuchElementException
                                      ' Ignore.
 
                                  End Try
 
                                  ' Return Nothing to continue waiting until timeout.
                                  Return Nothing
                              End Function)
 
        End Function
 
        ''' <summary>
        ''' Determines whether the current web page loaded in the specified <see cref="IWebDriver"/> is protected by a Cloudflare challenge, 
        ''' so a navigation block or anti-bot challenge is currently being displayed instead of the expected content.
        ''' </summary>
        ''' 
        ''' <param name="driver">
        ''' The <see cref="IWebDriver"/> instance.
        ''' </param>
        ''' 
        ''' <returns>
        ''' <see langword="True"/> if a Cloudflare challenge is required to load the web page; 
        ''' otherwise, <see langword="False"/>.
        ''' </returns>
        <Extension>
        <DebuggerStepThrough>
        Public Function IsCloudflareChallengeRequired(driver As IWebDriver) As Boolean
 
#If NETCOREAPP Then
            ArgumentNullException.ThrowIfNull(driver)
#Else
            If driver Is Nothing Then
                Throw New ArgumentNullException(NameOf(driver))
            End If
#End If
            Dim pageSource As String = driver.PageSource
            Dim pageTitle As String = driver.Title
 
            Return UtilWeb.IsCloudflareChallengeRequired(pageSource, pageTitle)
        End Function
 
#End Region
 
    End Module
 
'End Namespace
 
#End Region

Clase adicional UtilWeb, necesaria para poder usar la extensión IsCloudflareChallengeRequired (del módulo IWebDriverExtensions compartido aquí arriba):

#Region " Option Statements "
 
Option Strict On
Option Explicit On
Option Infer Off
 
#End Region
 
#Region " Imports "
 
#End Region
 
#Region " Web Util "
 
' ReSharper disable once CheckNamespace
 
'Namespace DevCase.Core.Networking.Common
 
''' <summary>
''' Provides web-related utility functions.
''' </summary>
Public NotInheritable Class UtilWeb
 
#Region " Constructors "
 
    ''' <summary>
    ''' Prevents a default instance of the <see cref="UtilWeb"/> class from being created.
    ''' </summary>
    <DebuggerNonUserCode>
    Private Sub New()
    End Sub
 
#End Region
 
#Region " Public Methods "
 
    ''' <summary>
    ''' Determines whether the provided HTML source-code indicates that a Cloudflare challenge is required to access the page.
    ''' </summary>
    ''' 
    ''' <param name="pageSource">
    ''' The raw HTML source code.
    ''' </param>
    ''' 
    ''' <param name="pageTitle">
    ''' Optional. The title of the web page.
    ''' </param>
    ''' 
    ''' <see langword="True"/> if a Cloudflare challenge is required to load the web page; 
    ''' otherwise, <see langword="False"/>.
    <DebuggerStepThrough>
    Public Shared Function IsCloudflareChallengeRequired(pageSource As String, pageTitle As String) As Boolean
 
        If String.IsNullOrWhiteSpace(pageSource) Then
            Return False
        End If
 
        Dim challengeIndicators As String() = {
            "challenge-error-text",
            "/cdn-cgi/challenge-platform",
            "window._cf_chl_opt",
            "<title>Just a moment...</title>"
        }
 
        For Each indicator As String In challengeIndicators
#If NETCOREAPP Then
            If pageSource.Contains(indicator, StringComparison.OrdinalIgnoreCase) Then
                Return True
            End If
#Else
            If pageSource.IndexOf(indicator, StringComparison.OrdinalIgnoreCase) >= 0 Then
                Return True
            End If
#End If
        Next
 
        Return String.Equals(pageTitle, "Just a moment...", StringComparison.OrdinalIgnoreCase)
    End Function
 
'    ''' <summary>
'    ''' Sends an HTTP request to the specified URL to determine whether 
'    ''' a Cloudflare challenge is required to load the web page that points to.
'    ''' </summary>
'    ''' 
'    ''' <param name="url">
'    ''' The URL to check.
'    ''' </param>
'    ''' 
'    ''' <returns>
'    ''' <see langword="True"/> if a Cloudflare challenge is required to load the web page; 
'    ''' otherwise, <see langword="False"/>.
'    ''' </returns>
'    <DebuggerStepThrough>
'    Public Shared Function IsCloudflareChallengeRequired(url As String) As Boolean
'
'        Using handler As New HttpClientHandler() With {
'                .AllowAutoRedirect = True,
'                .AutomaticDecompression = DecompressionMethods.GZip Or DecompressionMethods.Deflate
'            }
'
'            Using client As New HttpClient(handler)
'                Dim resp As HttpResponseMessage = client.GetAsync(url).ConfigureAwait(False).GetAwaiter().GetResult()
'                Dim pageSource As String = resp.Content.ReadAsStringAsync().ConfigureAwait(False).GetAwaiter().GetResult()
'
'                Return (resp.StatusCode <> HttpStatusCode.OK) AndAlso
'                    UtilWeb.IsCloudflareChallengeRequired(pageSource, pageTitle:=Nothing)
'            End Using
'        End Using
'    End Function
'
'    ''' <summary>
'    ''' Sends an HTTP request to the specified <see cref="Uri"/> to determine whether 
'    ''' a Cloudflare challenge is required to load the web page that points to.
'    ''' </summary>
'    ''' 
'    ''' <param name="uri">
'    ''' The <see cref="Uri"/> to check.
'    ''' </param>
'    ''' 
'    ''' <returns>
'    ''' <see langword="True"/> if a Cloudflare challenge is required to load the web page; 
'    ''' otherwise, <see langword="False"/>.
'    ''' </returns>
'    <DebuggerStepThrough>
'    Public Shared Function IsCloudflareChallengeRequired(uri As Uri) As Boolean
'
'        Return UtilWeb.IsCloudflareChallengeRequired(uri.ToString())
'    End Function
 
#End Region
 
End Class
 
'End Namespace
 
#End Region

Ahora les muestro la clase ConsoleTerminationWatcher, generada por IA (la comparto tal cual, sin ninguna refactorización ni organización de código por mi parte... más allá de haberle añadido algo de documentación inicial), cuyo propósito es interceptar los eventos de cierre y terminación de una aplicación de consola para ejecutar una lógica arbitraria de limpieza, de forma segura y controlada.

💡 Tip: Esta clase es el complemento ideal para combinar con el uso del método KillDriverAndChildBrowsers que compartí en el post anterior a este, sobre la automatización con Selenium.

Ejemplo de uso generado por IA:

Imports System
Imports System.Threading
 
Module Program
 
    ' Declared outside Main to keep it alive during the entire process lifetime
    Private _watcher As ConsoleTerminationWatcher
 
    Sub Main()
 
        Console.WriteLine("Application started.")
        Console.WriteLine("Press CTRL + C or close the console window to trigger termination handler.")
        Console.WriteLine()
 
        _watcher = New ConsoleTerminationWatcher(
            Sub()
                Console.WriteLine()
                Console.WriteLine("Termination event captured!")
 
                Try
                    Console.WriteLine("Executing cleanup logic...")
 
                    ' Example: KillDriverAndChildBrowsers("chromedriver")
 
                    ' Generic cleanup simulation
                    Thread.Sleep(1000)
 
                    Console.WriteLine("Cleanup finished successfully.")
                Catch ex As Exception
                    Console.WriteLine($"Error during cleanup: {ex.Message}")
                End Try
            End Sub)
 
        ' Simulated long-running process
        Dim counter As Integer = 0
 
        While True
            counter += 1
            Console.WriteLine($"Running iteration {counter}")
            Thread.Sleep(1500)
        End While
 
    End Sub
 
End Module

La clase ConsoleTerminationWatcher:

Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Runtime.InteropServices
 
''' <summary>
''' Provides a wrapper for the Win32 SetConsoleCtrlHandler function.
''' <para></para>
''' This class ensures that cleanup logic is executed when the console window is closed or interrupted.
''' </summary>
Public Class ConsoleTerminationWatcher : Implements IDisposable
 
    ''' <summary>
    ''' Adds or removes an application-defined HandlerRoutine function from the list of handler functions for the calling process.
    ''' </summary>
    ''' 
    ''' <param name="handler">
    ''' A pointer to the application-defined HandlerRoutine function to be added or removed.
    ''' </param>
    ''' 
    ''' <param name="add">
    ''' If this parameter is TRUE, the handler is added; if it is FALSE, the handler is removed.
    ''' </param>
    ''' 
    ''' <returns>
    ''' Returns TRUE if the function succeeds; otherwise, FALSE.
    ''' </returns>
    <DllImport("kernel32.dll", SetLastError:=True)>
    Private Shared Function SetConsoleCtrlHandler(handler As ConsoleEventDelegate, add As Boolean) As Boolean
    End Function
 
    ''' <summary>
    ''' An application-defined function used with the SetConsoleCtrlHandler function.
    ''' </summary>
    ''' 
    ''' <param name="eventType">
    ''' The type of control signal received by the handler.
    ''' </param>
    ''' 
    ''' <returns>
    ''' If the function handles the control signal, it should return TRUE. 
    ''' <para></para>
    ''' If it returns FALSE, the next handler function in the list is called.
    ''' </returns>
    Private Delegate Function ConsoleEventDelegate(eventType As ConsoleEventType) As Boolean
 
    ''' <summary>
    ''' Enumerates the control signal types received by the console control handler.
    ''' </summary>
    Private Enum ConsoleEventType As Integer
 
        ''' <summary>
        ''' A CTRL+C signal was received.
        ''' </summary>
        CTRL_C_EVENT = 0
 
        ''' <summary>
        ''' A CTRL+BREAK signal was received.
        ''' </summary>
        CTRL_BREAK_EVENT = 1
 
        ''' <summary>
        ''' The user closed the console window.
        ''' </summary>
        CTRL_CLOSE_EVENT = 2
 
        ''' <summary>
        ''' The user is logging off.
        ''' </summary>
        CTRL_LOGOFF_EVENT = 5
 
        ''' <summary>
        ''' The system is shutting down.
        ''' </summary>
        CTRL_SHUTDOWN_EVENT = 6
 
    End Enum
 
    ''' <summary>
    ''' Holds the delegate reference to prevent it from being collected by the Garbage Collector.
    ''' </summary>
    Private ReadOnly _handler As ConsoleEventDelegate
 
    ''' <summary>
    ''' The action to be executed when a termination event occurs.
    ''' </summary>
    Private ReadOnly _cleanupAction As Action
 
    ''' <summary>
    ''' Tracks the disposal status of the instance.
    ''' </summary>
    Private _disposedValue As Boolean = False
 
    ''' <summary>
    ''' Initializes a new instance of the <see cref="ConsoleTerminationWatcher"/> class.
    ''' </summary>
    ''' 
    ''' <param name="cleanupAction">
    ''' The action to execute when the console terminates (e.g., process cleanup).
    ''' </param>
    ''' 
    ''' <exception cref="ArgumentNullException">
    ''' Thrown when cleanupAction is null.
    ''' </exception>
    ''' 
    ''' <exception cref="Win32Exception">
    ''' Thrown when the Win32 API registration fails.
    ''' </exception>
    <DebuggerStepThrough>
    Public Sub New(cleanupAction As Action)
 
        If cleanupAction Is Nothing Then
            Throw New ArgumentNullException(NameOf(cleanupAction))
        End If
 
        Me._cleanupAction = cleanupAction
        Me._handler = New ConsoleEventDelegate(AddressOf Me.ConsoleEventCallback)
 
        If Not SetConsoleCtrlHandler(Me._handler, True) Then
            Dim errorCode As Integer = Marshal.GetLastWin32Error()
            Throw New Win32Exception(errorCode, $"Failed to register console control handler. Win32 Error Code: {errorCode}")
        End If
    End Sub
 
    ''' <summary>
    ''' The callback method invoked by the Windows Operating System when a console event occurs.
    ''' </summary>
    ''' 
    ''' <param name="eventType">
    ''' The type of console event triggered.
    ''' </param>
    ''' 
    ''' <returns>
    ''' Always returns FALSE to allow the process to terminate normally after cleanup.
    ''' </returns>
    <DebuggerStepThrough>
    Private Function ConsoleEventCallback(eventType As ConsoleEventType) As Boolean
 
        Select Case eventType
            Case ConsoleEventType.CTRL_C_EVENT,
                 ConsoleEventType.CTRL_BREAK_EVENT,
                 ConsoleEventType.CTRL_CLOSE_EVENT,
                 ConsoleEventType.CTRL_LOGOFF_EVENT,
                 ConsoleEventType.CTRL_SHUTDOWN_EVENT
 
                ' Trigger the external cleanup logic
                Me._cleanupAction.Invoke()
 
            Case Else
                ' Ignore other events.
        End Select
 
        Return False
    End Function
 
    ''' <summary>
    ''' Releases the resources used by the <see cref="ConsoleTerminationWatcher"/>.
    ''' </summary>
    ''' 
    ''' <param name="disposing">
    ''' True to release both managed and unmanaged resources; False to release only unmanaged resources.
    ''' </param>
    <DebuggerStepThrough>
    Protected Overridable Sub Dispose(disposing As Boolean)
        If Not Me._disposedValue Then
            If disposing Then
                ' Free managed objects here if any.
            End If
 
            ' Unregister the Win32 handler (Unmanaged resource cleanup)
            ' This must happen even if disposing is False (called from Finalizer)
            SetConsoleCtrlHandler(Me._handler, False)
 
            Me._disposedValue = True
        End If
    End Sub
 
    ''' <summary>
    ''' Finalizes an instance of the <see cref="ConsoleTerminationWatcher"/> class.
    ''' </summary>
    <DebuggerStepThrough>
    Protected Overrides Sub Finalize()
        ' Ensure the Win32 hook is removed if the programmer forgot to call Dispose
        Me.Dispose(disposing:=False)
        MyBase.Finalize()
    End Sub
 
    ''' <summary>
    ''' Releases the resources used by the <see cref="ConsoleTerminationWatcher"/>.
    ''' </summary>
    <DebuggerStepThrough>
    Public Sub Dispose() Implements IDisposable.Dispose
        Me.Dispose(disposing:=True)
        GC.SuppressFinalize(Me)
    End Sub
 
End Class