TweetFollow Us on Twitter

Ports
Volume Number:1
Issue Number:4
Column Tag:C Workshop

Ports

By Chris Derossi

When one thinks of the Macintosh, one of the first things to come to mind is the Mac’s frequent use of windows for multiple, independent areas or objects. Usually, one window is related to one task or concept, and tasks that have very different orientations are in separate windows.

There are several benefits for grouping items or tasks into separate windows. The most important is user interfacing. By using windows, the user can conceptually group similar or common things. This makes the use of sotware more intuitive because the user is shielded from modes in the software. In other words, instead of explicitly needing to have the computer switch to a different mode, all that is needed is to begin operations in a different window.

Obviously, the more intuitive for the user that your software is, the better. Indeed, one of the primary concepts of the Macintosh is that of using tools like icons, the mouse, and windows to decrease the need for special knowledge or special education. In this article, we will take a look at the concept behind windows, that of ports. (In a later article, we will examine windows more closely.)

In order to facilitate the creation of independent windows, the implementation of ports or graph ports provides for completely separate drawing envir- onments. That is, each port is an entire drawing environment, and operations with one port are not related to another.

At any given time, after QuickDraw is initialized, a single port is always active, and is considered the current graph port. QuickDraw operations always occur within the current graph port.

With each graph port are associated several characteristics and parameters. These include location of the port’s bit map, size, clipping region, visible region, background color, and several text mode values. The port’s bit map refers to an area of memory where the bit image of any drawing is put. Usually, this coincides with an area of the screen ram, so that drawing is displayed on the screen. However, this is not a requirement. The port’s bit map can be any area of memory on or off the screen. For example, a port may use an off-screen bit map to prepare an image, then move that image into the screen bit map.

The size of the port is determined by an enclosing rectangle. The rectangle encloses part of the bit map and indicates size and position within the bit map. For ports that are visible, the rectangle encloses an area of the screen.

Clipping region and visible region both restrict the available drawing area within a graph port. While the port itself is rectangular, the clipping and visible areas are regions, providing total flexibility with shape and configuration. The visible region acts like a clipping region, but is separate from it mainly for use by the window manager. (When one window overlaps another, the visible region of the bottom window is set to equal the part of the port that still shows.) There are two regions so that the user may have a region for clipping that is unrelated to the the region needed by the window manager for handling overlap.

Each port is its own drawing environment, and as such has its own drawing characteristics such as pen size, pattern, position, etc. Also, each port has its own text drawing characteristics that are used by the font manager. This way, you need only choose which port in which to draw, and the font, style, and text size associated with that port are automatically used.

In addition to having its own locations, size, and modes, each graph port may also have its own coordinate system. That is, regardless of where on the screen the port is displayed, the upper left corner of the port may be any coordinate. Usually, of course, the upper left coordinate is assigned the value 0,0. This is useful because neither the user nor the programmer need be concerned with the actual position of any port; drawing may be made as if the port were the entire universe. (You might begin to see why moving windows around is so easy; the coordinates inside the window remain constant.)

Since the available coordinate plane is much larger than any visible graph port, this feature allows ports to ‘look at’ different areas of the coordinate plane. For example, a program may draw on the entire plane, and different graph ports may be created as neccessary to view separate parts of the entire area. This can be done without the need for conversions either in the drawing or the displaying; QuickDraw handles all conversions.

There are two important programming practices to develop with regards to ports. The first has already been mentioned; it is a good idea to group similar things, and separate dissimilar things. The second idea is that of port independence. Programs should be written to not rely on any port size or location. (When changing the size of a window, for instance, the program should NOT need a certain size window to perform.)

The sample program this month illustrates the second concept, as the first one is much easier to practice. In this program, the user ‘creates’ television sets on which drawing is displayed. While drawing is occurring, the user may create more TVs, or change which one is active. All this is done by clicking the mouse. If the mouse is clicked in a TV, it becomes the active one, if not, a new TV is created.

