home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 110 / EnigmaAmiga110CD.iso / indispensabili / utility / apdf / xpdf-0.80 / xpdf / object.cc < prev    next >
C/C++ Source or Header  |  1999-04-11  |  4KB  |  218 lines
  1. //========================================================================
  2. //
  3. // Object.cc
  4. //
  5. // Copyright 1996 Derek B. Noonburg
  6. //
  7. //========================================================================
  8.  
  9. #ifdef __GNUC__
  10. #pragma implementation
  11. #endif
  12.  
  13. #include <stddef.h>
  14. #include "Object.h"
  15. #include "Array.h"
  16. #include "Dict.h"
  17. #include "Error.h"
  18. #include "Stream.h"
  19. #include "XRef.h"
  20.  
  21. //------------------------------------------------------------------------
  22. // Object
  23. //------------------------------------------------------------------------
  24.  
  25. char *objTypeNames[numObjTypes] = {
  26.   "boolean",
  27.   "integer",
  28.   "real",
  29.   "string",
  30.   "name",
  31.   "null",
  32.   "array",
  33.   "dictionary",
  34.   "stream",
  35.   "ref",
  36.   "cmd",
  37.   "error",
  38.   "eof",
  39.   "none"
  40. };
  41.  
  42. #ifdef DEBUG_MEM
  43. int Object::numAlloc[numObjTypes] =
  44.   {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
  45. #endif
  46.  
  47. Object *Object::initArray() {
  48.   initObj(objArray);
  49.   array = new Array();
  50.   return this;
  51. }
  52.  
  53. Object *Object::initDict() {
  54.   initObj(objDict);
  55.   dict = new Dict();
  56.   return this;
  57. }
  58.  
  59. Object *Object::initStream(Stream *stream1) {
  60.   initObj(objStream);
  61.   stream = stream1;
  62.   return this;
  63. }
  64.  
  65. Object *Object::copy(Object *obj) {
  66.   *obj = *this;
  67.   switch (type) {
  68.   case objString:
  69.     obj->string = string->copy();
  70.     break;
  71.   case objName:
  72.     obj->name = copyString(name);
  73.     break;
  74.   case objArray:
  75.     array->incRef();
  76.     break;
  77.   case objDict:
  78.     dict->incRef();
  79.     break;
  80.   case objStream:
  81.     stream->incRef();
  82.     break;
  83.   case objCmd:
  84.     obj->cmd = copyString(cmd);
  85.     break;
  86.   default:
  87.     break;
  88.   }
  89. #ifdef DEBUG_MEM
  90.   ++numAlloc[type];
  91. #endif
  92.   return obj;
  93. }
  94.  
  95. Object *Object::fetch(Object *obj) {
  96.   return (type == objRef && xref) ?
  97.      xref->fetch(ref.num, ref.gen, obj) : copy(obj);
  98. }
  99.  
  100. void Object::free() {
  101.   switch (type) {
  102.   case objString:
  103.     delete string;
  104.     break;
  105.   case objName:
  106.     gfree(name);
  107.     break;
  108.   case objArray:
  109.     if (!array->decRef())
  110.       delete array;
  111.     break;
  112.   case objDict:
  113.     if (!dict->decRef())
  114.       delete dict;
  115.     break;
  116.   case objStream:
  117.     if (!stream->decRef())
  118.       delete stream;
  119.     break;
  120.   case objCmd:
  121.     gfree(cmd);
  122.     break;
  123.   default:
  124.     break;
  125.   }
  126. #ifdef DEBUG_MEM
  127.   --numAlloc[type];
  128. #endif
  129.   type = objNone;
  130. }
  131.  
  132. char *Object::getTypeName() {
  133.   return objTypeNames[(int)type];/* cast added to help SAS/C++... */
  134. }
  135.  
  136. void Object::print(FILE *f) {
  137.   Object obj;
  138.   int i;
  139.  
  140.   switch (type) {
  141.   case objBool:
  142.     fprintf(f, "%s", booln ? "true" : "false");
  143.     break;
  144.   case objInt:
  145.     fprintf(f, "%d", intg);
  146.     break;
  147.   case objReal:
  148.     fprintf(f, "%g", real);
  149.     break;
  150.   case objString:
  151.     fprintf(f, "(%s)", string->getCString());
  152.     break;
  153.   case objName:
  154.     fprintf(f, "/%s", name);
  155.     break;
  156.   case objNull:
  157.     fprintf(f, "null");
  158.     break;
  159.   case objArray:
  160.     fprintf(f, "[");
  161.     for (i = 0; i < arrayGetLength(); ++i) {
  162.       if (i > 0)
  163.     fprintf(f, " ");
  164.       arrayGetNF(i, &obj);
  165.       obj.print(f);
  166.       obj.free();
  167.     }
  168.     fprintf(f, "]");
  169.     break;
  170.   case objDict:
  171.     fprintf(f, "<<");
  172.     for (i = 0; i < dictGetLength(); ++i) {
  173.       fprintf(f, " /%s ", dictGetKey(i));
  174.       dictGetValNF(i, &obj);
  175.       obj.print(f);
  176.       obj.free();
  177.     }
  178.     fprintf(f, " >>");
  179.     break;
  180.   case objStream:
  181.     fprintf(f, "<stream>");
  182.     break;
  183.   case objRef:
  184.     fprintf(f, "%d %d R", ref.num, ref.gen);
  185.     break;
  186.   case objCmd:
  187.     fprintf(f, "%s", cmd);
  188.     break;
  189.   case objError:
  190.     fprintf(f, "<error>");
  191.     break;
  192.   case objEOF:
  193.     fprintf(f, "<EOF>");
  194.     break;
  195.   case objNone:
  196.     fprintf(f, "<none>");
  197.     break;
  198.   }
  199. }
  200.  
  201. void Object::memCheck(FILE *f) {
  202. #ifdef DEBUG_MEM
  203.   int i;
  204.   int t;
  205.  
  206.   t = 0;
  207.   for (i = 0; i < numObjTypes; ++i)
  208.     t += numAlloc[i];
  209.   if (t > 0) {
  210.     fprintf(f, "Allocated objects:\n");
  211.     for (i = 0; i < numObjTypes; ++i) {
  212.       if (numAlloc[i] > 0)
  213.     fprintf(f, "  %-20s: %6d\n", objTypeNames[i], numAlloc[i]);
  214.     }
  215.   }
  216. #endif
  217. }
  218.