wellington1993
/ compress_pdfs.sh
Created
October 25, 2024 23:06
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/bin/env bash | |
| # Configurações personalizáveis | |
| BASE_DIRS=("/DATA/LAUDOS" "/DATA/LAUDOS_ANTIGOS") | |
| FILES_PER_DIR=100 | |
| COMPRESSION_LEVEL=9 | |
| OUTPUT_FORMAT="zip" | |
| DELETE_ORIGINAL=true | |
| LOG_FILE="compression_log.txt" |
wellington1993
/ gist:b06d1335879e564aa66d7ffd6345ba75
Last active
October 24, 2024 18:05
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Não mais suportado: gfortran-13-doc kerneloops libtommath1 | |
| Remover (foi auto-instalado) gir1.2-cscreensaver-1.0 gir1.2-mutter-14 | |
| kwayland-data libarpack2 libcscreensaver0 libfltk1.3 libglib2.0-0 | |
| libgnustep-base1.29 libgsl27 libguvcview-2.1-2t64 libieee1284-3 | |
| libmutter-14-0 libnode109 libpmix2 libqt5systeminfo5 libqt6dbus6t64 | |
| libqt6gui6t64 libqt6network6t64 libqt6opengl6t64 | |
| libqt6openglwidgets6t64 libqt6printsupport6t64 libqt6sql6t64 | |
| libqt6test6t64 libqt6waylandeglclienthwintegration6 | |
| libqt6waylandeglcompositorhwintegration6 libqt6widgets6t64 |
wellington1993
/ MainUnit.pas
Created
October 17, 2024 14:35
Exemplo monitoramento TCP Delphi - example of delphi tcp monitoring thread
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| unit MainUnit; | |
| interface | |
| uses | |
| Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, | |
| Dialogs, IdTCPClient, IdIOHandler, IdSSLOpenSSL, IdBaseComponent, IdComponent, | |
| IdTCPConnection, IdGlobal, ExtCtrls, IdTCPServer, SyncObjs, MonitorThreads; | |
| type |
wellington1993
/ exemplo-json-aldo.pas
Created
September 24, 2024 19:01
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| uses | |
| System.SysUtils, Data.DBXJSON, IdHTTP, IdSSLOpenSSL; | |
| procedure SendJSON(const AURL: string); | |
| var | |
| JSONObject, ImageObject, ThumbnailObject: TJSONObject; | |
| IdHTTP: TIdHTTP; | |
| SSLHandler: TIdSSLIOHandlerSocketOpenSSL; | |
| JSONStream: TStringStream; | |
| Response: string; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| uses | |
| SysUtils, IniFiles, Classes, ShellAPI, Windows, RegularExpressions, Dialogs, System.Threading, IBX.IBServices, IBX.IBUtils; | |
| type | |
| TDatabaseConfig = record | |
| Server: string; | |
| Port: string; | |
| DatabasePath: string; | |
| UserName: string; | |
| Password: string; |
wellington1993
/ manut-versions-paperclip.rb
Created
August 16, 2024 14:57
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| namespace :cleanup do | |
| desc "Cleanup old versions and keep only the last year of data / Limpeza de versões antigas e manter apenas os dados do último ano" | |
| task versions: :environment do | |
| require 'benchmark' | |
| class Version < ApplicationRecord | |
| self.table_name = 'versions' | |
| end | |
| class TempVersion < ApplicationRecord |
wellington1993
/ PHP-Debug-HTTP-Request.php
Created
August 9, 2024 18:55
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <?php | |
| $date = new DateTime(); | |
| $tempo = $date->getTimestamp(); | |
| $my_file = "/tmp/output-$tempo.html"; | |
| $handle = fopen($my_file, 'w'); | |
| ob_start(); | |
| echo '<pre>'; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| [1099855:0806/101240.304397:ERROR:object_proxy.cc(623)] Failed to call method: org.freedesktop.NetworkManager.GetDevices: object_path= /org/freedesktop/NetworkManager: org.freedesktop.DBus.Error.AccessDenied: An AppArmor policy prevents this sender from sending this message to this recipient; type="method_call", sender=":1.13768" (uid=1000 pid=1099855 comm="/snap/skype/354/usr/share/skypeforlinux/skypeforli" label="snap.skype.skype (enforce)") interface="org.freedesktop.NetworkManager" member="GetDevices" error name="(unset)" requested_reply="0" destination="org.freedesktop.NetworkManager" (uid=0 pid=2426 comm="/usr/sbin/NetworkManager --no-daemon" label="unconfined") | |
| ioctl failed for wlan0, errno = 19 (No such device) | |
| SHM_CHROMIUM_WRAP: [unlink post-call] redirected_path=/dev/shm/snap.skype.shm-1100161-1-flags ret=0x0 | |
| SHM_CHROMIUM_WRAP: [unlink pre-call] redirected_path=/dev/shm/snap.skype.shm-1100161-1 (from path=/dev/shm/shm-1100161-1) | |
| SHM_CHROMIUM_WRAP: [unlink post-call] redirected_path=/dev/shm/snap.s |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/bin/bash | |
| # Script to compress PDF files, be carefull with signed docs | |
| # Original Size: 241M | |
| # output.pdf | |
| # Reduce PDF Size using QPDF | |
| # new size: 217M | |
| qpdf --compress-streams=y --object-streams=generate output.pdf output-qpdf.pdf |
wellington1993
/ vendedores-licenca-windows-maringa.txt
Created
July 16, 2024 19:36
Parceiros Venda Licença Microsoft Windows Região Maringá
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Organizar: https://appsource.microsoft.com/pt-br/marketplace/partner-dir?filter=services%3DLicensing%3Bsort%3D0%3BpageSize%3D18%3BonlyThisCountry%3Dtrue%3Blat%3D-23.4231203%3Blng%3D-51.926358%3Bcountry%3DBR%3Bradius%3D100%3Blocname%3DRua%2520Santos%2520Dumont%252C%25201321%252C%2520Zona%252003%252C%2520Maring%25C3%25A1%2520-%2520Paran%25C3%25A1%252C%252087050-100%252C%2520Brazil%3BlocationNotRequired%3Dtrue | |
| Creativity Tecnologia Ltda | |
| https://appsource.microsoft.com/pt-br/marketplace/partner-dir/28948bee-120a-40aa-b126-f1ac96601cca/overview/contact | |
| https://creativity.eti.br/#licencas | |
| https://api.whatsapp.com/send/?phone=554399859157&text&type=phone_number&app_absent=0 | |
| Becker Consultoria e Comércio EIRELI EPP | |
| https://appsource.microsoft.com/pt-br/marketplace/partner-dir/068a8d39-f726-4df6-92c2-896008f7c1f3/overview |