nuclear@15: #include <stdio.h>
nuclear@15: #include <stdlib.h>
nuclear@15: #include <string.h>
nuclear@15: #include <limits.h>
nuclear@18: #include <assert.h>
nuclear@15: #include "opengl.h"
nuclear@15: #include "renderer.h"
nuclear@23: #include "level.h"
nuclear@15: #include "sdr.h"
nuclear@15: #include "datapath.h"
nuclear@15: 
nuclear@18: 
nuclear@17: static bool create_fbo(int xsz, int ysz);
nuclear@18: static unsigned int load_sdr(const char *vfname, const char *pfname);
nuclear@17: static int round_pow2(int x);
nuclear@15: 
nuclear@17: 
nuclear@19: #define MRT_COUNT	4
nuclear@17: static unsigned int mrt_tex[MRT_COUNT];
nuclear@17: 
nuclear@17: static unsigned int mrt_prog;
nuclear@18: static unsigned int deferred_omni, deferred_debug;
nuclear@17: 
nuclear@17: static unsigned int fbo, rbuf_depth;
nuclear@17: static const char *fbstname[] = {
nuclear@17: 	"GL_FRAMEBUFFER_COMPLETE",
nuclear@17: 	"GL_FRAMEBUFFER_INCOMPLETE_ATTACHMENT",
nuclear@17: 	"GL_FRAMEBUFFER_INCOMPLETE_MISSING_ATTACHMENT",
nuclear@17: 	"no such fbo error",
nuclear@17: 	"GL_FRAMEBUFFER_INCOMPLETE_DIMENSIONS",
nuclear@17: 	"GL_FRAMEBUFFER_INCOMPLETE_FORMATS",
nuclear@17: 	"GL_FRAMEBUFFER_INCOMPLETE_DRAW_BUFFER",
nuclear@17: 	"GL_FRAMEBUFFER_INCOMPLETE_READ_BUFFER",
nuclear@17: 	"GL_FRAMEBUFFER_UNSUPPORTED"
nuclear@15: };
nuclear@15: 
nuclear@17: static int fb_xsz, fb_ysz, tex_xsz, tex_ysz;
nuclear@15: 
nuclear@21: 
nuclear@21: 
nuclear@17: bool init_renderer(int xsz, int ysz)
nuclear@17: {
nuclear@21: 	if(!GLEW_ARB_draw_buffers) {
nuclear@21: 		fprintf(stderr, "OpenGL implementation doesn't support multiple render targets\n");
nuclear@21: 		return false;
nuclear@21: 	}
nuclear@21: 
nuclear@19: 	int max_draw_buf;
nuclear@19: 	glGetIntegerv(GL_MAX_DRAW_BUFFERS_ARB, &max_draw_buf);
nuclear@19: 	printf("max draw buffers: %d\n", max_draw_buf);
nuclear@19: 	if(max_draw_buf < MRT_COUNT) {
nuclear@19: 		fprintf(stderr, "OpenGL implementation doesn't support enough draw buffers\n");
nuclear@19: 		return false;
nuclear@19: 	}
nuclear@19: 
nuclear@17: 	if(!create_fbo(xsz, ysz)) {
nuclear@17: 		return false;
nuclear@17: 	}
nuclear@19: 	CHECKGLERR;
nuclear@18: 
nuclear@18: 	if(!(mrt_prog = load_sdr("mrt.v.glsl", "mrt.p.glsl"))) {
nuclear@18: 		return false;
nuclear@18: 	}
nuclear@23: 	set_uniform_int(mrt_prog, "tex_dif", 0);
nuclear@23: 	set_uniform_int(mrt_prog, "tex_norm", 1);
nuclear@23: 
nuclear@18: 	if(!(deferred_debug = load_sdr("deferred.v.glsl", "deferred.p.glsl"))) {
nuclear@17: 		return false;
nuclear@17: 	}
nuclear@23: 	for(int i=0; i<MRT_COUNT; i++) {
nuclear@23: 		char uname[32];
nuclear@23: 		sprintf(uname, "mrt%d", i);
nuclear@23: 		set_uniform_int(deferred_debug, uname, i);
nuclear@23: 	}
nuclear@23: 
nuclear@30: 	if(!(deferred_omni = load_sdr("deferred_omni.v.glsl", "deferred_omni.p.glsl"))) {
nuclear@23: 		return false;
nuclear@23: 	}
nuclear@23: 	for(int i=0; i<MRT_COUNT; i++) {
nuclear@23: 		char uname[32];
nuclear@23: 		sprintf(uname, "mrt%d", i);
nuclear@23: 		set_uniform_int(deferred_omni, uname, i);
nuclear@23: 	}
nuclear@17: 	return true;
nuclear@17: }
nuclear@17: 
nuclear@17: void destroy_renderer()
nuclear@17: {
nuclear@17: 	free_program(mrt_prog);
nuclear@17: 	free_program(deferred_omni);
nuclear@17: 
nuclear@17: 	glDeleteTextures(MRT_COUNT, mrt_tex);
nuclear@17: 	glDeleteFramebuffersEXT(1, &fbo);
nuclear@17: }
nuclear@17: 
nuclear@23: void resize_renderer(int xsz, int ysz)
nuclear@17: {
nuclear@23: 	fb_xsz = xsz;
nuclear@23: 	fb_ysz = ysz;
nuclear@18: 
nuclear@23: 	// if we need a bigger rendertarget resize all colorbuffer textures and the depth buffer
nuclear@23: 	if(xsz > tex_xsz || ysz > tex_ysz) {
nuclear@23: 		tex_xsz = round_pow2(xsz);
nuclear@23: 		tex_ysz = round_pow2(ysz);
nuclear@23: 
nuclear@23: 		for(int i=0; i<MRT_COUNT; i++) {
nuclear@23: 			glBindTexture(GL_TEXTURE_2D, mrt_tex[i]);
nuclear@23: 			glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, tex_xsz, tex_ysz, 0, GL_RGBA,
nuclear@23: 					GL_UNSIGNED_BYTE, 0);
nuclear@23: 		}
nuclear@23: 
nuclear@23: 		glBindRenderbufferEXT(GL_RENDERBUFFER, rbuf_depth);
nuclear@23: 		glRenderbufferStorageEXT(GL_RENDERBUFFER, GL_DEPTH_COMPONENT, tex_xsz, tex_ysz);
nuclear@23: 	}
nuclear@23: 
nuclear@23: 
nuclear@23: 	// update the texture coordinate scaling factors
nuclear@23: 	float tex_scale_x = (float)fb_xsz / tex_xsz;
nuclear@23: 	float tex_scale_y = (float)fb_ysz / tex_ysz;
nuclear@23: 
nuclear@23: 	set_uniform_float2(deferred_omni, "tex_scale", tex_scale_x, tex_scale_y);
nuclear@30: 	set_uniform_float2(deferred_omni, "fb_size", fb_xsz, fb_ysz);
nuclear@30: 
nuclear@23: 	set_uniform_float2(deferred_debug, "tex_scale", tex_scale_x, tex_scale_y);
nuclear@23: }
nuclear@23: 
nuclear@23: void render_deferred(const Level *level)
nuclear@23: {
nuclear@18: 	// render into the MRT buffers
nuclear@23: 	glUseProgram(mrt_prog);
nuclear@18: 	glBindFramebufferEXT(GL_FRAMEBUFFER, fbo);
nuclear@19: 
nuclear@23: 	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
nuclear@23: 	level->draw();
nuclear@20: 
nuclear@18: 	glBindFramebufferEXT(GL_FRAMEBUFFER, 0);
nuclear@18: 
nuclear@18: 
nuclear@18: 	// post-process lighting
nuclear@18: 	glPushAttrib(GL_ENABLE_BIT);
nuclear@18: 
nuclear@30: 	glEnable(GL_BLEND);
nuclear@30: 	glBlendFunc(GL_ONE, GL_ONE);
nuclear@30: 
nuclear@18: 	glDisable(GL_LIGHTING);
nuclear@30: 	glDisable(GL_CULL_FACE);
nuclear@30: 	glDisable(GL_DEPTH_TEST);
nuclear@18: 
nuclear@23: 	glUseProgram(deferred_omni);
nuclear@19: 	for(int i=0; i<MRT_COUNT; i++) {
nuclear@19: 		glActiveTexture(GL_TEXTURE0 + i);
nuclear@19: 		glBindTexture(GL_TEXTURE_2D, mrt_tex[i]);
nuclear@19: 		glEnable(GL_TEXTURE_2D);
nuclear@18: 	}
nuclear@18: 
nuclear@23: 	glDepthMask(0);
nuclear@23: 	level->draw_lights();
nuclear@23: 	glDepthMask(1);
nuclear@18: 
nuclear@19: 	for(int i=0; i<MRT_COUNT; i++) {
nuclear@19: 		glActiveTexture(GL_TEXTURE0 + MRT_COUNT - i - 1);
nuclear@19: 		glDisable(GL_TEXTURE_2D);
nuclear@19: 	}
nuclear@19: 
nuclear@18: 	glUseProgram(0);
nuclear@18: 	glPopAttrib();
nuclear@17: }
nuclear@17: 
nuclear@17: static bool create_fbo(int xsz, int ysz)
nuclear@17: {
nuclear@17: 	unsigned int clamp = GL_ARB_texture_border_clamp ? GL_CLAMP_TO_EDGE : GL_CLAMP;
nuclear@17: 
nuclear@17: 	tex_xsz = round_pow2(xsz);
nuclear@17: 	tex_ysz = round_pow2(ysz);
nuclear@17: 	fb_xsz = xsz;
nuclear@17: 	fb_ysz = ysz;
nuclear@17: 
nuclear@17: 	if(!glGenFramebuffersEXT) {
nuclear@17: 		fprintf(stderr, "FBO support missing\n");
nuclear@17: 		return false;
nuclear@17: 	}
nuclear@17: 	glGenFramebuffersEXT(1, &fbo);
nuclear@18: 	glBindFramebufferEXT(GL_FRAMEBUFFER, fbo);
nuclear@17: 
nuclear@17: 	glGenTextures(MRT_COUNT, mrt_tex);
nuclear@17: 	for(int i=0; i<MRT_COUNT; i++) {
nuclear@17: 		glBindTexture(GL_TEXTURE_2D, mrt_tex[i]);
nuclear@17: 		glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, clamp);
nuclear@17: 		glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, clamp);
nuclear@17: 		glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
nuclear@17: 		glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
nuclear@17: 		glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, tex_xsz, tex_ysz, 0, GL_RGBA, GL_UNSIGNED_BYTE, 0);
nuclear@17: 
nuclear@17: 		// attach to fbo
nuclear@20: 		glFramebufferTexture2DEXT(GL_FRAMEBUFFER, GL_COLOR_ATTACHMENT0 + i,
nuclear@20: 				GL_TEXTURE_2D, mrt_tex[i], 0);
nuclear@18: 		CHECKGLERR;
nuclear@17: 	}
nuclear@17: 
nuclear@20: 	static GLenum draw_bufs[] = {
nuclear@20: 		GL_COLOR_ATTACHMENT0_EXT, GL_COLOR_ATTACHMENT1_EXT,
nuclear@20: 		GL_COLOR_ATTACHMENT2_EXT, GL_COLOR_ATTACHMENT3_EXT,
nuclear@20: 		GL_COLOR_ATTACHMENT4_EXT, GL_COLOR_ATTACHMENT5_EXT,
nuclear@20: 		GL_COLOR_ATTACHMENT6_EXT, GL_COLOR_ATTACHMENT7_EXT
nuclear@20: 	};
nuclear@20: 	glDrawBuffersARB(MRT_COUNT, draw_bufs);
nuclear@20: 
nuclear@18: 	glGenRenderbuffersEXT(1, &rbuf_depth);
nuclear@18: 	glBindRenderbufferEXT(GL_RENDERBUFFER, rbuf_depth);
nuclear@18: 	glRenderbufferStorageEXT(GL_RENDERBUFFER, GL_DEPTH_COMPONENT, tex_xsz, tex_ysz);
nuclear@18: 	glFramebufferRenderbufferEXT(GL_FRAMEBUFFER, GL_DEPTH_ATTACHMENT, GL_RENDERBUFFER, rbuf_depth);
nuclear@18: 
nuclear@17: 	int fbst = glCheckFramebufferStatusEXT(GL_FRAMEBUFFER);
nuclear@17: 	if(fbst != GL_FRAMEBUFFER_COMPLETE) {
nuclear@17: 		fprintf(stderr, "incomplete fbo: %u (%s)\n", fbo, fbstname[fbst - GL_FRAMEBUFFER_COMPLETE]);
nuclear@17: 		return false;
nuclear@17: 	}
nuclear@18: 	CHECKGLERR;
nuclear@18: 
nuclear@18: 	glBindFramebufferEXT(GL_FRAMEBUFFER, 0);
nuclear@17: 	return true;
nuclear@17: }
nuclear@17: 
nuclear@18: static unsigned int load_sdr(const char *vfname, const char *pfname)
nuclear@15: {
nuclear@15: 	char vsfile[PATH_MAX], psfile[PATH_MAX];
nuclear@15: 	const char *fname;
nuclear@18: 	unsigned int prog;
nuclear@15: 
nuclear@18: 	if((fname = datafile_path(vfname))) {
nuclear@17: 		strcpy(vsfile, fname);
nuclear@17: 	} else {
nuclear@17: 		vsfile[0] = 0;
nuclear@17: 	}
nuclear@18: 	if((fname = datafile_path(pfname))) {
nuclear@17: 		strcpy(psfile, fname);
nuclear@17: 	} else {
nuclear@17: 		psfile[0] = 0;
nuclear@17: 	}
nuclear@18: 	if(!(prog = create_program_load(vsfile, psfile))) {
nuclear@18: 		fprintf(stderr, "failed to load shader program (%s, %s)\n", vsfile, psfile);
nuclear@18: 		return 0;
nuclear@15: 	}
nuclear@18: 	return prog;
nuclear@15: }
nuclear@15: 
nuclear@17: static int round_pow2(int x)
nuclear@15: {
nuclear@17: 	x--;
nuclear@17: 	x = (x >> 1) | x;
nuclear@17: 	x = (x >> 2) | x;
nuclear@17: 	x = (x >> 4) | x;
nuclear@17: 	x = (x >> 8) | x;
nuclear@17: 	x = (x >> 16) | x;
nuclear@17: 	return x + 1;
nuclear@15: }