[REL] [ES] Filmaffinity 5.0

[Radagast]

Lanzamiento de nueva versión del script FilmAffinity (ES).ifs versión 5.0 para adaptarlo al nuevo sistema de protección de FilmAffinity. Creado y adaptado por MrObama2022 y Garada.

Ejecutar el script UPDATE_SCRIPTS para actualizar o descargar de https://update.antp.be/amc/scripts/ y sobrescribir el antiguo en la carpeta scripts de AMC.
Para el funcionamiento del script son necesarios los archivos ExternalCurlHandler.pas, StringUtils7552.pas y StringUtils1.pas que también tienen que estar ubicados en la carpeta scripts de AMC. Actualizar o descargar mediante mismos métodos que el script.

NOVEDADES
-Búsqueda estándar o avanzada. Seleccionable mediante la opción AdvancedSearch
-Listado ordenado por relevancia o por año. Seleccionable mediante la opción SortByYear
-----------------------------------------------------------------------------------------------------------------
El script ahora hace uso de ExternalCurlHandler.pas como intermediario para las peticiones a FilmAffinity. En la mayoría de casos funcionará bien con los parámetros por defecto, en casos especiales se puede modificar el comportamiento de ExternalCurlHandler.pas editando el archivo con un editor de texto.

OPCIONES/PARAMETROS de ExternalCurlHandler.pas
-UseVBS
Permite deshabilitar el uso de Visual Basic si no se quiere o no se puede usar Visual Basic
-curlPath
Permite especificar la ruta a cURL.exe en el caso de utilizar sistemas anteriores a Windows10 o Linux. Previamente se tendrá que descargar e instalar cURL (https://curl.se/)
-tmpDir
Permite especificar un directorio para los archivos temporales si no se quiere utilizar la carpeta SCRIPTS
-delayBetweenRequest
Permite especificar un retardo en ms entre las peticiones a FilmAffinity para evitar posibles bloqueos por peticiones muy seguidas
-TimeOut
Tiempo máximo de espera de las peticiones a FilmAffinity, en caso de superarse dará error
-curlUserAgent
UserAgent comunicado por el script en las peticiones a FilmAffinity

[jesalo]

No consigo que funcione.

[Garada]

No consigo que funcione.

¿Puedes dar más información?
Mensajes de error, sistema operativo que usas, comportamiento del script,...

[jesalo]

Hola, de nuevo
Gracias por tu trabajo
El script no me funciona. Uso windows 11 y el error lo puedes ver en la siguiente imagen
[https://postimg.cc/f3pqgsvSrl]

[jesalo]

Me parece que así no se puede ver. lo pongo manual

Error downloading page
http://www.filmaffinity.com/es/search.p ... type=title
ExitCode:35
ErrorMsg: schannel:next InitializeSecurityContext failed:
CRYPT_E_NO_REVOCATION_CHECK (0x80092012) - La función de revocación
no puede comprobar la revocación para el certificado.
ResponseCode; 000[/b][/b]


Esto ocurre para cualquier pelicula qur busque (en este caso es AMAL.

Muchas gracias

[Garada]

He mirado el código de error y puede ser por un antivirus que tengas instalado.

En todo caso se podría solucionar si haces un cambio en el código del archivo ExternalCurlHandler.pas
Ábrelo con un bloc de notas y busca las líneas:

Code: Select all

 // Download page and save to file
    sCommand := sCommand + ' -L --output "' + InstallerPath + curlOutput + '" --url "' + address + '" ' + '-H "Accept: text/html, */*" -H "Accept-Language: it" -H "DNT: 1" -H "Priority: u=0, i" -H "Sec-Ch-Ua: \"Not)A;Brand\";v=\"8\", \"Chromium\";v=\"138\", \"Google Chrome\";v=\"138\"" -H "Sec-Ch-Ua-Mobile: ?0" -H "Sec-Ch-Ua-Platform: \"Windows\"" -H "Sec-Fetch-Dest: Document" -H "Sec-Fetch-Mode: Navigate" -H "Sec-Fetch-Site: None" -H "Sec-Fetch-User: ?1" -H "Upgrade-Insecure-Requests: 1" -H "User-Agent: ' + curlUserAgent + '"';

y añade --ssl-no-revoke como indico a continuación:

Code: Select all

 // Download page and save to file
    sCommand := sCommand + ' --ssl-no-revoke -L --output "' + InstallerPath + curlOutput + '" --url "' + address + '" ' + '-H "Accept: text/html, */*" -H "Accept-Language: it" -H "DNT: 1" -H "Priority: u=0, i" -H "Sec-Ch-Ua: \"Not)A;Brand\";v=\"8\", \"Chromium\";v=\"138\", \"Google Chrome\";v=\"138\"" -H "Sec-Ch-Ua-Mobile: ?0" -H "Sec-Ch-Ua-Platform: \"Windows\"" -H "Sec-Fetch-Dest: Document" -H "Sec-Fetch-Mode: Navigate" -H "Sec-Fetch-Site: None" -H "Sec-Fetch-User: ?1" -H "Upgrade-Insecure-Requests: 1" -H "User-Agent: ' + curlUserAgent + '"';

Cuidado con los espacios

[jesalo]

Gracias por tu ayuda.
He hecho el cambio como me has indicado pero el mensaje de error se repite solo que la final pone
ResponseCode; 000--ssl-no-revoke

[Garada]

Creo que no has dejado un espacio antes de --ssl-no-revoke, revisa que tengas un espacio entre la comilla simple (') y el primer guion (-)

Code: Select all

sCommand := sCommand + ' --ssl-no-revoke -L .......
                        ^
                        |

[jesalo]

Efectivamente. Ahora todo correcto.
Millones de gracias.