Mercurial > games > semicongine
comparison src/vector.nim @ 13:a571db114152
add: vector/matrix modules, tests, nim config script
| author | Sam <sam@basx.dev> |
|---|---|
| date | Wed, 28 Dec 2022 11:42:21 +0700 |
| parents | |
| children | 617c6dcddbe2 |
comparison
equal
deleted
inserted
replaced
| 12:9e5fe647ff91 | 13:a571db114152 |
|---|---|
| 1 import std/math | |
| 2 import std/strutils | |
| 3 import std/macros | |
| 4 import std/typetraits | |
| 5 import std/tables | |
| 6 | |
| 7 | |
| 8 type | |
| 9 Vec2*[T: SomeNumber] = array[2, T] | |
| 10 Vec3*[T: SomeNumber] = array[3, T] | |
| 11 Vec4*[T: SomeNumber] = array[4, T] | |
| 12 Vec* = Vec2|Vec3|Vec4 | |
| 13 | |
| 14 # define some often used constants | |
| 15 func ConstX[T: SomeNumber](): auto {.compiletime.} = Vec3[T]([T(1), T(0), T(0)]) | |
| 16 func ConstY[T: SomeNumber](): auto {.compiletime.} = Vec3[T]([T(0), T(1), T(0)]) | |
| 17 func ConstZ[T: SomeNumber](): auto {.compiletime.} = Vec3[T]([T(0), T(0), T(1)]) | |
| 18 func ConstR[T: SomeNumber](): auto {.compiletime.} = Vec3[T]([T(1), T(0), T(0)]) | |
| 19 func ConstG[T: SomeNumber](): auto {.compiletime.} = Vec3[T]([T(0), T(1), T(0)]) | |
| 20 func ConstB[T: SomeNumber](): auto {.compiletime.} = Vec3[T]([T(0), T(0), T(1)]) | |
| 21 | |
| 22 # generates constants: Xf, Xf32, Xf64, Xi, Xi8, Xi16, Xi32, Xi64 | |
| 23 # Also for Y, Z, R, G, B | |
| 24 # not sure if this is necessary or even a good idea... | |
| 25 macro generateAllConsts() = | |
| 26 result = newStmtList() | |
| 27 for component in ["X", "Y", "Z", "R", "G", "B"]: | |
| 28 for theType in ["int", "int8", "int16", "int32", "int64", "float", "float32", "float64"]: | |
| 29 var typename = theType[0 .. 0] | |
| 30 if theType[^2].isDigit: | |
| 31 typename = typename & theType[^2] | |
| 32 if theType[^1].isDigit: | |
| 33 typename = typename & theType[^1] | |
| 34 result.add( | |
| 35 newConstStmt( | |
| 36 postfix(ident(component & typename), "*"), | |
| 37 newCall(nnkBracketExpr.newTree(ident("Const" & component), ident(theType))) | |
| 38 ) | |
| 39 ) | |
| 40 | |
| 41 generateAllConsts() | |
| 42 | |
| 43 const X* = ConstX[float]() | |
| 44 const Y* = ConstY[float]() | |
| 45 const Z* = ConstZ[float]() | |
| 46 | |
| 47 func newVec2*[T](x, y: T): auto = Vec2([x, y]) | |
| 48 func newVec3*[T](x, y, z: T): auto = Vec3([x, y, z]) | |
| 49 func newVec4*[T](x, y, z, w: T): auto = Vec4([x, y, z, w]) | |
| 50 | |
| 51 func to*[T](v: Vec2): auto = Vec2([T(v[0]), T(v[1])]) | |
| 52 func to*[T](v: Vec3): auto = Vec3([T(v[0]), T(v[1]), T(v[2])]) | |
| 53 func to*[T](v: Vec4): auto = Vec4([T(v[0]), T(v[1]), T(v[2]), T(v[3])]) | |
| 54 | |
| 55 func toString[T](value: T): string = | |
| 56 var items: seq[string] | |
| 57 for item in value: | |
| 58 items.add($item) | |
| 59 $T & "(" & join(items, " ") & ")" | |
| 60 | |
| 61 func `$`*(v: Vec2[SomeNumber]): string = toString[Vec2[SomeNumber]](v) | |
| 62 func `$`*(v: Vec3[SomeNumber]): string = toString[Vec3[SomeNumber]](v) | |
| 63 func `$`*(v: Vec4[SomeNumber]): string = toString[Vec4[SomeNumber]](v) | |
| 64 | |
| 65 func length*(vec: Vec2[SomeFloat]): auto = sqrt(vec[0] * vec[0] + vec[1] * vec[1]) | |
| 66 func length*(vec: Vec2[SomeInteger]): auto = sqrt(float(vec[0] * vec[0] + vec[1] * vec[1])) | |
| 67 func length*(vec: Vec3[SomeFloat]): auto = sqrt(vec[0] * vec[0] + vec[1] * vec[1] + vec[2] * vec[2]) | |
| 68 func length*(vec: Vec3[SomeInteger]): auto = sqrt(float(vec[0] * vec[0] + vec[1] * vec[1] + vec[2] * vec[2])) | |
| 69 func length*(vec: Vec4[SomeFloat]): auto = sqrt(vec[0] * vec[0] + vec[1] * vec[1] + vec[2] * vec[2] + vec[3] * vec[3]) | |
| 70 func length*(vec: Vec4[SomeInteger]): auto = sqrt(float(vec[0] * vec[0] + vec[1] * vec[1] + vec[2] * vec[2] + vec[3] * vec[3])) | |
| 71 | |
| 72 func normalized*[T](vec: Vec2[T]): auto = | |
| 73 let l = vec.length | |
| 74 when T is SomeFloat: | |
| 75 Vec2[T]([vec[0] / l, vec[1] / l]) | |
| 76 else: | |
| 77 Vec2[float]([float(vec[0]) / l, float(vec[1]) / l]) | |
| 78 func normalized*[T](vec: Vec3[T]): auto = | |
| 79 let l = vec.length | |
| 80 when T is SomeFloat: | |
| 81 Vec3[T]([vec[0] / l, vec[1] / l, vec[2] / l]) | |
| 82 else: | |
| 83 Vec3[float]([float(vec[0]) / l, float(vec[1]) / l, float(vec[2]) / l]) | |
| 84 func normalized*[T](vec: Vec4[T]): auto = | |
| 85 let l = vec.length | |
| 86 when T is SomeFloat: | |
| 87 Vec4[T]([vec[0] / l, vec[1] / l, vec[2] / l, vec[3] / l]) | |
| 88 else: | |
| 89 Vec4[float]([float(vec[0]) / l, float(vec[1]) / l, float(vec[2]) / l, float(vec[3]) / l]) | |
| 90 | |
| 91 # scalar operations | |
| 92 func `+`*(a: Vec2, b: SomeNumber): auto = Vec2([a[0] + b, a[1] + b]) | |
| 93 func `+`*(a: Vec3, b: SomeNumber): auto = Vec3([a[0] + b, a[1] + b, a[2] + b]) | |
| 94 func `+`*(a: Vec4, b: SomeNumber): auto = Vec4([a[0] + b, a[1] + b, a[2] + b, a[3] + b]) | |
| 95 func `-`*(a: Vec2, b: SomeNumber): auto = Vec2([a[0] - b, a[1] - b]) | |
| 96 func `-`*(a: Vec3, b: SomeNumber): auto = Vec3([a[0] - b, a[1] - b, a[2] - b]) | |
| 97 func `-`*(a: Vec4, b: SomeNumber): auto = Vec4([a[0] - b, a[1] - b, a[2] - b, a[3] - b]) | |
| 98 func `*`*(a: Vec2, b: SomeNumber): auto = Vec2([a[0] * b, a[1] * b]) | |
| 99 func `*`*(a: Vec3, b: SomeNumber): auto = Vec3([a[0] * b, a[1] * b, a[2] * b]) | |
| 100 func `*`*(a: Vec4, b: SomeNumber): auto = Vec4([a[0] * b, a[1] * b, a[2] * b, a[3] * b]) | |
| 101 func `/`*[T: SomeInteger](a: Vec2[T], b: SomeInteger): auto = Vec2([a[0] div b, a[1] div b]) | |
| 102 func `/`*[T: SomeFloat](a: Vec2[T], b: SomeFloat): auto = Vec2([a[0] / b, a[1] / b]) | |
| 103 func `/`*[T: SomeInteger](a: Vec3[T], b: SomeInteger): auto = Vec3([a[0] div b, a[1] div b, a[2] div b]) | |
| 104 func `/`*[T: SomeFloat](a: Vec3[T], b: SomeFloat): auto = Vec3([a[0] / b, a[1] / b, a[2] / b]) | |
| 105 func `/`*[T: SomeInteger](a: Vec4[T], b: SomeInteger): auto = Vec4([a[0] div b, a[1] div b, a[2] div b, a[3] div b]) | |
| 106 func `/`*[T: SomeFloat](a: Vec4[T], b: SomeFloat): auto = Vec4([a[0] / b, a[1] / b, a[2] / b, a[3] / b]) | |
| 107 | |
| 108 func `+`*(a: SomeNumber, b: Vec2): auto = Vec2([a + b[0], a + b[1]]) | |
| 109 func `+`*(a: SomeNumber, b: Vec3): auto = Vec3([a + b[0], a + b[1], a + b[2]]) | |
| 110 func `+`*(a: SomeNumber, b: Vec4): auto = Vec4([a + b[0], a + b[1], a + b[2], a + b[3]]) | |
| 111 func `-`*(a: SomeNumber, b: Vec2): auto = Vec2([a - b[0], a - b[1]]) | |
| 112 func `-`*(a: SomeNumber, b: Vec3): auto = Vec3([a - b[0], a - b[1], a - b[2]]) | |
| 113 func `-`*(a: SomeNumber, b: Vec4): auto = Vec4([a - b[0], a - b[1], a - b[2], a - b[3]]) | |
| 114 func `*`*(a: SomeNumber, b: Vec2): auto = Vec2([a * b[0], a * b[1]]) | |
| 115 func `*`*(a: SomeNumber, b: Vec3): auto = Vec3([a * b[0], a * b[1], a * b[2]]) | |
| 116 func `*`*(a: SomeNumber, b: Vec4): auto = Vec4([a * b[0], a * b[1], a * b[2], a * b[3]]) | |
| 117 func `/`*[T: SomeInteger](a: SomeInteger, b: Vec2[T]): auto = Vec2([a div b[0], a div b[1]]) | |
| 118 func `/`*[T: SomeFloat](a: SomeFloat, b: Vec2[T]): auto = Vec2([a / b[0], a / b[1]]) | |
| 119 func `/`*[T: SomeInteger](a: SomeInteger, b: Vec3[T]): auto = Vec3([a div b[0], a div b[1], a div b[2]]) | |
| 120 func `/`*[T: SomeFloat](a: SomeFloat, b: Vec3[T]): auto = Vec3([a / b[0], a / b[1], a / b[2]]) | |
| 121 func `/`*[T: SomeInteger](a: SomeInteger, b: Vec4[T]): auto = Vec4([a div b[0], a div b[1], a div b[2], a div b[3]]) | |
| 122 func `/`*[T: SomeFloat](a: SomeFloat, b: Vec4[T]): auto = Vec4([a / b[0], a / b[1], a / b[2], a / b[3]]) | |
| 123 | |
| 124 # compontent-wise operations | |
| 125 func `+`*(a, b: Vec2): auto = Vec2([a[0] + b[0], a[1] + b[1]]) | |
| 126 func `+`*(a, b: Vec3): auto = Vec3([a[0] + b[0], a[1] + b[1], a[2] + b[2]]) | |
| 127 func `+`*(a, b: Vec4): auto = Vec4([a[0] + b[0], a[1] + b[1], a[2] + b[2], a[3] + b[3]]) | |
| 128 func `-`*(a: Vec2): auto = Vec2([-a[0], -a[1]]) | |
| 129 func `-`*(a: Vec3): auto = Vec3([-a[0], -a[1], -a[2]]) | |
| 130 func `-`*(a: Vec4): auto = Vec4([-a[0], -a[1], -a[2], -a[3]]) | |
| 131 func `-`*(a, b: Vec2): auto = Vec2([a[0] - b[0], a[1] - b[1]]) | |
| 132 func `-`*(a, b: Vec3): auto = Vec3([a[0] - b[0], a[1] - b[1], a[2] - b[2]]) | |
| 133 func `-`*(a, b: Vec4): auto = Vec4([a[0] - b[0], a[1] - b[1], a[2] - b[2], a[3] - b[3]]) | |
| 134 func `*`*(a, b: Vec2): auto = Vec2([a[0] * b[0], a[1] * b[1]]) | |
| 135 func `*`*(a, b: Vec3): auto = Vec3([a[0] * b[0], a[1] * b[1], a[2] * b[2]]) | |
| 136 func `*`*(a, b: Vec4): auto = Vec4([a[0] * b[0], a[1] * b[1], a[2] * b[2], a[3] * b[3]]) | |
| 137 func `/`*[T: SomeInteger](a, b: Vec2[T]): auto = Vec2([a[0] div b[0], a[1] div b[1]]) | |
| 138 func `/`*[T: SomeFloat](a, b: Vec2[T]): auto = Vec2([a[0] / b[0], a[1] / b[1]]) | |
| 139 func `/`*[T: SomeInteger](a, b: Vec3[T]): auto = Vec3([a[0] div b[0], a[1] div b[1], a[2] div b[2]]) | |
| 140 func `/`*[T: SomeFloat](a, b: Vec3[T]): auto = Vec3([a[0] / b[0], a[1] / b[1], a[2] / b[2]]) | |
| 141 func `/`*[T: SomeInteger](a, b: Vec4[T]): auto = Vec4([a[0] div b[0], a[1] div b[1], a[2] div b[2], a[3] div b[3]]) | |
| 142 func `/`*[T: SomeFloat](a, b: Vec4[T]): auto = Vec4([a[0] / b[0], a[1] / b[1], a[2] / b[2], a[3] / b[3]]) | |
| 143 | |
| 144 # special operations | |
| 145 func dot*(a, b: Vec2): auto = a[0] * b[0] + a[1] * b[1] | |
| 146 func dot*(a, b: Vec3): auto = a[0] * b[0] + a[1] * b[1] + a[2] * b[2] | |
| 147 func dot*(a, b: Vec4): auto = a[0] * b[0] + a[1] * b[1] + a[2] * b[2] + a[3] * b[3] | |
| 148 func cross*(a, b: Vec3): auto = Vec3([ | |
| 149 a[1] * b[2] - a[2] * b[1], | |
| 150 a[2] * b[0] - a[0] * b[2], | |
| 151 a[0] * b[1] - a[1] * b[0], | |
| 152 ]) | |
| 153 | |
| 154 | |
| 155 # macro to allow creation of new vectors by specifying vector components as attributes | |
| 156 # e.g. myVec.xxy will return a new Vec3 that contains the components x, x an y of the original vector | |
| 157 # (instead of x, y, z for a simple copy) | |
| 158 proc vectorAttributeAccessor(accessor: string): NimNode = | |
| 159 const ACCESSOR_INDICES = { | |
| 160 'x': 0, | |
| 161 'y': 1, | |
| 162 'z': 2, | |
| 163 'w': 3, | |
| 164 'r': 0, | |
| 165 'g': 1, | |
| 166 'b': 2, | |
| 167 'a': 3, | |
| 168 }.toTable | |
| 169 var ret: NimNode | |
| 170 let accessorvalue = accessor | |
| 171 | |
| 172 if accessorvalue.len == 0: | |
| 173 raise newException(Exception, "empty attribute") | |
| 174 elif accessorvalue.len == 1: | |
| 175 ret = nnkBracket.newTree(ident("value"), newLit(ACCESSOR_INDICES[accessorvalue[0]])) | |
| 176 if accessorvalue.len > 1: | |
| 177 var attrs = nnkBracket.newTree() | |
| 178 for attrname in accessorvalue: | |
| 179 attrs.add(nnkBracketExpr.newTree(ident("value"), newLit(ACCESSOR_INDICES[attrname]))) | |
| 180 ret = nnkCall.newTree(ident("Vec" & $accessorvalue.len), attrs) | |
| 181 | |
| 182 newProc( | |
| 183 name=nnkPostfix.newTree(ident("*"), ident(accessor)), | |
| 184 params=[ident("auto"), nnkIdentDefs.newTree(ident("value"), ident("Vec"), newEmptyNode())], | |
| 185 body=newStmtList(ret), | |
| 186 procType = nnkFuncDef, | |
| 187 ) | |
| 188 | |
| 189 macro createVectorAttribAccessorFuncs() = | |
| 190 const COORD_ATTRS = ["x", "y", "z", "w"] | |
| 191 const COLOR_ATTRS = ["r", "g", "b", "a"] | |
| 192 result = nnkStmtList.newTree() | |
| 193 for attlist in [COORD_ATTRS, COLOR_ATTRS]: | |
| 194 for i in attlist: | |
| 195 result.add(vectorAttributeAccessor(i)) | |
| 196 for j in attlist: | |
| 197 result.add(vectorAttributeAccessor(i & j)) | |
| 198 for k in attlist: | |
| 199 result.add(vectorAttributeAccessor(i & j & k)) | |
| 200 for l in attlist: | |
| 201 result.add(vectorAttributeAccessor(i & j & k & l)) | |
| 202 | |
| 203 createVectorAttribAccessorFuncs() |
