Source code, broken...

1 files changed, 490 insertions, 0 deletions

diff --git a/src/engine/vertmodel.h b/src/engine/vertmodel.h
new file mode 100644
index 0000000..eb09001
--- /dev/null
+++ b/src/engine/vertmodel.h
@@ -0,0 +1,490 @@
+struct vertmodel : animmodel
+{
+    struct vert { vec pos, norm; };
+    struct vvert { vec pos; vec2 tc; };
+    struct vvertn : vvert { vec norm; };
+    struct vvertbump : vvert { squat tangent; };
+    struct tcvert { vec2 tc; };
+    struct bumpvert { vec4 tangent; };
+    struct tri { ushort vert[3]; };
+
+    struct vbocacheentry
+    {
+        GLuint vbuf;
+        animstate as;
+        int millis;
+ 
+        vbocacheentry() : vbuf(0) { as.cur.fr1 = as.prev.fr1 = -1; }
+    };
+
+    struct vertmesh : mesh
+    {
+        vert *verts;
+        tcvert *tcverts;
+        bumpvert *bumpverts;
+        tri *tris;
+        int numverts, numtris;
+
+        int voffset, eoffset, elen;
+        ushort minvert, maxvert;
+
+        vertmesh() : verts(0), tcverts(0), bumpverts(0), tris(0)
+        {
+        }
+
+        virtual ~vertmesh()
+        {
+            DELETEA(verts);
+            DELETEA(tcverts);
+            DELETEA(bumpverts);
+            DELETEA(tris);
+        }
+
+        void smoothnorms(float limit = 0, bool areaweight = true)
+        {
+            if(((vertmeshgroup *)group)->numframes == 1) mesh::smoothnorms(verts, numverts, tris, numtris, limit, areaweight);
+            else buildnorms(areaweight);
+        }
+
+        void buildnorms(bool areaweight = true)
+        {
+            mesh::buildnorms(verts, numverts, tris, numtris, areaweight, ((vertmeshgroup *)group)->numframes);
+        }
+
+        void calctangents(bool areaweight = true)
+        {
+            if(bumpverts) return;
+            bumpverts = new bumpvert[((vertmeshgroup *)group)->numframes*numverts];
+            mesh::calctangents(bumpverts, verts, tcverts, numverts, tris, numtris, areaweight, ((vertmeshgroup *)group)->numframes);
+        }
+
+        void calcbb(vec &bbmin, vec &bbmax, const matrix4x3 &m)
+        {
+            loopj(numverts)
+            {
+                vec v = m.transform(verts[j].pos);
+                loopi(3)
+                {
+                    bbmin[i] = min(bbmin[i], v[i]);
+                    bbmax[i] = max(bbmax[i], v[i]);
+                }
+            }
+        }
+
+        void genBIH(BIH::mesh &m)
+        {
+            m.tris = (const BIH::tri *)tris;
+            m.numtris = numtris;
+            m.pos = (const uchar *)&verts->pos;
+            m.posstride = sizeof(vert);
+            m.tc = (const uchar *)&tcverts->tc;
+            m.tcstride = sizeof(tcvert);
+        }
+
+        static inline void assignvert(vvertn &vv, int j, tcvert &tc, vert &v)
+        {
+            vv.pos = v.pos;
+            vv.norm = v.norm;
+            vv.tc = tc.tc;
+        }
+
+        inline void assignvert(vvertbump &vv, int j, tcvert &tc, vert &v)
+        {
+            vv.pos = v.pos;
+            vv.tc = tc.tc;
+            vv.tangent = bumpverts[j].tangent;
+        }
+
+        template<class T>
+        int genvbo(vector<ushort> &idxs, int offset, vector<T> &vverts, int *htdata, int htlen)
+        {
+            voffset = offset;
+            eoffset = idxs.length();
+            minvert = 0xFFFF;
+            loopi(numtris)
+            {
+                tri &t = tris[i];
+                loopj(3) 
+                {
+                    int index = t.vert[j];
+                    tcvert &tc = tcverts[index];
+                    vert &v = verts[index];
+                    T vv;
+                    assignvert(vv, index, tc, v);
+                    int htidx = hthash(v.pos)&(htlen-1);
+                    loopk(htlen)
+                    {
+                        int &vidx = htdata[(htidx+k)&(htlen-1)];
+                        if(vidx < 0) { vidx = idxs.add(ushort(vverts.length())); vverts.add(vv); break; }
+                        else if(!memcmp(&vverts[vidx], &vv, sizeof(vv))) { minvert = min(minvert, idxs.add(ushort(vidx))); break; }
+                    }
+                }
+            }
+            minvert = min(minvert, ushort(voffset));
+            maxvert = max(minvert, ushort(vverts.length()-1));
+            elen = idxs.length()-eoffset;
+            return vverts.length()-voffset;
+        }
+
+        int genvbo(vector<ushort> &idxs, int offset)
+        {
+            voffset = offset;
+            eoffset = idxs.length();
+            loopi(numtris)
+            {
+                tri &t = tris[i];
+                loopj(3) idxs.add(voffset+t.vert[j]);
+            }
+            minvert = voffset;
+            maxvert = voffset + numverts-1;
+            elen = idxs.length()-eoffset;
+            return numverts;
+        }
+
+        template<class T>
+        static inline void fillvert(T &vv, int j, tcvert &tc, vert &v)
+        {
+            vv.tc = tc.tc;
+        }
+
+        template<class T>
+        void fillverts(T *vdata)
+        {
+            vdata += voffset;
+            loopi(numverts) fillvert(vdata[i], i, tcverts[i], verts[i]);
+        }
+
+        void interpverts(const animstate &as, bool tangents, void * RESTRICT vdata, skin &s)
+        {
+            const vert * RESTRICT vert1 = &verts[as.cur.fr1 * numverts],
+                       * RESTRICT vert2 = &verts[as.cur.fr2 * numverts],
+                       * RESTRICT pvert1 = as.interp<1 ? &verts[as.prev.fr1 * numverts] : NULL, 
+                       * RESTRICT pvert2 = as.interp<1 ? &verts[as.prev.fr2 * numverts] : NULL;
+            #define ipvert(attrib)   v.attrib.lerp(vert1[i].attrib, vert2[i].attrib, as.cur.t)
+            #define ipbvert(attrib, type)  v.attrib.lerp(bvert1[i].attrib, bvert2[i].attrib, as.cur.t)
+            #define ipvertp(attrib)  v.attrib.lerp(pvert1[i].attrib, pvert2[i].attrib, as.prev.t).lerp(vec().lerp(vert1[i].attrib, vert2[i].attrib, as.cur.t), as.interp)
+            #define ipbvertp(attrib, type) v.attrib.lerp(type().lerp(bpvert1[i].attrib, bpvert2[i].attrib, as.prev.t), type().lerp(bvert1[i].attrib, bvert2[i].attrib, as.cur.t), as.interp)
+            #define iploop(type, body) \
+                loopi(numverts) \
+                { \
+                    type &v = ((type * RESTRICT)vdata)[i]; \
+                    body; \
+                }
+            if(tangents)
+            {
+                const bumpvert * RESTRICT bvert1 = &bumpverts[as.cur.fr1 * numverts],
+                               * RESTRICT bvert2 = &bumpverts[as.cur.fr2 * numverts],
+                               * RESTRICT bpvert1 = as.interp<1 ? &bumpverts[as.prev.fr1 * numverts] : NULL, 
+                               * RESTRICT bpvert2 = as.interp<1 ? &bumpverts[as.prev.fr2 * numverts] : NULL;
+                if(as.interp<1) iploop(vvertbump, { ipvertp(pos); ipbvertp(tangent, vec4); })
+                else iploop(vvertbump, { ipvert(pos); ipbvert(tangent, vec4); })
+            }
+            else
+            {
+                if(as.interp<1) iploop(vvertn, { ipvertp(pos); ipvertp(norm); })
+                else iploop(vvertn, { ipvert(pos); ipvert(norm); })
+            }
+            #undef iploop
+            #undef ipvert
+            #undef ipbvert
+            #undef ipvertp
+            #undef ipbvertp
+        }
+
+        void render(const animstate *as, skin &s, vbocacheentry &vc)
+        {
+            if(!Shader::lastshader) return;
+            glDrawRangeElements_(GL_TRIANGLES, minvert, maxvert, elen, GL_UNSIGNED_SHORT, &((vertmeshgroup *)group)->edata[eoffset]);
+            glde++;
+            xtravertsva += numverts;
+        }
+    };
+
+    struct tag
+    {
+        char *name;
+        matrix4x3 transform;
+
+        tag() : name(NULL) {}
+        ~tag() { DELETEA(name); }
+    };
+
+    struct vertmeshgroup : meshgroup
+    {
+        int numframes;
+        tag *tags;
+        int numtags;
+
+        static const int MAXVBOCACHE = 16;
+        vbocacheentry vbocache[MAXVBOCACHE];
+
+        ushort *edata;
+        GLuint ebuf;
+        bool vtangents;
+        int vlen, vertsize;
+        uchar *vdata;
+
+        vertmeshgroup() : numframes(0), tags(NULL), numtags(0), edata(NULL), ebuf(0), vtangents(false), vlen(0), vertsize(0), vdata(NULL) 
+        {
+        }
+
+        virtual ~vertmeshgroup()
+        {
+            DELETEA(tags);
+            if(ebuf) glDeleteBuffers_(1, &ebuf);
+            loopi(MAXVBOCACHE) 
+            {
+                if(vbocache[i].vbuf) glDeleteBuffers_(1, &vbocache[i].vbuf);
+            }
+            DELETEA(vdata);
+        }
+
+        int findtag(const char *name)
+        {
+            loopi(numtags) if(!strcmp(tags[i].name, name)) return i;
+            return -1;
+        }
+
+        int totalframes() const { return numframes; }
+
+        void concattagtransform(part *p, int i, const matrix4x3 &m, matrix4x3 &n)
+        {
+            n.mul(m, tags[numtags + i].transform);
+            n.posttranslate(m.transformnormal(p->translate), p->model->scale);
+        }
+
+        void calctagmatrix(part *p, int i, const animstate &as, matrix4 &matrix)
+        {
+            const matrix4x3 &tag1 = tags[as.cur.fr1*numtags + i].transform, 
+                            &tag2 = tags[as.cur.fr2*numtags + i].transform;
+            matrix4x3 tag;
+            tag.lerp(tag1, tag2, as.cur.t);
+            if(as.interp<1)
+            {
+                const matrix4x3 &tag1p = tags[as.prev.fr1*numtags + i].transform, 
+                                &tag2p = tags[as.prev.fr2*numtags + i].transform;
+                matrix4x3 tagp;
+                tagp.lerp(tag1p, tag2p, as.prev.t);
+                tag.lerp(tagp, tag, as.interp);
+            }
+            tag.d.add(p->translate).mul(p->model->scale);
+            matrix = matrix4(tag);
+        }
+
+        void genvbo(bool tangents, vbocacheentry &vc)
+        {
+            if(!vc.vbuf) glGenBuffers_(1, &vc.vbuf);
+            if(ebuf) return;
+                
+            vector<ushort> idxs;
+
+            if(tangents) loopv(meshes) ((vertmesh *)meshes[i])->calctangents();
+
+            vtangents = tangents;
+            vertsize = tangents ? sizeof(vvertbump) : sizeof(vvertn);
+            vlen = 0;
+            if(numframes>1)
+            {
+                loopv(meshes) vlen += ((vertmesh *)meshes[i])->genvbo(idxs, vlen);
+                DELETEA(vdata);
+                vdata = new uchar[vlen*vertsize];
+                #define FILLVDATA(type) do { \
+                    loopv(meshes) ((vertmesh *)meshes[i])->fillverts((type *)vdata); \
+                } while(0)
+                if(tangents) FILLVDATA(vvertbump);
+                else FILLVDATA(vvertn);
+                #undef FILLVDATA
+            } 
+            else 
+            {
+                gle::bindvbo(vc.vbuf);
+                #define GENVBO(type) do { \
+                    vector<type> vverts; \
+                    loopv(meshes) vlen += ((vertmesh *)meshes[i])->genvbo(idxs, vlen, vverts, htdata, htlen); \
+                    glBufferData_(GL_ARRAY_BUFFER, vverts.length()*sizeof(type), vverts.getbuf(), GL_STATIC_DRAW); \
+                } while(0)
+                int numverts = 0, htlen = 128;
+                loopv(meshes) numverts += ((vertmesh *)meshes[i])->numverts;
+                while(htlen < numverts) htlen *= 2;
+                if(numverts*4 > htlen*3) htlen *= 2; 
+                int *htdata = new int[htlen];
+                memset(htdata, -1, htlen*sizeof(int));
+                if(tangents) GENVBO(vvertbump);
+                else GENVBO(vvertn);
+                delete[] htdata;
+                #undef GENVBO
+                gle::clearvbo();
+            }
+
+            glGenBuffers_(1, &ebuf);
+            gle::bindebo(ebuf);
+            glBufferData_(GL_ELEMENT_ARRAY_BUFFER, idxs.length()*sizeof(ushort), idxs.getbuf(), GL_STATIC_DRAW);
+            gle::clearebo();
+        }
+
+        void bindvbo(const animstate *as, vbocacheentry &vc)
+        {
+            vvert *vverts = 0;
+            bindpos(ebuf, vc.vbuf, &vverts->pos, vertsize);
+            if(as->cur.anim&ANIM_NOSKIN)
+            {
+                if(enabletc) disabletc();
+                if(enablenormals) disablenormals();
+                if(enabletangents) disabletangents();
+            }
+            else
+            {
+                if(vtangents)
+                {
+                    if(enablenormals) disablenormals();
+                    vvertbump *vvertbumps = 0;
+                    bindtangents(&vvertbumps->tangent, vertsize);
+                }
+                else
+                {
+                    if(enabletangents) disabletangents();
+                    vvertn *vvertns = 0;
+                    bindnormals(&vvertns->norm, vertsize);
+                }
+
+                bindtc(&vverts->tc, vertsize);
+            }
+            if(enablebones) disablebones();
+        }
+
+        void cleanup()
+        {
+            loopi(MAXVBOCACHE)
+            {
+                vbocacheentry &c = vbocache[i];
+                if(c.vbuf) { glDeleteBuffers_(1, &c.vbuf); c.vbuf = 0; }
+                c.as.cur.fr1 = -1;
+            }
+            if(ebuf) { glDeleteBuffers_(1, &ebuf); ebuf = 0; }
+        }
+
+        void preload(part *p)
+        {
+            if(numframes > 1) return;
+            bool tangents = p->tangents();
+            if(tangents!=vtangents) cleanup();
+            if(!vbocache->vbuf) genvbo(tangents, *vbocache);
+        }
+
+        void render(const animstate *as, float pitch, const vec &axis, const vec &forward, dynent *d, part *p)
+        {
+            if(as->cur.anim&ANIM_NORENDER)
+            {
+                loopv(p->links) calctagmatrix(p, p->links[i].tag, *as, p->links[i].matrix);
+                return;
+            }
+
+            bool tangents = p->tangents();
+            if(tangents!=vtangents) { cleanup(); disablevbo(); }
+            vbocacheentry *vc = NULL;
+            if(numframes<=1) vc = vbocache;
+            else
+            {
+                loopi(MAXVBOCACHE)
+                {
+                    vbocacheentry &c = vbocache[i];
+                    if(!c.vbuf) continue;
+                    if(c.as==*as) { vc = &c; break; }
+                }
+                if(!vc) loopi(MAXVBOCACHE) { vc = &vbocache[i]; if(!vc->vbuf || vc->millis < lastmillis) break; }
+            }
+            if(!vc->vbuf) genvbo(tangents, *vc);
+            if(numframes>1)
+            {
+                if(vc->as!=*as)
+                {
+                    vc->as = *as;
+                    vc->millis = lastmillis;
+                    loopv(meshes) 
+                    {
+                        vertmesh &m = *(vertmesh *)meshes[i];
+                        m.interpverts(*as, tangents, vdata + m.voffset*vertsize, p->skins[i]);
+                    }
+                    gle::bindvbo(vc->vbuf);
+                    glBufferData_(GL_ARRAY_BUFFER, vlen*vertsize, vdata, GL_STREAM_DRAW);    
+                }
+                vc->millis = lastmillis;
+            }
+        
+            bindvbo(as, *vc);
+            loopv(meshes)
+            {
+                vertmesh *m = (vertmesh *)meshes[i];
+                p->skins[i].bind(m, as);
+                m->render(as, p->skins[i], *vc);
+            }
+            
+            loopv(p->links) calctagmatrix(p, p->links[i].tag, *as, p->links[i].matrix);
+        }
+    };
+
+    vertmodel(const char *name) : animmodel(name)
+    {
+    }
+};
+
+template<class MDL> struct vertloader : modelloader<MDL, vertmodel>
+{
+    vertloader(const char *name) : modelloader<MDL, vertmodel>(name) {}
+};
+
+template<class MDL> struct vertcommands : modelcommands<MDL, struct MDL::vertmesh>
+{
+    typedef struct MDL::part part;
+    typedef struct MDL::skin skin;
+
+    static void loadpart(char *model, float *smooth)
+    {
+        if(!MDL::loading) { conoutf(CON_ERROR, "not loading an %s", MDL::formatname()); return; }
+        defformatstring(filename, "%s/%s", MDL::dir, model);
+        part &mdl = MDL::loading->addpart();
+        if(mdl.index) mdl.pitchscale = mdl.pitchoffset = mdl.pitchmin = mdl.pitchmax = 0;
+        mdl.meshes = MDL::loading->sharemeshes(path(filename), double(*smooth > 0 ? cos(clamp(*smooth, 0.0f, 180.0f)*RAD) : 2));
+        if(!mdl.meshes) conoutf(CON_ERROR, "could not load %s", filename);
+        else mdl.initskins();
+    }
+    
+    static void setpitch(float *pitchscale, float *pitchoffset, float *pitchmin, float *pitchmax)
+    {
+        if(!MDL::loading || MDL::loading->parts.empty()) { conoutf(CON_ERROR, "not loading an %s", MDL::formatname()); return; }
+        part &mdl = *MDL::loading->parts.last();
+    
+        mdl.pitchscale = *pitchscale;
+        mdl.pitchoffset = *pitchoffset;
+        if(*pitchmin || *pitchmax)
+        {
+            mdl.pitchmin = *pitchmin;
+            mdl.pitchmax = *pitchmax;
+        }
+        else
+        {
+            mdl.pitchmin = -360*fabs(mdl.pitchscale) + mdl.pitchoffset;
+            mdl.pitchmax = 360*fabs(mdl.pitchscale) + mdl.pitchoffset;
+        }
+    }
+
+    static void setanim(char *anim, int *frame, int *range, float *speed, int *priority)
+    {
+        if(!MDL::loading || MDL::loading->parts.empty()) { conoutf(CON_ERROR, "not loading an %s", MDL::formatname()); return; }
+        vector<int> anims;
+        findanims(anim, anims);
+        if(anims.empty()) conoutf(CON_ERROR, "could not find animation %s", anim);
+        else loopv(anims)
+        {
+            MDL::loading->parts.last()->setanim(0, anims[i], *frame, *range, *speed, *priority);
+        }
+    }
+
+    vertcommands()
+    {
+        if(MDL::multiparted()) this->modelcommand(loadpart, "load", "sf"); 
+        this->modelcommand(setpitch, "pitch", "ffff");
+        if(MDL::animated()) this->modelcommand(setanim, "anim", "siiff");
+    }
+};
+