"1012",
        "VK_VERSION"     => "008",
        "VK_SND_ID"      => "uid100010",
        "VK_STAMP"       => "8",
        "VK_AMOUNT"      => "603.58",
        "VK_CURR"        => "EUR",
        "VK_MSG"         => "My cool payment",
        "VK_RETURN"      => "http://127.0.0.1:49233/banks/thorbanks_response/",
        "VK_CANCEL"      => "http://127.0.0.1:49233/banks/thorbanks_response/",
        "VK_DATETIME"    => "2020-12-29T13:55:34+0000",
        "VK_LANG"        => "EST",
        "VK_ENCODING"    => "UTF-8"
);
// STEP 3. Generate data to be signed
// ==================================
// Data to be signed is in the form of XXXYYYYY where XXX is 3 char
// zero padded length of the value and YYY the value itself
// NB! Danske expects symbol count, not byte count with UTF-8,
// so use `mb_strlen` instead of `strlen` to detect the length of a string
$data = str_pad (mb_strlen($fields["VK_SERVICE"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_SERVICE"] .    /* 1012 */
        str_pad (mb_strlen($fields["VK_VERSION"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_VERSION"] .    /* 008 */
        str_pad (mb_strlen($fields["VK_SND_ID"], "UTF-8"),  3, "0", STR_PAD_LEFT) . $fields["VK_SND_ID"] .     /* uid100010 */
        str_pad (mb_strlen($fields["VK_STAMP"], "UTF-8"),   3, "0", STR_PAD_LEFT) . $fields["VK_STAMP"] .      /* 8 */
        str_pad (mb_strlen($fields["VK_AMOUNT"], "UTF-8"),  3, "0", STR_PAD_LEFT) . $fields["VK_AMOUNT"] .     /* 603.58 */
        str_pad (mb_strlen($fields["VK_CURR"], "UTF-8"),    3, "0", STR_PAD_LEFT) . $fields["VK_CURR"] .       /* EUR */
        str_pad (mb_strlen($fields["VK_REF"], "UTF-8"),     3, "0", STR_PAD_LEFT) . $fields["VK_REF"] .        /*  */
        str_pad (mb_strlen($fields["VK_MSG"], "UTF-8"),     3, "0", STR_PAD_LEFT) . $fields["VK_MSG"] .        /* My cool payment */
        str_pad (mb_strlen($fields["VK_RETURN"], "UTF-8"),  3, "0", STR_PAD_LEFT) . $fields["VK_RETURN"] .     /* http://127.0.0.1:49233/banks/thorbanks_response/ */
        str_pad (mb_strlen($fields["VK_CANCEL"], "UTF-8"),  3, "0", STR_PAD_LEFT) . $fields["VK_CANCEL"] .     /* http://127.0.0.1:49233/banks/thorbanks_response/ */
        str_pad (mb_strlen($fields["VK_DATETIME"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_DATETIME"];    /* 2020-12-29T13:55:34+0000 */
/* $data = "0041012003008009uid1000100018006603.58003EUR000015My cool payment048http://127.0.0.1:49233/banks/thorbanks_response/048http://127.0.0.1:49233/banks/thorbanks_response/0242020-12-29T13:55:34+0000"; */
// STEP 4. Sign the data with RSA-SHA1 to generate MAC code
// ========================================================
openssl_sign ($data, $signature, $private_key, OPENSSL_ALGO_SHA1);
/* aUW+IHlfq4XI3qaA9QQiyP4dBg+qP60VcTyWp3PKJcF77/4VdGMewUFn3C3x/3yD7IsjDBanM/pT1wE+kaHWYULOcg3cY0h2nEMx1USVu4X3JRvm0YrRMkGoyBduPrZMUy49yeXrAqOXzsxBM1MviFuW2BsK/j7JLkeIzOmPp+8Wo1/sS009QzdKi7fbc12dx4txNO4JWVonZx2g2fhDZMtKeeHSHEea29EGleIMvINKjjDj0nMj8eyeXZE0WYNWU+seX/Qujqvq60xxAv9QTV4AASBds5cL0M6CkjPUcozu9hQks+fk6jrq9m6uZq3yfEI3nc4pKiWso8CZfsL/Sw== */
$fields["VK_MAC"] = base64_encode($signature);
// STEP 5. Generate POST form with payment data that will be sent to the bank
// ==========================================================================
?>
        
        Makse teostamise näidisrakendus "Danske"