transform.c

   1 /*
   2  * Copyright (C) 2014 Intel Corporation.
   3  */
   4
   5 #include <stdlib.h>
   6 #include <math.h>
   7 #include <utils/Log.h>
   8 #include <cutils/properties.h>
   9 #include <hardware/sensors.h>
  10 #include "common.h"
  11 #include "transform.h"
  12 #include "utils.h"
  13
  14 /*----------------------------------------------------------------------------*/
  15
  16 /* Macros related to Intel Sensor Hub */
  17
  18 #define GRAVITY 9.80665f
  19
  20 /* 720 LSG = 1G */
  21 #define LSG                         (1024.0f)
  22 #define NUMOFACCDATA                (8.0f)
  23
  24 /* conversion of acceleration data to SI units (m/s^2) */
  25 #define CONVERT_A                   (GRAVITY_EARTH / LSG / NUMOFACCDATA)
  26 #define CONVERT_A_X(x)              ((float(x)/1000) * (GRAVITY * -1.0))
  27 #define CONVERT_A_Y(x)              ((float(x)/1000) * (GRAVITY * 1.0))
  28 #define CONVERT_A_Z(x)              ((float(x)/1000) * (GRAVITY * 1.0))
  29
  30 /* conversion of magnetic data to uT units */
  31 #define CONVERT_M                   (1.0f/6.6f)
  32 #define CONVERT_M_X                 (-CONVERT_M)
  33 #define CONVERT_M_Y                 (-CONVERT_M)
  34 #define CONVERT_M_Z                 (CONVERT_M)
  35
  36 /* conversion of orientation data to degree units */
  37 #define CONVERT_O                   (1.0f/64.0f)
  38 #define CONVERT_O_A                 (CONVERT_O)
  39 #define CONVERT_O_P                 (CONVERT_O)
  40 #define CONVERT_O_R                 (-CONVERT_O)
  41
  42 /*conversion of gyro data to SI units (radian/sec) */
  43 #define CONVERT_GYRO                ((2000.0f/32767.0f)*((float)M_PI / 180.0f))
  44 #define CONVERT_GYRO_X              (-CONVERT_GYRO)
  45 #define CONVERT_GYRO_Y              (-CONVERT_GYRO)
  46 #define CONVERT_GYRO_Z              (CONVERT_GYRO)
  47
  48 #define BIT(x) (1 << (x))
  49
  50 inline unsigned int set_bit_range(int start, int end)
  51 {
  52     int i;
  53     unsigned int value = 0;
  54
  55     for (i = start; i < end; ++i)
  56         value |= BIT(i);
  57     return value;
  58 }
  59
  60 inline float convert_from_vtf_format(int size, int exponent, unsigned int value)
  61 {
  62     int divider=1;
  63     int i;
  64     float sample;
  65     int mul = 1.0;
  66
  67     value = value & set_bit_range(0, size*8);
  68     if (value & BIT(size*8-1)) {
  69         value =  ((1LL << (size*8)) - value);
  70         mul = -1.0;
  71     }
  72     sample = value * 1.0;
  73     if (exponent < 0) {
  74         exponent = abs(exponent);
  75         for (i = 0; i < exponent; ++i) {
  76             divider = divider*10;
  77         }
  78         return mul * sample/divider;
  79     } else {
  80         return mul * sample * pow(10.0, exponent);
  81     }
  82 }
  83
  84 // Platform sensor orientation
  85 #define DEF_ORIENT_ACCEL_X                   -1
  86 #define DEF_ORIENT_ACCEL_Y                   -1
  87 #define DEF_ORIENT_ACCEL_Z                   -1
  88
  89 #define DEF_ORIENT_GYRO_X                   1
  90 #define DEF_ORIENT_GYRO_Y                   1
  91 #define DEF_ORIENT_GYRO_Z                   1
  92
  93 // G to m/s2
  94 #define CONVERT_FROM_VTF16(s,d,x)      (convert_from_vtf_format(s,d,x))
  95 #define CONVERT_A_G_VTF16E14_X(s,d,x)  (DEF_ORIENT_ACCEL_X *\
  96                                         convert_from_vtf_format(s,d,x)*GRAVITY)
  97 #define CONVERT_A_G_VTF16E14_Y(s,d,x)  (DEF_ORIENT_ACCEL_Y *\
  98                                         convert_from_vtf_format(s,d,x)*GRAVITY)
  99 #define CONVERT_A_G_VTF16E14_Z(s,d,x)  (DEF_ORIENT_ACCEL_Z *\
 100                                         convert_from_vtf_format(s,d,x)*GRAVITY)
 101
 102 // Degree/sec to radian/sec
 103 #define CONVERT_G_D_VTF16E14_X(s,d,x)  (DEF_ORIENT_GYRO_X *\
 104                                         convert_from_vtf_format(s,d,x) * \
 105                                         ((float)M_PI/180.0f))
 106 #define CONVERT_G_D_VTF16E14_Y(s,d,x)  (DEF_ORIENT_GYRO_Y *\
 107                                         convert_from_vtf_format(s,d,x) * \
 108                                         ((float)M_PI/180.0f))
 109 #define CONVERT_G_D_VTF16E14_Z(s,d,x)  (DEF_ORIENT_GYRO_Z *\
 110                                         convert_from_vtf_format(s,d,x) * \
 111                                         ((float)M_PI/180.0f))
 112
 113 // Milli gauss to micro tesla
 114 #define CONVERT_M_MG_VTF16E14_X(s,d,x) (convert_from_vtf_format(s,d,x)/10)
 115 #define CONVERT_M_MG_VTF16E14_Y(s,d,x) (convert_from_vtf_format(s,d,x)/10)
 116 #define CONVERT_M_MG_VTF16E14_Z(s,d,x) (convert_from_vtf_format(s,d,x)/10)
 117
 118 #define DATA_BYTES      2
 119 #define ACC_EXPONENT    -2
 120 #define GYRO_EXPONENT   -1
 121 #define MAGN_EXPONENT   0
 122 #define INC_EXPONENT    -1
 123 #define ROT_EXPONENT    -8
 124
 125 /*----------------------------------------------------------------------------*/
 126
 127 static int64_t sample_as_int64(unsigned char* sample, struct datum_info_t* type)
 128 {
 129         uint16_t u16;
 130         uint32_t u32;
 131         uint64_t u64;
 132         int i;
 133
 134         switch (type->storagebits) {
 135                 case 64:
 136                         u64 = 0;
 137
 138                         if (type->endianness == 'b')
 139                                 for (i=0; i<8; i++)
 140                                         u64 = (u64 << 8) | sample[i];
 141                         else
 142                                 for (i=7; i>=0; i--)
 143                                         u64 = (u64 << 8) | sample[i];
 144
 145                         if (type->sign == 'u')
 146                                 return (int64_t) (u64 >> type->shift);
 147
 148                         return ((int64_t) u64) >> type->shift;
 149
 150                 case 32:
 151                         if (type->endianness == 'b')
 152                                 u32 = (sample[0] << 24) | (sample[1] << 16) |
 153                                         (sample[2] << 8) | sample[3];
 154                         else
 155                                 u32 = (sample[3] << 24) | (sample[2] << 16) |
 156                                         (sample[1] << 8) | sample[0];
 157
 158                         if (type->sign == 'u')
 159                                 return u32 >> type->shift;
 160
 161                         return ((int32_t) u32) >> type->shift;
 162
 163                 case 16:
 164                         if (type->endianness == 'b')
 165                                 u16 = (sample[0] << 8) | sample[1];
 166                         else
 167                                 u16 = (sample[1] << 8) | sample[0];
 168
 169                         if (type->sign == 'u')
 170                                 return u16 >> type->shift;
 171
 172                         return  ((int16_t) u16) >> type->shift;
 173         }
 174
 175         ALOGE("Unhandled sample storage size\n");
 176         return 0;
 177 }
 178
 179
 180 static void finalize_sample_default(int s, struct sensors_event_t* data)
 181 {
 182         int i           = sensor_info[s].catalog_index;
 183         int sensor_type = sensor_catalog[i].type;
 184
 185         switch (sensor_type) {
 186                 case SENSOR_TYPE_ACCELEROMETER:
 187                         /*
 188                          * Invert x axis orientation from SI units - see
 189                          * /hardware/libhardware/include/hardware/sensors.h
 190                          * for a discussion of what Android expects
 191                          */
 192                         data->data[0] = -data->data[0];
 193                         break;
 194
 195                 case SENSOR_TYPE_GYROSCOPE:
 196                         /* Limit drift */
 197                         if (    fabs(data->data[0]) < 0.1 &&
 198                                 fabs(data->data[1]) < 0.1 &&
 199                                 fabs(data->data[2]) < 0.1) {
 200                                         data->data[0] = 0;
 201                                         data->data[1] = 0;
 202                                         data->data[2] = 0;
 203                                 }
 204                         break;
 205         }
 206 }
 207
 208
 209 static float transform_sample_default(int s, int c, unsigned char* sample_data)
 210 {
 211         struct datum_info_t* sample_type = &sensor_info[s].channel[c].type_info;
 212         int64_t              s64 = sample_as_int64(sample_data, sample_type);
 213
 214         /* Apply default scaling rules */
 215         return (sensor_info[s].offset + s64) * sensor_info[s].scale;
 216 }
 217
 218
 219 static void finalize_sample_ISH(int s, struct sensors_event_t* data)
 220 {
 221         int i           = sensor_info[s].catalog_index;
 222         int sensor_type = sensor_catalog[i].type;
 223         float pitch, roll, yaw;
 224
 225         if (sensor_type == SENSOR_TYPE_ORIENTATION) {
 226
 227                 pitch = data->data[0];
 228                 roll = data->data[1];
 229                 yaw = data->data[2];
 230
 231                 data->data[0] = 360.0 - yaw;
 232                 data->data[1] = -pitch;
 233                 data->data[2] = -roll;
 234         }
 235 }
 236
 237
 238 static float transform_sample_ISH(int s, int c, unsigned char* sample_data)
 239 {
 240         struct datum_info_t* sample_type = &sensor_info[s].channel[c].type_info;
 241         int val         = (int) sample_as_int64(sample_data, sample_type);
 242         int i           = sensor_info[s].catalog_index;
 243         int sensor_type = sensor_catalog[i].type;
 244
 245         switch (sensor_type) {
 246                 case SENSOR_TYPE_ACCELEROMETER:
 247                         switch (c) {
 248                                 case 0:
 249                                         return CONVERT_A_G_VTF16E14_X(
 250                                                 DATA_BYTES, ACC_EXPONENT, val);
 251
 252                                 case 1:
 253                                         return CONVERT_A_G_VTF16E14_Y(
 254                                                 DATA_BYTES, ACC_EXPONENT, val);
 255
 256                                 case 2:
 257                                         return CONVERT_A_G_VTF16E14_Z(
 258                                                 DATA_BYTES, ACC_EXPONENT, val);
 259                         }
 260                         break;
 261
 262
 263                 case SENSOR_TYPE_GYROSCOPE:
 264                         switch (c) {
 265                                 case 0:
 266                                         return CONVERT_G_D_VTF16E14_X(
 267                                                 DATA_BYTES, GYRO_EXPONENT, val);
 268
 269                                 case 1:
 270                                         return CONVERT_G_D_VTF16E14_Y(
 271                                                 DATA_BYTES, GYRO_EXPONENT, val);
 272
 273                                 case 2:
 274                                         return CONVERT_G_D_VTF16E14_Z(
 275                                                 DATA_BYTES, GYRO_EXPONENT, val);
 276                         }
 277                         break;
 278
 279                 case SENSOR_TYPE_MAGNETIC_FIELD:
 280                         switch (c) {
 281                                 case 0:
 282                                         return CONVERT_M_MG_VTF16E14_X(
 283                                                 DATA_BYTES, MAGN_EXPONENT, val);
 284
 285                                 case 1:
 286                                         return CONVERT_M_MG_VTF16E14_Y(
 287                                                 DATA_BYTES, MAGN_EXPONENT, val);
 288
 289                                 case 2:
 290                                         return CONVERT_M_MG_VTF16E14_Z(
 291                                                 DATA_BYTES, MAGN_EXPONENT, val);
 292                         }
 293                         break;
 294
 295                 case SENSOR_TYPE_ORIENTATION:
 296                         return convert_from_vtf_format(DATA_BYTES, INC_EXPONENT,
 297                                 val);
 298
 299                 case SENSOR_TYPE_ROTATION_VECTOR:
 300                         return convert_from_vtf_format(DATA_BYTES, ROT_EXPONENT,
 301                                 val);
 302         }
 303
 304         return 0;
 305 }
 306
 307
 308 void select_transform (int s)
 309 {
 310         char prop_name[PROP_NAME_MAX];
 311         char prop_val[PROP_VALUE_MAX];
 312         int i                   = sensor_info[s].catalog_index;
 313         const char *prefix      = sensor_catalog[i].tag;
 314
 315         sprintf(prop_name, PROP_BASE, prefix, "transform");
 316
 317         if (property_get(prop_name, prop_val, "")) {
 318                 if (!strcmp(prop_val, "ISH")) {
 319                         ALOGI(  "Using Intel Sensor Hub semantics on %s\n",
 320                                 sensor_info[s].friendly_name);
 321
 322                         sensor_info[s].ops.transform = transform_sample_ISH;
 323                         sensor_info[s].ops.finalize = finalize_sample_ISH;
 324                         return;
 325                 }
 326         }
 327
 328         sensor_info[s].ops.transform = transform_sample_default;
 329         sensor_info[s].ops.finalize = finalize_sample_default;
 330 }
 331
 332
 333 float acquire_immediate_value(int s, int c)
 334 {
 335         char sysfs_path[PATH_MAX];
 336         float val;
 337         int ret;
 338         int dev_num = sensor_info[s].dev_num;
 339         int i = sensor_info[s].catalog_index;
 340         const char* raw_path = sensor_catalog[i].channel[c].raw_path;
 341         const char* input_path = sensor_catalog[i].channel[c].input_path;
 342         float scale = sensor_info[s].scale;
 343         float offset = sensor_info[s].offset;
 344
 345         /* Acquire a sample value for sensor s / channel c through sysfs */
 346
 347         if (input_path[0]) {
 348                 sprintf(sysfs_path, BASE_PATH "%s", dev_num, input_path);
 349                 ret = sysfs_read_float(sysfs_path, &val);
 350
 351                 if (!ret) {
 352                         return val;
 353                 }
 354         };
 355
 356         if (!raw_path[0])
 357                 return 0;
 358
 359         sprintf(sysfs_path, BASE_PATH "%s", dev_num, raw_path);
 360         ret = sysfs_read_float(sysfs_path, &val);
 361
 362         if (ret == -1)
 363                 return 0;
 364
 365         return (val + offset) * scale;
 366 }