use crate::base::{Lang, N2WError, Result};
use crate::currency::{CurrencyForms, CurrencyValue};
use crate::floatpath::FloatValue;
use bigdecimal::BigDecimal;
use num_bigint::BigInt;
use num_integer::Integer;
use num_traits::{One, Signed, ToPrimitive, Zero};
use std::collections::HashMap;
const NEGWORD: &str = "منفی ";
const POINTWORD: &str = "اعشاریہ";
const ZERO_WORD: &str = "صفر";
const HUNDRED: &str = "سو";
const THOUSAND: &str = "ہزار";
const LAKH: &str = "لاکھ";
const CRORE: &str = "کروڑ";
const ORDINAL_SUFFIX: &str = "واں";
const ONES: [&str; 10] = ["", "ایک", "دو", "تین", "چار", "پانچ", "چھ", "سات", "آٹھ", "نو"];
const TENS: [&str; 10] = ["", "دس", "بیس", "تیس", "چالیس", "پچاس", "ساٹھ", "ستر", "اسی", "نوے"];
const TEENS: [&str; 10] = ["دس", "گیارہ", "بارہ", "تیرہ", "چودہ", "پندرہ", "سولہ", "سترہ", "اٹھارہ", "انیس"];
const ORDINALS_1_TO_10: [&str; 10] = ["پہلا", "دوسرا", "تیسرا", "چوتھا", "پانچواں", "چھٹا", "ساتواں", "آٹھواں", "نواں", "دسواں"];
const SEPARATOR_UNSET: &str = ",";
const FALLBACK_CURRENCY: &str = "PKR";
pub struct LangUr {
currency_forms: HashMap<&'static str, CurrencyForms>,
pkr: CurrencyForms,
}
impl Default for LangUr {
fn default() -> Self {
Self::new()
}
}
impl LangUr {
pub fn new() -> Self {
let pkr = CurrencyForms::new(&["روپیہ", "روپے"], &["پیسہ", "پیسے"]);
let currency_forms: HashMap<&'static str, CurrencyForms> = [
(FALLBACK_CURRENCY, pkr.clone()),
(
"USD",
CurrencyForms::new(&["dollar", "dollars"], &["cent", "cents"]),
),
(
"EUR",
CurrencyForms::new(&["euro", "euros"], &["cent", "cents"]),
),
]
.into_iter()
.collect();
LangUr { currency_forms, pkr }
}
}
fn split_value(val: &CurrencyValue) -> (BigInt, u32, bool) {
match val {
CurrencyValue::Int(v) => (v.abs(), 0, v.is_negative()),
CurrencyValue::Decimal { value: d, .. } => {
let is_negative = d.is_negative();
let (digits, scale) = d.as_bigint_and_exponent();
let digits = digits.abs();
if scale <= 0 {
let pow = BigInt::from(10u32).pow((-scale) as u32);
return (digits * pow, 0, is_negative);
}
let pow = BigInt::from(10u32).pow(scale as u32);
let (left, frac) = digits.div_rem(&pow);
let right = (frac * BigInt::from(100u32) / &pow).to_u32().unwrap_or(0);
(left, right, is_negative)
}
}
}
fn small(n: &BigInt) -> usize {
n.to_usize().unwrap_or(0)
}
fn group(n: &BigInt, divisor: &BigInt, word: &str) -> String {
let (div, rem) = n.div_rem(divisor);
let mut result = format!("{} {}", int_to_word(&div), word);
if !rem.is_zero() {
result.push(' ');
result.push_str(&int_to_word(&rem));
}
result
}
fn int_to_word(n: &BigInt) -> String {
if n.is_zero() {
return ZERO_WORD.to_string();
}
if n.is_negative() {
return format!("{}{}", NEGWORD, int_to_word(&n.abs()));
}
if n < &BigInt::from(10) {
return ONES[small(n)].to_string();
}
if n < &BigInt::from(20) {
return TEENS[small(n) - 10].to_string();
}
if n < &BigInt::from(100) {
let v = small(n);
let mut result = TENS[v / 10].to_string();
if v % 10 != 0 {
result.push(' ');
result.push_str(ONES[v % 10]);
}
return result;
}
if n < &BigInt::from(1000) {
let v = small(n);
let mut result = format!("{} {}", ONES[v / 100], HUNDRED);
let rem = v % 100;
if rem != 0 {
result.push(' ');
result.push_str(&int_to_word(&BigInt::from(rem)));
}
return result;
}
if n < &BigInt::from(100_000) {
return group(n, &BigInt::from(1000), THOUSAND);
}
if n < &BigInt::from(10_000_000) {
return group(n, &BigInt::from(100_000), LAKH);
}
if n < &BigInt::from(1_000_000_000) {
return group(n, &BigInt::from(10_000_000), CRORE);
}
n.to_string()
}
fn shortest_digits(a: f64) -> (String, i32) {
let sci = format!("{:e}", a);
let (mant, exp) = sci
.split_once('e')
.expect("{:e} on a finite f64 always emits an exponent");
let mut digits: Vec<u8> = mant.bytes().filter(|c| *c != b'.').collect();
let mut decpt: i32 = exp.parse::<i32>().expect("{:e} exponent is an integer") + 1;
let bits = a.to_bits();
let biased = ((bits >> 52) & 0x7ff) as i32;
let frac = bits & ((1u64 << 52) - 1);
let (mut m, mut e) = if biased == 0 {
(frac, -1074i32) } else {
(frac | (1u64 << 52), biased - 1075)
};
if m == 0 {
return (String::from_utf8(digits).expect("ASCII digits"), decpt);
}
let z = m.trailing_zeros() as i32;
m >>= z;
e += z;
let q = digits.len() as i32 - decpt;
let mut tie = e + q + 1 == 0;
if tie && q < 0 {
let r = -q as u32;
tie = r <= 22 && m % 5u64.pow(r) == 0;
}
if !tie {
return (String::from_utf8(digits).expect("ASCII digits"), decpt);
}
let last = digits[digits.len() - 1] - b'0';
if last % 2 == 1 {
if m % 4 == 1 {
*digits.last_mut().expect("non-empty") -= 1;
} else {
let mut i = digits.len();
loop {
if i == 0 {
digits.insert(0, b'1');
decpt += 1;
break;
}
i -= 1;
if digits[i] == b'9' {
digits[i] = b'0';
} else {
digits[i] += 1;
break;
}
}
}
while digits.len() > 1 && *digits.last().expect("non-empty") == b'0' {
digits.pop();
}
}
(String::from_utf8(digits).expect("ASCII digits"), decpt)
}
fn py_float_repr(value: f64) -> String {
if value.is_nan() {
return "nan".to_string();
}
if value.is_infinite() {
return if value > 0.0 { "inf" } else { "-inf" }.to_string();
}
let sign = if value.is_sign_negative() { "-" } else { "" };
let (digits, decpt) = shortest_digits(value.abs());
let ndigits = digits.len() as i32;
if decpt <= -4 || decpt > 16 {
let exp = decpt - 1;
let mut mant = String::from(&digits[..1]);
if digits.len() > 1 {
mant.push('.');
mant.push_str(&digits[1..]);
}
format!(
"{}{}e{}{:02}",
sign,
mant,
if exp < 0 { '-' } else { '+' },
exp.abs()
)
} else if decpt <= 0 {
format!("{}0.{}{}", sign, "0".repeat(-decpt as usize), digits)
} else if decpt >= ndigits {
format!(
"{}{}{}.0",
sign,
digits,
"0".repeat((decpt - ndigits) as usize)
)
} else {
let d = decpt as usize;
format!("{}{}.{}", sign, &digits[..d], &digits[d..])
}
}
fn py_decimal_str(value: &BigDecimal) -> String {
let (int_val, scale) = value.as_bigint_and_exponent();
let exp = -(scale as i128);
let sign = if int_val.is_negative() { "-" } else { "" };
let int_digits = int_val.abs().to_string(); let len = int_digits.len() as i128;
let leftdigits = exp + len;
let dotplace = if exp <= 0 && leftdigits > -6 {
leftdigits
} else {
1
};
let (intpart, fracpart) = if dotplace <= 0 {
(
"0".to_string(),
format!(".{}{}", "0".repeat(-dotplace as usize), int_digits),
)
} else if dotplace >= len {
(
format!("{}{}", int_digits, "0".repeat((dotplace - len) as usize)),
String::new(),
)
} else {
let d = dotplace as usize;
(int_digits[..d].to_string(), format!(".{}", &int_digits[d..]))
};
let expstr = if leftdigits == dotplace {
String::new()
} else {
let d = leftdigits - dotplace;
format!("E{}{}", if d < 0 { '-' } else { '+' }, d.abs())
};
format!("{}{}{}{}", sign, intpart, fracpart, expstr)
}
fn py_int(s: &str) -> Result<BigInt> {
let err = || {
N2WError::Value(format!(
"invalid literal for int() with base 10: '{}'",
s
))
};
let t = s.trim();
let (negative, body) = match t.strip_prefix('-') {
Some(rest) => (true, rest),
None => (false, t.strip_prefix('+').unwrap_or(t)),
};
if body.is_empty()
|| body.starts_with('_')
|| body.ends_with('_')
|| body.contains("__")
|| !body.chars().all(|c| c.is_ascii_digit() || c == '_')
{
return Err(err());
}
let digits: String = body.chars().filter(|c| *c != '_').collect();
let n: BigInt = digits.parse().map_err(|_| err())?;
Ok(if negative { -n } else { n })
}
fn cardinal_from_str(number: &str) -> Result<String> {
let n = number.trim();
let (n, mut ret) = match n.strip_prefix('-') {
Some(rest) => (rest, NEGWORD.to_string()),
None => (n, String::new()),
};
let Some(dot) = n.find('.') else {
ret.push_str(&int_to_word(&py_int(n)?));
return Ok(ret.trim().to_string());
};
let (left, right) = (&n[..dot], &n[dot + 1..]);
ret.push_str(&int_to_word(&py_int(left)?));
ret.push(' ');
ret.push_str(POINTWORD);
ret.push(' ');
let mut first = true;
for d in right.chars() {
if !first {
ret.push(' ');
}
first = false;
let mut buf = [0u8; 4];
ret.push_str(&int_to_word(&py_int(d.encode_utf8(&mut buf))?));
}
Ok(ret.trim().to_string())
}
impl Lang for LangUr {
fn cardinal_float_entry(
&self,
value: &crate::floatpath::FloatValue,
precision_override: Option<u32>,
) -> crate::base::Result<String> {
self.to_cardinal_float(value, precision_override)
}
fn default_currency(&self) -> &str {
"PKR"
}
fn default_separator(&self) -> &str {
" "
}
fn negword(&self) -> &str {
NEGWORD
}
fn pointword(&self) -> &str {
"اعشاریہ"
}
fn to_cardinal(&self, value: &BigInt) -> Result<String> {
let (ret, n) = if value.is_negative() {
(NEGWORD, value.abs())
} else {
("", value.clone())
};
Ok(format!("{}{}", ret, int_to_word(&n)).trim().to_string())
}
fn to_cardinal_float(
&self,
value: &FloatValue,
precision_override: Option<u32>,
) -> Result<String> {
let _ = precision_override;
let n = match value {
FloatValue::Float { value, .. } => py_float_repr(*value),
FloatValue::Decimal { value, .. } => py_decimal_str(value),
};
cardinal_from_str(&n)
}
fn to_ordinal(&self, value: &BigInt) -> Result<String> {
if value.is_positive() && value <= &BigInt::from(10) {
return Ok(ORDINALS_1_TO_10[small(value) - 1].to_string());
}
Ok(format!("{}{}", self.to_cardinal(value)?, ORDINAL_SUFFIX))
}
fn to_ordinal_num(&self, value: &BigInt) -> Result<String> {
Ok(format!("{}.", value))
}
fn to_year(&self, value: &BigInt) -> Result<String> {
if value.is_negative() {
Ok(format!("BC {}", self.to_cardinal(&value.abs())?))
} else {
self.to_cardinal(value)
}
}
fn ordinal_float_entry(&self, value: &FloatValue) -> Result<String> {
if let Some(i) = value.as_whole_int() {
if i.is_positive() && i <= BigInt::from(10) {
return self.to_ordinal(&i);
}
}
Ok(format!(
"{}{}",
self.cardinal_float_entry(value, None)?,
ORDINAL_SUFFIX
))
}
fn ordinal_num_float_entry(&self, _value: &FloatValue, repr_str: &str) -> Result<String> {
Ok(format!("{}.", repr_str))
}
fn year_float_entry(&self, value: &FloatValue) -> Result<String> {
let negative = match value {
FloatValue::Float { value, .. } => *value < 0.0,
FloatValue::Decimal { value, .. } => value.is_negative(),
};
if negative {
let abs = match value {
FloatValue::Float { value, precision } => FloatValue::Float {
value: value.abs(),
precision: *precision,
},
FloatValue::Decimal { value, precision } => FloatValue::Decimal {
value: value.abs(),
precision: *precision,
},
};
Ok(format!("BC {}", self.cardinal_float_entry(&abs, None)?))
} else {
self.cardinal_float_entry(value, None)
}
}
fn str_to_number(&self, s: &str) -> Result<crate::strnum::ParsedNumber> {
match crate::strnum::python_decimal_parse(s)? {
crate::strnum::ParsedNumber::Inf { .. } => Err(N2WError::Value(
"invalid literal for int() with base 10: 'Infinity'".into(),
)),
other => Ok(other),
}
}
fn lang_name(&self) -> &str {
"Num2Word_UR"
}
fn currency_forms(&self, code: &str) -> Option<&CurrencyForms> {
self.currency_forms.get(code)
}
fn to_currency(
&self,
val: &CurrencyValue,
currency: &str,
cents: bool,
separator: Option<&str>,
_adjective: bool,
) -> Result<String> {
let separator = separator.unwrap_or(self.default_separator());
let separator = if separator == SEPARATOR_UNSET {
" "
} else {
separator
};
let (left, right, is_negative) = split_value(val);
let forms = self.currency_forms.get(currency).unwrap_or(&self.pkr);
let left_str = int_to_word(&left);
let unit = if left.is_one() {
&forms.unit[0]
} else {
&forms.unit[1]
};
let mut result = format!("{} {}", left_str, unit);
if cents && right != 0 {
let right_big = BigInt::from(right);
let cents_str = int_to_word(&right_big);
let subunit = if right == 1 {
&forms.subunit[0]
} else {
&forms.subunit[1]
};
result.push_str(separator);
result.push_str(¢s_str);
result.push(' ');
result.push_str(subunit);
}
if is_negative {
result.insert_str(0, NEGWORD);
}
Ok(result.trim().to_string())
}
}
#[cfg(test)]
mod tests {
use super::*;
use std::str::FromStr;
fn flt(v: f64) -> String {
let precision = py_float_repr(v)
.split_once('.')
.map(|(_, f)| f.len() as u32)
.unwrap_or(0);
LangUr::new()
.to_cardinal_float(&FloatValue::Float { value: v, precision }, None)
.unwrap()
}
fn dec(s: &str) -> String {
let value = BigDecimal::from_str(s).unwrap();
let precision = value.as_bigint_and_exponent().1.unsigned_abs() as u32;
LangUr::new()
.to_cardinal_float(&FloatValue::Decimal { value, precision }, None)
.unwrap()
}
#[test]
fn corpus_float_rows() {
assert_eq!(flt(0.0), "صفر اعشاریہ صفر");
assert_eq!(flt(0.5), "صفر اعشاریہ پانچ");
assert_eq!(flt(1.0), "ایک اعشاریہ صفر");
assert_eq!(flt(1.5), "ایک اعشاریہ پانچ");
assert_eq!(flt(2.25), "دو اعشاریہ دو پانچ");
assert_eq!(flt(3.14), "تین اعشاریہ ایک چار");
assert_eq!(flt(0.01), "صفر اعشاریہ صفر ایک");
assert_eq!(flt(0.1), "صفر اعشاریہ ایک");
assert_eq!(flt(0.99), "صفر اعشاریہ نو نو");
assert_eq!(flt(1.01), "ایک اعشاریہ صفر ایک");
assert_eq!(flt(12.34), "بارہ اعشاریہ تین چار");
assert_eq!(flt(99.99), "نوے نو اعشاریہ نو نو");
assert_eq!(flt(100.5), "ایک سو اعشاریہ پانچ");
assert_eq!(flt(1234.56), "ایک ہزار دو سو تیس چار اعشاریہ پانچ چھ");
assert_eq!(flt(-0.5), "منفی صفر اعشاریہ پانچ");
assert_eq!(flt(-1.5), "منفی ایک اعشاریہ پانچ");
assert_eq!(flt(-12.34), "منفی بارہ اعشاریہ تین چار");
assert_eq!(flt(1.005), "ایک اعشاریہ صفر صفر پانچ");
assert_eq!(flt(2.675), "دو اعشاریہ چھ سات پانچ");
}
#[test]
fn corpus_decimal_rows() {
assert_eq!(dec("0.01"), "صفر اعشاریہ صفر ایک");
assert_eq!(dec("1.10"), "ایک اعشاریہ ایک صفر");
assert_eq!(dec("12.345"), "بارہ اعشاریہ تین چار پانچ");
assert_eq!(dec("98746251323029.99"), "98746251323029 اعشاریہ نو نو");
assert_eq!(dec("0.001"), "صفر اعشاریہ صفر صفر ایک");
}
#[test]
fn negative_zero_keeps_negword() {
assert_eq!(flt(-0.0), "منفی صفر اعشاریہ صفر");
assert_eq!(flt(0.0), "صفر اعشاریہ صفر");
}
#[test]
fn precision_override_is_ignored() {
let l = LangUr::new();
let v = FloatValue::Float {
value: 1.23456,
precision: 5,
};
let want = "ایک اعشاریہ دو تین چار پانچ چھ";
assert_eq!(l.to_cardinal_float(&v, None).unwrap(), want);
for p in [0u32, 1, 2, 5, 9] {
assert_eq!(l.to_cardinal_float(&v, Some(p)).unwrap(), want);
}
}
#[test]
fn exponent_notation_raises_value_error() {
let l = LangUr::new();
let f = |v: f64| {
l.to_cardinal_float(&FloatValue::Float { value: v, precision: 0 }, None)
.unwrap_err()
};
assert!(matches!(f(1e16), N2WError::Value(m)
if m == "invalid literal for int() with base 10: '1e+16'"));
assert!(matches!(f(1e21), N2WError::Value(m)
if m == "invalid literal for int() with base 10: '1e+21'"));
assert!(matches!(f(1e-5), N2WError::Value(m)
if m == "invalid literal for int() with base 10: '1e-05'"));
assert!(matches!(f(1.5e16), N2WError::Value(m)
if m == "invalid literal for int() with base 10: 'e'"));
assert!(matches!(f(f64::INFINITY), N2WError::Value(m)
if m == "invalid literal for int() with base 10: 'inf'"));
assert!(matches!(f(f64::NAN), N2WError::Value(m)
if m == "invalid literal for int() with base 10: 'nan'"));
let d = |s: &str| {
l.to_cardinal_float(
&FloatValue::Decimal {
value: BigDecimal::from_str(s).unwrap(),
precision: 0,
},
None,
)
.unwrap_err()
};
assert!(matches!(d("1E+16"), N2WError::Value(m)
if m == "invalid literal for int() with base 10: '1E+16'"));
assert!(matches!(d("1E-7"), N2WError::Value(m)
if m == "invalid literal for int() with base 10: '1E-7'"));
assert!(matches!(d("1.5E-7"), N2WError::Value(m)
if m == "invalid literal for int() with base 10: 'E'"));
}
#[test]
fn large_and_small_boundaries() {
assert_eq!(flt(1234567890.5), "1234567890 اعشاریہ پانچ");
assert_eq!(flt(1e15), "1000000000000000 اعشاریہ صفر");
assert_eq!(flt(0.0001), "صفر اعشاریہ صفر صفر صفر ایک");
assert_eq!(dec("0.000001"), "صفر اعشاریہ صفر صفر صفر صفر صفر ایک");
assert_eq!(dec("1.00E+2"), "ایک سو");
assert_eq!(dec("0.00"), "صفر اعشاریہ صفر صفر");
assert_eq!(dec("-0.5"), "منفی صفر اعشاریہ پانچ");
assert_eq!(dec("-12.34"), "منفی بارہ اعشاریہ تین چار");
}
#[test]
fn dtoa_tie_rounds_to_even() {
assert_eq!(
flt(-78198386800398.125),
"منفی 78198386800398 اعشاریہ ایک دو"
);
}
#[test]
fn py_float_repr_matches_cpython() {
for (v, want) in [
(0.0, "0.0"),
(-0.0, "-0.0"),
(0.5, "0.5"),
(1.0, "1.0"),
(0.01, "0.01"),
(1.005, "1.005"),
(2.675, "2.675"),
(100.5, "100.5"),
(1e15, "1000000000000000.0"),
(1e16, "1e+16"),
(1.5e16, "1.5e+16"),
(1e21, "1e+21"),
(1e100, "1e+100"),
(0.0001, "0.0001"),
(1e-5, "1e-05"),
(5e-324, "5e-324"),
(1.7976931348623157e308, "1.7976931348623157e+308"),
(98746251323029.99, "98746251323029.98"),
(-78198386800398.125, "-78198386800398.12"),
(-1267860061485775.25, "-1267860061485775.2"),
] {
assert_eq!(py_float_repr(v), want, "repr({:?})", v);
}
}
#[test]
fn py_decimal_str_matches_cpython() {
for (s, want) in [
("1.10", "1.10"),
("0.00", "0.00"),
("-0.5", "-0.5"),
("1E+16", "1E+16"),
("1E-7", "1E-7"),
("0.0000001", "1E-7"),
("0.000001", "0.000001"),
("1.00E+2", "100"),
("12.345", "12.345"),
("98746251323029.99", "98746251323029.99"),
("0.01", "0.01"),
] {
assert_eq!(py_decimal_str(&BigDecimal::from_str(s).unwrap()), want, "{}", s);
}
}
}