graphics/mapping.c

   1 /*
   2  * GDI mapping mode functions
   3  *
   4  * Copyright 1993 Alexandre Julliard
   5  */
   6
   7 #include <math.h>
   8 #include "dc.h"
   9 #include "stddebug.h"
  10 #include "debug.h"
  11
  12
  13 /***********************************************************************
  14  *           MAPPING_FixIsotropic
  15  *
  16  * Fix viewport extensions for isotropic mode.
  17  */
  18 void MAPPING_FixIsotropic( DC * dc )
  19 {
  20     double xdim = (double)dc->vportExtX * dc->w.devCaps->horzSize /
  21                   (dc->w.devCaps->horzRes * dc->wndExtX);
  22     double ydim = (double)dc->vportExtY * dc->w.devCaps->vertSize /
  23                   (dc->w.devCaps->vertRes * dc->wndExtY);
  24     if (xdim > ydim)
  25     {
  26         dc->vportExtX = dc->vportExtX * fabs( ydim / xdim );
  27         if (!dc->vportExtX) dc->vportExtX = 1;
  28     }
  29     else
  30     {
  31         dc->vportExtY = dc->vportExtY * fabs( xdim / ydim );
  32         if (!dc->vportExtY) dc->vportExtY = 1;
  33     }
  34 }
  35
  36
  37 /***********************************************************************
  38  *           DPtoLP16    (GDI.67)
  39  */
  40 BOOL16 DPtoLP16( HDC16 hdc, LPPOINT16 points, INT16 count )
  41 {
  42     DC * dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC );
  43     if (!dc) return FALSE;
  44
  45     while (count--)
  46     {
  47         points->x = XDPTOLP( dc, points->x );
  48         points->y = YDPTOLP( dc, points->y );
  49         points++;
  50     }
  51     return TRUE;
  52 }
  53
  54
  55 /***********************************************************************
  56  *           DPtoLP32    (GDI32.65)
  57  */
  58 BOOL32 DPtoLP32( HDC32 hdc, LPPOINT32 points, INT32 count )
  59 {
  60     DC * dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC );
  61     if (!dc) return FALSE;
  62
  63     while (count--)
  64     {
  65         points->x = XDPTOLP( dc, points->x );
  66         points->y = YDPTOLP( dc, points->y );
  67         points++;
  68     }
  69     return TRUE;
  70 }
  71
  72
  73 /***********************************************************************
  74  *           LPtoDP16    (GDI.99)
  75  */
  76 BOOL16 LPtoDP16( HDC16 hdc, LPPOINT16 points, INT16 count )
  77 {
  78     DC * dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC );
  79     if (!dc) return FALSE;
  80
  81     while (count--)
  82     {
  83         points->x = XLPTODP( dc, points->x );
  84         points->y = YLPTODP( dc, points->y );
  85         points++;
  86     }
  87     return TRUE;
  88 }
  89
  90
  91 /***********************************************************************
  92  *           LPtoDP32    (GDI32.247)
  93  */
  94 BOOL32 LPtoDP32( HDC32 hdc, LPPOINT32 points, INT32 count )
  95 {
  96     DC * dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC );
  97     if (!dc) return FALSE;
  98
  99     while (count--)
 100     {
 101         points->x = XLPTODP( dc, points->x );
 102         points->y = YLPTODP( dc, points->y );
 103         points++;
 104     }
 105     return TRUE;
 106 }
 107
 108
 109 /***********************************************************************
 110  *           SetMapMode16    (GDI.3)
 111  */
 112 INT16 SetMapMode16( HDC16 hdc, INT16 mode )
 113 {
 114     return SetMapMode32( hdc, mode );
 115 }
 116
 117
 118 /***********************************************************************
 119  *           SetMapMode32    (GDI32.321)
 120  */
 121 INT32 SetMapMode32( HDC32 hdc, INT32 mode )
 122 {
 123     INT32 prevMode;
 124     DC * dc = DC_GetDCPtr( hdc );
 125     if (!dc) return 0;
 126     if (dc->funcs->pSetMapMode) return dc->funcs->pSetMapMode( dc, mode );
 127
 128     dprintf_gdi(stddeb, "SetMapMode: %04x %d\n", hdc, mode );
 129
 130     prevMode = dc->w.MapMode;
 131     switch(mode)
 132     {
 133       case MM_TEXT:
 134           dc->wndOrgX   = dc->wndOrgY   = 0;
 135           dc->vportOrgX = dc->vportOrgY = 0;
 136           dc->wndExtX   = 1;
 137           dc->wndExtY   = 1;
 138           dc->vportExtX = 1;
 139           dc->vportExtY = 1;
 140           break;
 141
 142       case MM_LOMETRIC:
 143       case MM_ISOTROPIC:
 144           dc->wndOrgX   = dc->wndOrgY   = 0;
 145           dc->vportOrgX = dc->vportOrgY = 0;
 146           dc->wndExtX   = dc->w.devCaps->horzSize;
 147           dc->wndExtY   = dc->w.devCaps->vertSize;
 148           dc->vportExtX = dc->w.devCaps->horzRes / 10;
 149           dc->vportExtY = dc->w.devCaps->vertRes / -10;
 150           break;
 151
 152       case MM_HIMETRIC:
 153           dc->wndOrgX   = dc->wndOrgY   = 0;
 154           dc->vportOrgX = dc->vportOrgY = 0;
 155           dc->wndExtX   = dc->w.devCaps->horzSize * 10;
 156           dc->wndExtY   = dc->w.devCaps->vertSize * 10;
 157           dc->vportExtX = dc->w.devCaps->horzRes / 10;
 158           dc->vportExtY = dc->w.devCaps->vertRes / -10;
 159           break;
 160
 161       case MM_LOENGLISH:
 162           dc->wndOrgX   = dc->wndOrgY   = 0;
 163           dc->vportOrgX = dc->vportOrgY = 0;
 164           dc->wndExtX   = dc->w.devCaps->horzSize;
 165           dc->wndExtY   = dc->w.devCaps->vertSize;
 166           dc->vportExtX = 254L * dc->w.devCaps->horzRes / 1000;
 167           dc->vportExtY = -254L * dc->w.devCaps->vertRes / 1000;
 168           break;
 169
 170       case MM_HIENGLISH:
 171           dc->wndOrgX   = dc->wndOrgY   = 0;
 172           dc->vportOrgX = dc->vportOrgY = 0;
 173           dc->wndExtX   = dc->w.devCaps->horzSize * 10;
 174           dc->wndExtY   = dc->w.devCaps->vertSize * 10;
 175           dc->vportExtX = 254L * dc->w.devCaps->horzRes / 1000;
 176           dc->vportExtY = -254L * dc->w.devCaps->vertRes / 1000;
 177           break;
 178
 179       case MM_TWIPS:
 180           dc->wndOrgX   = dc->wndOrgY   = 0;
 181           dc->vportOrgX = dc->vportOrgY = 0;
 182           dc->wndExtX   = 144L * dc->w.devCaps->horzSize / 10;
 183           dc->wndExtY   = 144L * dc->w.devCaps->vertSize / 10;
 184           dc->vportExtX = 254L * dc->w.devCaps->horzRes / 1000;
 185           dc->vportExtY = -254L * dc->w.devCaps->vertRes / 1000;
 186           break;
 187
 188       case MM_ANISOTROPIC:
 189           break;
 190
 191       default:
 192           return prevMode;
 193     }
 194     dc->w.MapMode = mode;
 195     return prevMode;
 196 }
 197
 198
 199 /***********************************************************************
 200  *           SetViewportExt    (GDI.14)
 201  */
 202 DWORD SetViewportExt( HDC16 hdc, INT16 x, INT16 y )
 203 {
 204     SIZE32 size;
 205     if (!SetViewportExtEx32( hdc, x, y, &size )) return 0;
 206     return MAKELONG( size.cx, size.cy );
 207 }
 208
 209
 210 /***********************************************************************
 211  *           SetViewportExtEx16    (GDI.479)
 212  */
 213 BOOL16 SetViewportExtEx16( HDC16 hdc, INT16 x, INT16 y, LPSIZE16 size )
 214 {
 215     SIZE32 size32;
 216     BOOL16 ret = SetViewportExtEx32( hdc, x, y, &size32 );
 217     if (size) CONV_SIZE32TO16( &size32, size );
 218     return ret;
 219 }
 220
 221
 222 /***********************************************************************
 223  *           SetViewportExtEx32    (GDI32.340)
 224  */
 225 BOOL32 SetViewportExtEx32( HDC32 hdc, INT32 x, INT32 y, LPSIZE32 size )
 226 {
 227     DC * dc = DC_GetDCPtr( hdc );
 228     if (!dc) return FALSE;
 229     if (dc->funcs->pSetViewportExt)
 230         return dc->funcs->pSetViewportExt( dc, x, y );
 231     if (size)
 232     {
 233         size->cx = dc->vportExtX;
 234         size->cy = dc->vportExtY;
 235     }
 236     if ((dc->w.MapMode != MM_ISOTROPIC) && (dc->w.MapMode != MM_ANISOTROPIC))
 237         return TRUE;
 238     if (!x || !y) return FALSE;
 239     dc->vportExtX = x;
 240     dc->vportExtY = y;
 241     if (dc->w.MapMode == MM_ISOTROPIC) MAPPING_FixIsotropic( dc );
 242     return TRUE;
 243 }
 244
 245
 246 /***********************************************************************
 247  *           SetViewportOrg    (GDI.13)
 248  */
 249 DWORD SetViewportOrg( HDC16 hdc, INT16 x, INT16 y )
 250 {
 251     POINT32 pt;
 252     if (!SetViewportOrgEx32( hdc, x, y, &pt )) return 0;
 253     return MAKELONG( pt.x, pt.y );
 254 }
 255
 256
 257 /***********************************************************************
 258  *           SetViewportOrgEx16    (GDI.480)
 259  */
 260 BOOL16 SetViewportOrgEx16( HDC16 hdc, INT16 x, INT16 y, LPPOINT16 pt )
 261 {
 262     POINT32 pt32;
 263     BOOL16 ret = SetViewportOrgEx32( hdc, x, y, &pt32 );
 264     if (pt) CONV_POINT32TO16( &pt32, pt );
 265     return ret;
 266 }
 267
 268
 269 /***********************************************************************
 270  *           SetViewportOrgEx32    (GDI32.341)
 271  */
 272 BOOL32 SetViewportOrgEx32( HDC32 hdc, INT32 x, INT32 y, LPPOINT32 pt )
 273 {
 274     DC * dc = DC_GetDCPtr( hdc );
 275     if (!dc) return FALSE;
 276     if (dc->funcs->pSetViewportOrg)
 277         return dc->funcs->pSetViewportOrg( dc, x, y );
 278     if (pt)
 279     {
 280         pt->x = dc->vportOrgX;
 281         pt->y = dc->vportOrgY;
 282     }
 283     dc->vportOrgX = x;
 284     dc->vportOrgY = y;
 285     return TRUE;
 286 }
 287
 288
 289 /***********************************************************************
 290  *           SetWindowExt    (GDI.12)
 291  */
 292 DWORD SetWindowExt( HDC16 hdc, INT16 x, INT16 y )
 293 {
 294     SIZE32 size;
 295     if (!SetWindowExtEx32( hdc, x, y, &size )) return 0;
 296     return MAKELONG( size.cx, size.cy );
 297 }
 298
 299
 300 /***********************************************************************
 301  *           SetWindowExtEx16    (GDI.481)
 302  */
 303 BOOL16 SetWindowExtEx16( HDC16 hdc, INT16 x, INT16 y, LPSIZE16 size )
 304 {
 305     SIZE32 size32;
 306     BOOL16 ret = SetWindowExtEx32( hdc, x, y, &size32 );
 307     if (size) CONV_SIZE32TO16( &size32, size );
 308     return ret;
 309 }
 310
 311
 312 /***********************************************************************
 313  *           SetWindowExtEx32    (GDI32.344)
 314  */
 315 BOOL32 SetWindowExtEx32( HDC32 hdc, INT32 x, INT32 y, LPSIZE32 size )
 316 {
 317     DC * dc = DC_GetDCPtr( hdc );
 318     if (!dc) return FALSE;
 319     if (dc->funcs->pSetWindowExt) return dc->funcs->pSetWindowExt( dc, x, y );
 320     if (size)
 321     {
 322         size->cx = dc->wndExtX;
 323         size->cy = dc->wndExtY;
 324     }
 325     if ((dc->w.MapMode != MM_ISOTROPIC) && (dc->w.MapMode != MM_ANISOTROPIC))
 326         return TRUE;
 327     if (!x || !y) return FALSE;
 328     dc->wndExtX = x;
 329     dc->wndExtY = y;
 330     if (dc->w.MapMode == MM_ISOTROPIC) MAPPING_FixIsotropic( dc );
 331     return TRUE;
 332 }
 333
 334
 335 /***********************************************************************
 336  *           SetWindowOrg    (GDI.11)
 337  */
 338 DWORD SetWindowOrg( HDC16 hdc, INT16 x, INT16 y )
 339 {
 340     POINT32 pt;
 341     if (!SetWindowOrgEx32( hdc, x, y, &pt )) return 0;
 342     return MAKELONG( pt.x, pt.y );
 343 }
 344
 345
 346 /***********************************************************************
 347  *           SetWindowOrgEx16    (GDI.482)
 348  */
 349 BOOL16 SetWindowOrgEx16( HDC16 hdc, INT16 x, INT16 y, LPPOINT16 pt )
 350 {
 351     POINT32 pt32;
 352     BOOL16 ret = SetWindowOrgEx32( hdc, x, y, &pt32 );
 353     if (pt) CONV_POINT32TO16( &pt32, pt );
 354     return ret;
 355 }
 356
 357
 358 /***********************************************************************
 359  *           SetWindowOrgEx32    (GDI32.345)
 360  */
 361 BOOL32 SetWindowOrgEx32( HDC32 hdc, INT32 x, INT32 y, LPPOINT32 pt )
 362 {
 363     DC * dc = DC_GetDCPtr( hdc );
 364     if (!dc) return FALSE;
 365     if (dc->funcs->pSetWindowOrg) return dc->funcs->pSetWindowOrg( dc, x, y );
 366     if (pt)
 367     {
 368         pt->x = dc->wndOrgX;
 369         pt->y = dc->wndOrgY;
 370     }
 371     dc->wndOrgX = x;
 372     dc->wndOrgY = y;
 373     return TRUE;
 374 }
 375
 376
 377 /***********************************************************************
 378  *           OffsetViewportOrg    (GDI.17)
 379  */
 380 DWORD OffsetViewportOrg( HDC16 hdc, INT16 x, INT16 y )
 381 {
 382     POINT32 pt;
 383     if (!OffsetViewportOrgEx32( hdc, x, y, &pt )) return 0;
 384     return MAKELONG( pt.x, pt.y );
 385 }
 386
 387
 388 /***********************************************************************
 389  *           OffsetViewportOrgEx16    (GDI.476)
 390  */
 391 BOOL16 OffsetViewportOrgEx16( HDC16 hdc, INT16 x, INT16 y, LPPOINT16 pt )
 392 {
 393     POINT32 pt32;
 394     BOOL16 ret = OffsetViewportOrgEx32( hdc, x, y, &pt32 );
 395     if (pt) CONV_POINT32TO16( &pt32, pt );
 396     return ret;
 397 }
 398
 399
 400 /***********************************************************************
 401  *           OffsetViewportOrgEx32    (GDI32.257)
 402  */
 403 BOOL32 OffsetViewportOrgEx32( HDC32 hdc, INT32 x, INT32 y, LPPOINT32 pt )
 404 {
 405     DC * dc = DC_GetDCPtr( hdc );
 406     if (!dc) return FALSE;
 407     if (dc->funcs->pOffsetViewportOrg)
 408         return dc->funcs->pOffsetViewportOrg( dc, x, y );
 409     if (pt)
 410     {
 411         pt->x = dc->vportOrgX;
 412         pt->y = dc->vportOrgY;
 413     }
 414     dc->vportOrgX += x;
 415     dc->vportOrgY += y;
 416     return TRUE;
 417 }
 418
 419
 420 /***********************************************************************
 421  *           OffsetWindowOrg    (GDI.15)
 422  */
 423 DWORD OffsetWindowOrg( HDC16 hdc, INT16 x, INT16 y )
 424 {
 425     POINT32 pt;
 426     if (!OffsetWindowOrgEx32( hdc, x, y, &pt )) return 0;
 427     return MAKELONG( pt.x, pt.y );
 428 }
 429
 430
 431 /***********************************************************************
 432  *           OffsetWindowOrgEx16    (GDI.477)
 433  */
 434 BOOL16 OffsetWindowOrgEx16( HDC16 hdc, INT16 x, INT16 y, LPPOINT16 pt )
 435 {
 436     POINT32 pt32;
 437     BOOL16 ret = OffsetWindowOrgEx32( hdc, x, y, &pt32 );
 438     if (pt) CONV_POINT32TO16( &pt32, pt );
 439     return ret;
 440 }
 441
 442
 443 /***********************************************************************
 444  *           OffsetWindowOrgEx32    (GDI32.258)
 445  */
 446 BOOL32 OffsetWindowOrgEx32( HDC32 hdc, INT32 x, INT32 y, LPPOINT32 pt )
 447 {
 448     DC * dc = DC_GetDCPtr( hdc );
 449     if (!dc) return FALSE;
 450     if (dc->funcs->pOffsetWindowOrg)
 451         return dc->funcs->pOffsetWindowOrg( dc, x, y );
 452     if (pt)
 453     {
 454         pt->x = dc->wndOrgX;
 455         pt->y = dc->wndOrgY;
 456     }
 457     dc->wndOrgX += x;
 458     dc->wndOrgY += y;
 459     return TRUE;
 460 }
 461
 462
 463 /***********************************************************************
 464  *           ScaleViewportExt    (GDI.18)
 465  */
 466 DWORD ScaleViewportExt( HDC16 hdc, INT16 xNum, INT16 xDenom,
 467                         INT16 yNum, INT16 yDenom )
 468 {
 469     SIZE32 size;
 470     if (!ScaleViewportExtEx32( hdc, xNum, xDenom, yNum, yDenom, &size ))
 471         return FALSE;
 472     return MAKELONG( size.cx,  size.cy );
 473 }
 474
 475
 476 /***********************************************************************
 477  *           ScaleViewportExtEx16    (GDI.484)
 478  */
 479 BOOL16 ScaleViewportExtEx16( HDC16 hdc, INT16 xNum, INT16 xDenom,
 480                              INT16 yNum, INT16 yDenom, LPSIZE16 size )
 481 {
 482     SIZE32 size32;
 483     BOOL16 ret = ScaleViewportExtEx32( hdc, xNum, xDenom, yNum, yDenom,
 484                                        &size32 );
 485     if (size) CONV_SIZE32TO16( &size32, size );
 486     return ret;
 487 }
 488
 489
 490 /***********************************************************************
 491  *           ScaleViewportExtEx32    (GDI32.293)
 492  */
 493 BOOL32 ScaleViewportExtEx32( HDC32 hdc, INT32 xNum, INT32 xDenom,
 494                              INT32 yNum, INT32 yDenom, LPSIZE32 size )
 495 {
 496     DC * dc = DC_GetDCPtr( hdc );
 497     if (!dc) return FALSE;
 498     if (dc->funcs->pScaleViewportExt)
 499         return dc->funcs->pScaleViewportExt( dc, xNum, xDenom, yNum, yDenom );
 500     if (size)
 501     {
 502         size->cx = dc->vportExtX;
 503         size->cy = dc->vportExtY;
 504     }
 505     if ((dc->w.MapMode != MM_ISOTROPIC) && (dc->w.MapMode != MM_ANISOTROPIC))
 506         return TRUE;
 507     if (!xNum || !xDenom || !xNum || !yDenom) return FALSE;
 508     dc->vportExtX = (dc->vportExtX * xNum) / xDenom;
 509     dc->vportExtY = (dc->vportExtY * yNum) / yDenom;
 510     if (dc->vportExtX == 0) dc->vportExtX = 1;
 511     if (dc->vportExtY == 0) dc->vportExtY = 1;
 512     if (dc->w.MapMode == MM_ISOTROPIC) MAPPING_FixIsotropic( dc );
 513     return TRUE;
 514 }
 515
 516
 517 /***********************************************************************
 518  *           ScaleWindowExt    (GDI.16)
 519  */
 520 DWORD ScaleWindowExt( HDC16 hdc, INT16 xNum, INT16 xDenom,
 521                       INT16 yNum, INT16 yDenom )
 522 {
 523     SIZE32 size;
 524     if (!ScaleWindowExtEx32( hdc, xNum, xDenom, yNum, yDenom, &size ))
 525         return FALSE;
 526     return MAKELONG( size.cx,  size.cy );
 527 }
 528
 529
 530 /***********************************************************************
 531  *           ScaleWindowExtEx16    (GDI.485)
 532  */
 533 BOOL16 ScaleWindowExtEx16( HDC16 hdc, INT16 xNum, INT16 xDenom,
 534                            INT16 yNum, INT16 yDenom, LPSIZE16 size )
 535 {
 536     SIZE32 size32;
 537     BOOL16 ret = ScaleWindowExtEx32( hdc, xNum, xDenom, yNum, yDenom,
 538                                      &size32 );
 539     if (size) CONV_SIZE32TO16( &size32, size );
 540     return ret;
 541 }
 542
 543
 544 /***********************************************************************
 545  *           ScaleWindowExtEx32    (GDI32.294)
 546  */
 547 BOOL32 ScaleWindowExtEx32( HDC32 hdc, INT32 xNum, INT32 xDenom,
 548                            INT32 yNum, INT32 yDenom, LPSIZE32 size )
 549 {
 550     DC * dc = DC_GetDCPtr( hdc );
 551     if (!dc) return FALSE;
 552     if (dc->funcs->pScaleWindowExt)
 553         return dc->funcs->pScaleWindowExt( dc, xNum, xDenom, yNum, yDenom );
 554     if (size)
 555     {
 556         size->cx = dc->wndExtX;
 557         size->cy = dc->wndExtY;
 558     }
 559     if ((dc->w.MapMode != MM_ISOTROPIC) && (dc->w.MapMode != MM_ANISOTROPIC))
 560         return TRUE;
 561     if (!xNum || !xDenom || !xNum || !yDenom) return FALSE;
 562     dc->wndExtX = (dc->wndExtX * xNum) / xDenom;
 563     dc->wndExtY = (dc->wndExtY * yNum) / yDenom;
 564     if (dc->wndExtX == 0) dc->wndExtX = 1;
 565     if (dc->wndExtY == 0) dc->wndExtY = 1;
 566     if (dc->w.MapMode == MM_ISOTROPIC) MAPPING_FixIsotropic( dc );
 567     return TRUE;
 568 }