Skip to content

Instantly share code, notes, and snippets.

View foursixnine's full-sized avatar
♾️
Dreaming about arepas and maria cookies!

Santiago Zarate foursixnine

♾️
Dreaming about arepas and maria cookies!
79 followers · 22 following
View GitHub Profile
@foursixnine
foursixnine / mojo-progress-bar.pl
Last active June 20, 2017 11:46 — forked from olegwtf/gist:c9c5a266352cba73dc5b
Mojo::UserAgent progress bar
BEGIN { $ENV{MOJO_MAX_MESSAGE_SIZE} = 1024**3 }
use strict;
use Mojo::UserAgent;
my $ua = Mojo::UserAgent->new;
$ua->on(start => sub {
my ($ua, $tx) = @_;
my $progress = 0;
$tx->res->on(progress => sub {
@foursixnine
foursixnine / bypass-passphrase-on-luks.sh
Last active April 2, 2017 20:16
Add LUKS passphrase without knowing the actual password
# This will work if you have still access to the partition
# and of course, you need root access for this :)
export firstpassword="This is the old password"
export new_password="This is the new password"
export loopdev=/dev/loop0
export device=/tmp/$(date +%Y%M%d)-testdev.img
export volume_name=/dev/mapper/crypt_fun
dd if=/dev/zero of=testdev bs=1M count=500
losetup $loopdev $device
@foursixnine
foursixnine / keybase.md
Created April 2, 2017 20:35

Keybase proof

I hereby claim:

  • I am foursixnine on github.
  • I am foursixnine (https://keybase.io/foursixnine) on keybase.
  • I have a public key whose fingerprint is 49F9 6417 5666 EC92 7FC7 EE8E 7005 DF57 B449 9E20

To claim this, I am signing this object:

@foursixnine
foursixnine / caching_cleaner.pl
Created April 3, 2017 14:35
Enforce caching cleanup
use strict;
use warnings;
use File::Basename;
use Fcntl qw(:flock);
use List::MoreUtils;
use Data::Dumper;
use JSON;
use File::Glob;
@foursixnine
foursixnine / gist:1f34ad1ac5ba2b30b75a9ac1e2b9abff
Created May 26, 2017 16:07
openqa
clone_job.pl \
--from openqa.opensuse.org 408843 \
--skip-chained-deps --skip-deps --skip-download \ HDD_1=opensuse-tumbleweed.qcow2 ISO=
@foursixnine
foursixnine / Baz.pm
Last active March 5, 2018 15:30
Multiple inheritance: Baz uses Bar as a base, who uses Foo as a base.
package Baz;
use base "Bar";
1;
@foursixnine
foursixnine / details-zypper_up.json
Created September 26, 2017 08:44
[
{
"properties": [
],
"area": [
{
"similarity": 100,
"h": 59,
"y": 0,
@foursixnine
foursixnine / json data
Created January 30, 2018 14:22
{"job":{"id":99946,"children":{"Parallel":[],"Chained":[]},"origin_id":99945,"assets":{"hdd":["openSUSE-13.1-x86_64.hda"],"iso":["openSUSE-13.1-DVD-i586-Build0091-Media.iso"]},"state":"done","settings":{"VIDEOMODE":"text","NAME":"00099946-opensuse-13.1-DVD-i586-Build0091-textmode@32bit","HDD_1":"openSUSE-13.1-x86_64.hda","TEST":"textmode","MACHINE":"32bit","BUILD":"0091","DISTRI":"opensuse","ISO_MAXSIZE":"4700372992","DESKTOP":"textmode","DVD":"1","QEMUCPU":"qemu32","ARCH":"i586","VERSION":"13.1","ISO":"openSUSE-13.1-DVD-i586-Build0091-Media.iso","FLAVOR":"DVD"},"name":"opensuse-13.1-DVD-i586-Build0091-textmode@32bit","priority":35,"parents":{"Parallel":[],"Chained":[]},"t_finished":"2018-01-30T11:19:41","t_started":"2018-01-30T10:19:41","clone_id":99986,"testresults":[{"fatal":0,"result":"passed","category":"installation","important":0,"name":"isosize","milestone":0,"details":[{"screenshot":"isosize-1.png","num":1,"md5_basename":"61d0c3faf37d49d33b6fc308f2.png","result":"unk","md5_dirname":"347/da6"}]},{"det
@foursixnine
foursixnine / gist:ebfe8f780484847612cfbfec3e2fc615
Created February 4, 2018 00:23
OpenSource Mechanical Keyboards
https://input.club/devices/infinity-keyboard/
https://opensource.com/article/17/5/building-open-source-mechanical-keyboards
https://github.com/help-14/mechanical-keyboard
@foursixnine
foursixnine / gist:258c52e8861450bb93ee3419f79eefff
Last active April 12, 2018 09:02
diff --git a/t/05-scheduler-dependencies.t b/t/05-scheduler-dependencies.t
index 81771028..766d9182 100644
--- a/t/05-scheduler-dependencies.t
+++ b/t/05-scheduler-dependencies.t
@@ -714,11 +714,12 @@ is_deeply($jobD2_h->{parents}->{Chained}, [$jobA2->id], 'jobD2 has jobA2 as chai
is($jobD2_h->{settings}{TEST}, $jobD->TEST, 'jobD2 test and jobD test are equal');
my $jobA2_h = job_get_deps($jobA2->id);
-is_deeply(
- $jobA2_h->{children}->{Chained},