pdf2swf/xpdf/Link.cc

   1 //========================================================================
   2 //
   3 // Link.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 <string.h>
  15 #include "gmem.h"
  16 #include "GString.h"
  17 #include "Error.h"
  18 #include "Object.h"
  19 #include "Array.h"
  20 #include "Dict.h"
  21 #include "Link.h"
  22
  23 //------------------------------------------------------------------------
  24
  25 static GString *getFileSpecName(Object *fileSpecObj);
  26
  27 //------------------------------------------------------------------------
  28 // LinkDest
  29 //------------------------------------------------------------------------
  30
  31 LinkDest::LinkDest(Array *a, GBool pageIsRef1) {
  32   Object obj1, obj2;
  33
  34   // initialize fields
  35   pageIsRef = pageIsRef1;
  36   left = bottom = right = top = zoom = 0;
  37   ok = gFalse;
  38
  39   // get page
  40   if (pageIsRef) {
  41     if (!a->getNF(0, &obj1)->isRef()) {
  42       if(obj1.getType()!=objInt)
  43         error(-1, "Bad annotation destination (1) type=%d", obj1.getType());
  44       goto err2;
  45     }
  46     pageRef.num = obj1.getRefNum();
  47     pageRef.gen = obj1.getRefGen();
  48     obj1.free();
  49   } else {
  50     if (!a->get(0, &obj1)->isInt()) {
  51       error(-1, "Bad annotation destination (2)");
  52       goto err2;
  53     }
  54     pageNum = obj1.getInt() + 1;
  55     obj1.free();
  56   }
  57
  58   // get destination type
  59   a->get(1, &obj1);
  60
  61   // XYZ link
  62   if (obj1.isName("XYZ")) {
  63     kind = destXYZ;
  64     a->get(2, &obj2);
  65     if (obj2.isNull()) {
  66       changeLeft = gFalse;
  67     } else if (obj2.isNum()) {
  68       changeLeft = gTrue;
  69       left = obj2.getNum();
  70     } else {
  71       error(-1, "Bad annotation destination position");
  72       goto err1;
  73     }
  74     obj2.free();
  75     a->get(3, &obj2);
  76     if (obj2.isNull()) {
  77       changeTop = gFalse;
  78     } else if (obj2.isNum()) {
  79       changeTop = gTrue;
  80       top = obj2.getNum();
  81     } else {
  82       error(-1, "Bad annotation destination position");
  83       goto err1;
  84     }
  85     obj2.free();
  86     a->get(4, &obj2);
  87     if (obj2.isNull()) {
  88       changeZoom = gFalse;
  89     } else if (obj2.isNum()) {
  90       changeZoom = gTrue;
  91       zoom = obj2.getNum();
  92     } else {
  93       error(-1, "Bad annotation destination position");
  94       goto err1;
  95     }
  96     obj2.free();
  97
  98   // Fit link
  99   } else if (obj1.isName("Fit")) {
 100     kind = destFit;
 101
 102   // FitH link
 103   } else if (obj1.isName("FitH")) {
 104     kind = destFitH;
 105     if (!a->get(2, &obj2)->isNum()) {
 106       error(-1, "Bad annotation destination position");
 107       goto err1;
 108     }
 109     top = obj2.getNum();
 110     obj2.free();
 111
 112   // FitV link
 113   } else if (obj1.isName("FitV")) {
 114     kind = destFitV;
 115     if (!a->get(2, &obj2)->isNum()) {
 116       error(-1, "Bad annotation destination position");
 117       goto err1;
 118     }
 119     left = obj2.getNum();
 120     obj2.free();
 121
 122   // FitR link
 123   } else if (obj1.isName("FitR")) {
 124     kind = destFitR;
 125     if (!a->get(2, &obj2)->isNum()) {
 126       error(-1, "Bad annotation destination position");
 127       goto err1;
 128     }
 129     left = obj2.getNum();
 130     obj2.free();
 131     if (!a->get(3, &obj2)->isNum()) {
 132       error(-1, "Bad annotation destination position");
 133       goto err1;
 134     }
 135     bottom = obj2.getNum();
 136     obj2.free();
 137     if (!a->get(4, &obj2)->isNum()) {
 138       error(-1, "Bad annotation destination position");
 139       goto err1;
 140     }
 141     right = obj2.getNum();
 142     obj2.free();
 143     if (!a->get(5, &obj2)->isNum()) {
 144       error(-1, "Bad annotation destination position");
 145       goto err1;
 146     }
 147     top = obj2.getNum();
 148     obj2.free();
 149
 150   // FitB link
 151   } else if (obj1.isName("FitB")) {
 152     kind = destFitB;
 153
 154   // FitBH link
 155   } else if (obj1.isName("FitBH")) {
 156     kind = destFitBH;
 157     if (!a->get(2, &obj2)->isNum()) {
 158       error(-1, "Bad annotation destination position");
 159       goto err1;
 160     }
 161     top = obj2.getNum();
 162     obj2.free();
 163
 164   // FitBV link
 165   } else if (obj1.isName("FitBV")) {
 166     kind = destFitBV;
 167     if (!a->get(2, &obj2)->isNum()) {
 168       error(-1, "Bad annotation destination position");
 169       goto err1;
 170     }
 171     left = obj2.getNum();
 172     obj2.free();
 173
 174   // unknown link kind
 175   } else {
 176     error(-1, "Unknown annotation destination type");
 177     goto err2;
 178   }
 179
 180   obj1.free();
 181   ok = gTrue;
 182   return;
 183
 184  err1:
 185   obj2.free();
 186  err2:
 187   obj1.free();
 188 }
 189
 190 LinkDest::LinkDest(LinkDest *dest) {
 191   kind = dest->kind;
 192   pageIsRef = dest->pageIsRef;
 193   if (pageIsRef)
 194     pageRef = dest->pageRef;
 195   else
 196     pageNum = dest->pageNum;
 197   left = dest->left;
 198   bottom = dest->bottom;
 199   right = dest->right;
 200   top = dest->top;
 201   zoom = dest->zoom;
 202   changeLeft = dest->changeLeft;
 203   changeTop = dest->changeTop;
 204   changeZoom = dest->changeZoom;
 205   ok = gTrue;
 206 }
 207
 208 //------------------------------------------------------------------------
 209 // LinkGoTo
 210 //------------------------------------------------------------------------
 211
 212 LinkGoTo::LinkGoTo(Object *destObj) {
 213   dest = NULL;
 214   namedDest = NULL;
 215
 216   // named destination
 217   if (destObj->isName()) {
 218     namedDest = new GString(destObj->getName());
 219   } else if (destObj->isString()) {
 220     namedDest = destObj->getString()->copy();
 221
 222   // destination dictionary
 223   } else if (destObj->isArray()) {
 224     dest = new LinkDest(destObj->getArray(), gTrue);
 225     if (!dest->isOk()) {
 226       delete dest;
 227       dest = NULL;
 228     }
 229
 230   // error
 231   } else {
 232     error(-1, "Illegal annotation destination");
 233   }
 234 }
 235
 236 LinkGoTo::~LinkGoTo() {
 237   if (dest)
 238     delete dest;
 239   if (namedDest)
 240     delete namedDest;
 241 }
 242
 243 //------------------------------------------------------------------------
 244 // LinkGoToR
 245 //------------------------------------------------------------------------
 246
 247 LinkGoToR::LinkGoToR(Object *fileSpecObj, Object *destObj) {
 248   dest = NULL;
 249   namedDest = NULL;
 250
 251   // get file name
 252   fileName = getFileSpecName(fileSpecObj);
 253
 254   // named destination
 255   if (destObj->isName()) {
 256     namedDest = new GString(destObj->getName());
 257   } else if (destObj->isString()) {
 258     namedDest = destObj->getString()->copy();
 259
 260   // destination dictionary
 261   } else if (destObj->isArray()) {
 262     dest = new LinkDest(destObj->getArray(), gFalse);
 263     if (!dest->isOk()) {
 264       delete dest;
 265       dest = NULL;
 266     }
 267
 268   // error
 269   } else {
 270     error(-1, "Illegal annotation destination");
 271   }
 272 }
 273
 274 LinkGoToR::~LinkGoToR() {
 275   if (fileName)
 276     delete fileName;
 277   if (dest)
 278     delete dest;
 279   if (namedDest)
 280     delete namedDest;
 281 }
 282
 283
 284 //------------------------------------------------------------------------
 285 // LinkLaunch
 286 //------------------------------------------------------------------------
 287
 288 LinkLaunch::LinkLaunch(Object *actionObj) {
 289   Object obj1, obj2;
 290
 291   fileName = NULL;
 292   params = NULL;
 293
 294   if (actionObj->isDict()) {
 295     if (!actionObj->dictLookup("F", &obj1)->isNull()) {
 296       fileName = getFileSpecName(&obj1);
 297     } else {
 298       obj1.free();
 299       //~ This hasn't been defined by Adobe yet, so assume it looks
 300       //~ just like the Win dictionary until they say otherwise.
 301       if (actionObj->dictLookup("Unix", &obj1)->isDict()) {
 302         obj1.dictLookup("F", &obj2);
 303         fileName = getFileSpecName(&obj2);
 304         obj2.free();
 305         if (obj1.dictLookup("P", &obj2)->isString())
 306           params = obj2.getString()->copy();
 307         obj2.free();
 308       } else {
 309         error(-1, "Bad launch-type link action");
 310       }
 311     }
 312     obj1.free();
 313   }
 314 }
 315
 316 LinkLaunch::~LinkLaunch() {
 317   if (fileName)
 318     delete fileName;
 319   if (params)
 320     delete params;
 321 }
 322
 323 //------------------------------------------------------------------------
 324 // LinkURI
 325 //------------------------------------------------------------------------
 326
 327 LinkURI::LinkURI(Object *uriObj, GString *baseURI) {
 328   GString *uri2;
 329   int n;
 330   char c;
 331
 332   uri = NULL;
 333   if (uriObj->isString()) {
 334     uri2 = uriObj->getString()->copy();
 335     if (baseURI) {
 336       n = strcspn(uri2->getCString(), "/:");
 337       if (n == uri2->getLength() || uri2->getChar(n) == '/') {
 338         uri = baseURI->copy();
 339         c = uri->getChar(uri->getLength() - 1);
 340         if (c == '/' || c == '?') {
 341           if (uri2->getChar(0) == '/') {
 342             uri2->del(0);
 343           }
 344         } else {
 345           if (uri2->getChar(0) != '/') {
 346             uri->append('/');
 347           }
 348         }
 349         uri->append(uri2);
 350         delete uri2;
 351       } else {
 352         uri = uri2;
 353       }
 354     } else {
 355       uri = uri2;
 356     }
 357   } else {
 358     error(-1, "Illegal URI-type link");
 359   }
 360 }
 361
 362 LinkURI::~LinkURI() {
 363   if (uri)
 364     delete uri;
 365 }
 366
 367 //------------------------------------------------------------------------
 368 // LinkNamed
 369 //------------------------------------------------------------------------
 370
 371 LinkNamed::LinkNamed(Object *nameObj) {
 372   name = NULL;
 373   if (nameObj->isName()) {
 374     name = new GString(nameObj->getName());
 375   }
 376 }
 377
 378 LinkNamed::~LinkNamed() {
 379   if (name) {
 380     delete name;
 381   }
 382 }
 383
 384 //------------------------------------------------------------------------
 385 // LinkUnknown
 386 //------------------------------------------------------------------------
 387
 388 LinkUnknown::LinkUnknown(char *action1) {
 389   action = new GString(action1);
 390 }
 391
 392 LinkUnknown::~LinkUnknown() {
 393   delete action;
 394 }
 395
 396 //------------------------------------------------------------------------
 397 // Link
 398 //------------------------------------------------------------------------
 399
 400 Link::Link(Dict *dict, GString *baseURI) {
 401   Object obj1, obj2, obj3, obj4;
 402   double t;
 403
 404   action = NULL;
 405   ok = gFalse;
 406
 407   // get rectangle
 408   if (!dict->lookup("Rect", &obj1)->isArray()) {
 409     error(-1, "Annotation rectangle is wrong type");
 410     goto err2;
 411   }
 412   if (!obj1.arrayGet(0, &obj2)->isNum()) {
 413     error(-1, "Bad annotation rectangle");
 414     goto err1;
 415   }
 416   x1 = obj2.getNum();
 417   obj2.free();
 418   if (!obj1.arrayGet(1, &obj2)->isNum()) {
 419     error(-1, "Bad annotation rectangle");
 420     goto err1;
 421   }
 422   y1 = obj2.getNum();
 423   obj2.free();
 424   if (!obj1.arrayGet(2, &obj2)->isNum()) {
 425     error(-1, "Bad annotation rectangle");
 426     goto err1;
 427   }
 428   x2 = obj2.getNum();
 429   obj2.free();
 430   if (!obj1.arrayGet(3, &obj2)->isNum()) {
 431     error(-1, "Bad annotation rectangle");
 432     goto err1;
 433   }
 434   y2 = obj2.getNum();
 435   obj2.free();
 436   obj1.free();
 437   if (x1 > x2) {
 438     t = x1;
 439     x1 = x2;
 440     x2 = t;
 441   }
 442   if (y1 > y2) {
 443     t = y1;
 444     y1 = y2;
 445     y2 = t;
 446   }
 447
 448   // get border
 449   borderW = 0;
 450   if (!dict->lookup("Border", &obj1)->isNull()) {
 451     if (obj1.isArray() && obj1.arrayGet(2, &obj2)->isNum())
 452       borderW = obj2.getNum();
 453     else
 454       error(-1, "Bad annotation border");
 455     obj2.free();
 456   }
 457   obj1.free();
 458
 459   // look for destination
 460   if (!dict->lookup("Dest", &obj1)->isNull()) {
 461     action = new LinkGoTo(&obj1);
 462
 463   // look for action
 464   } else {
 465     obj1.free();
 466     if (dict->lookup("A", &obj1)->isDict()) {
 467       obj1.dictLookup("S", &obj2);
 468
 469       // GoTo action
 470       if (obj2.isName("GoTo")) {
 471         obj1.dictLookup("D", &obj3);
 472         action = new LinkGoTo(&obj3);
 473         obj3.free();
 474
 475       // GoToR action
 476       } else if (obj2.isName("GoToR")) {
 477         obj1.dictLookup("F", &obj3);
 478         obj1.dictLookup("D", &obj4);
 479         action = new LinkGoToR(&obj3, &obj4);
 480         obj3.free();
 481         obj4.free();
 482
 483       // Launch action
 484       } else if (obj2.isName("Launch")) {
 485         action = new LinkLaunch(&obj1);
 486
 487       // URI action
 488       } else if (obj2.isName("URI")) {
 489         obj1.dictLookup("URI", &obj3);
 490         action = new LinkURI(&obj3, baseURI);
 491         obj3.free();
 492
 493       // Named action
 494       } else if (obj2.isName("Named")) {
 495         obj1.dictLookup("N", &obj3);
 496         action = new LinkNamed(&obj3);
 497         obj3.free();
 498
 499       // unknown action
 500       } else if (obj2.isName()) {
 501         action = new LinkUnknown(obj2.getName());
 502
 503       // action is missing or wrong type
 504       } else {
 505         error(-1, "Bad annotation action");
 506         action = NULL;
 507       }
 508
 509       obj2.free();
 510
 511     } else {
 512       error(-1, "Missing annotation destination/action");
 513       action = NULL;
 514     }
 515   }
 516   obj1.free();
 517
 518   // check for bad action
 519   if (action && action->isOk())
 520     ok = gTrue;
 521
 522   return;
 523
 524  err1:
 525   obj2.free();
 526  err2:
 527   obj1.free();
 528 }
 529
 530 Link::~Link() {
 531   if (action)
 532     delete action;
 533 }
 534
 535 //------------------------------------------------------------------------
 536 // Links
 537 //------------------------------------------------------------------------
 538
 539 Links::Links(Object *annots, GString *baseURI) {
 540   Link *link;
 541   Object obj1, obj2;
 542   int size;
 543   int i;
 544
 545   links = NULL;
 546   size = 0;
 547   numLinks = 0;
 548
 549   if (annots->isArray()) {
 550     for (i = 0; i < annots->arrayGetLength(); ++i) {
 551       if (annots->arrayGet(i, &obj1)->isDict()) {
 552         if (obj1.dictLookup("Subtype", &obj2)->isName("Link")) {
 553           link = new Link(obj1.getDict(), baseURI);
 554           if (link->isOk()) {
 555             if (numLinks >= size) {
 556               size += 16;
 557               links = (Link **)grealloc(links, size * sizeof(Link *));
 558             }
 559             links[numLinks++] = link;
 560           } else {
 561             delete link;
 562           }
 563         }
 564         obj2.free();
 565       }
 566       obj1.free();
 567     }
 568   }
 569 }
 570
 571 Links::~Links() {
 572   int i;
 573
 574   for (i = 0; i < numLinks; ++i)
 575     delete links[i];
 576   gfree(links);
 577 }
 578
 579 LinkAction *Links::find(double x, double y) {
 580   int i;
 581
 582   for (i = 0; i < numLinks; ++i) {
 583     if (links[i]->inRect(x, y)) {
 584       return links[i]->getAction();
 585     }
 586   }
 587   return NULL;
 588 }
 589
 590 GBool Links::onLink(double x, double y) {
 591   int i;
 592
 593   for (i = 0; i < numLinks; ++i) {
 594     if (links[i]->inRect(x, y))
 595       return gTrue;
 596   }
 597   return gFalse;
 598 }
 599
 600 //------------------------------------------------------------------------
 601
 602 // Extract a file name from a file specification (string or dictionary).
 603 static GString *getFileSpecName(Object *fileSpecObj) {
 604   GString *name;
 605   Object obj1;
 606
 607   name = NULL;
 608
 609   // string
 610   if (fileSpecObj->isString()) {
 611     name = fileSpecObj->getString()->copy();
 612
 613   // dictionary
 614   } else if (fileSpecObj->isDict()) {
 615     if (!fileSpecObj->dictLookup("Unix", &obj1)->isString()) {
 616       obj1.free();
 617       fileSpecObj->dictLookup("F", &obj1);
 618     }
 619     if (obj1.isString())
 620       name = obj1.getString()->copy();
 621     else
 622       error(-1, "Illegal file spec in link");
 623     obj1.free();
 624
 625   // error
 626   } else {
 627     error(-1, "Illegal file spec in link");
 628   }
 629
 630   return name;
 631 }