Vsevolod Tolstopyatov
f4e8ae5191
* @ExperimentalForeignApi for all declarations that operate on
unmanaged memory (i.e. pointers and references)
* @BetaInteropApi for the rest of the interoperability declarations,
namely Swift/CInterop-specific interfaces and convenience-functions
### Implementation details
* Some typealiases are not marked explicitly because it crashes the compiler,
yet their experimentality is properly propagated
* License header is adjusted where it previously had been existing
* Deprecated with ERROR interop declarations that are deprecated for more than
two years are removed
* WASM target interop declarations are deprecated
* Deliberately make Boolean.toByte and Byte.toBoolean foreign-experimental to scare
people away
^KT-57728 fixed
Merge-request: KT-MR-9788
Merged-by: Vsevolod Tolstopyatov <qwwdfsad@gmail.com>
118 lines
3.1 KiB
Kotlin
118 lines
3.1 KiB
Kotlin
/*
|
|
* Copyright 2010-2023 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.
|
|
*/
|
|
@file:OptIn(kotlinx.cinterop.ExperimentalForeignApi::class)
|
|
|
|
import kotlinx.cinterop.*
|
|
import platform.GLUT.*
|
|
import platform.OpenGL.*
|
|
import platform.OpenGLCommon.*
|
|
|
|
// Ported from http://openglsamples.sourceforge.net/projects/index.php/blog/index/
|
|
|
|
private var rotation: GLfloat = 0.0f
|
|
private val rotationSpeed: GLfloat = 0.2f
|
|
|
|
private val windowWidth = 640
|
|
private val windowHeight = 480
|
|
|
|
fun display() {
|
|
// Clear Screen and Depth Buffer
|
|
glClear((GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT).convert())
|
|
glLoadIdentity()
|
|
|
|
// Define a viewing transformation
|
|
gluLookAt(4.0, 2.0, 0.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0)
|
|
|
|
// Push and pop the current matrix stack.
|
|
// This causes that translations and rotations on this matrix wont influence others.
|
|
|
|
glPushMatrix()
|
|
glColor3f(1.0f, 0.0f, 0.0f)
|
|
glTranslatef(0.0f, 0.0f, 0.0f)
|
|
glRotatef(rotation, 0.0f, 1.0f, 0.0f)
|
|
glRotatef(90.0f, 0.0f, 1.0f, 0.0f)
|
|
|
|
// Draw the teapot
|
|
glutSolidTeapot(1.0)
|
|
glPopMatrix()
|
|
|
|
|
|
rotation += rotationSpeed
|
|
glutSwapBuffers()
|
|
}
|
|
|
|
|
|
fun initialize() {
|
|
// select projection matrix
|
|
glMatrixMode(GL_PROJECTION)
|
|
|
|
// set the viewport
|
|
glViewport(0, 0, windowWidth, windowHeight)
|
|
|
|
// set matrix mode
|
|
glMatrixMode(GL_PROJECTION)
|
|
|
|
// reset projection matrix
|
|
glLoadIdentity()
|
|
val aspect = windowWidth.toDouble() / windowHeight
|
|
|
|
// set up a perspective projection matrix
|
|
gluPerspective(45.0, aspect, 1.0, 500.0)
|
|
|
|
// specify which matrix is the current matrix
|
|
glMatrixMode(GL_MODELVIEW)
|
|
glShadeModel(GL_SMOOTH)
|
|
|
|
// specify the clear value for the depth buffer
|
|
glClearDepth(1.0)
|
|
glEnable(GL_DEPTH_TEST)
|
|
glDepthFunc(GL_LEQUAL)
|
|
|
|
// specify implementation-specific hints
|
|
glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_NICEST)
|
|
|
|
glLightModelfv(GL_LIGHT_MODEL_AMBIENT, cValuesOf(0.1f, 0.1f, 0.1f, 1.0f))
|
|
glLightfv(GL_LIGHT0, GL_DIFFUSE, cValuesOf(0.6f, 0.6f, 0.6f, 1.0f))
|
|
glLightfv(GL_LIGHT0, GL_SPECULAR, cValuesOf(0.7f, 0.7f, 0.3f, 1.0f))
|
|
|
|
glEnable(GL_LIGHT0)
|
|
glEnable(GL_COLOR_MATERIAL)
|
|
glShadeModel(GL_SMOOTH)
|
|
glLightModeli(GL_LIGHT_MODEL_TWO_SIDE, GL_FALSE)
|
|
glDepthFunc(GL_LEQUAL)
|
|
glEnable(GL_DEPTH_TEST)
|
|
glEnable(GL_LIGHTING)
|
|
glEnable(GL_LIGHT0)
|
|
glClearColor(0.0f, 0.0f, 0.0f, 1.0f)
|
|
}
|
|
|
|
fun main(args: Array<String>) {
|
|
// initialize and run program
|
|
memScoped {
|
|
val argc = alloc<IntVar>().apply { value = 0 }
|
|
glutInit(argc.ptr, null) // TODO: pass real args
|
|
}
|
|
|
|
// Display Mode
|
|
glutInitDisplayMode((GLUT_RGB or GLUT_DOUBLE or GLUT_DEPTH).convert())
|
|
|
|
// Set window size
|
|
glutInitWindowSize(windowWidth, windowHeight)
|
|
|
|
// create Window
|
|
glutCreateWindow("The GLUT Teapot")
|
|
|
|
// register Display Function
|
|
glutDisplayFunc(staticCFunction(::display))
|
|
|
|
// register Idle Function
|
|
glutIdleFunc(staticCFunction(::display))
|
|
|
|
initialize()
|
|
|
|
// run GLUT mainloop
|
|
glutMainLoop()
|
|
}
|