simgear/scene/sky/sphere.cxx

   1 // sphere.cxx -- build an ssg sphere object
   2 //
   3 // Pulled straight out of MesaGLU/quadratic.c
   4 //
   5 // Original gluSphere code is Copyright (C) 1999-2000  Brian Paul and
   6 // licensed under the GPL
   7 //
   8 // This library is free software; you can redistribute it and/or
   9 // modify it under the terms of the GNU Library General Public
  10 // License as published by the Free Software Foundation; either
  11 // version 2 of the License, or (at your option) any later version.
  12 //
  13 // This library is distributed in the hope that it will be useful,
  14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16 // Library General Public License for more details.
  17 //
  18 // You should have received a copy of the GNU Library General Public
  19 // License along with this library; if not, write to the
  20 // Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  21 // Boston, MA  02111-1307, USA.
  22 //
  23 // $Id$
  24
  25
  26 #include <simgear/compiler.h>
  27 #include <simgear/constants.h>
  28 #include <simgear/debug/logstream.hxx>
  29
  30 #include STL_IOSTREAM
  31
  32 #include <plib/sg.h>
  33 #include <plib/ssg.h>
  34
  35
  36 // return a sphere object as an ssgBranch
  37 ssgBranch *ssgMakeSphere( ssgSimpleState *state, ssgColourArray *cl,
  38                           double radius, int slices, int stacks,
  39                           ssgCallback predraw, ssgCallback postdraw )
  40 {
  41     float rho, drho, theta, dtheta;
  42     float x, y, z;
  43     float s, t, ds, dt;
  44     int i, j, imin, imax;
  45     float nsign = 1.0;
  46     ssgBranch *sphere = new ssgBranch;
  47     sgVec2 vec2;
  48     sgVec3 vec3;
  49
  50     drho = SGD_PI / (float) stacks;
  51     dtheta = SGD_2PI / (float) slices;
  52
  53     /* texturing: s goes from 0.0/0.25/0.5/0.75/1.0 at +y/+x/-y/-x/+y
  54        axis t goes from -1.0/+1.0 at z = -radius/+radius (linear along
  55        longitudes) cannot use triangle fan on texturing (s coord. at
  56        top/bottom tip varies) */
  57
  58     ds = 1.0 / slices;
  59     dt = 1.0 / stacks;
  60     t = 1.0;  /* because loop now runs from 0 */
  61     imin = 0;
  62     imax = stacks;
  63
  64     /* build slices as quad strips */
  65     for ( i = imin; i < imax; i++ ) {
  66         ssgVertexArray   *vl = new ssgVertexArray();
  67         ssgNormalArray   *nl = new ssgNormalArray();
  68         ssgTexCoordArray *tl = new ssgTexCoordArray();
  69
  70         rho = i * drho;
  71         s = 0.0;
  72         for ( j = 0; j <= slices; j++ ) {
  73             theta = (j == slices) ? 0.0 : j * dtheta;
  74             x = -sin(theta) * sin(rho);
  75             y = cos(theta) * sin(rho);
  76             z = nsign * cos(rho);
  77
  78             // glNormal3f( x*nsign, y*nsign, z*nsign );
  79             sgSetVec3( vec3, x*nsign, y*nsign, z*nsign );
  80             sgNormalizeVec3( vec3 );
  81             nl->add( vec3 );
  82
  83             // glTexCoord2f(s,t);
  84             sgSetVec2( vec2, s, t );
  85             tl->add( vec2 );
  86
  87             // glVertex3f( x*radius, y*radius, z*radius );
  88             sgSetVec3( vec3, x*radius, y*radius, z*radius );
  89             vl->add( vec3 );
  90
  91             x = -sin(theta) * sin(rho+drho);
  92             y = cos(theta) * sin(rho+drho);
  93             z = nsign * cos(rho+drho);
  94
  95             // glNormal3f( x*nsign, y*nsign, z*nsign );
  96             sgSetVec3( vec3, x*nsign, y*nsign, z*nsign );
  97             sgNormalizeVec3( vec3 );
  98             nl->add( vec3 );
  99
 100             // glTexCoord2f(s,t-dt);
 101             sgSetVec2( vec2, s, t-dt );
 102             tl->add( vec2 );
 103             s += ds;
 104
 105             // glVertex3f( x*radius, y*radius, z*radius );
 106             sgSetVec3( vec3, x*radius, y*radius, z*radius );
 107             vl->add( vec3 );
 108         }
 109
 110         ssgLeaf *slice =
 111             new ssgVtxTable ( GL_TRIANGLE_STRIP, vl, nl, tl, cl );
 112
 113         if ( vl->getNum() != nl->getNum() ) {
 114             SG_LOG( SG_EVENT, SG_ALERT, "bad sphere1");
 115             exit(-1);
 116         }
 117         if ( vl->getNum() != tl->getNum() ) {
 118             SG_LOG( SG_EVENT, SG_ALERT, "bad sphere2");
 119             exit(-1);
 120         }
 121         slice->setState( state );
 122         slice->setCallback( SSG_CALLBACK_PREDRAW, predraw );
 123         slice->setCallback( SSG_CALLBACK_POSTDRAW, postdraw );
 124
 125         sphere->addKid( slice );
 126
 127         t -= dt;
 128     }
 129
 130     return sphere;
 131 }