-
Notifications
You must be signed in to change notification settings - Fork 3
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
Showing
13 changed files
with
731 additions
and
125 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,223 @@ | ||
| import vmath, opengl, pixie | ||
|
|
||
| when (compiles do: import imageman): | ||
| import imageman | ||
| const hasImageman* = true | ||
| else: | ||
| const hasImageman* = false | ||
|
|
||
| export vmath, opengl | ||
|
|
||
|
|
||
| type | ||
| Buffers* = ref BuffersObj | ||
| BuffersObj = object | ||
| n: int32 | ||
| obj: UncheckedArray[GlUint] | ||
|
|
||
| VertexArrays* = ref VertexArraysObj | ||
| VertexArraysObj = object | ||
| n: int32 | ||
| obj: UncheckedArray[GlUint] | ||
|
|
||
| Textures* = ref TexturesObj | ||
| ## note: texures can't be actualy deleted for now. glDeleteTextures is not enough. If you want to resize texture, use loadTexture multiple times instead. | ||
| TexturesObj = object | ||
| n: int32 | ||
| obj: UncheckedArray[GlUint] | ||
|
|
||
| Shader* = ref ShaderObj | ||
| ShaderObj = object | ||
| obj: GlUint | ||
|
|
||
| FrameBuffers* = ref FrameBuffersObj | ||
| FrameBuffersObj = object | ||
| n: int32 | ||
| obj: UncheckedArray[GlUint] | ||
|
|
||
| ShaderCompileDefect* = object of Defect | ||
|
|
||
| Shape* = ref object | ||
| kind: GlEnum | ||
| len: int | ||
| vao: VertexArrays | ||
| bo: Buffers | ||
|
|
||
| OpenglUniform*[T] = distinct GlInt | ||
|
|
||
|
|
||
| # -------- Buffers, VertexArrays, Textures -------- | ||
| template makeOpenglObjectSeq(t, tobj, T, gen, del, newp, delextra) = | ||
| proc `=destroy`(xobj {.inject.}: tobj) = | ||
| delextra | ||
| del(xobj.n, cast[ptr T](xobj.obj.addr)) | ||
|
|
||
| proc newp*(n: int): t = | ||
| if n == 0: return | ||
| assert n in 1..int32.high | ||
| unsafeNew result, int32.sizeof + n * T.sizeof | ||
| result.n = n.int32 | ||
| gen(n.int32, cast[ptr T](result.obj.addr)) | ||
|
|
||
| proc len*(x: t): int = | ||
| if x == nil: 0 | ||
| else: x.n | ||
|
|
||
| proc `[]`*(x: t, i: int): T = | ||
| if i notin 0..<x.len: | ||
| raise IndexDefect.newException("index " & $i & " out of range 0..<" & $x.len) | ||
| x.obj[i] | ||
|
|
||
|
|
||
| proc unloadTextures(x: TexturesObj) = | ||
| for i in 0..<x.n: | ||
| ## sems like it don't work | ||
| # glBindTexture(GlTexture2d, x.obj[i]) | ||
| # glTexImage2D(GlTexture2d, 0, GlRgba.Glint, 0, 0, 0, GlRgba, GlUnsignedByte, nil) | ||
|
|
||
|
|
||
| {.push, warning[Effect]: off.} | ||
| makeOpenglObjectSeq Buffers, BuffersObj, GlUint, glGenBuffers, glDeleteBuffers, newBuffers: discard | ||
| makeOpenglObjectSeq VertexArrays, VertexArraysObj, GlUint, glGenVertexArrays, glDeleteVertexArrays, newVertexArrays: discard | ||
| makeOpenglObjectSeq Textures, TexturesObj, GlUint, glGenTextures, glDeleteTextures, newTextures: | ||
| unloadTextures(xobj) | ||
| makeOpenglObjectSeq FrameBuffers, FrameBuffersObj, GlUint, glGenFrameBuffers, glDeleteFrameBuffers, newFrameBuffers: discard | ||
| {.pop.} | ||
|
|
||
| proc `[]`*(x: Textures, i: enum): GlUint = | ||
| if i.int notin 0..<x.len: | ||
| raise IndexDefect.newException("index " & $i & " out of range 0..<" & $x.len) | ||
| x.obj[i.int] | ||
|
|
||
| when defined(gcc): | ||
| {.passc: "-fcompare-debug-second".} # seems like it hides warning about "passing flexieble array ABI changed in GCC 4.4" | ||
| # i don't care, gcc | ||
|
|
||
|
|
||
| # -------- helpers -------- | ||
| proc arrayBufferData*[T](data: openarray[T], usage: GlEnum = GlStaticDraw) = | ||
| glBufferData(GlArrayBuffer, data.len * T.sizeof, data.unsafeaddr, usage) | ||
|
|
||
| proc elementArrayBufferData*[T](data: openarray[T], usage: GlEnum = GlStaticDraw) = | ||
| glBufferData(GlElementArrayBuffer, data.len * T.sizeof, data.unsafeaddr, usage) | ||
|
|
||
| template withVertexArray*(vao: GlUint, body) = | ||
| glBindVertexArray(vao) | ||
| block: body | ||
| glBindVertexArray(0) | ||
|
|
||
| when hasImageman: | ||
| proc loadTexture*(obj: GlUint, img: imageman.Image[ColorRGBAU]) = | ||
| glBindTexture(GlTexture2d, obj) | ||
| glTexImage2D(GlTexture2d, 0, GlRgba.GLint, img.width.GLsizei, img.height.GLsizei, 0, GlRgba, GlUnsignedByte, img.data[0].unsafeaddr) | ||
| glGenerateMipmap(GlTexture2d) | ||
| glBindTexture(GlTexture2d, 0) | ||
|
|
||
| proc loadTexture*(obj: GlUint, img: pixie.Image) = | ||
| glBindTexture(GlTexture2d, obj) | ||
| glTexImage2D(GlTexture2d, 0, GlRgba.GLint, img.width.GLsizei, img.height.GLsizei, 0, GlRgba, GlUnsignedByte, img.data[0].unsafeaddr) | ||
| glGenerateMipmap(GlTexture2d) | ||
| glBindTexture(GlTexture2d, 0) | ||
|
|
||
|
|
||
|
|
||
| # -------- Shader -------- | ||
| {.push, warning[Effect]: off.} | ||
| proc `=destroy`(x: ShaderObj) = | ||
| if x.obj != 0: | ||
| glDeleteProgram(x.obj) | ||
| {.pop.} | ||
|
|
||
| proc newShader*(shaders: openarray[(GlEnum, string)]): Shader = | ||
| new result | ||
|
|
||
| var shad = newSeq[GlUint](shaders.len) | ||
|
|
||
| proc free = | ||
| for x in shad: | ||
| if x != 0: glDeleteShader(x) | ||
|
|
||
| for i, (k, s) in shaders: | ||
| var cs = s.cstring | ||
| shad[i] = glCreateShader(k) | ||
| glShaderSource(shad[i], 1, cast[cstringArray](cs.addr), nil) | ||
| glCompileShader(shad[i]) | ||
| if (var success: GlInt; glGetShaderiv(shad[i], GlCompileStatus, success.addr); success != GlTrue.GlInt): | ||
| var buffer: array[512, char] | ||
| glGetShaderInfoLog(shad[i], 512, nil, cast[cstring](buffer.addr)) | ||
| free() | ||
| raise ShaderCompileDefect.newException("failed to compile shader " & $(i+1) & ": " & $cast[cstring](buffer.addr)) | ||
|
|
||
| defer: free() | ||
|
|
||
| result.obj = glCreateProgram() | ||
| for i, x in shad: | ||
| glAttachShader(result.obj, x) | ||
| glLinkProgram(result.obj) | ||
| if (var success: GlInt; glGetProgramiv(result.obj, GlLinkStatus, success.addr); success != GlTrue.GlInt): | ||
| var buffer: array[512, char] | ||
| glGetProgramInfoLog(result.obj, 512, nil, cast[cstring](buffer.addr)) | ||
| # todo: delete gl shader programm? | ||
| raise ShaderCompileDefect.newException("failed to link shader program: " & $cast[cstring](buffer.addr)) | ||
|
|
||
| proc use*(x: Shader) = | ||
| glUseProgram(x.obj) | ||
|
|
||
| proc `[]`*(x: Shader, name: string): GlInt = | ||
| result = glGetUniformLocation(x.obj, name) | ||
| if result == -1: | ||
| raise KeyError.newException("shader has no uniform " & name & " (is it unused?)") | ||
|
|
||
| proc `uniform=`*(i: GlInt, value: GlFloat) = | ||
| glUniform1f(i, value) | ||
|
|
||
| proc `uniform=`*(i: GlInt, value: Vec2) = | ||
| glUniform2f(i, value.x, value.y) | ||
|
|
||
| proc `uniform=`*(i: GlInt, value: Vec3) = | ||
| glUniform3f(i, value.x, value.y, value.z) | ||
|
|
||
| proc `uniform=`*(i: GlInt, value: Vec4) = | ||
| glUniform4f(i, value.x, value.y, value.z, value.w) | ||
|
|
||
| proc `uniform=`*(i: GlInt, value: Mat4) = | ||
| glUniformMatrix4fv(i, 1, GlFalse, cast[ptr GlFloat](value.unsafeaddr)) | ||
|
|
||
|
|
||
| proc `uniform=`*[T](x: OpenglUniform[T], value: T) = x.GlInt.uniform = value | ||
|
|
||
|
|
||
| # -------- Shape -------- | ||
| proc makeAttributes(t: type) = | ||
| when t is tuple: | ||
| var i = 0 | ||
| var offset = 0 | ||
| var x: t | ||
| for x in x.fields: | ||
| type t2 = x.typeof | ||
| glVertexAttribPointer i.uint32, t2.sizeof div GlFloat.sizeof, cGlFloat, GlFalse, t.sizeof.GlSizei, cast[pointer](offset) | ||
| glEnableVertexAttribArray i.uint32 | ||
| inc i | ||
| inc offset, t2.sizeof | ||
| else: | ||
| glVertexAttribPointer 0, t.sizeof div GlFloat.sizeof, cGlFloat, GlFalse, t.sizeof.GlSizei, nil | ||
| glEnableVertexAttribArray 0 | ||
|
|
||
|
|
||
| proc newShape*[T](vert: openarray[T], idx: openarray[GlUint], kind = GlTriangles): Shape = | ||
| new result | ||
| result.vao = newVertexArrays(1) | ||
| result.bo = newBuffers(2) | ||
| result.len = idx.len | ||
| result.kind = kind | ||
|
|
||
| withVertexArray result.vao[0]: | ||
| glBindBuffer GlArrayBuffer, result.bo[0] | ||
| arrayBufferData vert | ||
| glBindBuffer GlElementArrayBuffer, result.bo[1] | ||
| elementArrayBufferData idx | ||
| makeAttributes T | ||
|
|
||
| proc draw*(x: Shape) = | ||
| withVertexArray x.vao[0]: | ||
| glDrawElements(x.kind, x.len.GlSizei, GlUnsignedInt, nil) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,3 @@ | ||
| import shaders | ||
|
|
||
| var global_drawContext*: DrawContext |
Oops, something went wrong.