1  // unstable
       2  #define DWG_TYPE DWG_TYPE_LEADEROBJECTCONTEXTDATA
       3  #include "common.c"
       4  
       5  void
       6  api_process (dwg_object *obj)
       7  {
       8    int error;
       9    ANNOTSCALEOBJECTCONTEXTDATA_fields;
      10    /*BITCODE_BS class_version; // r2010+ =3
      11    BITCODE_B is_default;
      12    BITCODE_H scale; */
      13    BITCODE_BL i, num_points;
      14    BITCODE_3DPOINT *points;      /*!< DXF 10 */
      15    BITCODE_B b290;               /*!< DXF 290 */
      16    BITCODE_3DPOINT x_direction;  /*!< DXF 11 */
      17    BITCODE_3DPOINT inspt_offset; /*!< DXF 12 */
      18    BITCODE_3DPOINT endptproj;    /*!< DXF 13 */
      19  
      20    Dwg_Version_Type dwg_version = obj->parent->header.version;
      21    dwg_obj_leaderobjectcontextdata *_obj
      22        = dwg_object_to_LEADEROBJECTCONTEXTDATA (obj);
      23  
      24    CHK_ENTITY_TYPE (_obj, LEADEROBJECTCONTEXTDATA, class_version, BS);
      25    CHK_ENTITY_TYPE (_obj, LEADEROBJECTCONTEXTDATA, is_default, B);
      26    CHK_ENTITY_H (_obj, LEADEROBJECTCONTEXTDATA, scale);
      27  
      28    CHK_ENTITY_TYPE (_obj, LEADEROBJECTCONTEXTDATA, num_points, BL);
      29    if (!dwg_dynapi_entity_value (_obj, "LEADEROBJECTCONTEXTDATA", "points",
      30                                  &points, NULL))
      31      fail ("LEADEROBJECTCONTEXTDATA.points");
      32    else
      33      for (i = 0; i < _obj->num_points; i++)
      34        ok ("LEADEROBJECTCONTEXTDATA.points[%d]: (%f, %f, %f)", i, points[i].x,
      35            points[i].y, points[i].z);
      36    CHK_ENTITY_3RD (_obj, LEADEROBJECTCONTEXTDATA, x_direction);
      37    CHK_ENTITY_3RD (_obj, LEADEROBJECTCONTEXTDATA, inspt_offset);
      38    CHK_ENTITY_3RD (_obj, LEADEROBJECTCONTEXTDATA, endptproj);
      39    CHK_ENTITY_TYPE (_obj, LEADEROBJECTCONTEXTDATA, b290, B);
      40  }