"1012",
        "VK_VERSION"     => "008",
        "VK_SND_ID"      => "uid100010",
        "VK_STAMP"       => "4",
        "VK_AMOUNT"      => "1143.56",
        "VK_CURR"        => "EUR",
        "VK_REF"         => "42",
        "VK_MSG"         => "My cool payment",
        "VK_RETURN"      => "http://127.0.0.1:47919/banks/thorbanks_response/",
        "VK_CANCEL"      => "http://127.0.0.1:47919/banks/thorbanks_response/",
        "VK_DATETIME"    => "2020-12-29T14:08:51+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"] .      /* 4 */
        str_pad (mb_strlen($fields["VK_AMOUNT"], "UTF-8"),  3, "0", STR_PAD_LEFT) . $fields["VK_AMOUNT"] .     /* 1143.56 */
        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"] .        /* 42 */
        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:47919/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:47919/banks/thorbanks_response/ */
        str_pad (mb_strlen($fields["VK_DATETIME"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_DATETIME"];    /* 2020-12-29T14:08:51+0000 */
/* $data = "0041012003008009uid10001000140071143.56003EUR00242015My cool payment048http://127.0.0.1:47919/banks/thorbanks_response/048http://127.0.0.1:47919/banks/thorbanks_response/0242020-12-29T14:08:51+0000"; */
// STEP 4. Sign the data with RSA-SHA1 to generate MAC code
// ========================================================
openssl_sign ($data, $signature, $private_key, OPENSSL_ALGO_SHA1);
/* ee9hivc+gubbghvN8iimZpcY8I7HqjqicXVFnWeAGtY2eqpqLIMx1TfXeADeybrFvvhbDrpwkqJMmFE1D2J69WeUHcMGiYFyzyHy3m9eaBRXE8m/pn7FEWtO/VicKfwIyok+qthpbZheQ3zEYaieLqaevp3cpxh4EcXVJMD31+lRzIsbzbOZfh2gu90i8iz9Kdxwt8OpmVRlLs8HOnmrFRODBJgadz7C1idHDDhjWVkr3Z7WPFbRp61wm7d/E/gKfXIf3IV4VYUfVWJ/JJJAwpkd5PLoPhrpXWURXWpmFBk7MscJNHrtkCjcjoliURlN2WcaG5GbSkYPicK7KJMrpg== */
$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"