NumberFormat.cpp 78 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862
  1. /*
  2. * Copyright (c) 2021-2022, Tim Flynn <trflynn89@serenityos.org>
  3. *
  4. * SPDX-License-Identifier: BSD-2-Clause
  5. */
  6. #include <AK/Checked.h>
  7. #include <AK/Utf8View.h>
  8. #include <LibCrypto/BigInt/SignedBigInteger.h>
  9. #include <LibJS/Runtime/AbstractOperations.h>
  10. #include <LibJS/Runtime/Array.h>
  11. #include <LibJS/Runtime/BigInt.h>
  12. #include <LibJS/Runtime/GlobalObject.h>
  13. #include <LibJS/Runtime/Intl/NumberFormat.h>
  14. #include <LibJS/Runtime/Intl/NumberFormatFunction.h>
  15. #include <LibJS/Runtime/Intl/PluralRules.h>
  16. #include <LibUnicode/CurrencyCode.h>
  17. #include <math.h>
  18. #include <stdlib.h>
  19. namespace JS::Intl {
  20. NumberFormatBase::NumberFormatBase(Object& prototype)
  21. : Object(prototype)
  22. {
  23. }
  24. // 15 NumberFormat Objects, https://tc39.es/ecma402/#numberformat-objects
  25. NumberFormat::NumberFormat(Object& prototype)
  26. : NumberFormatBase(prototype)
  27. {
  28. }
  29. void NumberFormat::visit_edges(Cell::Visitor& visitor)
  30. {
  31. Base::visit_edges(visitor);
  32. if (m_bound_format)
  33. visitor.visit(m_bound_format);
  34. }
  35. void NumberFormat::set_style(StringView style)
  36. {
  37. if (style == "decimal"sv)
  38. m_style = Style::Decimal;
  39. else if (style == "percent"sv)
  40. m_style = Style::Percent;
  41. else if (style == "currency"sv)
  42. m_style = Style::Currency;
  43. else if (style == "unit"sv)
  44. m_style = Style::Unit;
  45. else
  46. VERIFY_NOT_REACHED();
  47. }
  48. StringView NumberFormat::style_string() const
  49. {
  50. switch (m_style) {
  51. case Style::Decimal:
  52. return "decimal"sv;
  53. case Style::Percent:
  54. return "percent"sv;
  55. case Style::Currency:
  56. return "currency"sv;
  57. case Style::Unit:
  58. return "unit"sv;
  59. default:
  60. VERIFY_NOT_REACHED();
  61. }
  62. }
  63. void NumberFormat::set_currency_display(StringView currency_display)
  64. {
  65. m_resolved_currency_display.clear();
  66. if (currency_display == "code"sv)
  67. m_currency_display = CurrencyDisplay::Code;
  68. else if (currency_display == "symbol"sv)
  69. m_currency_display = CurrencyDisplay::Symbol;
  70. else if (currency_display == "narrowSymbol"sv)
  71. m_currency_display = CurrencyDisplay::NarrowSymbol;
  72. else if (currency_display == "name"sv)
  73. m_currency_display = CurrencyDisplay::Name;
  74. else
  75. VERIFY_NOT_REACHED();
  76. }
  77. StringView NumberFormat::resolve_currency_display()
  78. {
  79. if (m_resolved_currency_display.has_value())
  80. return *m_resolved_currency_display;
  81. switch (currency_display()) {
  82. case NumberFormat::CurrencyDisplay::Code:
  83. m_resolved_currency_display = currency();
  84. break;
  85. case NumberFormat::CurrencyDisplay::Symbol:
  86. m_resolved_currency_display = Unicode::get_locale_short_currency_mapping(data_locale(), currency());
  87. break;
  88. case NumberFormat::CurrencyDisplay::NarrowSymbol:
  89. m_resolved_currency_display = Unicode::get_locale_narrow_currency_mapping(data_locale(), currency());
  90. break;
  91. case NumberFormat::CurrencyDisplay::Name:
  92. m_resolved_currency_display = Unicode::get_locale_numeric_currency_mapping(data_locale(), currency());
  93. break;
  94. default:
  95. VERIFY_NOT_REACHED();
  96. }
  97. if (!m_resolved_currency_display.has_value())
  98. m_resolved_currency_display = currency();
  99. return *m_resolved_currency_display;
  100. }
  101. StringView NumberFormat::currency_display_string() const
  102. {
  103. VERIFY(m_currency_display.has_value());
  104. switch (*m_currency_display) {
  105. case CurrencyDisplay::Code:
  106. return "code"sv;
  107. case CurrencyDisplay::Symbol:
  108. return "symbol"sv;
  109. case CurrencyDisplay::NarrowSymbol:
  110. return "narrowSymbol"sv;
  111. case CurrencyDisplay::Name:
  112. return "name"sv;
  113. default:
  114. VERIFY_NOT_REACHED();
  115. }
  116. }
  117. void NumberFormat::set_currency_sign(StringView currency_sign)
  118. {
  119. if (currency_sign == "standard"sv)
  120. m_currency_sign = CurrencySign::Standard;
  121. else if (currency_sign == "accounting"sv)
  122. m_currency_sign = CurrencySign::Accounting;
  123. else
  124. VERIFY_NOT_REACHED();
  125. }
  126. StringView NumberFormat::currency_sign_string() const
  127. {
  128. VERIFY(m_currency_sign.has_value());
  129. switch (*m_currency_sign) {
  130. case CurrencySign::Standard:
  131. return "standard"sv;
  132. case CurrencySign::Accounting:
  133. return "accounting"sv;
  134. default:
  135. VERIFY_NOT_REACHED();
  136. }
  137. }
  138. StringView NumberFormatBase::rounding_type_string() const
  139. {
  140. switch (m_rounding_type) {
  141. case RoundingType::SignificantDigits:
  142. return "significantDigits"sv;
  143. case RoundingType::FractionDigits:
  144. return "fractionDigits"sv;
  145. case RoundingType::MorePrecision:
  146. return "morePrecision"sv;
  147. case RoundingType::LessPrecision:
  148. return "lessPrecision"sv;
  149. default:
  150. VERIFY_NOT_REACHED();
  151. }
  152. }
  153. StringView NumberFormatBase::rounding_mode_string() const
  154. {
  155. switch (m_rounding_mode) {
  156. case RoundingMode::Ceil:
  157. return "ceil"sv;
  158. case RoundingMode::Expand:
  159. return "expand"sv;
  160. case RoundingMode::Floor:
  161. return "floor"sv;
  162. case RoundingMode::HalfCeil:
  163. return "halfCeil"sv;
  164. case RoundingMode::HalfEven:
  165. return "halfEven"sv;
  166. case RoundingMode::HalfExpand:
  167. return "halfExpand"sv;
  168. case RoundingMode::HalfFloor:
  169. return "halfFloor"sv;
  170. case RoundingMode::HalfTrunc:
  171. return "halfTrunc"sv;
  172. case RoundingMode::Trunc:
  173. return "trunc"sv;
  174. default:
  175. VERIFY_NOT_REACHED();
  176. }
  177. }
  178. void NumberFormatBase::set_rounding_mode(StringView rounding_mode)
  179. {
  180. if (rounding_mode == "ceil"sv)
  181. m_rounding_mode = RoundingMode::Ceil;
  182. else if (rounding_mode == "expand"sv)
  183. m_rounding_mode = RoundingMode::Expand;
  184. else if (rounding_mode == "floor"sv)
  185. m_rounding_mode = RoundingMode::Floor;
  186. else if (rounding_mode == "halfCeil"sv)
  187. m_rounding_mode = RoundingMode::HalfCeil;
  188. else if (rounding_mode == "halfEven"sv)
  189. m_rounding_mode = RoundingMode::HalfEven;
  190. else if (rounding_mode == "halfExpand"sv)
  191. m_rounding_mode = RoundingMode::HalfExpand;
  192. else if (rounding_mode == "halfFloor"sv)
  193. m_rounding_mode = RoundingMode::HalfFloor;
  194. else if (rounding_mode == "halfTrunc"sv)
  195. m_rounding_mode = RoundingMode::HalfTrunc;
  196. else if (rounding_mode == "trunc"sv)
  197. m_rounding_mode = RoundingMode::Trunc;
  198. else
  199. VERIFY_NOT_REACHED();
  200. }
  201. StringView NumberFormatBase::trailing_zero_display_string() const
  202. {
  203. switch (m_trailing_zero_display) {
  204. case TrailingZeroDisplay::Auto:
  205. return "auto"sv;
  206. case TrailingZeroDisplay::StripIfInteger:
  207. return "stripIfInteger"sv;
  208. default:
  209. VERIFY_NOT_REACHED();
  210. }
  211. }
  212. void NumberFormatBase::set_trailing_zero_display(StringView trailing_zero_display)
  213. {
  214. if (trailing_zero_display == "auto"sv)
  215. m_trailing_zero_display = TrailingZeroDisplay::Auto;
  216. else if (trailing_zero_display == "stripIfInteger"sv)
  217. m_trailing_zero_display = TrailingZeroDisplay::StripIfInteger;
  218. else
  219. VERIFY_NOT_REACHED();
  220. }
  221. Value NumberFormat::use_grouping_to_value(VM& vm) const
  222. {
  223. switch (m_use_grouping) {
  224. case UseGrouping::Always:
  225. return js_string(vm, "always"sv);
  226. case UseGrouping::Auto:
  227. return js_string(vm, "auto"sv);
  228. case UseGrouping::Min2:
  229. return js_string(vm, "min2"sv);
  230. case UseGrouping::False:
  231. return Value(false);
  232. default:
  233. VERIFY_NOT_REACHED();
  234. }
  235. }
  236. void NumberFormat::set_use_grouping(StringOrBoolean const& use_grouping)
  237. {
  238. use_grouping.visit(
  239. [this](StringView grouping) {
  240. if (grouping == "always"sv)
  241. m_use_grouping = UseGrouping::Always;
  242. else if (grouping == "auto"sv)
  243. m_use_grouping = UseGrouping::Auto;
  244. else if (grouping == "min2"sv)
  245. m_use_grouping = UseGrouping::Min2;
  246. else
  247. VERIFY_NOT_REACHED();
  248. },
  249. [this](bool grouping) {
  250. VERIFY(!grouping);
  251. m_use_grouping = UseGrouping::False;
  252. });
  253. }
  254. void NumberFormat::set_notation(StringView notation)
  255. {
  256. if (notation == "standard"sv)
  257. m_notation = Notation::Standard;
  258. else if (notation == "scientific"sv)
  259. m_notation = Notation::Scientific;
  260. else if (notation == "engineering"sv)
  261. m_notation = Notation::Engineering;
  262. else if (notation == "compact"sv)
  263. m_notation = Notation::Compact;
  264. else
  265. VERIFY_NOT_REACHED();
  266. }
  267. StringView NumberFormat::notation_string() const
  268. {
  269. switch (m_notation) {
  270. case Notation::Standard:
  271. return "standard"sv;
  272. case Notation::Scientific:
  273. return "scientific"sv;
  274. case Notation::Engineering:
  275. return "engineering"sv;
  276. case Notation::Compact:
  277. return "compact"sv;
  278. default:
  279. VERIFY_NOT_REACHED();
  280. }
  281. }
  282. void NumberFormat::set_compact_display(StringView compact_display)
  283. {
  284. if (compact_display == "short"sv)
  285. m_compact_display = CompactDisplay::Short;
  286. else if (compact_display == "long"sv)
  287. m_compact_display = CompactDisplay::Long;
  288. else
  289. VERIFY_NOT_REACHED();
  290. }
  291. StringView NumberFormat::compact_display_string() const
  292. {
  293. VERIFY(m_compact_display.has_value());
  294. switch (*m_compact_display) {
  295. case CompactDisplay::Short:
  296. return "short"sv;
  297. case CompactDisplay::Long:
  298. return "long"sv;
  299. default:
  300. VERIFY_NOT_REACHED();
  301. }
  302. }
  303. void NumberFormat::set_sign_display(StringView sign_display)
  304. {
  305. if (sign_display == "auto"sv)
  306. m_sign_display = SignDisplay::Auto;
  307. else if (sign_display == "never"sv)
  308. m_sign_display = SignDisplay::Never;
  309. else if (sign_display == "always"sv)
  310. m_sign_display = SignDisplay::Always;
  311. else if (sign_display == "exceptZero"sv)
  312. m_sign_display = SignDisplay::ExceptZero;
  313. else if (sign_display == "negative"sv)
  314. m_sign_display = SignDisplay::Negative;
  315. else
  316. VERIFY_NOT_REACHED();
  317. }
  318. StringView NumberFormat::sign_display_string() const
  319. {
  320. switch (m_sign_display) {
  321. case SignDisplay::Auto:
  322. return "auto"sv;
  323. case SignDisplay::Never:
  324. return "never"sv;
  325. case SignDisplay::Always:
  326. return "always"sv;
  327. case SignDisplay::ExceptZero:
  328. return "exceptZero"sv;
  329. case SignDisplay::Negative:
  330. return "negative"sv;
  331. default:
  332. VERIFY_NOT_REACHED();
  333. }
  334. }
  335. // 15.5.1 CurrencyDigits ( currency ), https://tc39.es/ecma402/#sec-currencydigits
  336. int currency_digits(StringView currency)
  337. {
  338. // 1. If the ISO 4217 currency and funds code list contains currency as an alphabetic code, return the minor
  339. // unit value corresponding to the currency from the list; otherwise, return 2.
  340. if (auto currency_code = Unicode::get_currency_code(currency); currency_code.has_value())
  341. return currency_code->minor_unit.value_or(2);
  342. return 2;
  343. }
  344. // 15.5.3 FormatNumericToString ( intlObject, x ), https://tc39.es/ecma402/#sec-formatnumberstring
  345. // 1.1.5 FormatNumericToString ( intlObject, x ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-formatnumberstring
  346. FormatResult format_numeric_to_string(NumberFormatBase const& intl_object, MathematicalValue number)
  347. {
  348. bool is_negative = false;
  349. // 1. If x is negative-zero, then
  350. if (number.is_negative_zero()) {
  351. // a. Let isNegative be true.
  352. is_negative = true;
  353. // b. Let x be the mathematical value 0.
  354. number = MathematicalValue(0.0);
  355. }
  356. // 2. Assert: x is a mathematical value.
  357. VERIFY(number.is_mathematical_value());
  358. // 3. If x < 0, let isNegative be true; else let isNegative be false.
  359. // FIXME: Spec issue: this step would override step 1a, see https://github.com/tc39/proposal-intl-numberformat-v3/issues/67
  360. if (number.is_negative()) {
  361. is_negative = true;
  362. // 4. If isNegative, then
  363. // a. Let x be -x.
  364. number.negate();
  365. }
  366. // 5. Let unsignedRoundingMode be GetUnsignedRoundingMode(intlObject.[[RoundingMode]], isNegative).
  367. // FIXME: Spec issue: Intl.PluralRules does not have [[RoundingMode]], see https://github.com/tc39/proposal-intl-numberformat-v3/issues/103
  368. Optional<NumberFormat::UnsignedRoundingMode> unsigned_rounding_mode;
  369. if (intl_object.rounding_mode() != NumberFormat::RoundingMode::Invalid)
  370. unsigned_rounding_mode = get_unsigned_rounding_mode(intl_object.rounding_mode(), is_negative);
  371. RawFormatResult result {};
  372. switch (intl_object.rounding_type()) {
  373. // 6. If intlObject.[[RoundingType]] is significantDigits, then
  374. case NumberFormatBase::RoundingType::SignificantDigits:
  375. // a. Let result be ToRawPrecision(x, intlObject.[[MinimumSignificantDigits]], intlObject.[[MaximumSignificantDigits]], unsignedRoundingMode).
  376. result = to_raw_precision(number, intl_object.min_significant_digits(), intl_object.max_significant_digits(), unsigned_rounding_mode);
  377. break;
  378. // 7. Else if intlObject.[[RoundingType]] is fractionDigits, then
  379. case NumberFormatBase::RoundingType::FractionDigits:
  380. // a. Let result be ToRawFixed(x, intlObject.[[MinimumFractionDigits]], intlObject.[[MaximumFractionDigits]], intlObject.[[RoundingIncrement]], unsignedRoundingMode).
  381. result = to_raw_fixed(number, intl_object.min_fraction_digits(), intl_object.max_fraction_digits(), intl_object.rounding_increment(), unsigned_rounding_mode);
  382. break;
  383. // 8. Else,
  384. case NumberFormatBase::RoundingType::MorePrecision:
  385. case NumberFormatBase::RoundingType::LessPrecision: {
  386. // a. Let sResult be ToRawPrecision(x, intlObject.[[MinimumSignificantDigits]], intlObject.[[MaximumSignificantDigits]], unsignedRoundingMode).
  387. auto significant_result = to_raw_precision(number, intl_object.min_significant_digits(), intl_object.max_significant_digits(), unsigned_rounding_mode);
  388. // b. Let fResult be ToRawFixed(x, intlObject.[[MinimumFractionDigits]], intlObject.[[MaximumFractionDigits]], intlObject.[[RoundingIncrement]], unsignedRoundingMode).
  389. auto fraction_result = to_raw_fixed(number, intl_object.min_fraction_digits(), intl_object.max_fraction_digits(), intl_object.rounding_increment(), unsigned_rounding_mode);
  390. // c. If intlObj.[[RoundingType]] is morePrecision, then
  391. if (intl_object.rounding_type() == NumberFormatBase::RoundingType::MorePrecision) {
  392. // i. If sResult.[[RoundingMagnitude]] ≤ fResult.[[RoundingMagnitude]], then
  393. if (significant_result.rounding_magnitude <= fraction_result.rounding_magnitude) {
  394. // 1. Let result be sResult.
  395. result = move(significant_result);
  396. }
  397. // ii. Else,
  398. else {
  399. // 2. Let result be fResult.
  400. result = move(fraction_result);
  401. }
  402. }
  403. // d. Else,
  404. else {
  405. // i. Assert: intlObj.[[RoundingType]] is lessPrecision.
  406. VERIFY(intl_object.rounding_type() == NumberFormatBase::RoundingType::LessPrecision);
  407. // ii. If sResult.[[RoundingMagnitude]] ≤ fResult.[[RoundingMagnitude]], then
  408. if (significant_result.rounding_magnitude <= fraction_result.rounding_magnitude) {
  409. // 1. Let result be fResult.
  410. result = move(fraction_result);
  411. }
  412. // iii. Else,
  413. else {
  414. // 1. Let result be sResult.
  415. result = move(significant_result);
  416. }
  417. }
  418. break;
  419. }
  420. default:
  421. VERIFY_NOT_REACHED();
  422. }
  423. // 9. Let x be result.[[RoundedNumber]].
  424. number = move(result.rounded_number);
  425. // 10. Let string be result.[[FormattedString]].
  426. auto string = move(result.formatted_string);
  427. // 11. If intlObject.[[TrailingZeroDisplay]] is "stripIfInteger" and x modulo 1 = 0, then
  428. if ((intl_object.trailing_zero_display() == NumberFormat::TrailingZeroDisplay::StripIfInteger) && number.modulo_is_zero(1)) {
  429. // a. If string contains ".", then
  430. if (auto index = string.find('.'); index.has_value()) {
  431. // i. Set string to the substring of string from index 0 to the index of ".".
  432. string = string.substring(0, *index);
  433. }
  434. }
  435. // 12. Let int be result.[[IntegerDigitsCount]].
  436. int digits = result.digits;
  437. // 13. Let minInteger be intlObject.[[MinimumIntegerDigits]].
  438. int min_integer = intl_object.min_integer_digits();
  439. // 14. If int < minInteger, then
  440. if (digits < min_integer) {
  441. // a. Let forwardZeros be the String consisting of minInteger–int occurrences of the character "0".
  442. auto forward_zeros = String::repeated('0', min_integer - digits);
  443. // b. Set string to the string-concatenation of forwardZeros and string.
  444. string = String::formatted("{}{}", forward_zeros, string);
  445. }
  446. // 15. If isNegative and x is 0, then
  447. if (is_negative && number.is_zero()) {
  448. // a. Let x be -0.
  449. number = MathematicalValue { MathematicalValue::Symbol::NegativeZero };
  450. }
  451. // 16. Else if isNegative, then
  452. else if (is_negative) {
  453. // b. Let x be -x.
  454. number.negate();
  455. }
  456. // 17. Return the Record { [[RoundedNumber]]: x, [[FormattedString]]: string }.
  457. return { move(string), move(number) };
  458. }
  459. // 15.5.4 PartitionNumberPattern ( numberFormat, x ), https://tc39.es/ecma402/#sec-partitionnumberpattern
  460. // 1.1.6 PartitionNumberPattern ( numberFormat, x ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-partitionnumberpattern
  461. Vector<PatternPartition> partition_number_pattern(VM& vm, NumberFormat& number_format, MathematicalValue number)
  462. {
  463. // 1. Let exponent be 0.
  464. int exponent = 0;
  465. String formatted_string;
  466. // 2. If x is not-a-number, then
  467. if (number.is_nan()) {
  468. // a. Let n be an implementation- and locale-dependent (ILD) String value indicating the NaN value.
  469. formatted_string = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::NaN).value_or("NaN"sv);
  470. }
  471. // 3. Else if x is positive-infinity, then
  472. else if (number.is_positive_infinity()) {
  473. // a. Let n be an ILD String value indicating positive infinity.
  474. formatted_string = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::Infinity).value_or("infinity"sv);
  475. }
  476. // 4. Else if x is negative-infinity, then
  477. else if (number.is_negative_infinity()) {
  478. // a. Let n be an ILD String value indicating negative infinity.
  479. // NOTE: The CLDR does not contain unique strings for negative infinity. The negative sign will
  480. // be inserted by the pattern returned from GetNumberFormatPattern.
  481. formatted_string = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::Infinity).value_or("infinity"sv);
  482. }
  483. // 5. Else,
  484. else {
  485. // a. If x is not negative-zero,
  486. if (!number.is_negative_zero()) {
  487. // i. Assert: x is a mathematical value.
  488. VERIFY(number.is_mathematical_value());
  489. // ii. If numberFormat.[[Style]] is "percent", let x be 100 × x.
  490. if (number_format.style() == NumberFormat::Style::Percent)
  491. number = number.multiplied_by(100);
  492. // iii. Let exponent be ComputeExponent(numberFormat, x).
  493. exponent = compute_exponent(number_format, number);
  494. // iv. Let x be x × 10^-exponent.
  495. number = number.multiplied_by_power(-exponent);
  496. }
  497. // b. Let formatNumberResult be FormatNumericToString(numberFormat, x).
  498. auto format_number_result = format_numeric_to_string(number_format, move(number));
  499. // c. Let n be formatNumberResult.[[FormattedString]].
  500. formatted_string = move(format_number_result.formatted_string);
  501. // d. Let x be formatNumberResult.[[RoundedNumber]].
  502. number = move(format_number_result.rounded_number);
  503. }
  504. Unicode::NumberFormat found_pattern {};
  505. // 6. Let pattern be GetNumberFormatPattern(numberFormat, x).
  506. auto pattern = get_number_format_pattern(vm, number_format, number, found_pattern);
  507. if (!pattern.has_value())
  508. return {};
  509. // 7. Let result be a new empty List.
  510. Vector<PatternPartition> result;
  511. // 8. Let patternParts be PartitionPattern(pattern).
  512. auto pattern_parts = pattern->visit([](auto const& p) { return partition_pattern(p); });
  513. // 9. For each Record { [[Type]], [[Value]] } patternPart of patternParts, do
  514. for (auto& pattern_part : pattern_parts) {
  515. // a. Let p be patternPart.[[Type]].
  516. auto part = pattern_part.type;
  517. // b. If p is "literal", then
  518. if (part == "literal"sv) {
  519. // i. Append a new Record { [[Type]]: "literal", [[Value]]: patternPart.[[Value]] } as the last element of result.
  520. result.append({ "literal"sv, move(pattern_part.value) });
  521. }
  522. // c. Else if p is equal to "number", then
  523. else if (part == "number"sv) {
  524. // i. Let notationSubParts be PartitionNotationSubPattern(numberFormat, x, n, exponent).
  525. auto notation_sub_parts = partition_notation_sub_pattern(number_format, number, formatted_string, exponent);
  526. // ii. Append all elements of notationSubParts to result.
  527. result.extend(move(notation_sub_parts));
  528. }
  529. // d. Else if p is equal to "plusSign", then
  530. else if (part == "plusSign"sv) {
  531. // i. Let plusSignSymbol be the ILND String representing the plus sign.
  532. auto plus_sign_symbol = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::PlusSign).value_or("+"sv);
  533. // ii. Append a new Record { [[Type]]: "plusSign", [[Value]]: plusSignSymbol } as the last element of result.
  534. result.append({ "plusSign"sv, plus_sign_symbol });
  535. }
  536. // e. Else if p is equal to "minusSign", then
  537. else if (part == "minusSign"sv) {
  538. // i. Let minusSignSymbol be the ILND String representing the minus sign.
  539. auto minus_sign_symbol = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::MinusSign).value_or("-"sv);
  540. // ii. Append a new Record { [[Type]]: "minusSign", [[Value]]: minusSignSymbol } as the last element of result.
  541. result.append({ "minusSign"sv, minus_sign_symbol });
  542. }
  543. // f. Else if p is equal to "percentSign" and numberFormat.[[Style]] is "percent", then
  544. else if ((part == "percentSign"sv) && (number_format.style() == NumberFormat::Style::Percent)) {
  545. // i. Let percentSignSymbol be the ILND String representing the percent sign.
  546. auto percent_sign_symbol = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::PercentSign).value_or("%"sv);
  547. // ii. Append a new Record { [[Type]]: "percentSign", [[Value]]: percentSignSymbol } as the last element of result.
  548. result.append({ "percentSign"sv, percent_sign_symbol });
  549. }
  550. // g. Else if p is equal to "unitPrefix" and numberFormat.[[Style]] is "unit", then
  551. // h. Else if p is equal to "unitSuffix" and numberFormat.[[Style]] is "unit", then
  552. else if ((part.starts_with("unitIdentifier:"sv)) && (number_format.style() == NumberFormat::Style::Unit)) {
  553. // Note: Our implementation combines "unitPrefix" and "unitSuffix" into one field, "unitIdentifier".
  554. auto identifier_index = part.substring_view("unitIdentifier:"sv.length()).to_uint();
  555. VERIFY(identifier_index.has_value());
  556. // i. Let unit be numberFormat.[[Unit]].
  557. // ii. Let unitDisplay be numberFormat.[[UnitDisplay]].
  558. // iii. Let mu be an ILD String value representing unit before x in unitDisplay form, which may depend on x in languages having different plural forms.
  559. auto unit_identifier = found_pattern.identifiers[*identifier_index];
  560. // iv. Append a new Record { [[Type]]: "unit", [[Value]]: mu } as the last element of result.
  561. result.append({ "unit"sv, unit_identifier });
  562. }
  563. // i. Else if p is equal to "currencyCode" and numberFormat.[[Style]] is "currency", then
  564. // j. Else if p is equal to "currencyPrefix" and numberFormat.[[Style]] is "currency", then
  565. // k. Else if p is equal to "currencySuffix" and numberFormat.[[Style]] is "currency", then
  566. //
  567. // Note: Our implementation manipulates the format string to inject/remove spacing around the
  568. // currency code during GetNumberFormatPattern so that we do not have to do currency
  569. // display / plurality lookups more than once.
  570. else if ((part == "currency"sv) && (number_format.style() == NumberFormat::Style::Currency)) {
  571. result.append({ "currency"sv, number_format.resolve_currency_display() });
  572. }
  573. // l. Else,
  574. else {
  575. // i. Let unknown be an ILND String based on x and p.
  576. // ii. Append a new Record { [[Type]]: "unknown", [[Value]]: unknown } as the last element of result.
  577. // LibUnicode doesn't generate any "unknown" patterns.
  578. VERIFY_NOT_REACHED();
  579. }
  580. }
  581. // 10. Return result.
  582. return result;
  583. }
  584. static Vector<StringView> separate_integer_into_groups(Unicode::NumberGroupings const& grouping_sizes, StringView integer, NumberFormat::UseGrouping use_grouping)
  585. {
  586. Utf8View utf8_integer { integer };
  587. if (utf8_integer.length() <= grouping_sizes.primary_grouping_size)
  588. return { integer };
  589. size_t index = utf8_integer.length() - grouping_sizes.primary_grouping_size;
  590. switch (use_grouping) {
  591. case NumberFormat::UseGrouping::Min2:
  592. if (utf8_integer.length() < 5)
  593. return { integer };
  594. break;
  595. case NumberFormat::UseGrouping::Auto:
  596. if (index < grouping_sizes.minimum_grouping_digits)
  597. return { integer };
  598. break;
  599. case NumberFormat::UseGrouping::Always:
  600. break;
  601. default:
  602. VERIFY_NOT_REACHED();
  603. }
  604. Vector<StringView> groups;
  605. auto add_group = [&](size_t index, size_t length) {
  606. groups.prepend(utf8_integer.unicode_substring_view(index, length).as_string());
  607. };
  608. add_group(index, grouping_sizes.primary_grouping_size);
  609. while (index > grouping_sizes.secondary_grouping_size) {
  610. index -= grouping_sizes.secondary_grouping_size;
  611. add_group(index, grouping_sizes.secondary_grouping_size);
  612. }
  613. if (index > 0)
  614. add_group(0, index);
  615. return groups;
  616. }
  617. // 15.5.5 PartitionNotationSubPattern ( numberFormat, x, n, exponent ), https://tc39.es/ecma402/#sec-partitionnotationsubpattern
  618. // 1.1.7 PartitionNotationSubPattern ( numberFormat, x, n, exponent ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-partitionnotationsubpattern
  619. Vector<PatternPartition> partition_notation_sub_pattern(NumberFormat& number_format, MathematicalValue const& number, String formatted_string, int exponent)
  620. {
  621. // 1. Let result be a new empty List.
  622. Vector<PatternPartition> result;
  623. auto grouping_sizes = Unicode::get_number_system_groupings(number_format.data_locale(), number_format.numbering_system());
  624. if (!grouping_sizes.has_value())
  625. return {};
  626. // 2. If x is NaN, then
  627. if (number.is_nan()) {
  628. // a. Append a new Record { [[Type]]: "nan", [[Value]]: n } as the last element of result.
  629. result.append({ "nan"sv, move(formatted_string) });
  630. }
  631. // 3. Else if x is a non-finite Number, then
  632. else if (number.is_positive_infinity() || number.is_negative_infinity()) {
  633. // a. Append a new Record { [[Type]]: "infinity", [[Value]]: n } as the last element of result.
  634. result.append({ "infinity"sv, move(formatted_string) });
  635. }
  636. // 4. Else,
  637. else {
  638. // a. Let notationSubPattern be GetNotationSubPattern(numberFormat, exponent).
  639. auto notation_sub_pattern = get_notation_sub_pattern(number_format, exponent);
  640. if (!notation_sub_pattern.has_value())
  641. return {};
  642. // b. Let patternParts be PartitionPattern(notationSubPattern).
  643. auto pattern_parts = partition_pattern(*notation_sub_pattern);
  644. // c. For each Record { [[Type]], [[Value]] } patternPart of patternParts, do
  645. for (auto& pattern_part : pattern_parts) {
  646. // i. Let p be patternPart.[[Type]].
  647. auto part = pattern_part.type;
  648. // ii. If p is "literal", then
  649. if (part == "literal"sv) {
  650. // 1. Append a new Record { [[Type]]: "literal", [[Value]]: patternPart.[[Value]] } as the last element of result.
  651. result.append({ "literal"sv, move(pattern_part.value) });
  652. }
  653. // iii. Else if p is equal to "number", then
  654. else if (part == "number"sv) {
  655. // 1. If the numberFormat.[[NumberingSystem]] matches one of the values in the "Numbering System" column of Table 12 below, then
  656. // a. Let digits be a List whose 10 String valued elements are the UTF-16 string representations of the 10 digits specified in the "Digits" column of the matching row in Table 12.
  657. // b. Replace each digit in n with the value of digits[digit].
  658. // 2. Else use an implementation dependent algorithm to map n to the appropriate representation of n in the given numbering system.
  659. formatted_string = Unicode::replace_digits_for_number_system(number_format.numbering_system(), formatted_string);
  660. // 3. Let decimalSepIndex be StringIndexOf(n, ".", 0).
  661. auto decimal_sep_index = formatted_string.find('.');
  662. StringView integer;
  663. Optional<StringView> fraction;
  664. // 4. If decimalSepIndex > 0, then
  665. if (decimal_sep_index.has_value() && (*decimal_sep_index > 0)) {
  666. // a. Let integer be the substring of n from position 0, inclusive, to position decimalSepIndex, exclusive.
  667. integer = formatted_string.substring_view(0, *decimal_sep_index);
  668. // b. Let fraction be the substring of n from position decimalSepIndex, exclusive, to the end of n.
  669. fraction = formatted_string.substring_view(*decimal_sep_index + 1);
  670. }
  671. // 5. Else,
  672. else {
  673. // a. Let integer be n.
  674. integer = formatted_string;
  675. // b. Let fraction be undefined.
  676. }
  677. // 6. If the numberFormat.[[UseGrouping]] is false, then
  678. if (number_format.use_grouping() == NumberFormat::UseGrouping::False) {
  679. // a. Append a new Record { [[Type]]: "integer", [[Value]]: integer } as the last element of result.
  680. result.append({ "integer"sv, integer });
  681. }
  682. // 7. Else,
  683. else {
  684. // a. Let groupSepSymbol be the implementation-, locale-, and numbering system-dependent (ILND) String representing the grouping separator.
  685. auto group_sep_symbol = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::Group).value_or(","sv);
  686. // b. Let groups be a List whose elements are, in left to right order, the substrings defined by ILND set of locations within the integer, which may depend on the value of numberFormat.[[UseGrouping]].
  687. auto groups = separate_integer_into_groups(*grouping_sizes, integer, number_format.use_grouping());
  688. // c. Assert: The number of elements in groups List is greater than 0.
  689. VERIFY(!groups.is_empty());
  690. // d. Repeat, while groups List is not empty,
  691. while (!groups.is_empty()) {
  692. // i. Remove the first element from groups and let integerGroup be the value of that element.
  693. auto integer_group = groups.take_first();
  694. // ii. Append a new Record { [[Type]]: "integer", [[Value]]: integerGroup } as the last element of result.
  695. result.append({ "integer"sv, integer_group });
  696. // iii. If groups List is not empty, then
  697. if (!groups.is_empty()) {
  698. // i. Append a new Record { [[Type]]: "group", [[Value]]: groupSepSymbol } as the last element of result.
  699. result.append({ "group"sv, group_sep_symbol });
  700. }
  701. }
  702. }
  703. // 8. If fraction is not undefined, then
  704. if (fraction.has_value()) {
  705. // a. Let decimalSepSymbol be the ILND String representing the decimal separator.
  706. auto decimal_sep_symbol = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::Decimal).value_or("."sv);
  707. // b. Append a new Record { [[Type]]: "decimal", [[Value]]: decimalSepSymbol } as the last element of result.
  708. result.append({ "decimal"sv, decimal_sep_symbol });
  709. // c. Append a new Record { [[Type]]: "fraction", [[Value]]: fraction } as the last element of result.
  710. result.append({ "fraction"sv, fraction.release_value() });
  711. }
  712. }
  713. // iv. Else if p is equal to "compactSymbol", then
  714. // v. Else if p is equal to "compactName", then
  715. else if (part.starts_with("compactIdentifier:"sv)) {
  716. // Note: Our implementation combines "compactSymbol" and "compactName" into one field, "compactIdentifier".
  717. auto identifier_index = part.substring_view("compactIdentifier:"sv.length()).to_uint();
  718. VERIFY(identifier_index.has_value());
  719. // 1. Let compactSymbol be an ILD string representing exponent in short form, which may depend on x in languages having different plural forms. The implementation must be able to provide this string, or else the pattern would not have a "{compactSymbol}" placeholder.
  720. auto compact_identifier = number_format.compact_format().identifiers[*identifier_index];
  721. // 2. Append a new Record { [[Type]]: "compact", [[Value]]: compactSymbol } as the last element of result.
  722. result.append({ "compact"sv, compact_identifier });
  723. }
  724. // vi. Else if p is equal to "scientificSeparator", then
  725. else if (part == "scientificSeparator"sv) {
  726. // 1. Let scientificSeparator be the ILND String representing the exponent separator.
  727. auto scientific_separator = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::Exponential).value_or("E"sv);
  728. // 2. Append a new Record { [[Type]]: "exponentSeparator", [[Value]]: scientificSeparator } as the last element of result.
  729. result.append({ "exponentSeparator"sv, scientific_separator });
  730. }
  731. // vii. Else if p is equal to "scientificExponent", then
  732. else if (part == "scientificExponent"sv) {
  733. // 1. If exponent < 0, then
  734. if (exponent < 0) {
  735. // a. Let minusSignSymbol be the ILND String representing the minus sign.
  736. auto minus_sign_symbol = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::MinusSign).value_or("-"sv);
  737. // b. Append a new Record { [[Type]]: "exponentMinusSign", [[Value]]: minusSignSymbol } as the last element of result.
  738. result.append({ "exponentMinusSign"sv, minus_sign_symbol });
  739. // c. Let exponent be -exponent.
  740. exponent *= -1;
  741. }
  742. // 2. Let exponentResult be ToRawFixed(exponent, 0, 0, 1, undefined).
  743. auto exponent_value = MathematicalValue { static_cast<double>(exponent) };
  744. auto exponent_result = to_raw_fixed(exponent_value, 0, 0, 1, {});
  745. // FIXME: The spec does not say to do this, but all of major engines perform this replacement.
  746. // Without this, formatting with non-Latin numbering systems will produce non-localized results.
  747. exponent_result.formatted_string = Unicode::replace_digits_for_number_system(number_format.numbering_system(), exponent_result.formatted_string);
  748. // 3. Append a new Record { [[Type]]: "exponentInteger", [[Value]]: exponentResult.[[FormattedString]] } as the last element of result.
  749. result.append({ "exponentInteger"sv, move(exponent_result.formatted_string) });
  750. }
  751. // viii. Else,
  752. else {
  753. // 1. Let unknown be an ILND String based on x and p.
  754. // 2. Append a new Record { [[Type]]: "unknown", [[Value]]: unknown } as the last element of result.
  755. // LibUnicode doesn't generate any "unknown" patterns.
  756. VERIFY_NOT_REACHED();
  757. }
  758. }
  759. }
  760. // 5. Return result.
  761. return result;
  762. }
  763. // 15.5.6 FormatNumeric ( numberFormat, x ), https://tc39.es/ecma402/#sec-formatnumber
  764. String format_numeric(VM& vm, NumberFormat& number_format, MathematicalValue number)
  765. {
  766. // 1. Let parts be ? PartitionNumberPattern(numberFormat, x).
  767. // Note: Our implementation of PartitionNumberPattern does not throw.
  768. auto parts = partition_number_pattern(vm, number_format, move(number));
  769. // 2. Let result be the empty String.
  770. StringBuilder result;
  771. // 3. For each Record { [[Type]], [[Value]] } part in parts, do
  772. for (auto& part : parts) {
  773. // a. Set result to the string-concatenation of result and part.[[Value]].
  774. result.append(move(part.value));
  775. }
  776. // 4. Return result.
  777. return result.build();
  778. }
  779. // 15.5.7 FormatNumericToParts ( numberFormat, x ), https://tc39.es/ecma402/#sec-formatnumbertoparts
  780. Array* format_numeric_to_parts(VM& vm, NumberFormat& number_format, MathematicalValue number)
  781. {
  782. auto& realm = *vm.current_realm();
  783. // 1. Let parts be ? PartitionNumberPattern(numberFormat, x).
  784. // Note: Our implementation of PartitionNumberPattern does not throw.
  785. auto parts = partition_number_pattern(vm, number_format, move(number));
  786. // 2. Let result be ! ArrayCreate(0).
  787. auto* result = MUST(Array::create(realm, 0));
  788. // 3. Let n be 0.
  789. size_t n = 0;
  790. // 4. For each Record { [[Type]], [[Value]] } part in parts, do
  791. for (auto& part : parts) {
  792. // a. Let O be OrdinaryObjectCreate(%Object.prototype%).
  793. auto* object = Object::create(realm, realm.intrinsics().object_prototype());
  794. // b. Perform ! CreateDataPropertyOrThrow(O, "type", part.[[Type]]).
  795. MUST(object->create_data_property_or_throw(vm.names.type, js_string(vm, part.type)));
  796. // c. Perform ! CreateDataPropertyOrThrow(O, "value", part.[[Value]]).
  797. MUST(object->create_data_property_or_throw(vm.names.value, js_string(vm, move(part.value))));
  798. // d. Perform ! CreateDataPropertyOrThrow(result, ! ToString(n), O).
  799. MUST(result->create_data_property_or_throw(n, object));
  800. // e. Increment n by 1.
  801. ++n;
  802. }
  803. // 5. Return result.
  804. return result;
  805. }
  806. static String cut_trailing_zeroes(StringView string, int cut)
  807. {
  808. // These steps are exactly the same between ToRawPrecision and ToRawFixed.
  809. // Repeat, while cut > 0 and the last character of m is "0",
  810. while ((cut > 0) && string.ends_with('0')) {
  811. // Remove the last character from m.
  812. string = string.substring_view(0, string.length() - 1);
  813. // Decrease cut by 1.
  814. --cut;
  815. }
  816. // If the last character of m is ".", then
  817. if (string.ends_with('.')) {
  818. // Remove the last character from m.
  819. string = string.substring_view(0, string.length() - 1);
  820. }
  821. return string.to_string();
  822. }
  823. enum class PreferredResult {
  824. LessThanNumber,
  825. GreaterThanNumber,
  826. };
  827. // ToRawPrecisionFn, https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#eqn-ToRawPrecisionFn
  828. static auto to_raw_precision_function(MathematicalValue const& number, int precision, PreferredResult mode)
  829. {
  830. struct {
  831. MathematicalValue number;
  832. int exponent { 0 };
  833. MathematicalValue rounded;
  834. } result {};
  835. result.exponent = number.logarithmic_floor();
  836. if (number.is_number()) {
  837. result.number = number.divided_by_power(result.exponent - precision + 1);
  838. switch (mode) {
  839. case PreferredResult::LessThanNumber:
  840. result.number = MathematicalValue { floor(result.number.as_number()) };
  841. break;
  842. case PreferredResult::GreaterThanNumber:
  843. result.number = MathematicalValue { ceil(result.number.as_number()) };
  844. break;
  845. }
  846. } else {
  847. // NOTE: In order to round the BigInt to the proper precision, this computation is initially off by a
  848. // factor of 10. This lets us inspect the ones digit and then round up if needed.
  849. result.number = number.divided_by_power(result.exponent - precision);
  850. // FIXME: Can we do this without string conversion?
  851. auto digits = result.number.to_string();
  852. auto digit = digits.substring_view(digits.length() - 1);
  853. result.number = result.number.divided_by(10);
  854. if (mode == PreferredResult::GreaterThanNumber && digit.to_uint().value() != 0)
  855. result.number = result.number.plus(1);
  856. }
  857. result.rounded = result.number.multiplied_by_power(result.exponent - precision + 1);
  858. return result;
  859. }
  860. // 15.5.8 ToRawPrecision ( x, minPrecision, maxPrecision ), https://tc39.es/ecma402/#sec-torawprecision
  861. // 1.1.10 ToRawPrecision ( x, minPrecision, maxPrecision, unsignedRoundingMode ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-torawprecision
  862. RawFormatResult to_raw_precision(MathematicalValue const& number, int min_precision, int max_precision, Optional<NumberFormat::UnsignedRoundingMode> const& unsigned_rounding_mode)
  863. {
  864. RawFormatResult result {};
  865. // 1. Let p be maxPrecision.
  866. int precision = max_precision;
  867. int exponent = 0;
  868. // 2. If x = 0, then
  869. if (number.is_zero()) {
  870. // a. Let m be the String consisting of p occurrences of the character "0".
  871. result.formatted_string = String::repeated('0', precision);
  872. // b. Let e be 0.
  873. exponent = 0;
  874. // c. Let xFinal be 0.
  875. result.rounded_number = MathematicalValue { 0.0 };
  876. }
  877. // 3. Else,
  878. else {
  879. // FIXME: The result of these steps isn't entirely accurate for large values of 'p' (which
  880. // defaults to 21, resulting in numbers on the order of 10^21). Either AK::format or
  881. // our Number::toString AO (double_to_string in Value.cpp) will need to be improved
  882. // to produce more accurate results.
  883. // a. Let n1 and e1 each be an integer and r1 a mathematical value, with r1 = ToRawPrecisionFn(n1, e1, p), such that r1 ≤ x and r1 is maximized.
  884. auto [number1, exponent1, rounded1] = to_raw_precision_function(number, precision, PreferredResult::LessThanNumber);
  885. // b. Let n2 and e2 each be an integer and r2 a mathematical value, with r2 = ToRawPrecisionFn(n2, e2, p), such that r2 ≥ x and r2 is minimized.
  886. auto [number2, exponent2, rounded2] = to_raw_precision_function(number, precision, PreferredResult::GreaterThanNumber);
  887. // c. Let r be ApplyUnsignedRoundingMode(x, r1, r2, unsignedRoundingMode).
  888. auto rounded = apply_unsigned_rounding_mode(number, rounded1, rounded2, unsigned_rounding_mode);
  889. MathematicalValue n;
  890. // d. If r is r1, then
  891. if (rounded == RoundingDecision::LowerValue) {
  892. // i. Let n be n1.
  893. n = move(number1);
  894. // ii. Let e be e1.
  895. exponent = exponent1;
  896. // iii. Let xFinal be r1.
  897. result.rounded_number = move(rounded1);
  898. }
  899. // e. Else,
  900. else {
  901. // i. Let n be n2.
  902. n = move(number2);
  903. // ii. Let e be e2.
  904. exponent = exponent2;
  905. // iii. Let xFinal be r2.
  906. result.rounded_number = move(rounded2);
  907. }
  908. // f. Let m be the String consisting of the digits of the decimal representation of n (in order, with no leading zeroes).
  909. result.formatted_string = n.to_string();
  910. }
  911. // 4. If e ≥ p–1, then
  912. if (exponent >= (precision - 1)) {
  913. // a. Let m be the string-concatenation of m and e–p+1 occurrences of the character "0".
  914. result.formatted_string = String::formatted(
  915. "{}{}",
  916. result.formatted_string,
  917. String::repeated('0', exponent - precision + 1));
  918. // b. Let int be e+1.
  919. result.digits = exponent + 1;
  920. }
  921. // 5. Else if e ≥ 0, then
  922. else if (exponent >= 0) {
  923. // a. Let m be the string-concatenation of the first e+1 characters of m, the character ".", and the remaining p–(e+1) characters of m.
  924. result.formatted_string = String::formatted(
  925. "{}.{}",
  926. result.formatted_string.substring_view(0, exponent + 1),
  927. result.formatted_string.substring_view(exponent + 1));
  928. // b. Let int be e+1.
  929. result.digits = exponent + 1;
  930. }
  931. // 6. Else,
  932. else {
  933. // a. Assert: e < 0.
  934. // b. Let m be the string-concatenation of "0.", –(e+1) occurrences of the character "0", and m.
  935. result.formatted_string = String::formatted(
  936. "0.{}{}",
  937. String::repeated('0', -1 * (exponent + 1)),
  938. result.formatted_string);
  939. // c. Let int be 1.
  940. result.digits = 1;
  941. }
  942. // 7. If m contains the character ".", and maxPrecision > minPrecision, then
  943. if (result.formatted_string.contains('.') && (max_precision > min_precision)) {
  944. // a. Let cut be maxPrecision – minPrecision.
  945. int cut = max_precision - min_precision;
  946. // Steps 8b-8c are implemented by cut_trailing_zeroes.
  947. result.formatted_string = cut_trailing_zeroes(result.formatted_string, cut);
  948. }
  949. // 8. Return the Record { [[FormattedString]]: m, [[RoundedNumber]]: xFinal, [[IntegerDigitsCount]]: int, [[RoundingMagnitude]]: e–p+1 }.
  950. result.rounding_magnitude = exponent - precision + 1;
  951. return result;
  952. }
  953. // ToRawFixedFn, https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#eqn-ToRawFixedFn
  954. static auto to_raw_fixed_function(MathematicalValue const& number, int fraction, int rounding_increment, PreferredResult mode)
  955. {
  956. struct {
  957. MathematicalValue number;
  958. MathematicalValue rounded;
  959. } result {};
  960. if (number.is_number()) {
  961. result.number = number.multiplied_by_power(fraction);
  962. switch (mode) {
  963. case PreferredResult::LessThanNumber:
  964. result.number = MathematicalValue { floor(result.number.as_number()) };
  965. break;
  966. case PreferredResult::GreaterThanNumber:
  967. result.number = MathematicalValue { ceil(result.number.as_number()) };
  968. break;
  969. }
  970. } else {
  971. // NOTE: In order to round the BigInt to the proper precision, this computation is initially off by a
  972. // factor of 10. This lets us inspect the ones digit and then round up if needed.
  973. result.number = number.multiplied_by_power(fraction - 1);
  974. // FIXME: Can we do this without string conversion?
  975. auto digits = result.number.to_string();
  976. auto digit = digits.substring_view(digits.length() - 1);
  977. result.number = result.number.multiplied_by(10);
  978. if (mode == PreferredResult::GreaterThanNumber && digit.to_uint().value() != 0)
  979. result.number = result.number.plus(1);
  980. }
  981. while (!result.number.modulo_is_zero(rounding_increment)) {
  982. switch (mode) {
  983. case PreferredResult::LessThanNumber:
  984. result.number = result.number.minus(1);
  985. break;
  986. case PreferredResult::GreaterThanNumber:
  987. result.number = result.number.plus(1);
  988. break;
  989. }
  990. }
  991. result.rounded = result.number.divided_by_power(fraction);
  992. return result;
  993. }
  994. // 15.5.9 ToRawFixed ( x, minInteger, minFraction, maxFraction ), https://tc39.es/ecma402/#sec-torawfixed
  995. // 1.1.11 ToRawFixed ( x, minFraction, maxFraction, roundingIncrement, unsignedRoundingMode ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-torawfixed
  996. RawFormatResult to_raw_fixed(MathematicalValue const& number, int min_fraction, int max_fraction, int rounding_increment, Optional<NumberFormat::UnsignedRoundingMode> const& unsigned_rounding_mode)
  997. {
  998. RawFormatResult result {};
  999. // 1. Let f be maxFraction.
  1000. int fraction = max_fraction;
  1001. // 2. Let n1 be an integer and r1 a mathematical value, with r1 = ToRawFixedFn(n1, f), such that n1 modulo roundingIncrement = 0, r1 ≤ x, and r1 is maximized.
  1002. auto [number1, rounded1] = to_raw_fixed_function(number, fraction, rounding_increment, PreferredResult::LessThanNumber);
  1003. // 3. Let n2 be an integer and r2 a mathematical value, with r2 = ToRawFixedFn(n2, f), such that n2 modulo roundingIncrement = 0, r2 ≥ x, and r2 is minimized.
  1004. auto [number2, rounded2] = to_raw_fixed_function(number, fraction, rounding_increment, PreferredResult::GreaterThanNumber);
  1005. // 4. Let r be ApplyUnsignedRoundingMode(x, r1, r2, unsignedRoundingMode).
  1006. auto rounded = apply_unsigned_rounding_mode(number, rounded1, rounded2, unsigned_rounding_mode);
  1007. MathematicalValue n;
  1008. // 5. If r is r1, then
  1009. if (rounded == RoundingDecision::LowerValue) {
  1010. // a. Let n be n1.
  1011. n = move(number1);
  1012. // b. Let xFinal be r1.
  1013. result.rounded_number = move(rounded1);
  1014. }
  1015. // 6. Else,
  1016. else {
  1017. // a. Let n be n2.
  1018. n = move(number2);
  1019. // b. Let xFinal be r2.
  1020. result.rounded_number = move(rounded2);
  1021. }
  1022. // 7. If n = 0, let m be "0". Otherwise, let m be the String consisting of the digits of the decimal representation of n (in order, with no leading zeroes).
  1023. result.formatted_string = n.is_zero() ? String("0"sv) : n.to_string();
  1024. // 8. If f ≠ 0, then
  1025. if (fraction != 0) {
  1026. // a. Let k be the number of characters in m.
  1027. auto decimals = result.formatted_string.length();
  1028. // b. If k ≤ f, then
  1029. if (decimals <= static_cast<size_t>(fraction)) {
  1030. // i. Let z be the String value consisting of f+1–k occurrences of the character "0".
  1031. auto zeroes = String::repeated('0', fraction + 1 - decimals);
  1032. // ii. Let m be the string-concatenation of z and m.
  1033. result.formatted_string = String::formatted("{}{}", zeroes, result.formatted_string);
  1034. // iii. Let k be f+1.
  1035. decimals = fraction + 1;
  1036. }
  1037. // c. Let a be the first k–f characters of m, and let b be the remaining f characters of m.
  1038. auto a = result.formatted_string.substring_view(0, decimals - fraction);
  1039. auto b = result.formatted_string.substring_view(decimals - fraction, fraction);
  1040. // d. Let m be the string-concatenation of a, ".", and b.
  1041. result.formatted_string = String::formatted("{}.{}", a, b);
  1042. // e. Let int be the number of characters in a.
  1043. result.digits = a.length();
  1044. }
  1045. // 9. Else, let int be the number of characters in m.
  1046. else {
  1047. result.digits = result.formatted_string.length();
  1048. }
  1049. // 10. Let cut be maxFraction – minFraction.
  1050. int cut = max_fraction - min_fraction;
  1051. // Steps 11-12 are implemented by cut_trailing_zeroes.
  1052. result.formatted_string = cut_trailing_zeroes(result.formatted_string, cut);
  1053. // 13. Return the Record { [[FormattedString]]: m, [[RoundedNumber]]: xFinal, [[IntegerDigitsCount]]: int, [[RoundingMagnitude]]: –f }.
  1054. result.rounding_magnitude = -fraction;
  1055. return result;
  1056. }
  1057. // 15.5.11 GetNumberFormatPattern ( numberFormat, x ), https://tc39.es/ecma402/#sec-getnumberformatpattern
  1058. // 1.1.14 GetNumberFormatPattern ( numberFormat, x ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-getnumberformatpattern
  1059. Optional<Variant<StringView, String>> get_number_format_pattern(VM& vm, NumberFormat& number_format, MathematicalValue const& number, Unicode::NumberFormat& found_pattern)
  1060. {
  1061. // 1. Let localeData be %NumberFormat%.[[LocaleData]].
  1062. // 2. Let dataLocale be numberFormat.[[DataLocale]].
  1063. // 3. Let dataLocaleData be localeData.[[<dataLocale>]].
  1064. // 4. Let patterns be dataLocaleData.[[patterns]].
  1065. // 5. Assert: patterns is a Record (see 15.3.3).
  1066. Optional<Unicode::NumberFormat> patterns;
  1067. // 6. Let style be numberFormat.[[Style]].
  1068. switch (number_format.style()) {
  1069. // 7. If style is "percent", then
  1070. case NumberFormat::Style::Percent:
  1071. // a. Let patterns be patterns.[[percent]].
  1072. patterns = Unicode::get_standard_number_system_format(number_format.data_locale(), number_format.numbering_system(), Unicode::StandardNumberFormatType::Percent);
  1073. break;
  1074. // 8. Else if style is "unit", then
  1075. case NumberFormat::Style::Unit: {
  1076. // a. Let unit be numberFormat.[[Unit]].
  1077. // b. Let unitDisplay be numberFormat.[[UnitDisplay]].
  1078. // c. Let patterns be patterns.[[unit]].
  1079. // d. If patterns doesn't have a field [[<unit>]], then
  1080. // i. Let unit be "fallback".
  1081. // e. Let patterns be patterns.[[<unit>]].
  1082. // f. Let patterns be patterns.[[<unitDisplay>]].
  1083. auto formats = Unicode::get_unit_formats(number_format.data_locale(), number_format.unit(), number_format.unit_display());
  1084. auto plurality = resolve_plural(number_format, Unicode::PluralForm::Cardinal, number.to_value(vm));
  1085. if (auto it = formats.find_if([&](auto& p) { return p.plurality == plurality; }); it != formats.end())
  1086. patterns = move(*it);
  1087. break;
  1088. }
  1089. // 9. Else if style is "currency", then
  1090. case NumberFormat::Style::Currency:
  1091. // a. Let currency be numberFormat.[[Currency]].
  1092. // b. Let currencyDisplay be numberFormat.[[CurrencyDisplay]].
  1093. // c. Let currencySign be numberFormat.[[CurrencySign]].
  1094. // d. Let patterns be patterns.[[currency]].
  1095. // e. If patterns doesn't have a field [[<currency>]], then
  1096. // i. Let currency be "fallback".
  1097. // f. Let patterns be patterns.[[<currency>]].
  1098. // g. Let patterns be patterns.[[<currencyDisplay>]].
  1099. // h. Let patterns be patterns.[[<currencySign>]].
  1100. // Handling of other [[CurrencyDisplay]] options will occur after [[SignDisplay]].
  1101. if (number_format.currency_display() == NumberFormat::CurrencyDisplay::Name) {
  1102. auto formats = Unicode::get_compact_number_system_formats(number_format.data_locale(), number_format.numbering_system(), Unicode::CompactNumberFormatType::CurrencyUnit);
  1103. auto plurality = resolve_plural(number_format, Unicode::PluralForm::Cardinal, number.to_value(vm));
  1104. if (auto it = formats.find_if([&](auto& p) { return p.plurality == plurality; }); it != formats.end()) {
  1105. patterns = move(*it);
  1106. break;
  1107. }
  1108. }
  1109. switch (number_format.currency_sign()) {
  1110. case NumberFormat::CurrencySign::Standard:
  1111. patterns = Unicode::get_standard_number_system_format(number_format.data_locale(), number_format.numbering_system(), Unicode::StandardNumberFormatType::Currency);
  1112. break;
  1113. case NumberFormat::CurrencySign::Accounting:
  1114. patterns = Unicode::get_standard_number_system_format(number_format.data_locale(), number_format.numbering_system(), Unicode::StandardNumberFormatType::Accounting);
  1115. break;
  1116. }
  1117. break;
  1118. // 10. Else,
  1119. case NumberFormat::Style::Decimal:
  1120. // a. Assert: style is "decimal".
  1121. // b. Let patterns be patterns.[[decimal]].
  1122. patterns = Unicode::get_standard_number_system_format(number_format.data_locale(), number_format.numbering_system(), Unicode::StandardNumberFormatType::Decimal);
  1123. break;
  1124. default:
  1125. VERIFY_NOT_REACHED();
  1126. }
  1127. if (!patterns.has_value())
  1128. return {};
  1129. StringView pattern;
  1130. // 11. Let signDisplay be numberFormat.[[SignDisplay]].
  1131. switch (number_format.sign_display()) {
  1132. // 12. If signDisplay is "never", then
  1133. case NumberFormat::SignDisplay::Never:
  1134. // a. Let pattern be patterns.[[zeroPattern]].
  1135. pattern = patterns->zero_format;
  1136. break;
  1137. // 13. Else if signDisplay is "auto", then
  1138. case NumberFormat::SignDisplay::Auto:
  1139. // a. If x is 0 or x > 0 or x is NaN, then
  1140. if (number.is_zero() || number.is_positive() || number.is_nan()) {
  1141. // i. Let pattern be patterns.[[zeroPattern]].
  1142. pattern = patterns->zero_format;
  1143. }
  1144. // b. Else,
  1145. else {
  1146. // i. Let pattern be patterns.[[negativePattern]].
  1147. pattern = patterns->negative_format;
  1148. }
  1149. break;
  1150. // 14. Else if signDisplay is "always", then
  1151. case NumberFormat::SignDisplay::Always:
  1152. // a. If x is 0 or x > 0 or x is NaN, then
  1153. if (number.is_zero() || number.is_positive() || number.is_nan()) {
  1154. // i. Let pattern be patterns.[[positivePattern]].
  1155. pattern = patterns->positive_format;
  1156. }
  1157. // b. Else,
  1158. else {
  1159. // i. Let pattern be patterns.[[negativePattern]].
  1160. pattern = patterns->negative_format;
  1161. }
  1162. break;
  1163. // 15. Else if signDisplay is "exceptZero", then
  1164. case NumberFormat::SignDisplay::ExceptZero:
  1165. // a. If x is 0 or x is -0 or x is NaN, then
  1166. if (number.is_zero() || number.is_negative_zero() || number.is_nan()) {
  1167. // i. Let pattern be patterns.[[zeroPattern]].
  1168. pattern = patterns->zero_format;
  1169. }
  1170. // b. Else if x > 0, then
  1171. else if (number.is_positive()) {
  1172. // i. Let pattern be patterns.[[positivePattern]].
  1173. pattern = patterns->positive_format;
  1174. }
  1175. // c. Else,
  1176. else {
  1177. // i. Let pattern be patterns.[[negativePattern]].
  1178. pattern = patterns->negative_format;
  1179. }
  1180. break;
  1181. // 16. Else,
  1182. case NumberFormat::SignDisplay::Negative:
  1183. // a. Assert: signDisplay is "negative".
  1184. // b. If x is 0 or x is -0 or x > 0 or x is NaN, then
  1185. if (number.is_zero() || number.is_negative_zero() || number.is_positive() || number.is_nan()) {
  1186. // i. Let pattern be patterns.[[zeroPattern]].
  1187. pattern = patterns->zero_format;
  1188. }
  1189. // c. Else,
  1190. else {
  1191. // i. Let pattern be patterns.[[negativePattern]].
  1192. pattern = patterns->negative_format;
  1193. }
  1194. break;
  1195. default:
  1196. VERIFY_NOT_REACHED();
  1197. }
  1198. found_pattern = patterns.release_value();
  1199. // Handling of steps 9b/9g: Depending on the currency display and the format pattern found above,
  1200. // we might need to mutate the format pattern to inject a space between the currency display and
  1201. // the currency number.
  1202. if (number_format.style() == NumberFormat::Style::Currency) {
  1203. auto modified_pattern = Unicode::augment_currency_format_pattern(number_format.resolve_currency_display(), pattern);
  1204. if (modified_pattern.has_value())
  1205. return modified_pattern.release_value();
  1206. }
  1207. // 16. Return pattern.
  1208. return pattern;
  1209. }
  1210. // 15.5.12 GetNotationSubPattern ( numberFormat, exponent ), https://tc39.es/ecma402/#sec-getnotationsubpattern
  1211. Optional<StringView> get_notation_sub_pattern(NumberFormat& number_format, int exponent)
  1212. {
  1213. // 1. Let localeData be %NumberFormat%.[[LocaleData]].
  1214. // 2. Let dataLocale be numberFormat.[[DataLocale]].
  1215. // 3. Let dataLocaleData be localeData.[[<dataLocale>]].
  1216. // 4. Let notationSubPatterns be dataLocaleData.[[notationSubPatterns]].
  1217. // 5. Assert: notationSubPatterns is a Record (see 15.3.3).
  1218. // 6. Let notation be numberFormat.[[Notation]].
  1219. auto notation = number_format.notation();
  1220. // 7. If notation is "scientific" or notation is "engineering", then
  1221. if ((notation == NumberFormat::Notation::Scientific) || (notation == NumberFormat::Notation::Engineering)) {
  1222. // a. Return notationSubPatterns.[[scientific]].
  1223. auto notation_sub_patterns = Unicode::get_standard_number_system_format(number_format.data_locale(), number_format.numbering_system(), Unicode::StandardNumberFormatType::Scientific);
  1224. if (!notation_sub_patterns.has_value())
  1225. return {};
  1226. return notation_sub_patterns->zero_format;
  1227. }
  1228. // 8. Else if exponent is not 0, then
  1229. else if (exponent != 0) {
  1230. // a. Assert: notation is "compact".
  1231. VERIFY(notation == NumberFormat::Notation::Compact);
  1232. // b. Let compactDisplay be numberFormat.[[CompactDisplay]].
  1233. // c. Let compactPatterns be notationSubPatterns.[[compact]].[[<compactDisplay>]].
  1234. // d. Return compactPatterns.[[<exponent>]].
  1235. if (number_format.has_compact_format())
  1236. return number_format.compact_format().zero_format;
  1237. }
  1238. // 9. Else,
  1239. // a. Return "{number}".
  1240. return "{number}"sv;
  1241. }
  1242. // 15.5.13 ComputeExponent ( numberFormat, x ), https://tc39.es/ecma402/#sec-computeexponent
  1243. int compute_exponent(NumberFormat& number_format, MathematicalValue number)
  1244. {
  1245. // 1. If x = 0, then
  1246. if (number.is_zero()) {
  1247. // a. Return 0.
  1248. return 0;
  1249. }
  1250. // 2. If x < 0, then
  1251. if (number.is_negative()) {
  1252. // a. Let x = -x.
  1253. number.negate();
  1254. }
  1255. // 3. Let magnitude be the base 10 logarithm of x rounded down to the nearest integer.
  1256. int magnitude = number.logarithmic_floor();
  1257. // 4. Let exponent be ComputeExponentForMagnitude(numberFormat, magnitude).
  1258. int exponent = compute_exponent_for_magnitude(number_format, magnitude);
  1259. // 5. Let x be x × 10^(-exponent).
  1260. number = number.multiplied_by_power(-exponent);
  1261. // 6. Let formatNumberResult be FormatNumericToString(numberFormat, x).
  1262. auto format_number_result = format_numeric_to_string(number_format, move(number));
  1263. // 7. If formatNumberResult.[[RoundedNumber]] = 0, then
  1264. if (format_number_result.rounded_number.is_zero()) {
  1265. // a. Return exponent.
  1266. return exponent;
  1267. }
  1268. // 8. Let newMagnitude be the base 10 logarithm of formatNumberResult.[[RoundedNumber]] rounded down to the nearest integer.
  1269. int new_magnitude = format_number_result.rounded_number.logarithmic_floor();
  1270. // 9. If newMagnitude is magnitude – exponent, then
  1271. if (new_magnitude == magnitude - exponent) {
  1272. // a. Return exponent.
  1273. return exponent;
  1274. }
  1275. // 10. Return ComputeExponentForMagnitude(numberFormat, magnitude + 1).
  1276. return compute_exponent_for_magnitude(number_format, magnitude + 1);
  1277. }
  1278. // 15.5.14 ComputeExponentForMagnitude ( numberFormat, magnitude ), https://tc39.es/ecma402/#sec-computeexponentformagnitude
  1279. int compute_exponent_for_magnitude(NumberFormat& number_format, int magnitude)
  1280. {
  1281. // 1. Let notation be numberFormat.[[Notation]].
  1282. switch (number_format.notation()) {
  1283. // 2. If notation is "standard", then
  1284. case NumberFormat::Notation::Standard:
  1285. // a. Return 0.
  1286. return 0;
  1287. // 3. Else if notation is "scientific", then
  1288. case NumberFormat::Notation::Scientific:
  1289. // a. Return magnitude.
  1290. return magnitude;
  1291. // 4. Else if notation is "engineering", then
  1292. case NumberFormat::Notation::Engineering: {
  1293. // a. Let thousands be the greatest integer that is not greater than magnitude / 3.
  1294. double thousands = floor(static_cast<double>(magnitude) / 3.0);
  1295. // b. Return thousands × 3.
  1296. return static_cast<int>(thousands) * 3;
  1297. }
  1298. // 5. Else,
  1299. case NumberFormat::Notation::Compact: {
  1300. // a. Assert: notation is "compact".
  1301. VERIFY(number_format.has_compact_display());
  1302. // b. Let exponent be an implementation- and locale-dependent (ILD) integer by which to scale a number of the given magnitude in compact notation for the current locale.
  1303. // c. Return exponent.
  1304. Vector<Unicode::NumberFormat> format_rules;
  1305. if (number_format.style() == NumberFormat::Style::Currency)
  1306. format_rules = Unicode::get_compact_number_system_formats(number_format.data_locale(), number_format.numbering_system(), Unicode::CompactNumberFormatType::CurrencyShort);
  1307. else if (number_format.compact_display() == NumberFormat::CompactDisplay::Long)
  1308. format_rules = Unicode::get_compact_number_system_formats(number_format.data_locale(), number_format.numbering_system(), Unicode::CompactNumberFormatType::DecimalLong);
  1309. else
  1310. format_rules = Unicode::get_compact_number_system_formats(number_format.data_locale(), number_format.numbering_system(), Unicode::CompactNumberFormatType::DecimalShort);
  1311. Unicode::NumberFormat const* best_number_format = nullptr;
  1312. for (auto const& format_rule : format_rules) {
  1313. if (format_rule.magnitude > magnitude)
  1314. break;
  1315. best_number_format = &format_rule;
  1316. }
  1317. if (best_number_format == nullptr)
  1318. return 0;
  1319. number_format.set_compact_format(*best_number_format);
  1320. return best_number_format->exponent;
  1321. }
  1322. default:
  1323. VERIFY_NOT_REACHED();
  1324. }
  1325. }
  1326. // 1.1.18 ToIntlMathematicalValue ( value ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-tointlmathematicalvalue
  1327. ThrowCompletionOr<MathematicalValue> to_intl_mathematical_value(VM& vm, Value value)
  1328. {
  1329. // 1. Let primValue be ? ToPrimitive(value, number).
  1330. auto primitive_value = TRY(value.to_primitive(vm, Value::PreferredType::Number));
  1331. // 2. If Type(primValue) is BigInt, return the mathematical value of primValue.
  1332. if (primitive_value.is_bigint())
  1333. return primitive_value.as_bigint().big_integer();
  1334. // FIXME: The remaining steps are being refactored into a new Runtime Semantic, StringIntlMV.
  1335. // We short-circuit some of these steps to avoid known pitfalls.
  1336. // See: https://github.com/tc39/proposal-intl-numberformat-v3/pull/82
  1337. if (!primitive_value.is_string()) {
  1338. auto number = TRY(primitive_value.to_number(vm));
  1339. return number.as_double();
  1340. }
  1341. // 3. If Type(primValue) is String,
  1342. // a. Let str be primValue.
  1343. auto const& string = primitive_value.as_string().string();
  1344. // Step 4 handled separately by the FIXME above.
  1345. // 5. If the grammar cannot interpret str as an expansion of StringNumericLiteral, return not-a-number.
  1346. // 6. Let mv be the MV, a mathematical value, of ? ToNumber(str), as described in 7.1.4.1.1.
  1347. auto mathematical_value = TRY(primitive_value.to_number(vm)).as_double();
  1348. // 7. If mv is 0 and the first non white space code point in str is -, return negative-zero.
  1349. if (mathematical_value == 0.0 && string.view().trim_whitespace(TrimMode::Left).starts_with('-'))
  1350. return MathematicalValue::Symbol::NegativeZero;
  1351. // 8. If mv is 10^10000 and str contains Infinity, return positive-infinity.
  1352. if (mathematical_value == pow(10, 10000) && string.contains("Infinity"sv))
  1353. return MathematicalValue::Symbol::PositiveInfinity;
  1354. // 9. If mv is -10^10000 and str contains Infinity, return negative-infinity.
  1355. if (mathematical_value == pow(-10, 10000) && string.contains("Infinity"sv))
  1356. return MathematicalValue::Symbol::NegativeInfinity;
  1357. // 10. Return mv.
  1358. return mathematical_value;
  1359. }
  1360. // 1.1.19 GetUnsignedRoundingMode ( roundingMode, isNegative ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-getunsignedroundingmode
  1361. NumberFormat::UnsignedRoundingMode get_unsigned_rounding_mode(NumberFormat::RoundingMode rounding_mode, bool is_negative)
  1362. {
  1363. // 1. If isNegative is true, return the specification type in the third column of Table 2 where the first column is roundingMode and the second column is "negative".
  1364. // 2. Else, return the specification type in the third column of Table 2 where the first column is roundingMode and the second column is "positive".
  1365. // Table 2: Conversion from rounding mode to unsigned rounding mode, https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#table-intl-unsigned-rounding-modes
  1366. switch (rounding_mode) {
  1367. case NumberFormat::RoundingMode::Ceil:
  1368. return is_negative ? NumberFormat::UnsignedRoundingMode::Zero : NumberFormat::UnsignedRoundingMode::Infinity;
  1369. case NumberFormat::RoundingMode::Floor:
  1370. return is_negative ? NumberFormat::UnsignedRoundingMode::Infinity : NumberFormat::UnsignedRoundingMode::Zero;
  1371. case NumberFormat::RoundingMode::Expand:
  1372. return NumberFormat::UnsignedRoundingMode::Infinity;
  1373. case NumberFormat::RoundingMode::Trunc:
  1374. return NumberFormat::UnsignedRoundingMode::Zero;
  1375. case NumberFormat::RoundingMode::HalfCeil:
  1376. return is_negative ? NumberFormat::UnsignedRoundingMode::HalfZero : NumberFormat::UnsignedRoundingMode::HalfInfinity;
  1377. case NumberFormat::RoundingMode::HalfFloor:
  1378. return is_negative ? NumberFormat::UnsignedRoundingMode::HalfInfinity : NumberFormat::UnsignedRoundingMode::HalfZero;
  1379. case NumberFormat::RoundingMode::HalfExpand:
  1380. return NumberFormat::UnsignedRoundingMode::HalfInfinity;
  1381. case NumberFormat::RoundingMode::HalfTrunc:
  1382. return NumberFormat::UnsignedRoundingMode::HalfZero;
  1383. case NumberFormat::RoundingMode::HalfEven:
  1384. return NumberFormat::UnsignedRoundingMode::HalfEven;
  1385. default:
  1386. VERIFY_NOT_REACHED();
  1387. };
  1388. }
  1389. // 1.1.20 ApplyUnsignedRoundingMode ( x, r1, r2, unsignedRoundingMode ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-applyunsignedroundingmode
  1390. RoundingDecision apply_unsigned_rounding_mode(MathematicalValue const& x, MathematicalValue const& r1, MathematicalValue const& r2, Optional<NumberFormat::UnsignedRoundingMode> const& unsigned_rounding_mode)
  1391. {
  1392. // 1. If x is equal to r1, return r1.
  1393. if (x.is_equal_to(r1))
  1394. return RoundingDecision::LowerValue;
  1395. // FIXME: We skip this assertion due floating point inaccuracies. For example, entering "1.2345"
  1396. // in the JS REPL results in "1.234499999999999", and may cause this assertion to fail.
  1397. //
  1398. // This should be resolved when the "Intl mathematical value" is implemented to support
  1399. // arbitrarily precise decimals.
  1400. // https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#intl-mathematical-value
  1401. // 2. Assert: r1 < x < r2.
  1402. // 3. Assert: unsignedRoundingMode is not undefined.
  1403. VERIFY(unsigned_rounding_mode.has_value());
  1404. // 4. If unsignedRoundingMode is zero, return r1.
  1405. if (unsigned_rounding_mode == NumberFormat::UnsignedRoundingMode::Zero)
  1406. return RoundingDecision::LowerValue;
  1407. // 5. If unsignedRoundingMode is infinity, return r2.
  1408. if (unsigned_rounding_mode == NumberFormat::UnsignedRoundingMode::Infinity)
  1409. return RoundingDecision::HigherValue;
  1410. // 6. Let d1 be x – r1.
  1411. auto d1 = x.minus(r1);
  1412. // 7. Let d2 be r2 – x.
  1413. auto d2 = r2.minus(x);
  1414. // 8. If d1 < d2, return r1.
  1415. if (d1.is_less_than(d2))
  1416. return RoundingDecision::LowerValue;
  1417. // 9. If d2 < d1, return r2.
  1418. if (d2.is_less_than(d1))
  1419. return RoundingDecision::HigherValue;
  1420. // 10. Assert: d1 is equal to d2.
  1421. VERIFY(d1.is_equal_to(d2));
  1422. // 11. If unsignedRoundingMode is half-zero, return r1.
  1423. if (unsigned_rounding_mode == NumberFormat::UnsignedRoundingMode::HalfZero)
  1424. return RoundingDecision::LowerValue;
  1425. // 12. If unsignedRoundingMode is half-infinity, return r2.
  1426. if (unsigned_rounding_mode == NumberFormat::UnsignedRoundingMode::HalfInfinity)
  1427. return RoundingDecision::HigherValue;
  1428. // 13. Assert: unsignedRoundingMode is half-even.
  1429. VERIFY(unsigned_rounding_mode == NumberFormat::UnsignedRoundingMode::HalfEven);
  1430. // 14. Let cardinality be (r1 / (r2 – r1)) modulo 2.
  1431. auto cardinality = r1.divided_by(r2.minus(r1));
  1432. // 15. If cardinality is 0, return r1.
  1433. if (cardinality.modulo_is_zero(2))
  1434. return RoundingDecision::LowerValue;
  1435. // 16. Return r2.
  1436. return RoundingDecision::HigherValue;
  1437. }
  1438. // 1.1.21 PartitionNumberRangePattern ( numberFormat, x, y ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-partitionnumberrangepattern
  1439. ThrowCompletionOr<Vector<PatternPartitionWithSource>> partition_number_range_pattern(VM& vm, NumberFormat& number_format, MathematicalValue start, MathematicalValue end)
  1440. {
  1441. // 1. If x is NaN or y is NaN, throw a RangeError exception.
  1442. if (start.is_nan())
  1443. return vm.throw_completion<RangeError>(ErrorType::IntlNumberIsNaN, "start"sv);
  1444. if (end.is_nan())
  1445. return vm.throw_completion<RangeError>(ErrorType::IntlNumberIsNaN, "end"sv);
  1446. // 2. Let result be a new empty List.
  1447. Vector<PatternPartitionWithSource> result;
  1448. // 3. Let xResult be ? PartitionNumberPattern(numberFormat, x).
  1449. auto raw_start_result = partition_number_pattern(vm, number_format, move(start));
  1450. auto start_result = PatternPartitionWithSource::create_from_parent_list(move(raw_start_result));
  1451. // 4. Let yResult be ? PartitionNumberPattern(numberFormat, y).
  1452. auto raw_end_result = partition_number_pattern(vm, number_format, move(end));
  1453. auto end_result = PatternPartitionWithSource::create_from_parent_list(move(raw_end_result));
  1454. // 5. If xResult is equal to yResult, return FormatApproximately(numberFormat, xResult).
  1455. if (start_result == end_result)
  1456. return format_approximately(number_format, move(start_result));
  1457. // 6. For each r in xResult, do
  1458. for (auto& part : start_result) {
  1459. // i. Set r.[[Source]] to "startRange".
  1460. part.source = "startRange"sv;
  1461. }
  1462. // 7. Add all elements in xResult to result in order.
  1463. result = move(start_result);
  1464. // 8. Let rangeSeparator be an ILND String value used to separate two numbers.
  1465. auto range_separator_symbol = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::RangeSeparator).value_or("-"sv);
  1466. auto range_separator = Unicode::augment_range_pattern(range_separator_symbol, result.last().value, end_result[0].value);
  1467. // 9. Append a new Record { [[Type]]: "literal", [[Value]]: rangeSeparator, [[Source]]: "shared" } element to result.
  1468. PatternPartitionWithSource part;
  1469. part.type = "literal"sv;
  1470. part.value = range_separator.value_or(range_separator_symbol);
  1471. part.source = "shared"sv;
  1472. result.append(move(part));
  1473. // 10. For each r in yResult, do
  1474. for (auto& part : end_result) {
  1475. // a. Set r.[[Source]] to "endRange".
  1476. part.source = "endRange"sv;
  1477. }
  1478. // 11. Add all elements in yResult to result in order.
  1479. result.extend(move(end_result));
  1480. // 12. Return ! CollapseNumberRange(result).
  1481. return collapse_number_range(move(result));
  1482. }
  1483. // 1.1.22 FormatApproximately ( numberFormat, result ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-formatapproximately
  1484. Vector<PatternPartitionWithSource> format_approximately(NumberFormat& number_format, Vector<PatternPartitionWithSource> result)
  1485. {
  1486. // 1. Let i be an index into result, determined by an implementation-defined algorithm based on numberFormat and result.
  1487. // 2. Let approximatelySign be an ILND String value used to signify that a number is approximate.
  1488. auto approximately_sign = Unicode::get_number_system_symbol(number_format.data_locale(), number_format.numbering_system(), Unicode::NumericSymbol::ApproximatelySign).value_or("~"sv);
  1489. // 3. Insert a new Record { [[Type]]: "approximatelySign", [[Value]]: approximatelySign } at index i in result.
  1490. PatternPartitionWithSource partition;
  1491. partition.type = "approximatelySign"sv;
  1492. partition.value = approximately_sign;
  1493. result.insert_before_matching(move(partition), [](auto const& part) {
  1494. return part.type.is_one_of("integer"sv, "decimal"sv, "plusSign"sv, "minusSign"sv, "percentSign"sv, "currency"sv);
  1495. });
  1496. // 4. Return result.
  1497. return result;
  1498. }
  1499. // 1.1.23 CollapseNumberRange ( result ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-collapsenumberrange
  1500. Vector<PatternPartitionWithSource> collapse_number_range(Vector<PatternPartitionWithSource> result)
  1501. {
  1502. // Returning result unmodified is guaranteed to be a correct implementation of CollapseNumberRange.
  1503. return result;
  1504. }
  1505. // 1.1.24 FormatNumericRange( numberFormat, x, y ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-formatnumericrange
  1506. ThrowCompletionOr<String> format_numeric_range(VM& vm, NumberFormat& number_format, MathematicalValue start, MathematicalValue end)
  1507. {
  1508. // 1. Let parts be ? PartitionNumberRangePattern(numberFormat, x, y).
  1509. auto parts = TRY(partition_number_range_pattern(vm, number_format, move(start), move(end)));
  1510. // 2. Let result be the empty String.
  1511. StringBuilder result;
  1512. // 3. For each part in parts, do
  1513. for (auto& part : parts) {
  1514. // a. Set result to the string-concatenation of result and part.[[Value]].
  1515. result.append(move(part.value));
  1516. }
  1517. // 4. Return result.
  1518. return result.build();
  1519. }
  1520. // 1.1.25 FormatNumericRangeToParts( numberFormat, x, y ), https://tc39.es/proposal-intl-numberformat-v3/out/numberformat/proposed.html#sec-formatnumericrangetoparts
  1521. ThrowCompletionOr<Array*> format_numeric_range_to_parts(VM& vm, NumberFormat& number_format, MathematicalValue start, MathematicalValue end)
  1522. {
  1523. auto& realm = *vm.current_realm();
  1524. // 1. Let parts be ? PartitionNumberRangePattern(numberFormat, x, y).
  1525. auto parts = TRY(partition_number_range_pattern(vm, number_format, move(start), move(end)));
  1526. // 2. Let result be ! ArrayCreate(0).
  1527. auto* result = MUST(Array::create(realm, 0));
  1528. // 3. Let n be 0.
  1529. size_t n = 0;
  1530. // 4. For each Record { [[Type]], [[Value]] } part in parts, do
  1531. for (auto& part : parts) {
  1532. // a. Let O be OrdinaryObjectCreate(%Object.prototype%).
  1533. auto* object = Object::create(realm, realm.intrinsics().object_prototype());
  1534. // b. Perform ! CreateDataPropertyOrThrow(O, "type", part.[[Type]]).
  1535. MUST(object->create_data_property_or_throw(vm.names.type, js_string(vm, part.type)));
  1536. // c. Perform ! CreateDataPropertyOrThrow(O, "value", part.[[Value]]).
  1537. MUST(object->create_data_property_or_throw(vm.names.value, js_string(vm, move(part.value))));
  1538. // d. Perform ! CreateDataPropertyOrThrow(O, "source", part.[[Source]]).
  1539. MUST(object->create_data_property_or_throw(vm.names.source, js_string(vm, part.source)));
  1540. // e. Perform ! CreateDataPropertyOrThrow(result, ! ToString(n), O).
  1541. MUST(result->create_data_property_or_throw(n, object));
  1542. // f. Increment n by 1.
  1543. ++n;
  1544. }
  1545. // 5. Return result.
  1546. return result;
  1547. }
  1548. }