harfang3d / harfang3d Goto Github PK

-- Draw scene to texture

hg = require("harfang")

hg.InputInit()
hg.WindowSystemInit()

res_x, res_y = 1024, 1024
win = hg.RenderInit('Draw Scene to Texture', res_x, res_y, hg.RF_VSync | hg.RF_MSAA8X)

hg.AddAssetsFolder("resources_compiled")

-- create pipeline
pipeline = hg.CreateForwardPipeline()
res = hg.PipelineResources()

-- load the scene to draw to a texture
scene = hg.Scene()
hg.LoadSceneFromAssets("materials/materials.scn", scene, res, hg.GetForwardPipelineInfo())

-- create a 512x512 frame buffer to draw the scene to
tex_size = 512

picture = hg.Picture(tex_size, tex_size, hg.PF_RGBA32)

tex_color = hg.CreateTexture(tex_size, tex_size, "color_texture",hg.TF_ReadBack | hg.TF_RenderTarget | hg.TF_SamplerMinAnisotropic, hg.TF_RGBA8)
tex_color_ref = res:AddTexture("tex_rb", tex_color)
tex_depth =  hg.CreateTexture(tex_size, tex_size, "depth_texture", hg.TF_RenderTarget, hg.TF_D24)
frame_buffer = hg.CreateFrameBuffer(tex_color, tex_depth, "framebuffer")

-- create the cube model
vtx_layout = hg.VertexLayoutPosFloatNormUInt8TexCoord0UInt8()

cube_mdl = hg.CreateCubeModel(vtx_layout, 1, 1, 1)
cube_ref = res:AddModel('cube', cube_mdl)

-- prepare the cube shader program
cube_prg = hg.LoadProgramFromAssets('shaders/texture')

-- main loop
angle = 0
frame_count = 0
flag_capture_texture = false

while not hg.ReadKeyboard():Key(hg.K_Escape) and hg.IsWindowOpen(win) do
	dt = hg.TickClock()
	angle = angle + hg.time_to_sec_f(dt)

	-- update scene and render to the frame buffer
	scene:GetCurrentCamera():GetTransform():SetPos(hg.Vec3(0, 0, -(math.sin(angle) * 3 + 4)))  -- animate the scene current camera on Z

	scene:Update(dt)

	view_id = 0
	view_id, pass_ids = hg.SubmitSceneToPipeline(view_id, scene, hg.IntRect(0, 0, 512, 512), true, pipeline, res, frame_buffer.handle)

    if not flag_capture_texture and hg.ReadKeyboard():Key(hg.K_Space) then
		flag_capture_texture = true
		frame_count_capture = hg.CaptureTexture(res, tex_color_ref, picture)
    end

	-- draw a rotating cube in immediate mode using the texture the scene was rendered to
	hg.SetViewPerspective(view_id, 0, 0, res_x, res_y, hg.TranslationMat4(hg.Vec3(0, 0, -1.8)))

	val_uniforms = {hg.MakeUniformSetValue('color', hg.Vec4(1, 1, 1, 1))}  -- note: these could be moved out of the main loop but are kept here for readability
	tex_uniforms = {hg.MakeUniformSetTexture('s_tex', tex_color, 0)}

	hg.DrawModel(view_id, cube_mdl, cube_prg, val_uniforms, tex_uniforms, hg.TransformationMat4(hg.Vec3(0, 0, 0), hg.Vec3(angle * 0.1, angle * 0.05, angle * 0.2)))

	--
	frame_count = hg.Frame()

    -- Save captured picture:
    if flag_capture_texture and frame_count_capture <= frame_count then
	    hg.SavePNG(picture, "captured_picture.png")
		flag_capture_texture = false
    end

	hg.UpdateWindow(win)
end

hg.RenderShutdown()
hg.WindowSystemShutdown()