Each TV, of course, is a graph port. A port is created, and then in that port a television is drawn. Then, the clipping region of that port is restricted to the ‘picture tube’ part of the picture.

Drawing continues, regardless of which port is active, or where it is. The placement of the port, and the selection of the current port is entirely up to the user. Notice, that the main drawing procedure has absolutely no idea which port is active.

In order to avoid running out of memory, the number of possible ports is restricted. You may vary the constant ‘MaxPorts’ as you like. An array is set up called ‘Screens’ which contains pointers to the graph ports. QuickDraw procedures and functions that act upon ports take a pointer to the port as the parameter, not the port itself. The port is left to be dynamically allocated for flexibility. The type ‘GrafPtr’ is the predefined pointer to a graph port.

The variable ScrnCnt keeps track of how many ports we have created. Since we want to draw only on our TV screens, drawing does not occur if the user has not created any ports yet. When the user clicks the mouse, the program checks to see if the position of the mouse is inside any graph port. The point must first be brought to global coordinates, which makes it independent of any port. Then, one by one, the point is referenced to each graph port and checked against that port’s rectangle. If the point is inside the rectangle, that port is selected as the current one.

When the point lies outside all ports, a new port is created. (Unless all possible ports have been created already; then the program terminates.) The port is initialized and its characteristics are set. Then, the TV is drawn in the port, and the clipping region set. The new port is also set as the current port. Notice that the program explicitly sets the port’s origin. Try playing with the origin values.

When the program ends, it closes each port one by one and frees the memory used by the ports. Then, it creates another temporary port that covers the entire screen. (The default values for the size and location of the port coincide with the screen.) This port is then filled with gray to eliminate the other graphics. Finally, this temporary port is also closed and its memory freed.

Although this is a simple example, it demonstrates a very powerful principle; that of independence. The more independent you programs are, the more flexible they are, and the more control the user may have. This avoids placing pointless limitations on your programs and their users. In addition, programming of this nature helps keep programs functional when the environment changes. (Like moving from a Mac to the Lisa with MacWorks, or future, improved machines.)

This concludes our introduction to the basics of QuickDraw. With this foundation, we can move on into the rest of the Macintosh with a strong background. You might want to try and improve on this sample program as an excersize to increase your skill. For example, try to allow the user to select the size as well as the location of the port. Or, try to prevent the ports from overlapping. If you’re really enthusiastic, have all the TV sets going at once, and let the user change ‘channels’ on each of them, causing different graphics to appear on each channel.

In the next issue, we’ll extend the discussion of ports to windows. We’ll find out what the concept of windows adds to the already powerful idea of ports, and find out what features are provided to the user through the use of windows. Ciao.

program Ports_Demo;

{ Ports_Demo - for MacTutor}
{ -- by Chris Derossi}

 uses
  QuickDraw2;  {QuickDraw2 contains the stuff for regions.}

 const
  MaxScreens = 8;

 type
  TVList = array[1..MaxScreens] of GrafPtr;

 var
  Screens : TVList;
  ScrnCnt : INTEGER;
  done : BOOLEAN;

 procedure SetUp;

 begin
  HideAll;
  ScrnCnt := 0;
  done := FALSE;
 end;

 procedure ShutDown;

  var
   TempPort : GrafPtr;

 begin
  while ScrnCnt > 0 do
   begin
    ClosePort(Screens[ScrnCnt]);
    Dispose(Screens[ScrnCnt]);
    ScrnCnt := ScrnCnt - 1;
   end;

{ Create a new port and fill the screen with gray. }
  NEW(TempPort);
  OpenPort(TempPort);
  BackPat(Gray);
  EraseRect(TempPort^.PortRect);
  ClosePort(TempPort);
  Dispose(TempPort);
 end;

 function MakeTV (Left, Top : INTEGER) : GrafPtr;

  var
   TempPtr : GrafPtr;
   WorkRect : Rect;

 begin
{ Create a new port and set its characteristics. }
  NEW(TempPtr);
  OpenPort(TempPtr);
  PortSize(100, 80);
  MovePortTo(Left, Top);
  SetOrigin(0, 0);

