render: move screen resize handler from io-driver

[d2df-sdl.git] / src / game / opengl / r_render.pas

diff --git a/src/game/opengl/r_render.pas b/src/game/opengl/r_render.pas
index 9f8b754e4e494424548e5685c57fc6df9b147598..668fb901f4e850dcd843a09ce3342daaecdccda2 100644 (file)
--- a/src/game/opengl/r_render.pas
+++ b/src/game/opengl/r_render.pas
@@ -19,10 +19,11 @@ interface
 
   procedure r_Render_Initialize;
   procedure r_Render_Finalize;
+  procedure r_Render_Resize (w, h: Integer);
 
 implementation
 
-  uses SysUtils, Classes, g_system, g_game, g_options, r_window, r_graphics, r_console, r_playermodel;
+  uses SysUtils, Classes, e_log, g_system, g_game, g_options, r_window, r_graphics, r_console, r_playermodel;
 
   procedure r_Render_Initialize;
   begin
@@ -40,4 +41,29 @@ implementation
     e_ReleaseEngine
   end;
 
+  procedure r_Render_Resize (w, h: Integer);
+  begin
+    gWinSizeX := w;
+    gWinSizeY := h;
+    gRC_Width := w;
+    gRC_Height := h;
+    if glRenderToFBO then
+    begin
+      // store real window size in gWinSize, downscale resolution now
+      w := round(w / r_pixel_scale);
+      h := round(h / r_pixel_scale);
+      if not e_ResizeFramebuffer(w, h) then
+      begin
+        e_LogWriteln('GL: could not create framebuffer, falling back to --no-fbo');
+        glRenderToFBO := False;
+        w := gWinSizeX;
+        h := gWinSizeY;
+      end;
+    end;
+    gScreenWidth := w;
+    gScreenHeight := h;
+    e_ResizeWindow(w, h);
+    e_InitGL
+  end;
+
 end.