gdb ./studio 
GNU gdb (Ubuntu 12.0.90-0ubuntu1) 12.0.90
Copyright (C) 2022 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.
Type "show copying" and "show warranty" for details.
This GDB was configured as "x86_64-linux-gnu".
Type "show configuration" for configuration details.
For bug reporting instructions, please see:
<https://www.gnu.org/software/gdb/bugs/>.
Find the GDB manual and other documentation resources online at:
    <http://www.gnu.org/software/gdb/documentation/>.

For help, type "help".
Type "apropos word" to search for commands related to "word"...
Reading symbols from ./studio...
(No debugging symbols found in ./studio)
(gdb) set follow-fork-mode child
(gdb) break exit
Breakpoint 1 at 0x5c4d0 (2 locations)
(gdb) break abort
Breakpoint 2 at 0x5c770
(gdb) break _exit
Breakpoint 3 at 0x5d320
(gdb) start
Temporary breakpoint 4 at 0xaea20
Starting program: /home/luke/harfang/studio/studio-0.8.4-ubuntu64/studio 
[Thread debugging using libthread_db enabled]
Using host libthread_db library "/lib/x86_64-linux-gnu/libthread_db.so.1".

Temporary breakpoint 4, 0x0000555555602a20 in main ()
(gdb) continue
Continuing.
[Attaching after Thread 0x7ffff57fcac0 (LWP 332375) fork to child process 332381]
[New inferior 2 (process 332381)]
[Detaching after fork from parent process 332375]
[Inferior 1 (process 332375) detached]
[Thread debugging using libthread_db enabled]
Using host libthread_db library "/lib/x86_64-linux-gnu/libthread_db.so.1".
process 332381 is executing new program: /usr/bin/dash
Error in re-setting breakpoint 1: Function "exit" not defined.
[Thread debugging using libthread_db enabled]
Using host libthread_db library "/lib/x86_64-linux-gnu/libthread_db.so.1".
[Attaching after Thread 0x7ffff7d6b740 (LWP 332381) vfork to child process 332384]
[New inferior 3 (process 332384)]
[Thread debugging using libthread_db enabled]
Using host libthread_db library "/lib/x86_64-linux-gnu/libthread_db.so.1".
[Switching to Thread 0x7ffff7d6b740 (LWP 332384)]

Thread 3.1 "sh" hit Breakpoint 3, __GI__exit (status=126) at ../sysdeps/unix/sysv/linux/_exit.c:27
27      ../sysdeps/unix/sysv/linux/_exit.c: No such file or directory.
(gdb) bt
#0  __GI__exit (status=126) at ../sysdeps/unix/sysv/linux/_exit.c:27
#1  0x000055555555956f in ?? ()
#2  0x000055555556b740 in ?? ()
#3  0x000055555555cc25 in ?? ()
#4  0x000055555555d8de in ?? ()
#5  0x00005555555673ac in ?? ()
#6  0x0000555555560c00 in ?? ()
#7  0x0000555555560c00 in ?? ()
#8  0x00005555555646c2 in ?? ()
#9  0x0000555555558d36 in ?? ()
#10 0x00007ffff7d97d90 in __libc_start_call_main (main=main@entry=0x555555558ae0, argc=argc@entry=3, argv=argv@entry=0x7fffffffdcc8) at ../sysdeps/nptl/libc_start_call_main.h:58
#11 0x00007ffff7d97e40 in __libc_start_main_impl (main=0x555555558ae0, argc=3, argv=0x7fffffffdcc8, init=<optimised out>, fini=<optimised out>, rtld_fini=<optimised out>, stack_end=0x7fffffffdcb8) at ../csu/libc-start.c:392
#12 0x0000555555558f15 in ?? ()
(gdb) list
22      in ../sysdeps/unix/sysv/linux/_exit.c
(gdb) continue
Continuing.
[Detaching vfork parent process 332381 after child exit]
[Inferior 2 (process 332381) detached]
[Inferior 3 (process 332384) exited with code 0176]
(gdb) 
quit