"1111",
"VK_VERSION" => "008",
"VK_SND_ID" => "SAMPOPANK",
"VK_REC_ID" => "uid100010",
"VK_STAMP" => "4",
"VK_T_NO" => "10015",
"VK_AMOUNT" => "1231.88",
"VK_CURR" => "EUR",
"VK_REC_ACC" => "",
"VK_REC_NAME" => "",
"VK_SND_ACC" => "EE823300331234567897",
"VK_SND_NAME" => "Tõõgera Leõpäöldi",
"VK_REF" => "42",
"VK_MSG" => "My cool payment",
"VK_T_DATETIME" => "2023-10-02T12:12:40+0000",
"VK_ENCODING" => "UTF-8",
"VK_LANG" => "EST",
"VK_MAC" => "GSlTL0u27c4I7OxxAfIjZnm7ghJD34y7UIZPWcBepKbcp+DDrPPawUQ+Q3iwxT7JwF79Z6WiUyBzpbPFrJY7YvA/smbXkXyaY7sFsik6HsD8P0rXguA83i4USIKtk/2LZJQs0F8cQ7ubUIwsaZPkh0jBy3tzm1GbTJ4yPF/xyqtfK0QcFL9VEtTuBYQ51wdV2T772inyvUEzBhTlnGuxYoDlgAduWNtF7C05kRdMd6Pq+xsu6OKj+VnQe7l2ikDrbi3ZlPVwJlV3wrnUebFFk3kVC8uyg7DVzR1Z/exB9845zNUTiQ8KHVP3lT6NY9ngD08zeV//59O6JTSRhqICIg==",
"VK_AUTO" => "N"
);
// STEP 3. Generate data to be verified
// ====================================
// Data to be verified 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"] . /* 1111 */
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"] . /* SAMPOPANK */
str_pad (mb_strlen($fields["VK_REC_ID"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_REC_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_T_NO"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_T_NO"] . /* 10015 */
str_pad (mb_strlen($fields["VK_AMOUNT"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_AMOUNT"] . /* 1231.88 */
str_pad (mb_strlen($fields["VK_CURR"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_CURR"] . /* EUR */
str_pad (mb_strlen($fields["VK_REC_ACC"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_REC_ACC"] . /* */
str_pad (mb_strlen($fields["VK_REC_NAME"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_REC_NAME"] . /* */
str_pad (mb_strlen($fields["VK_SND_ACC"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_SND_ACC"] . /* EE823300331234567897 */
str_pad (mb_strlen($fields["VK_SND_NAME"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_SND_NAME"] . /* Tõõgera Leõpäöldi */
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_T_DATETIME"], "UTF-8"), 3, "0", STR_PAD_LEFT) . $fields["VK_T_DATETIME"]; /* 2023-10-02T12:12:40+0000 */
/* $data = "0041111003008009SAMPOPANK009uid1000100014005100150071231.88003EUR000000020EE823300331234567897017Tõõgera Leõpäöldi00242015My cool payment0242023-10-02T12:12:40+0000"; */
// STEP 4. Verify the data with RSA-SHA1
// =====================================
if (openssl_verify ($data, base64_decode($fields["VK_MAC"]), $public_key) !== 1) {
$signatureVerified = false;
}else{
$signatureVerified = true;
}
// STEP 5. Display output of the received payment
// ==============================================
?>
Payment results
Payment:
Signature: