Skip to content

Instantly share code, notes, and snippets.

View JohnMertz's full-sized avatar

John Mertz JohnMertz

View GitHub Profile
@JohnMertz
JohnMertz / cardspace.c
Last active April 10, 2020 10:51
Calculate how to display a hand of cards for 80 column console
View cardspace.c
#include <stdio.h>
void main() {
int x,y,z,spaceleft,spaceright,width;
printf("|");
for (x=0;x<80;x++) {
printf(" ");
}
printf("|left card right\n");
for (x=1;x<=13;x++) {
width = 67 / x;
@JohnMertz
JohnMertz / suit.c
Created October 9, 2015 18:37
How many cards do you have to deal before an entire suit has been dealt?
View suit.c
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
void main(){
long long int total = 0;
long long int i = 0;
for (i = 0; i<1000000; i++){
@JohnMertz
JohnMertz / price.sh
Created August 12, 2017 22:38
Bash Price-Checker Robot
View price.sh
#!/bin/bash
# Price-Checker Robot
# All dependencies should be pre-installed (at least on Debian): bash, curl, echo, grep, sed, tail, date, bsd-mailx, bc, cut
# Alerts user if the price has dropped for defined items.
# Reduced items result in alerts to the defined recipient.
# Errors are sent to the maintainer
# All are logged to $HOME/.price.log
@JohnMertz
JohnMertz / darksky_to_php.sh
Last active November 30, 2017 03:49
Darksky.net API to PHP Associative Array
View darksky_to_php.sh
#/bin/bash
# Note: This is not secure! If you somehow get malicious code back from Darksky.net, this can run arbitrary code. Use wisely and sanitize your inputs! https://www.xkcd.com/327/
output="yourOutputPathHere.php"
# Replace with your API key and coordinates. Should be fine with other units and may work without excluding minutel and flags.
# I have only teste this format (hourly and daily with SI units). This works for Ottawa, Canada.
# Pipes force into separate lines with quoted fields in PHP associative array format: "attribute_name1"=>"value","attribute_name2"=>...
# Outputs to a .tmp of your defined file name.
curl --compress 'https://api.darksky.net/forecast/<api_key_here>/45.421,-75.69?units=si&exclude=minutely,flags' | tr '{' '\n' | sed 's/},$//' | sed 's/,\ /\ /' | sed -r 's/([^"]),"/\1","/g' | sed -r 's/":([^"])/":"\1/g' | sed -r 's/([^"])\}/\1"\n/' | grep '^"time"' | sed 's/":"/"=>"/g' > $output.tmp
@JohnMertz
JohnMertz / lxc-debian-wheezy
Last active October 4, 2018 20:05 — forked from tpokorra/lxc-debian-wheezy
lxc template for Debian Wheezy to install on Debian Stretch
View lxc-debian-wheezy
#!/bin/bash
#
# lxc: linux Container library
# Authors:
# Daniel Lezcano <daniel.lezcano@free.fr>
# This library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public
@JohnMertz
JohnMertz / OCTranspo.pl
Created February 15, 2019 03:30
OCTranspo Alert Scraper
View OCTranspo.pl
#!/usr/bin/perl
use strict;
use warnings;
use WWW::Mechanize;
use Data::Dump qw/ dump /;
use JSON::Any;
# Define the routes that I actually care about
@JohnMertz
JohnMertz / mocp-start-cec.pl
Last active June 18, 2019 22:07
Start Music On Console Player and Force Active Input via HDMI-CEC
View mocp-start-cec.pl
#!/usr/bin/perl
use strict;
use warnings;
use JSON::XS;
# Checking for devices every time takes a few seconds, so store these
# settings in a file. Do so in /tmp so that it will be re-checked on reboot
my $tmp = '/tmp/cec-devices';
@JohnMertz
JohnMertz / Duolingo.pl
Created June 18, 2019 21:59
Duolingo API Script
View Duolingo.pl
#!/usr/bin/perl
use strict;
use warnings;
use WWW::Mechanize;
use JSON::Any;
use HTTP::CookieJar::LWP;
my $user = 'username';
@JohnMertz
JohnMertz / clone-lxc.pl
Created July 20, 2019 07:33
Extract and Configure LXC from Archived Backup
View clone-lxc.pl
#!/usr/bin/perl
# Note for GitHub:
# This script makes several assumptions based on the backup image I use.
# Mine is a freshly installed Debian image preconfigured just how I want it.
# The script relies on the name 'fresh-lxc' and IP '10.0.3.1' being set.
# It is also written with Debian Buster as the host, some paths may differ.
# Make changes appropriately.
use strict;
@JohnMertz
JohnMertz / rem2json.pl
Last active July 8, 2022 01:07
Convert `remind -p` output to JSON
View rem2json.pl
#!/usr/bin/perl
use strict;
use warnings;
use constant MONTH => sub{{
'January' => 1,
'February' => 2,
'March' => 3,
'April' => 4,