cgi: Insert a QR code for the SEPA transaction
authorWerner Koch <wk@gnupg.org>
Tue, 30 May 2017 17:23:20 +0000 (19:23 +0200)
committerWerner Koch <wk@gnupg.org>
Tue, 30 May 2017 17:23:20 +0000 (19:23 +0200)
cgi/procdonate.cgi
web/donate/checkout-se.de.org
web/donate/checkout-se.fr.org
web/donate/checkout-se.org

index 9fe237c..13b9bf4 100755 (executable)
@@ -21,6 +21,9 @@ use IO::Socket::UNIX;
 realpath($0) =~ /^(.*)\/.*$/;
 my %config = do $1 . '/config.rc';
 
+$ENV{PATH} = "/bin:/usr/bin";
+delete @ENV{qw(IFS CDPATH ENV BASH_ENV)};
+
 my $baseurl = $config{baseurl};
 my $htdocs =  $config{htdocs};
 my $stripepubkey =  $config{stripepubkey};
@@ -46,6 +49,7 @@ my $name = "";
 my $mail = "";
 my $message = "";
 my $separef = "";
+my $sepaqr = "";
 my $errorstr = "";
 my $notepanel = "";
 
@@ -332,6 +336,7 @@ sub write_template ($) {
         || s/<!--PUBLISH_NAME-->/$publishname/
         || s/<!--LANG-->/$lang/
         || s/<!--SEPA_REF-->/$separef/
+        || s/<!--SEPA_QR-->/$sepaqr/
         || s/<!--ERRORSTR-->/$errorstr/
         || s/<!--ERR_AMOUNT-->/$err_amount/
         || s/<!--ERR_NAME-->/$err_name/
@@ -1041,6 +1046,20 @@ sub complete_sepa ()
     $mail = $data{"Mail"};
     $message = $data{"Message"};
 
+    my @cmd = (qw (/usr/local/bin/ppsepaqr),
+               'DE76301502000002108603',
+               'g10 Code GmbH',
+               $amount,
+               'GnuPG donation '.$separef );
+
+    if (open PPSEPAQR, '-|', @cmd) {
+        while (defined (my $line = <PPSEPAQR>))
+        {
+            $sepaqr = $sepaqr . $line;
+        }
+        close PPSEPAQR;
+    }
+
     write_checkout_page ();
 }
 
index 43169f3..3eddd25 100644 (file)
               </div>
             </div>
           </form>
-
+          <!--SEPA-QR-->
           <p>
            Bitte achten Sie darauf, dass die unter Verwendungszweck
            angegebene Referenznummer stimmt. Diese wird benötigt um
index 1f05e36..ac1c19a 100644 (file)
               </div>
             </div>
           </form>
-
+          <!--SEPA-QR-->
           <p>
             Veuillez vous assurer de la présence du numéro de référence, afin que
             nous puissions associer le montant reçu à votre donation et ainsi vous
index 56f079a..0f80c31 100644 (file)
               </div>
             </div>
           </form>
-
+          <!--SEPA-QR-->
           <p>
             Take care to give the reference number so that we can match your
             data with your actual donation and list you as donor if desired.