Files
kotlin-fork/kotlin-native/backend.native/tests/interop/libiconv.kt
T
Stanislav Erokhin f624800b84 Move everything under kotlin-native folder
I was forced to manually do update the following files, because otherwise
they would be ignored according .gitignore settings. Probably they
should be deleted from repo.

Interop/.idea/compiler.xml
Interop/.idea/gradle.xml
Interop/.idea/libraries/Gradle__org_jetbrains_kotlin_kotlin_runtime_1_0_3.xml
Interop/.idea/libraries/Gradle__org_jetbrains_kotlin_kotlin_stdlib_1_0_3.xml
Interop/.idea/modules.xml
Interop/.idea/modules/Indexer/Indexer.iml
Interop/.idea/modules/Runtime/Runtime.iml
Interop/.idea/modules/StubGenerator/StubGenerator.iml
backend.native/backend.native.iml
backend.native/bc.frontend/bc.frontend.iml
backend.native/cli.bc/cli.bc.iml
backend.native/cli.bc/src/org/jetbrains/kotlin/cli/bc/K2Native.kt
backend.native/cli.bc/src/org/jetbrains/kotlin/cli/bc/K2NativeCompilerArguments.kt
backend.native/tests/link/lib/foo.kt
backend.native/tests/link/lib/foo2.kt
backend.native/tests/teamcity-test.property
2020-10-27 21:00:28 +03:00

45 lines
1.2 KiB
Kotlin

/*
* Copyright 2010-2018 JetBrains s.r.o. Use of this source code is governed by the Apache 2.0 license
* that can be found in the LICENSE file.
*/
import kotlinx.cinterop.*
import platform.iconv.*
import platform.posix.size_tVar
fun main(args: Array<String>) {
val sourceByteArray = "Hello!".encodeToByteArray()
val golden = listOf(0x48, 0x65, 0x6C, 0x6C, 0x6F, 0x21)
memScoped {
val sourceLength = alloc<size_tVar>()
val destLength = alloc<size_tVar>()
val sourceBytes = allocArrayOf(sourceByteArray)
val destBytes = allocArray<ByteVar>(golden.size)
val sourcePtr = alloc<CArrayPointerVar<ByteVar>>()
sourcePtr.value = sourceBytes
val destPtr = alloc<CArrayPointerVar<ByteVar>>()
destPtr.value = destBytes
sourceLength.value = sourceByteArray.size.convert()
destLength.value = golden.size.convert()
val conversion = iconv_open("UTF-8", "LATIN1")
iconv(conversion, sourcePtr.ptr, sourceLength.ptr, destPtr.ptr, destLength.ptr)
golden.forEachIndexed { index, it ->
println("$it ${destBytes[index]}")
it == destBytes[index].toInt()
}
iconv_close(conversion)
}
}