even more attempted changes for ipMIDI on windows

[ardour.git] / libs / pbd / cartesian.cc

diff --git a/libs/pbd/cartesian.cc b/libs/pbd/cartesian.cc
index c5a1587b4c2618cda38d716f7fd17637536f6676..3288f68e9859b72ad4dfe2a4650efc37318c927d 100644 (file)
--- a/libs/pbd/cartesian.cc
+++ b/libs/pbd/cartesian.cc
@@ -16,56 +16,55 @@
     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */
 
-#include <cmath>
+#include <math.h>
+
 #include "pbd/cartesian.h"
 
+using namespace std;
+
 void
-PBD::azi_ele_to_cart (double azi, double ele, double& x, double& y, double& z)
+PBD::spherical_to_cartesian (double azi, double ele, double len, double& x, double& y, double& z)
 {
-        static const double atorad = 2.0 * M_PI / 360.0 ;
-        x = cos (azi * atorad) * cos (ele * atorad);
-        y = sin (azi * atorad) * cos (ele * atorad);
-        z = sin (ele * atorad);
+       /* convert from cylindrical coordinates in degrees to cartesian */
+
+       static const double atorad = 2.0 * M_PI / 360.0 ;
+
+        if (len == 0.0) {
+                len = 1.0;
+        }
+
+       x = len * cos (azi * atorad) * cos (ele * atorad);
+       y = len * sin (azi * atorad) * cos (ele * atorad);
+       z = len * sin (ele * atorad);
 }
 
-void 
-PBD::cart_to_azi_ele (double x, double y, double z, double& azimuth, double& elevation)
+void
+PBD::cartesian_to_spherical (double x, double y, double z, double& azimuth, double& elevation, double& length)
 {
-        /* converts cartesian coordinates to angular */
-        const double atorad = 2.0 * M_PI / 360.0;
-        double atan_y_per_x, atan_x_pl_y_per_z;
-        double distance;
+       /* converts cartesian coordinates to cylindrical in degrees*/
 
-        if(x == 0.0) {
-                atan_y_per_x = M_PI / 2;
-        } else {
-                atan_y_per_x = atan(y / x);
-        }
+        double rho, theta, phi;
 
-        azimuth = atan_y_per_x / atorad;
+        rho = sqrt (x*x + y*y + z*z);
+        //phi = acos (1.0 / rho);
+        theta = atan2 (y, x);
 
-        if (x < 0.0) {
-                azimuth +=180.0;
-        }
+        /* XXX for now, clamp phi to zero */
 
-        distance = sqrt (x*x + y*y);
+        phi = 0.0;
 
-        if (z == 0.0) {
-                atan_x_pl_y_per_z = 0.0;
+        if (theta < 0.0) {
+                azimuth = 180.0 - (180.0 * (theta / M_PI)); /* LHS is negative */
         } else {
-                atan_x_pl_y_per_z = atan (z/distance);
+                azimuth = 180.0 * (theta / M_PI);
         }
 
-        if (distance == 0.0) {
-                if (z < 0.0) {
-                        atan_x_pl_y_per_z = -M_PI/2.0;
-                } else {
-                        atan_x_pl_y_per_z = M_PI/2.0;
-                }
+        if (phi < 0.0) {
+                elevation = 180.0 - (180.0 * (phi / M_PI)); /* LHS is negative */
+        } else {
+                elevation = 180.0 * (phi /  M_PI);
         }
 
-        elevation = atan_x_pl_y_per_z / atorad;
-
-        // distance = sqrtf (x*x + y*y + z*z);
+        length = rho;
 }