<?php
// This test is invoked by srv_1063_locale_configs.phpt

function dropTable($conn, $tableName)
{
    $tsql = "IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'" . $tableName . "') AND type in (N'U')) DROP TABLE $tableName";
    sqlsrv_query($conn, $tsql);
}

function fatalError($message)
{
    var_dump(sqlsrv_errors(SQLSRV_ERR_ALL));
    die($message);
}

function printMoney($amt, $info) 
{
    // The money_format() function is deprecated in PHP 7.4, so use intl NumberFormatter
    $loc = setlocale(LC_MONETARY, 0);
    $symbol = $info['int_curr_symbol'];

    echo "Amount formatted: ";
    if (empty($symbol)) {
        echo number_format($amt, 2, '.', '') . PHP_EOL;
    } else {
        $fmt = new NumberFormatter($loc, NumberFormatter::CURRENCY);
        $fmt->setTextAttribute(NumberFormatter::CURRENCY_CODE, $symbol);
        $fmt->setAttribute(NumberFormatter::FRACTION_DIGITS, 2);
        echo $fmt->format($amt) . PHP_EOL;
    }
}

function printCal($date)
{
    $loc = setlocale(LC_TIME, 0);
    $fmt = datefmt_create(
        $loc,
        IntlDateFormatter::FULL,
        IntlDateFormatter::FULL,
        'America/Los_Angeles',
        IntlDateFormatter::GREGORIAN
    );
    datefmt_set_pattern($fmt, 'cccc');
    echo datefmt_format($fmt, $date) . PHP_EOL;
    datefmt_set_pattern($fmt, 'MMMM');
    echo datefmt_format($fmt, $date) . PHP_EOL;
}

require_once('MsSetup.inc');

$setLocaleInfo = ($_SERVER['argv'][1]);
$locale = ($_SERVER['argv'][2] ?? '');

echo "**Begin**" . PHP_EOL;

// Assuming LC_ALL is 'en_US.UTF-8', so is LC_CTYPE, except in PHP 8 (TODO)
// But default LC_MONETARY varies
$ctype = (PHP_MAJOR_VERSION == 8 && $setLocaleInfo == 0) ? 'C' : 'en_US.UTF-8';
switch ($setLocaleInfo) {
    case 0:
    case 1:
        $m = 'C'; $symbol = ''; $sep = '';
        break;
    case 2:
        $m = 'en_US.UTF-8'; $symbol = '$'; $sep = ',';
        break;
    default:
        fatalError("Unexpected $setLocaleInfo\n");
        break;
}

$m1 = setlocale(LC_MONETARY, 0);
if ($m !== $m1) {
    echo "Unexpected LC_MONETARY: $m1" . PHP_EOL;
}
$c1 = setlocale(LC_CTYPE, 0);
if ($ctype !== $c1) {
    echo "Unexpected LC_CTYPE: $c1" . PHP_EOL;
    echo "LC_NUMERIC for $setLocaleInfo: " . setlocale(LC_NUMERIC, 0) . PHP_EOL;
}

// Set a different locale, if the input is not empty
$english = true;
if (!empty($locale)) {
    $loc = setlocale(LC_ALL, $locale);
    if ($loc !== $locale) {
        echo "Unexpected $loc for LC_ALL " . PHP_EOL;
    }
    
    // Currency symbol and thousands separator in Linux and macOS may be different
    if ($loc === 'de_DE.UTF-8') {
        $symbol = strtoupper(PHP_OS) === 'LINUX' ? '€' : 'Eu';
        $sep = strtoupper(PHP_OS) === 'LINUX' ? '.' : '';
        $english = false;
    } else {
        $symbol = '$';
        $sep = ',';
    }
}

$info = localeconv();

if ($symbol !== $info['currency_symbol']) {
    echo "$locale: Expected currency symbol '$symbol' but get '" . $info['currency_symbol'] . "'";
    echo PHP_EOL;
}
if ($sep !== $info['thousands_sep']) {
    echo "$locale: Expected thousands separator '$sep' but get '" . $info['currency_symbol'] . "'";
    echo PHP_EOL;
}

$n1 = 10000.98765;
printMoney($n1, $info);

$d = new DateTime("12/25/2020", new DateTimeZone('America/Los_Angeles'));
printCal($d);

$conn = sqlsrv_connect($server, $connectionOptions);
if (!$conn) {
    fatalError("Failed to connect to $server.");
}

$tableName = "[" . "srv1063" . $locale . "]";
dropTable($conn, $tableName);

$pi = "3.14159";

$stmt = sqlsrv_query($conn, "CREATE TABLE $tableName (c1 FLOAT)");
if (!$stmt) {
    fatalError("Failed to create test table $tableName");
}
$stmt = sqlsrv_query($conn, "INSERT INTO $tableName (c1) VALUES ($pi)");
if (!$stmt) {
    fatalError("Failed to insert into test table $tableName");
}

$sql = "SELECT c1 FROM $tableName";
$stmt = sqlsrv_query($conn, $sql);
if (!$stmt) {
    fatalError("Failed in running query $sql");
}

// The following change is required for the breaking change introduced in PHP 8
// https://wiki.php.net/rfc/locale_independent_float_to_string
while (sqlsrv_fetch($stmt)) {
    $value = sqlsrv_get_field($stmt, 0, SQLSRV_PHPTYPE_FLOAT);
    $expected = 3.14159;
    if (PHP_MAJOR_VERSION < 8) {
        if ($setLocaleInfo > 0 && $english === false) {
            $expected = floatval($pi);
        }
    }
    if ($value != $expected) {
        echo "Expected: '$expected' but got '$value'\n";
    }
}

sqlsrv_free_stmt($stmt);

dropTable($conn, $tableName);

sqlsrv_close($conn);

echo "**End**" . PHP_EOL;
?>