1 /**
2 * Copyright (c) 2021-2022 Huawei Device 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 "intrinsics.h"
17 #include "libpandabase/utils/logger.h"
18 #include "runtime/include/class.h"
19 #include "runtime/include/exceptions.h"
20 #include "plugins/ets/runtime/types/ets_primitives.h"
21 #include "plugins/ets/runtime/types/ets_string.h"
22 #include "plugins/ets/runtime/types/ets_string_builder.h"
23 #include "plugins/ets/runtime/types/ets_array.h"
24 #include "libpandabase/utils/utf.h"
25 #include "plugins/ets/runtime/ets_handle.h"
26 #include "plugins/ets/runtime/ets_handle_scope.h"
27 #include "runtime/arch/memory_helpers.h"
28 #include <unistd.h>
29
30 namespace panda::ets::intrinsics {
31
StdCoreStringBuilderConcatStrings(EtsString * lhs,EtsString * rhs)32 EtsString *StdCoreStringBuilderConcatStrings(EtsString *lhs, EtsString *rhs)
33 {
34 ASSERT(lhs != nullptr && rhs != nullptr);
35
36 return EtsString::Concat(lhs, rhs);
37 }
38
StdCoreToStringBoolean(EtsBoolean i)39 EtsString *StdCoreToStringBoolean(EtsBoolean i)
40 {
41 std::string s = i == 1 ? "true" : "false";
42 return EtsString::CreateFromMUtf8(s.c_str());
43 }
44
StdCoreToStringByte(EtsByte i)45 EtsString *StdCoreToStringByte(EtsByte i)
46 {
47 std::string s = std::to_string(i);
48 return EtsString::CreateFromMUtf8(s.c_str());
49 }
50
StdCoreToStringChar(EtsChar i)51 EtsString *StdCoreToStringChar(EtsChar i)
52 {
53 return EtsString::CreateFromUtf16(&i, 1);
54 }
55
StdCoreToStringShort(EtsShort i)56 EtsString *StdCoreToStringShort(EtsShort i)
57 {
58 std::string s = std::to_string(i);
59 return EtsString::CreateFromMUtf8(s.c_str());
60 }
61
StdCoreToStringInt(EtsInt i)62 EtsString *StdCoreToStringInt(EtsInt i)
63 {
64 std::string s = std::to_string(i);
65 return EtsString::CreateFromMUtf8(s.c_str());
66 }
67
StdCoreToStringLong(EtsLong i)68 EtsString *StdCoreToStringLong(EtsLong i)
69 {
70 std::string s = std::to_string(i);
71 return EtsString::CreateFromMUtf8(s.c_str());
72 }
73
StdCoreStringBuilderAppendString(ObjectHeader * sb,EtsString * str)74 ObjectHeader *StdCoreStringBuilderAppendString(ObjectHeader *sb, EtsString *str)
75 {
76 return StringBuilderAppendString(sb, str);
77 }
78
StdCoreStringBuilderAppendBool(ObjectHeader * sb,EtsBoolean v)79 ObjectHeader *StdCoreStringBuilderAppendBool(ObjectHeader *sb, EtsBoolean v)
80 {
81 return StringBuilderAppendBool(sb, v);
82 }
83
StdCoreStringBuilderAppendChar(ObjectHeader * sb,EtsChar v)84 ObjectHeader *StdCoreStringBuilderAppendChar(ObjectHeader *sb, EtsChar v)
85 {
86 return StringBuilderAppendChar(sb, v);
87 }
88
StdCoreStringBuilderAppendLong(ObjectHeader * sb,EtsLong v)89 ObjectHeader *StdCoreStringBuilderAppendLong(ObjectHeader *sb, EtsLong v)
90 {
91 return StringBuilderAppendLong(sb, v);
92 }
93
StdCoreStringBuilderAppendByte(ObjectHeader * sb,EtsByte v)94 ObjectHeader *StdCoreStringBuilderAppendByte(ObjectHeader *sb, EtsByte v)
95 {
96 return StringBuilderAppendLong(sb, static_cast<EtsLong>(v));
97 }
98
StdCoreStringBuilderAppendShort(ObjectHeader * sb,EtsShort v)99 ObjectHeader *StdCoreStringBuilderAppendShort(ObjectHeader *sb, EtsShort v)
100 {
101 return StringBuilderAppendLong(sb, static_cast<EtsLong>(v));
102 }
103
StdCoreStringBuilderAppendInt(ObjectHeader * sb,EtsInt v)104 ObjectHeader *StdCoreStringBuilderAppendInt(ObjectHeader *sb, EtsInt v)
105 {
106 return StringBuilderAppendLong(sb, static_cast<EtsLong>(v));
107 }
108
StdCoreStringBuilderToString(ObjectHeader * sb)109 EtsString *StdCoreStringBuilderToString(ObjectHeader *sb)
110 {
111 return StringBuilderToString(sb);
112 }
113
114 } // namespace panda::ets::intrinsics
115