commit 458bee66710c11e0807a7c2627c20ab14f24527a Author: luisgulo Date: Fri Jun 2 18:16:59 2023 +0200 Subido a Gitea diff --git a/.directory b/.directory new file mode 100644 index 0000000..06dab1c --- /dev/null +++ b/.directory @@ -0,0 +1,2 @@ +[Desktop Entry] +Icon=./.icon.png diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..f3a8b22 --- /dev/null +++ b/.gitignore @@ -0,0 +1,14 @@ +#---- Gambas files to ignore (v4) +*.gambas +.lock +*~ +core +core.* +vgcore +vgcore.* +.kdbg* +.*.prof +.lang/*.pot +.gambas/* +.settings +#---- diff --git a/.hidden/CHANGELOG b/.hidden/CHANGELOG new file mode 100644 index 0000000..64e9f94 --- /dev/null +++ b/.hidden/CHANGELOG @@ -0,0 +1,6 @@ +* Thu Sep 10 2020 luisgulo 1.0.4 +- Ajuste de Icono de aplicacion + +* Thu Sep 10 2020 luisgulo 1.0.3 +- Lanzamiento inicial + diff --git a/.icon.png b/.icon.png new file mode 100644 index 0000000..70d7fbe Binary files /dev/null and b/.icon.png differ diff --git a/.project b/.project new file mode 100644 index 0000000..9932256 --- /dev/null +++ b/.project @@ -0,0 +1,30 @@ +# Gambas Project File 3.0 +Title=PdfVerifySign +Startup=FMain +Icon=PdfVerifySign-icono.png +Version=1.0.4 +Component=gb.image +Component=gb.gui +Component=gb.form +Description="Verificador de Firmas en Documentos PDF" +Authors="luisgulo@soloconlinux.org.es" +TabSize=2 +Language=es_ES +SourcePath=/home/luisgulo/ProyectosGAMBAS/SOURCEs +Maintainer=luisgulo +Vendor=luisgulo +Address=luisgulo@soloconlinux.org.es +Url=https://repositorio.soloconlinux.org.es +License=General Public License +PackageName=pdfverifysign-1.0.4 +CreateEachDirectory=1 +Packager=1 +Systems=debian +Menus=debian:"Applications/File Management" +Categories=debian:"Utility" +Groups=debian:"utils" +ExtraDependencies=debian:"poppler-utils\t\t" +Tags=Example,FileTools,Office,Security,Utility,Viewer +Dependencies=poppler-utils +WebSite=https://repositorio.soloconlinux.org.es/ +CreateMenu=1 diff --git a/.src/FMain.class b/.src/FMain.class new file mode 100644 index 0000000..03e19b5 --- /dev/null +++ b/.src/FMain.class @@ -0,0 +1,42 @@ +' Gambas class file + + +Public Sub Form_Open() + '' Usaremos el poder de pdfsig (poppler-utils) + ' Poner titulo y version + Me.Title = "PDFVerifySign" & " - versión: " & Application.Version + ' Solo permitimos ver PDFs + EscogePDF.Filter = ["*.pdf", "Ficheros PDF"] + 'Definimos cabecera mensajes en toda la App + Message.Title = Application.Name + System.Shell = "/bin/bash" +End + +Public Sub botonSalir_Click() + Quit +End + +Public Sub botonVerificarFirma_Click() + Dim ficheroPDF As String + Dim Resultado As String + txtResultado.Text = "*** Comprobando PDF ***" + If IsNull(EscogePDF.SelectedPath) + Message.Warning("No ha seleccionado ningun PDF para comprobar") + Return + Endif + ficheroPDF = EscogePDF.SelectedPath + 'Comprobar si tiene firma o no + Shell "echo -n $(pdfsig " & Shell$(ficheroPDF) & " 1>/dev/null 2>/dev/null; echo $?)" To Resultado + If Resultado = "2" + Message.Info("No he podido localizar ninguna firma en el PDF") + txtResultado.Text = "No se ha localizado ninguna firma en el PDF" + Return + Endif + If Resultado = "1" + Message.Error("Formato de PDF Incorrecto") + txtResultado.Text = "Formato de PDF Incorrecto" + Return + Endif + ' Si llega aqui tiene valor de retorno 0 (Correcto) + Shell "pdfsig " & Shell$(ficheroPDF) To txtResultado.Text +End diff --git a/.src/FMain.form b/.src/FMain.form new file mode 100644 index 0000000..5037f54 --- /dev/null +++ b/.src/FMain.form @@ -0,0 +1,35 @@ +# Gambas Form File 3.0 + +{ Form Form + MoveScaled(0,0,120,69) + Icon = Picture["icon:/22/pdf"] + Resizable = False + { botonVerificarFirma Button + MoveScaled(71,64,23,4) + Text = (" Verificar Firma") + Picture = Picture["icon:/22/pdf"] + } + { txtResultado TextArea + MoveScaled(52,5,67,58) + Font = Font["-1"] + ReadOnly = True + } + { labelResultado Label + MoveScaled(52,1,57,4) + Text = ("Resultado de la verificación de la Firma del Documento PDF") + } + { EscogePDF FileChooser + MoveScaled(1,5,50,58) + Font = Font["-1"] + ReadOnly = True + } + { labelSelecciona Label + MoveScaled(1,1,50,4) + Text = ("Seleccione el PDF que desee verificar") + } + { botonSalir Button + MoveScaled(96,64,23,4) + Text = (" Salir") + Picture = Picture["icon:/22/quit"] + } +} diff --git a/.startup b/.startup new file mode 100644 index 0000000..c058955 --- /dev/null +++ b/.startup @@ -0,0 +1,10 @@ +FMain +PdfVerifySign +0 +0 +1.0.4 + +gb.image +gb.gui +gb.form + diff --git a/PdfVerifySign-icono.png b/PdfVerifySign-icono.png new file mode 100644 index 0000000..ecfc130 Binary files /dev/null and b/PdfVerifySign-icono.png differ diff --git a/README.md b/README.md new file mode 100644 index 0000000..e69de29