diff --git a/notify.pl b/notify.pl index 014417f..c5f4efd 100755 --- a/notify.pl +++ b/notify.pl @@ -184,12 +184,14 @@ sub renewal { for my $vm_name (sort keys %vms) { my $_date = $vms{$vm_name}{'date'}; my $_payment = $vms{$vm_name}{'payment'}; + my $_subscription = $vms{$vm_name}{'subscription'} || "no"; my $_donated = $vms{$vm_name}{'donated'}; my $_name = $vms{$vm_name}{'name'}; my $_email = $vms{$vm_name}{'email'}; my $_hostname = $vms{$vm_name}{'hostname'}; my $_boot = $vms{$vm_name}{'boot'} || "yes"; + if ($_subscription =~ /yes/) { next; } if ($_donated =~ /done/) { next; } if ($_donated =~ /expire/) { next; } if ($_donated =~ /sponsor/) { next; } @@ -224,6 +226,73 @@ sub renewal { } } +sub subscription { + my %conf = %{$_[0]}; + my %vms = %{$_[1]}; + my $_etc = $conf{'conf'}{'ETC'}; + my $_vms = $conf{'conf'}{'VMS'}; + my $_tmpl = $conf{'conf'}{'TEMPLATES'}; + my $_server = $conf{'conf'}{'SERVER'}; + my $template = "$_tmpl/email-subscription.txt"; + + my $year = strftime("%Y", localtime); + my $month = strftime("%m", localtime); + + #my $total_donated = qx(ftp -Vo- https://obsda.ms/index.html | grep "donated to the OpenBSD" | awk -F';' '{print \$4}' | awk '{printf \$1}'); + #my $total_vms = qx(ftp -Vo- https://obsda.ms/index.html | grep "deployed" | awk -F '>' '{print \$3}' | awk '{printf \$1}'); + #my $total_hosts = qx(ftp -Vo- https://obsda.ms/servers.html | grep -c ">Server " | tr -d '\n'); + + my $response = HTTP::Tiny->new->get('https://openbsd.amsterdam/index.html'); + my $total_donated = $1 if $response->{'content'} =~ /([0-9,]+) donated to the OpenBSD/; + my $total_vms = $1 if $response->{'content'} =~ /([0-9]+) VMs deployed/; + $response = HTTP::Tiny->new->get('https://openbsd.amsterdam/servers.html'); + my $total_hosts = () = $response->{'content'} =~ /(\>Server )/g; + + for my $vm_name (sort keys %vms) { + my $_date = $vms{$vm_name}{'date'}; + my $_payment = $vms{$vm_name}{'payment'}; + my $_subscription = $vms{$vm_name}{'subscription'} || "no"; + my $_donated = $vms{$vm_name}{'donated'}; + my $_name = $vms{$vm_name}{'name'}; + my $_email = $vms{$vm_name}{'email'}; + my $_hostname = $vms{$vm_name}{'hostname'}; + my $_boot = $vms{$vm_name}{'boot'} || "yes"; + + if ($_subscription =~ /no/) { next; } + if ($_donated =~ /done/) { next; } + if ($_donated =~ /expire/) { next; } + if ($_donated =~ /sponsor/) { next; } + if ($_donated =~ /renewal/) { next; } + if ($_date =~ /$year\//) { next; } + if ($_date =~ /\/$month\//) { + (my $_firstname, my $_lastname) = split(/ /, $_name, 2); + (my $_year, my $_month, my $_day) = split(/\//, $_date, 3); + my $ipaddress = qx(grep -A2 $vm_name $_etc/dhcpd.conf | awk '/fixed-address/{print \$2}' | tr -d ';\n'); + + open(my $fh, '<', $template); + open my $fh_email, "|-", "/usr/sbin/sendmail -t"; + printf $fh_email "To: %s\n", $_email; + while (my $row = <$fh>) { + chomp $row; + $row =~ s/NAME/$_firstname/g; + $row =~ s/IP$/$ipaddress/g; + $row =~ s/VMID/$vm_name/g; + $row =~ s/SERVER/$_server/g; + + $row =~ s/YEAR/$year/g; + $row =~ s/TOTAL_DONATED/$total_donated/g; + $row =~ s/TOTAL_VMS/$total_vms/g; + $row =~ s/TOTAL_HOSTS/$total_hosts/g; + $row =~ s/PAYMENT/$_payment/g; + + print $fh_email "$row\n"; + } + close $fh_email; + print "SUBSCRIPTION: $_date, $_payment, $_name, $_email, $_hostname, $_server ($vm_name), $ipaddress\n"; + } + } +} + # function to notify people sub notify { my %conf = %{$_[0]}; @@ -286,12 +355,14 @@ sub deprovision { for my $vm_name (sort keys %vms) { my $_date = $vms{$vm_name}{'date'}; my $_payment = $vms{$vm_name}{'payment'}; + my $_subscription = $vms{$vm_name}{'subscription'} || "no"; my $_donated = $vms{$vm_name}{'donated'}; my $_name = $vms{$vm_name}{'name'}; my $_email = $vms{$vm_name}{'email'}; my $_hostname = $vms{$vm_name}{'hostname'}; my $_boot = $vms{$vm_name}{'boot'} || "yes"; + if ($_subscription =~ /yes/) { next; } if ($_donated =~ /done/) { next; } if ($_donated =~ /expire/) { next; } if ($_donated =~ /sponsor/) { next; } @@ -370,6 +441,7 @@ if ($debug) { debug_parse(\%conf, \%vms); } if ($function =~ /deployed/) { deployed(\%conf, \%vms); } elsif ($function =~ /stopped/) { stopped(\%conf, \%vms); } elsif ($function =~ /renewal/) { renewal(\%conf, \%vms); } +elsif ($function =~ /subscription/) { subscription(\%conf, \%vms); } elsif ($function =~ /notify/) { notify(\%conf, \%vms); } elsif ($function =~ /deprovision/) { deprovision(\%conf, \%vms); } else { print "Specify function: deployed, stopped, renewal, notify, deprovision\n"; } diff --git a/templates/email-subscription.txt b/templates/email-subscription.txt new file mode 100644 index 0000000..ba562d9 --- /dev/null +++ b/templates/email-subscription.txt @@ -0,0 +1,19 @@ +From: admin +Subject: OpenBSD Amsterdam Renewal YEAR +Content-Type: text/plain; charset=utf-8 + +Hi NAME, + +Your renewal fee for VMID on SERVER this year is €PAYMENT. + +Total donated: TOTAL_DONATED +Total VMs deployed: TOTAL_VMS +Total hosts deployed: TOTAL_HOSTS + +Payment will be done automatically. + +Mischa + +-- +OpenBSD Amsterdam +https://obsda.ms diff --git a/vms/vm01.txt b/vms/vm01.txt index 58109a8..bac8635 100644 --- a/vms/vm01.txt +++ b/vms/vm01.txt @@ -1,7 +1,7 @@ mac="fe:e1:ab:dd:73:a4" ip="192.168.1.1" owner="testuser1" -date="2018/01/02" +date="2018/02/02" payment="70" donated="" name="Test1 User" diff --git a/vms/vm02.txt b/vms/vm02.txt index 36533d7..4ffd5df 100644 --- a/vms/vm02.txt +++ b/vms/vm02.txt @@ -1,5 +1,6 @@ -date="2018/07/02" +date="2018/02/02" payment="70" +subscription="" donated="" name="Test2 User" email="vm02@high5.nl" diff --git a/vms/vm03.txt b/vms/vm03.txt index bd4c4cc..12b6e44 100644 --- a/vms/vm03.txt +++ b/vms/vm03.txt @@ -1,5 +1,6 @@ -date="2020/07/21" +date="2020/02/21" payment="60" +subscription="yes" donated="" name="Test3" email="vm03@high5.nl"