{ Clear the port to white and draw our ‘television’ }
  BackPat(White);
  EraseRect(TempPtr^.PortRect);
  FrameRect(TempPtr^.PortRect);
  MoveTo(80, 0);
  LineTo(80, 80);
  SetRect(WorkRect, 85, 10, 95, 20);
  FrameOval(WorkRect);
  SetRect(WorkRect, 85, 30, 95, 40);
  FrameOval(WorkRect);

{ Restrict the clipping region to the TV ‘screen’ }
  WorkRect := TempPtr^.PortRect;
  WorkRect.right := WorkRect.Right - 20;
  InsetRect(WorkRect, 1, 1);
  ClipRect(WorkRect);
  MakeTV := TempPtr;
 end;

 procedure SetTV;

{ If the mouse is in one of our ports, select that port. If all}
{possible ports are created and the mouse is not in any port,}
{then we’re done. Otherwise, create a new port.}

  var
   MousePt, Pnt1 : Point;
   I, X, Y : INTEGER;
   TempPtr : GrafPtr;

 begin
  TempPtr := nil;
  GetMouse(X, Y); { Current port’s local coordinates }
  repeat { nothing }
  until not Button;

{ Convert to a point, the to global coordinates }
  MousePt.h := X;
  MousePt.v := Y;
  LocalToGlobal(MousePt);
  Pnt1 := MousePt;

{ Scan the existing ports. }
  if ScrnCnt > 0 then { we have some ports to scan }
   for I := 1 to ScrnCnt do
    begin
    SetPort(Screens[I]);
    MousePt := Pnt1;
    GlobalToLocal(MousePt);
    if PtInRect(MousePt, Screens[I]^.PortRect) then
    TempPtr := Screens[I];
    end; { for loop }

  if TempPtr <> nil then { the mouse is in a port; set it }
   SetPort(TempPtr)
  else if ScrnCnt = MaxScreens then { all ports used }
   done := TRUE
  else
   begin
    ScrnCnt := ScrnCnt + 1;
    Screens[ScrnCnt] := MakeTV(Pnt1.h, Pnt1.v);
   end;
 end;

 procedure MainLoop;

  var
   Figure : INTEGER;
   WorkRect : Rect;

 begin
  if Button then
   SetTV;

  if ScrnCnt > 0 then { do some drawing }
   begin
    if random mod 100 < 5 then { Clear the ‘screen’ }
    begin
    SetRect(WorkRect, 0, 0, 90, 90);
    EraseRect(WorkRect);
    end;

{ Create a random rectangle for drawing }
    WorkRect.top := random mod 80;
    WorkRect.left := random mod 80;
    WorkRect.right := WorkRect.left + (random mod 60);
    WorkRect.bottom := WorkRect.top + (random mod 60);
    Figure := random mod 6;
    case Figure of
    0 : 
    FrameRect(WorkRect);
    1 : 
    FrameRoundRect(WorkRect, 18, 18);
    2 : 
    FrameOval(WorkRect);
    3 : 
    PaintRect(WorkRect);
    4 : 
    PaintRoundRect(WorkRect, 18, 18);
    5 : 
    PaintOval(WorkRect);
    end;
   end;
 end;

begin   { Ports_Demo }
 SetUp;
 while not done do
  MainLoop;
 ShutDown;
end.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

