(root)/
libredwg-0.13/
test/
unit-testing/
ucs.c
       1  #define DWG_TYPE DWG_TYPE_UCS
       2  #include "common.c"
       3  
       4  void
       5  api_process (dwg_object *obj)
       6  {
       7    int error, isnew;
       8    BITCODE_RC flag;
       9    BITCODE_T name;
      10    BITCODE_RSd used;
      11    BITCODE_B is_xref_ref;
      12    BITCODE_BS is_xref_resolved;
      13    BITCODE_B is_xref_dep;
      14    BITCODE_H xref;
      15    BITCODE_3BD ucsorg;
      16    BITCODE_3BD ucsxdir;
      17    BITCODE_3BD ucsydir;
      18    BITCODE_BD ucs_elevation;
      19    BITCODE_BS UCSORTHOVIEW;
      20    BITCODE_BS orthographic_type;
      21    BITCODE_H base_ucs;
      22    BITCODE_H named_ucs;
      23    BITCODE_BS num_orthopts, i;
      24    Dwg_UCS_orthopts *orthopts;
      25  
      26    Dwg_Version_Type dwg_version = obj->parent->header.version;
      27    dwg_obj_ucs *_obj = dwg_object_to_UCS (obj);
      28  
      29    CHK_ENTITY_TYPE (_obj, UCS, flag, RC);
      30    CHK_ENTITY_UTF8TEXT (_obj, UCS, name);
      31    CHK_ENTITY_TYPE (_obj, UCS, used, RSd);
      32    CHK_ENTITY_TYPE (_obj, UCS, is_xref_ref, B);
      33    CHK_ENTITY_TYPE (_obj, UCS, is_xref_resolved, BS);
      34    CHK_ENTITY_TYPE (_obj, UCS, is_xref_dep, B);
      35    CHK_ENTITY_H (_obj, UCS, xref);
      36  
      37    CHK_ENTITY_3RD (_obj, UCS, ucsorg);
      38    CHK_ENTITY_3RD (_obj, UCS, ucsxdir);
      39    CHK_ENTITY_3RD (_obj, UCS, ucsydir);
      40    CHK_ENTITY_TYPE (_obj, UCS, ucs_elevation, BD);
      41    CHK_ENTITY_TYPE (_obj, UCS, UCSORTHOVIEW, BS);
      42    CHK_ENTITY_H (_obj, UCS, base_ucs);
      43    CHK_ENTITY_H (_obj, UCS, named_ucs);
      44    CHK_ENTITY_TYPE (_obj, UCS, num_orthopts, BS);
      45    if (!dwg_dynapi_entity_value (_obj, "UCS", "orthopts", &orthopts, NULL))
      46      fail ("UCS.orthopts");
      47    else
      48      for (i = 0; i < num_orthopts; i++)
      49        {
      50          CHK_SUBCLASS_TYPE (orthopts[i], UCS_orthopts, type, BS);
      51          CHK_SUBCLASS_3RD (orthopts[i], UCS_orthopts, pt);
      52        }
      53  }