verdnatura/salix
verdnatura
/
salix
3
4
Fork 0
Code Issues Pull Requests 57 Releases Wiki Activity

approach
gitea/salix/pipeline/head There was a failure building this commit Details

This commit is contained in:
Javier Segarra 2023-12-15 21:55:38 +01:00
parent 7cd7502a9f
commit fc96038125
9 changed files with 97 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
images/.htaccess Normal file
View File

@ -0,0 +1,8 @@
Options +ExecCGI
AddHandler cgi-script .pl
<IfModule mod_rewrite.c>
RewriteEngine On
RewriteBase /images/
RewriteRule ^(.*)$ /cgi-bin/script.pl?nombre=$1 [L,QSA,NC]
</IfModule>

20
images/Dockerfile Normal file
View File

@ -0,0 +1,20 @@
FROM httpd:latest
# Habilita mod_cgi y configura Apache para ejecutar scripts CGI
RUN sed -i '/mod_cgi/s/^#//g' /usr/local/apache2/conf/httpd.conf
RUN echo "AddHandler cgi-script .cgi .pl" >> /usr/local/apache2/conf/httpd.conf
RUN echo "ScriptAlias /cgi-bin/ /usr/local/apache2/cgi-bin/" >> /usr/local/apache2/conf/httpd.conf
RUN chmod -R 755 /usr/local/apache2/cgi-bin/
# Habilita mod_rewrite
RUN sed -i '/mod_rewrite/s/^#//g' /usr/local/apache2/conf/httpd.conf
# Copia el script CGI al directorio /usr/local/apache2/cgi-bin/
COPY cgi-bin/ /usr/local/apache2/cgi-bin/
RUN chmod +x /usr/local/apache2/cgi-bin/script.pl
# Copia las imágenes al directorio htdocs/images
COPY images/ /usr/local/apache2/htdocs/images/
# Copia el archivo .htaccess para configurar el directorio htdocs/images
COPY .htaccess /usr/local/apache2/htdocs/images/.htaccess

2
images/cgi-bin/.htaccess Normal file
View File

@ -0,0 +1,2 @@
Options +ExecCGI
AddHandler cgi-script .pl

8
images/cgi-bin/hola_mundo.pl Normal file
View File

@ -0,0 +1,8 @@
#!/usr/bin/perl
use strict;
use warnings;
print "Content-type: text/html\n\n";
print "<html><head><title>Hola Mundo en Perl</title></head><body>";
print "<h1>Hola Mundo desde Perl</h1>";
print "</body></html>";

18
images/cgi-bin/mostrar-md5.pl Normal file
View File

@ -0,0 +1,18 @@
#!/usr/bin/perl
use strict;
use warnings;
use Digest::MD5;
# Leer el nombre del archivo desde la consulta
my $archivo = $ENV{'QUERY_STRING'};
# Calcular el MD5 del nombre del archivo
my $md5 = Digest::MD5->new;
$md5->add($archivo);
my $hash = $md5->hexdigest;
# Imprimir el resultado
print "Content-type: text/html\n\n";
print "<html><head><title>MD5 del nombre del archivo</title></head><body>";
print "<h1>MD5 del nombre del archivo: $hash</h1>";
print "</body></html>";

27
images/cgi-bin/script.pl Normal file
View File

@ -0,0 +1,27 @@
#!/usr/bin/perl
use strict;
use warnings;
use Digest::MD5;
use File::Basename;
sub calcular_hash {
my ($archivo) = @_;
# Obtener solo el nombre del archivo sin la ruta
my $nombre_archivo = fileparse($archivo);
# Calcular el hash MD5 del nombre del archivo
my $md5 = Digest::MD5->new;
$md5->add($nombre_archivo);
my $hash = $md5->hexdigest;
return $hash;
}
# Obtener el nombre del archivo de la URL
my $archivo_url = $ENV{'REQUEST_URI'};
my $hash_archivo = calcular_hash($archivo_url);
# Imprimir el hash como respuesta
print "Content-type: text/plain\n\n";
print "Hash del nombre del archivo: $hash_archivo\n";

8
images/docker-compose.yml Normal file
View File

@ -0,0 +1,8 @@
version: '3'
services:
apache:
build:
context: .
dockerfile: Dockerfile
ports:
- "8080:80"

6
storage/image/prod.sh
View File

@ -15,12 +15,14 @@ for image in "$directorio_principal"/*; do
fileName=$(basename "$image")
imageName="${fileName%.*}"
hash=$(echo -n "$imageName" | sha1sum | awk '{print $1}')
echo "$(dirname "$image")/${hash:0:2}/${hash:2:2}"
path=$(dirname "$image")/${hash:2:2}/${hash:0:2}
mkdir -p $path
# Crear un enlace simbólico en la carpeta principal
ln -s "$image" "$fileName"
mv $image $path/$fileName
ln -s "$image" "$1/$fileName"
fi
# done
# fi

2
storage/image/reestructure.sh
View File

@ -6,6 +6,8 @@ for collection in */ ; do
fileName=$(basename "$image")
imageName="${fileName%.*}"
hash=$(echo -n "$imageName" | sha1sum | awk '{print $1}')
echo $image
echo ${hash:2:2}/${hash:0:2}
mkdir -p $(dirname "$image")/${hash:2:2}/${hash:0:2}
ln -s $image $(dirname "$image")/${hash:2:2}/${hash:0:2}/$fileName
done