1Password 6.6.4 - Powerful password mana...
1Password is a password manager that uniquely brings you both security and convenience. It is the only program that provides anti-phishing protection and goes beyond password management by adding Web... Read more
Cocktail 10.3.1 - General maintenance an...
Cocktail is a general purpose utility for macOS that lets you clean, repair and optimize your Mac. It is a powerful digital toolset that helps hundreds of thousands of Mac users around the world get... Read more
Safari Technology Preview 10.2 - The new...
Safari Technology Preview contains the most recent additions and improvements to WebKit and the latest advances in Safari web technologies. And once installed, you will receive notifications of... Read more
Together 3.8 - Store and organize all of...
Together helps you organize your Mac, giving you the ability to store, edit and preview your files in a single clean, uncluttered interface. Features Smart storage. With simple drag-and-drop... Read more
GraphicConverter 10.4 - $39.95
GraphicConverter is an all-purpose image-editing program that can import 200 different graphic-based formats, edit the image, and export it to any of 80 available file formats. The high-end editing... Read more
beaTunes 4.6.13 - Organize your music co...
beaTunes is a full-featured music player and organizational tool for music collections. How well organized is your music library? Are your artists always spelled the same way? Any R.E.M. vs REM?... Read more
Vienna 3.1.9 :e81515b: - RSS and Atom ne...
Vienna is a freeware and Open-Source RSS/Atom newsreader with article storage and management via a SQLite database, written in Objective-C and Cocoa, for the OS X operating system. It provides... Read more
iExplorer 4.0.12.0 - View and transfer f...
iExplorer is an iPhone browser for Mac lets you view the files on your iOS device. By using a drag and drop interface, you can quickly copy files and folders between your Mac and your iPhone or... Read more
OpenEmu 2.0.5 - Open Source game-emulati...
OpenEmu is about to change the world of video game emulation, one console at a time... For the first time, the 'It just works' philosophy now extends to open source video game emulation on the Mac.... Read more
TextSoap 8.3.3 - Automate tedious text d...
TextSoap can automatically remove unwanted characters, fix up messed up carriage returns, and do pretty much anything else that we can think of to text. Save time and effort. Be more productive. Stop... Read more

Leap to victory in Nexx Studios new plat...
You’re always a hop, skip, and a jump away from a fiery death in Temple Jump, a new platformer-cum-endless runner from Nexx Studio. It’s out now on both iOS and Android if you’re an adventurer seeking treasure in a crumbling, pixel-laden temple. | Read more »
Failbetter Games details changes coming...
Sunless Sea, Failbetter Games' dark and gloomy sea explorer, sets sail for the iPad tomorrow. Ahead of the game's launch, Failbetter took to Twitter to discuss what will be different in the mobile version of the game. Many of the changes make... | Read more »
Splish, splash! The Pokémon GO Water Fes...
Niantic is back with a new festival for dedicated Pokémon GO collectors. The Water Festival officially kicks off today at 1 P.M. PDT and runs through March 29. Magikarp, Squirtle, Totodile, and their assorted evolved forms will be appearing at... | Read more »
Death Road to Canada (Games)
Death Road to Canada 1.0 Device: iOS Universal Category: Games Price: $7.99, Version: 1.0 (iTunes) Description: Get it now at the low launch price! Price will go up a dollar every major update. Update news at the bottom of this... | Read more »
Bean's Quest Beginner's Guide:...
Bean's Quest is a new take on both the classic platformer and the endless runner, and it's free on the App Store for the time being. Instead of running constantly, you can't stop jumping. That adds a surprising new level of challenge to the game... | Read more »
How to rake in the cash in Bit City
Our last Bit City guide covered the basics. Now it's time to get into some of the more advanced techniques. In the later cities, cash flow becomes much more difficult, so you'll want to develop some strategies if you want to complete each level.... | Read more »
PixelTerra (Games)
PixelTerra 1.1.1 Device: iOS Universal Category: Games Price: $.99, Version: 1.1.1 (iTunes) Description: The world of PixelTerra is quite dangerous so you need to build a shelter, find some food supply and get ready to protect... | Read more »
Tokaido™ (Games)
Tokaido™ 1.0 Device: iOS Universal Category: Games Price: $6.99, Version: 1.0 (iTunes) Description: Discover the digital adaptation of Tokaido, the boardgame phenomenon that has already sold more than 250,000 copies worldwide, and... | Read more »
Card Thief (Games)
Card Thief 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Card Thief is a solitaire style stealth game played with a deck of cards. In Card Thief you move through a deck of cards as a... | Read more »
Smilegate’s crafting battler Super Tank...
Super Tank Rumbleputs you in the seat of your very own, handcrafted tank. You can choose from over 100 different parts to create your Super Tank before taking it out to wreak havoc on your opponents in glorious PVP combat. Now, Smilegate is upping... | Read more »

