feat: refs #7022 Added cdn #5

Merged
guillermo merged 7 commits from 7022-rwmap into master 2024-09-11 06:33:33 +00:00
2 changed files with 36 additions and 0 deletions

10
cdn/Dockerfile Normal file
View File

@ -0,0 +1,10 @@
FROM httpd:2.4.61
RUN apt-get update \
&& apt-get install -y libcgi-pm-perl \
&& rm -rf /var/lib/apt/lists/*
COPY rwmap.pl /usr/local/bin/
RUN chmod +x /usr/local/bin/rwmap.pl
RUN echo "IncludeOptional conf.d/*.conf" >> conf/httpd.conf

26
cdn/rwmap.pl Executable file
View File

@ -0,0 +1,26 @@
#!/usr/bin/perl
use strict;
use warnings;
use Digest::SHA qw(sha1_hex);
# Desactiva el buffering de salida para que Apache pueda obtener la respuesta inmediatamente
$| = 1;
while (<STDIN>) {
chomp;
my $input = $_;
$input =~ /^\/image\/(.*)\/([a-z0-9-_]+)\.(png)$/;
my $collection = $1;
my $name = $2;
my $extension = $3;
my $sha1 = sha1_hex($name);
my $first = substr($sha1, 0, 2);
my $last = substr($sha1, 1, 2);
my $newPath = "images/$collection/$first/$last/$name.$extension";
if (-e "/usr/local/apache2/htdocs/$newPath") {
print "/$newPath\n";
} else {
print "/$input\n";
guillermo marked this conversation as resolved Outdated
Outdated
Review

Creo que se nos ha colado en las pruebas y debería ser solo print "/$input\n"; dado que $input ya incluye image.

Creo que se nos ha colado en las pruebas y debería ser solo `print "/$input\n";` dado que `$input` ya incluye image.
}
}