1 /*
2  * Copyright (c) 2023 Shenzhen Kaihong Digital Industry Development Co., Ltd.
3  * Licensed under the Apache License, Version 2.0 (the "License");
4  * you may not use this file except in compliance with the License.
5  * You may obtain a copy of the License at
6  *
7  *     http://www.apache.org/licenses/LICENSE-2.0
8  *
9  * Unless required by applicable law or agreed to in writing, software
10  * distributed under the License is distributed on an "AS IS" BASIS,
11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12  * See the License for the specific language governing permissions and
13  * limitations under the License.
14  */
15 
16 #include "builtins_segmenter.h"
17 
18 #include "ecmascript/intl/locale_helper.h"
19 #include "ecmascript/js_segments.h"
20 
21 namespace panda::ecmascript::builtins {
22 // 18.1.1 Intl.Segmenter ( [ locales [ , options ] ] )
SegmenterConstructor(EcmaRuntimeCallInfo *argv)23 JSTaggedValue BuiltinsSegmenter::SegmenterConstructor(EcmaRuntimeCallInfo *argv)
24 {
25     JSThread *thread = argv->GetThread();
26     BUILTINS_API_TRACE(thread, Segmenter, Constructor);
27     [[maybe_unused]] EcmaHandleScope scope(thread);
28     EcmaVM *ecmaVm = thread->GetEcmaVM();
29     ObjectFactory *factory = ecmaVm->GetFactory();
30 
31     // 1. If NewTarget is undefined, throw a TypeError exception.
32     JSHandle<JSTaggedValue> newTarget = GetNewTarget(argv);
33     if (newTarget->IsUndefined()) {
34         THROW_TYPE_ERROR_AND_RETURN(thread, "newTarget is undefined", JSTaggedValue::Exception());
35     }
36 
37     // 2. Let internalSlotsList be « [[InitializedSegmenter]], [[Locale]], [[SegmenterGranularity]] ».
38     // 3. Let segmenter be ? OrdinaryCreateFromConstructor(NewTarget, "%Segmenter.prototype%", internalSlotsList).
39     JSHandle<JSTaggedValue> constructor = GetConstructor(argv);
40     JSHandle<JSObject> newObject = factory->NewJSObjectByConstructor(JSHandle<JSFunction>(constructor), newTarget);
41     RETURN_EXCEPTION_IF_ABRUPT_COMPLETION(thread);
42     JSHandle<JSSegmenter> segmenter = JSHandle<JSSegmenter>::Cast(newObject);
43 
44     // 3. Perform ? InitializeSegmenter(segmenter, locales, options).
45     JSHandle<JSTaggedValue> locales = GetCallArg(argv, 0);
46     JSHandle<JSTaggedValue> options = GetCallArg(argv, 1);
47     JSSegmenter::InitializeSegmenter(thread, segmenter, locales, options);
48     RETURN_EXCEPTION_IF_ABRUPT_COMPLETION(thread);
49     return segmenter.GetTaggedValue();
50 }
51 
52 // 18.2.2 Intl.Segmenter.supportedLocalesOf ( locales [ , options ] )
SupportedLocalesOf(EcmaRuntimeCallInfo *argv)53 JSTaggedValue BuiltinsSegmenter::SupportedLocalesOf(EcmaRuntimeCallInfo *argv)
54 {
55     JSThread *thread = argv->GetThread();
56     BUILTINS_API_TRACE(thread, Segmenter, SupportedLocalesOf);
57     [[maybe_unused]] EcmaHandleScope scope(thread);
58 
59     // 1. Let availableLocales be %Segmenter%.[[AvailableLocales]].
60     JSHandle<TaggedArray> availableLocales = JSSegmenter::GetAvailableLocales(thread);
61 
62     // 2. Let requestedLocales be ? CanonicalizeLocaleList(locales).
63     JSHandle<JSTaggedValue> locales = GetCallArg(argv, 0);
64     JSHandle<TaggedArray> requestedLocales = intl::LocaleHelper::CanonicalizeLocaleList(thread, locales);
65     RETURN_EXCEPTION_IF_ABRUPT_COMPLETION(thread);
66 
67     // 3. Return ? SupportedLocales(availableLocales, requestedLocales, options).
68     JSHandle<JSTaggedValue> options = GetCallArg(argv, 1);
69     JSHandle<JSArray> result = JSLocale::SupportedLocales(thread, availableLocales, requestedLocales, options);
70     RETURN_EXCEPTION_IF_ABRUPT_COMPLETION(thread);
71     return result.GetTaggedValue();
72 }
73 
74 // 18.3.3 Intl.Segmenter.prototype.segment ( string )
Segment(EcmaRuntimeCallInfo *argv)75 JSTaggedValue BuiltinsSegmenter::Segment(EcmaRuntimeCallInfo *argv)
76 {
77     JSThread *thread = argv->GetThread();
78     BUILTINS_API_TRACE(thread, Segmenter, Segment);
79     [[maybe_unused]] EcmaHandleScope scope(thread);
80 
81     // 1. Let segmenter be the this value.
82     JSHandle<JSTaggedValue> thisValue = GetThis(argv);
83 
84     // 2. Perform ? RequireInternalSlot(segmenter, [[InitializedSegmenter]]).
85     if (!thisValue->IsJSSegmenter()) {
86         THROW_TYPE_ERROR_AND_RETURN(thread, "this is not segmenter object", JSTaggedValue::Exception());
87     }
88 
89     // 3. Let string be ? ToString(string).
90     JSHandle<JSTaggedValue> stringValue = GetCallArg(argv, 0);
91     JSHandle<EcmaString> string = JSTaggedValue::ToString(thread, stringValue);
92     RETURN_EXCEPTION_IF_ABRUPT_COMPLETION(thread);
93     // 4. Return ! CreateSegmentsObject(segmenter, string).
94     JSHandle<JSSegments> segments =
95         JSSegments::CreateSegmentsObject(thread, JSHandle<JSSegmenter>::Cast(thisValue), string);
96     return segments.GetTaggedValue();
97 }
98 
99 // 18.3.4 Intl.Segmenter.prototype.resolvedOptions ( )
ResolvedOptions(EcmaRuntimeCallInfo *argv)100 JSTaggedValue BuiltinsSegmenter::ResolvedOptions(EcmaRuntimeCallInfo *argv)
101 {
102     JSThread *thread = argv->GetThread();
103     BUILTINS_API_TRACE(thread, Segmenter, ResolvedOptions);
104     [[maybe_unused]] EcmaHandleScope scope(thread);
105 
106     // 1. Let segmenter be the this value.
107     JSHandle<JSTaggedValue> thisValue = GetThis(argv);
108 
109     // 2. Perform ? RequireInternalSlot(segmenter, [[InitializedSegmenter]]).
110     if (!thisValue->IsJSSegmenter()) {
111         THROW_TYPE_ERROR_AND_RETURN(thread, "this is not segmenter object", JSTaggedValue::Exception());
112     }
113 
114     // 3. Let options be OrdinaryObjectCreate(%Object.prototype%).
115     auto ecmaVm = thread->GetEcmaVM();
116     JSHandle<GlobalEnv> env = ecmaVm->GetGlobalEnv();
117     ObjectFactory *factory = ecmaVm->GetFactory();
118     JSHandle<JSFunction> ctor(env->GetObjectFunction());
119     JSHandle<JSObject> options(factory->NewJSObjectByConstructor(ctor));
120 
121     // 4. perform resolvedOptions
122     JSHandle<JSSegmenter> segmenter = JSHandle<JSSegmenter>::Cast(thisValue);
123     JSSegmenter::ResolvedOptions(thread, segmenter, options);
124     RETURN_EXCEPTION_IF_ABRUPT_COMPLETION(thread);
125     // 5. Return options.
126     return options.GetTaggedValue();
127 }
128 }  // namespace panda::ecmascript::builtins