Price Scanner via MacPrices.net

Apple’s iPhone 6s Tops Best-Selling Smartphon...
In terms of shipments, the iPhone 6s from Apple bested all competitors for sales in 2016, according to new analysis from IHS Markit, a world leader in critical information, analytics and solutions.... Read more
Logitech Rugged Combo Protective iPad Case an...
Logitech has announced its Logitech Rugged Combo, Logitech Rugged Case, and Logitech Add-on Keyboard for Rugged Case for Apple’s new, more affordable $329 9.7-inch iPad, a complete solution designed... Read more
T-Mobile To Offer iPhone 7 and iPhone 7 Plus...
T-Mobile has announced it will offer iPhone 7 and iPhone 7 Plus (PRODUCT)RED Special Edition in a vibrant red aluminum finish. The introduction of this special edition iPhone celebrates Apple’s 10... Read more
9-inch 128GB iPad Pros on sale for $50-$70 of...
B&H Photo has 9.7″ 128GB Apple WiFi iPad Pros on sale for up to $70 off MSRP, each including free shipping. B&H charges sales tax in NY only: - 9″ Space Gray 128GB WiFi iPad Pro: $649 $50... Read more
27-inch iMacs on sale for up to $200 off MSRP...
B&H Photo has 27″ Apple iMacs on sale for up to $200 off MSRP, each including free shipping plus NY sales tax only: - 27″ 3.3GHz iMac 5K: $2099 $200 off MSRP - 27″ 3.2GHz/1TB Fusion iMac 5K: $... Read more
Save up to $600 with Apple refurbished Mac Pr...
Apple has Certified Refurbished Mac Pros available for up to $600 off the cost of new models. An Apple one-year warranty is included with each Mac Pro, and shipping is free. The following... Read more
Save $230 with Apple Certified Refurbished 13...
Apple is now offering Certified Refurbished 2016 13″ 2.0GHz non-Touch Bar MacBook Pros for $230 off original MSRP. An Apple one-year warranty is included with each model, and shipping is free: - 13″... Read more
Apple price trackers, updated continuously
Scan our Apple Price Trackers for the latest information on sales, bundles, and availability on systems from Apple’s authorized internet/catalog resellers. We update the trackers continuously: - 15″... Read more
13-inch Touch Bar MacBook Pros on sale for up...
B&H Photo has the Apple 13″ Touch Bar MacBook Pros in stock today and on sale for up to $150 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 13″ 2.9GHz/512GB Touch Bar... Read more
Today only! 15-inch 2.7GHz Space Gray Touch B...
B&H Photo has the new 2016 15″ 2.7GHz Space Gray Apple Touch Bar MacBook Pro in stock today and on sale for $300 off MSRP for today only. Shipping is free, and B&H charges NY sales tax only... Read more

Jobs Board

*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
Director, *Apple* Program - ERP & Cloud...
Leading Pharmaceutical / Biotech Company is announcing a Director, Apple Program - ERP & Cloud Platform Architecture Lead opportunity in Northbrook, IL. Purpose & Read more
Fulltime aan de slag als shopmanager in een h...
Ben jij helemaal gek van Apple -producten en vind je het helemaal super om fulltime shopmanager te zijn in een jonge en hippe elektronicazaak? Wil jij werken in Read more
Starte Dein Karriere-Abenteuer in den Hauptst...
…mehrsprachigen Teams betreust Du Kunden von bekannten globale Marken wie Apple , Mercedes, Facebook, Expedia, und vielen anderen! Funktion Du wolltest schon Read more
*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.