TweetFollow Us on Twitter

Web Clipping

Volume Number: 18 (2002)
Issue Number: 8
Column Tag: Palm Programming

Web Clipping

Downloading a Palm OS Web Clipping Application via a Servlet

by Andrew S. Downs

Introduction to web clipping

Several years ago the Palm VII introduced users to the wireless web through its built-in browser (Web Clipper, or simply Clipper). This browser supports Web Clipping Applications (WCAs), thin-clients built using Palm's supported subset of HTML. WCAs may contain pages consisting of controls, text, images and links.

A WCA is a specialized type of Palm OS database (as are other Palm OS apps). You construct a WCA using Palm's builder tool. Note that, although a hierarchy of directories and files may be used when building the WCA, inside the database everything exists in one logical directory (retaining the original file names), thus requiring unique names across all input files (both HTML and images).

An advantage to this database-oriented approach is that all of the elements necessary to display a set of pages may be assembled into one package for download and subsequent browsing. A continuous network connection is not required for viewing the pages, although it is possible (and common) to place live links on those pages.

The WCA discussed later in this article contains no live external links (see Figure 1). One benefit of this approach is that no additional web access is required when constructing or using the WCA, saving both time and money. (The Palm VII wireless network can be slow and expensive, which becomes an important factor if you need to build a WCA dynamically or access live data.) The application described here functions the same over a wireline modem, which may be more cost effective than a wireless connection.


Figure 1. The WCA running under Clipper in the Palm emulator.

Non-Palm VII owners: Web Clipper is also included in the Mobile Internet Kit, a software upgrade that allows other Palm devices to access the Internet.

Components

There are several components to the system described in this article:

  • A native Palm app (a .prc) that initiates the request to download the WCA. This app contains information needed to connect to a server, including URL and username.

  • A Java servlet that returns the WCA from the server.

  • The raw material for the WCA. In this example, it is a static text page.

  • The Palm Query Application Builder (QAB) that creates the WCA. This tool is freely available for download. As of this writing the Macintosh version does not support execution via AppleScript or otherwise allow for command-line building or the inclusion of params. As always, check the Palm website for updates.

Palm app

The majority of the code presented in this article is for the Palm OS client application. The core functionality is in the Connection class (C++). It sequences the calls to retrieve and display a WCA.

Listing 1: Connection.cpp

Connection
The methods contained here include:
   Init: drives the overall connection and download process.
   Connect: sets up portions of the http request, and hands-off to a library-specific 
      method.
   LaunchClipper: invokes WebClipper to display the WCA. Most of this method came 
      from Palm's website.
   InvokeINetLib: use the INetLib to connect to a remote URL and download data.
   const int kGetFileSize = 0;
   const int kGetFile = 1;
   const ::Char * kUser = "sample";
   const ::Char * kUrl = 
      "http://yourdomain:8080/servlet/WcaServlet";
   const ::Char * kDatabaseName = "Sample.pqa";
   const int kInBufferSize = 1024;
   const int kDefaultMsgSize = 1024;
void Connection::Init( void ) {
   // Although not an absolute requirement for a small WCA, if we know how much 
   // space the downloaded WCA will take up, our code works more efficiently if we 
   // only allocate a temp buffer of the necessary size. Since the Connect() method does 
   // not currently return anything, there is code in InvokeINetLib() that saves the size. 
   // That is not done in this method.
   Connect( kGetFileSize, kUser, kUrl );
   // Retrieve the actual WCA from the server.
   Connect( kGetFile, kUser, kUrl );
   // Display the downloaded WCA without additional user intervention.
   LaunchClipper( "file:Sample.pqa" );
}
void Connection::Connect( int op, ::Char * user, 
   ::Char * url ) {
   // This string holds the additional params in the http request.
   ::Char * buf;
   // The string representation of the operation code goes here.
   ::Char opString[ 2 ];
   
   // Allocate a buffer for our outgoing request. The default size is stored in another class.
   buf = ( ::Char * )::MemPtrNew( kDefaultMsgSize );
      
   if ( buf ) {
      // Initialize the string.
      ::MemSet( buf, kDefaultMsgSize, '\0' );
      ::MemSet( opString, 2, '\0' );
      // Set the operation code.
      ::StrIToA( opString, op );
      // Create the interesting part of the request string, formatted for an http GET 
      // method. Append the user and operation code params.
      ::StrCat( buf, "?user=" );
      ::StrCat( buf, user );
      ::StrCat( buf, "&op=" );
      ::StrCat( buf, opString );
   
      // Invoke a library-specific method to connect to the server.
      // If we are not only using InetLib then wrap this in a conditional. 
      InvokeINetLib( url, buf, op );
         
      ::MemPtrFree( buf );
   }
}
// Most of this method came from Palm's website.
::Err Connection::LaunchClipper( const ::Char * origurl ) {
   ::Err err;
   ::Char * url = 0;
   ::DmSearchStateType searchState;
   ::UInt16 cardNo;
   ::LocalID dbID;
   ::UInt16 length = ::StrLen( origurl );
   
   // Copy the URL, since the OS will free the parameter once Clipper quits.
   url = ( ::Char * )::MemPtrNew( length );
   
   if ( !url )
      return sysErrNoFreeRAM;
   ::StrCopy( url, ( const ::Char * )origurl );
   ::MemPtrSetOwner( url, 0 );
   // Locate and launch Clipper.
   err = ::DmGetNextDatabaseByTypeCreator( true, 
      &searchState, sysFileTApplication, sysFileCClipper, 
      true, &cardNo, &dbID );
   // If Clipper is not present...
   if ( err ) {
      ::FrmAlert( NoClipperAlert );
      ::MemPtrFree( url );
   }
   else {
      err = ::SysUIAppSwitch( cardNo, dbID, 
         sysAppLaunchCmdGoToURL, url );
   }
   
   return err;
}
long Connection::InvokeINetLib( ::Char *theURL, 
   ::Char *theSuffix, int selector ) {
   long retval = -1;
   static int inBufferSize = 0;
   
   // Setup buffers.
   ::Char * in = (::Char *)::MemPtrNew( kInBufferSize );
   
   ::Char * out = 
      ( ::Char * )::MemPtrNew( kDefaultMsgSize );
   // After this, we have a url in the buffer similar to:
   // http://www.yourdomain:8080/WcaServlet?user=sample& op=0
   ::StrCopy( out, theURL );
   ::StrCat( out, theSuffix );
   ::Err err;
   
   ::UInt16 libRefnum;
   // Load net library.
   err = ::SysLibFind( "INet.lib", &libRefnum );
   if ( err ) {
      ErrNonFatalDisplay( "Unable to find INetLib" );
      goto close;
   }
   ::MemHandle inetH;
   ::UInt16 indexP;
   ::INetConfigNameType config;
   
   // Other possible values include inetCfgNameCTPWireless and
   // inetCfgNameDefWireless.
   ::StrCopy( config.name, inetCfgNameCTPDefault );
   
   // Get the configuration index of the net library.
   err = ::INetLibConfigIndexFromName( libRefnum, &config,
      &indexP );
   // Open the net library.
   err = ::INetLibOpen( libRefnum, indexP, 0, NULL, 0,
      &inetH );
   // Minor adjustments to the INetLib settings.
   // Set the buffer size.
   long tempValue = kInBufferSize;
   ::INetLibSettingSet( libRefnum, inetH,
      inetSettingMaxRspSize, &tempValue, 
      sizeof( tempValue ) );
   // Disable compression.
   tempValue = ctpConvNone;
   ::INetLibSettingSet(libRefnum, inetH,
      inetSettingConvAlgorithm, &tempValue,
      sizeof(tempValue));
   ::MemHandle theSocket;
   // So we don't wait forever...
   ::Int32 timeout = ::SysTicksPerSecond() * 15;
   
   // Send our request to the URL specified in our output buffer.
   err = ::INetLibURLOpen( libRefnum, inetH, 
      ( unsigned char * )out, NULL, &theSocket, timeout,
      inetOpenURLFlagForceEncOff );
   ::UInt32 bytes = 0, tempBytes = 0;
   
   ::UInt16 status = 0;
   
   ::INetEventType event;
   bool ready = false;
   // Wait for a change in the socket's status, which will be the signal that there is a 
   // response to process.
   while ( !ready ) {
      ::INetLibGetEvent( libRefnum, inetH, &event, timeout );
   
      if ( event.eType == inetSockReadyEvent || 
            event.eType == inetSockStatusChangeEvent )
         ready = true;
   }
   ::Int32 inMaxBufferSize = kInBufferSize;
   if ( selector == kGetFile && inBufferSize != -1 )
      inMaxBufferSize = inBufferSize;
   
   ::UInt32 numBytes = kDefaultMsgSize;
   // The value of in will change as data gets read into the buffer, so save the original
   // address for later.
   ::Char * oldIn = in;
   // Read incoming data, looping while there is still data available and we have not 
   // downloaded the entire WCA (when applicable.)
   do {
      tempBytes = 0;
      if ( ( inMaxBufferSize - bytes ) < kDefaultMsgSize ) {
         numBytes = inMaxBufferSize - bytes;
      }
   
      err = INetLibSockRead( libRefnum, theSocket, in,
         numBytes, &tempBytes, timeout );
      // Advance pointer.
      in += tempBytes;
      // Increment byte count.
      bytes += tempBytes;
         
   } while ( ( tempBytes != 0 ) && 
      ( bytes < inMaxBufferSize ) && ( !err ) );
         
   // Close socket.
   err = ::INetLibSockClose( libRefnum, theSocket );
   // Restore pointer to incoming data.
   in = oldIn;
   
   if (selector == kGetFileSize && bytes > 0) {
      inBufferSize = ::StrAToI(in);
   }
   
   if (selector == kGetFile && bytes > 0) {
      // The expected WCA name should be in the stream.
      ::Char * dataP = ::StrStr( in, kDatabaseName );
      
      if ( dataP == NULL ) {
         ErrDisplay( "String not found" );
         goto close;
      }
      
      Int32 num = bytes - ( dataP - in );
      
      ::LocalID id = ::DmFindDatabase( 0, kDatabaseName );
      if ( id != 0 ) {
         err = ::DmDeleteDatabase( 0, id );
         
         if ( err != errNone )
            goto close;
      }
      // We will first write the raw data to a temporary database.
      // Check whether that database already exists (a bad thing).
      id = ::DmFindDatabase( 0, "tempSample" );
      // If we did not clean up previously, delete the temp database.
      if ( id != 0 ) {
         err = ::DmDeleteDatabase( 0, id );
         
         if ( err != errNone )
            goto close;
      }
      // Create a temp database, assigning Clipper as the owner.
      err = ::DmCreateDatabase( 0, "tempSample", 0x636c7072,
               0x70716120, true );
      // Note: from here to the end of the method some of the error checking has been 
      // relaxed in order to shorten this example. Production code should check every 
      // return value and take appropriate action.
      if ( err != errNone )
         ErrDisplay( "DmCreateDatabase() returned err !=
            ErrNone");
      // Ensure that our creation attempt succeeded.
      id = ::DmFindDatabase( 0, "tempSample" );
      if ( id == 0 )
         ErrDisplay( "DmFindDatabase() returned id == 0" );
      // Open the database for writing.
      ::DmOpenRef ref = ::DmOpenDatabase( 0, id,
         dmModeReadWrite );
      
      if (ref == 0)
         ErrDisplay( "Error opening database" );
      // Create a resource of type 'pqa '.
      ::MemHandle res = ::DmNewResource( ref, 0x70716120, 0,
         num );
      
      if ( res == NULL )
         ErrDisplay( "DmNewResource() returned NULL" );
      
      // Lock the resource for use.
      ::MemPtr ptr = ::MemHandleLock( res );
      
      if ( ptr == 0 )
         ErrDisplay( "MemHandleLock() returned 0" );
      // Write the resource into the database.
      err = ::DmWrite( ptr, 0, dataP, num );
      
      if ( err != errNone )
         ErrDisplay( "Error writing resource" );
      // Use the raw data to create the "real" WCA. Not condoned by Palm
      // for non-system databases.
      err = ::DmCreateDatabaseFromImage( ptr );
      // Unlock and free up memory.
      err = ::MemHandleUnlock( res );
      
      if ( err != 0 )
         ErrDisplay( "MemHandleUnlock() returned err != 0" );
      
      err = ::DmReleaseResource( res );
      // At this point we are so close to being done that success is likely. 
      // Still, for consistency we check result codes.
      if ( err != errNone )
         ErrDisplay( "DmReleaseResource() returned
            err != errNone" );
      err = ::DmCloseDatabase( ref );
      
      if ( err != errNone )
         ErrDisplay( "DmCloseDatabase() returned
            err != errNone" );
      // Remove the temporary database.
      err = ::DmDeleteDatabase( 0, id );
      // Locate the real database and check that we can open it for reading.
      id = ::DmFindDatabase( 0, kDatabaseName );
      if ( id != 0 ) {
         ref = ::DmOpenDatabase( 0, id, dmModeReadOnly );
         err = ::DmCloseDatabase( ref );
      }
      // Return the number of bytes read.
      retval = bytes;
   }
   
close:
   err = ::INetLibClose( libRefnum, inetH );
   // Cleanup allocated memory.
   if ( out )
      ::MemPtrFree( out );
   // Reset pointer.
   in = oldIn;
   if ( in )
      ::MemPtrFree( in );
   return retval;
}

A Starter WCA

The Web Clipping Application in this example is intentionally simple. A WCA gets created using the Query Application Builder tool, from one or more HTML and image files. This example contains static text only, contained in one source HTML file. You can extend this WCA by adding a link or button that triggers a fetch of the latest information from the server.

Listing 2: index.html

A starting point for a Web Clipping Application (WCA). Note the inclusion of the 
Palm-identifier in the meta tag.

<html>
   <head>
      <meta name="palmcomputingplatform" content="true">
      <title>Sample WCA</title>
   </head>
   <body>
      <h3>Courtesy of the Web Clipping sample servlet!</h3>
   </body>
</html>

The servlet

The Java servlet illustrated here responds to client http requests, and can run on something as simple as Sun's servletrunner application (found in older versions of the Servlet Development Kit.) This servlet's primary task is to return the (already-built) WCA associated with a particular id.

This servlet accepts two parameters in the http request:

  • the name of a user, allowing us to return WCAs tailored to specific individuals, group, etc.

  • an operation code, allowing for multiple tasks to occur. This servlet can return the size of the WCA as a separate operation. This allows a client to request the WCA size first, setup a buffer to hold the actual WCA, then request the WCA itself.

Listing 3: WcaServlet.java

WcaServlet.java
Receive http requests from clients and return a built WCA.
import java.io.*;
import java.net.*;
import javax.servlet.*;
import javax.servlet.http.*;
public class WcaServlet extends HttpServlet { 
   // Elements passed in the request string.
   static final String kOperation = "op";
   static final String kUser = "user";
   
   // Operations we handle. Passed in request string.
   static final int kGetFileSize = 0;
   static final int kGetFile = 1;
   
   // Name of actual pqa file should be the same for all users. For flexibility, we can 
   // retrieve it from different folders as needed.
   final String kPqaFilename = "Sample.pqa";
   
   // Name of base directory (relative to servlet dir) from which to build path to pqa.
   final String kPartialPath = "dev/pqa/";
   
   // Most servlets do most of their work starting from doGet() or doPost(). 
   public void doGet( HttpServletRequest   request,
      HttpServletResponse response ) 
      throws ServletException, IOException {      
      // We can handle different users. The request carries the username as a param. 
      String user = request.getParameter( kUser );
      
      // The operation of interest also gets passed as a param.
      int op = Integer.parseInt( 
    ( String )request.getParameter( kOperation ) );
            
      // The output stream is where our response will go. 
      ServletOutputStream out = response.getOutputStream();
      switch ( op ) {
         // The file size is important when the receiver needs to know how big a buffer
         // to allocate for incoming data.
         case kGetFileSize:
            File pqa = new File( kPartialPath + username
               + "/" + kPqaFilename);
            
               // Write the file size to the output stream.
               if ( pqa != null && pqa.exists() && pqa.isFile())
                  out.println( pqa.length() );
            
            break;
            
         // Return the actual pqa in the output stream. 
         case kGetFile:
             // Build the path to the file, and attempt to open the file.
            FileInputStream fis = new FileInputStream(       
               kPartialPath + user + "/" + kPqaFilename );
               
            if ( fis != null ) {
               // Open a "pipe" to get data out of the file.
               DataInputStream bis = new DataInputStream( fis );
               // Copy the pqa to the output stream. This particular implementation can 
               // be improved upon by copying more than a byte at a time.
               while ( bis.available() > 0 )
                  out.write( bis.readByte() );
               bis.close();
               fis.close();
               out.close();
            }
            break;
            
         default:
            break;
      }
   }
}

It is possible to extend this servlet to dynamically build a WCA on demand. This would allow up-to-the-minute data to be inserted into a WCA targeted at a particular user. The operation code allows for some sophisticated handling of such user requests. For example, the servlet could respond to an initial request for a WCA by spawning a thread to build that WCA dynamically. Since it takes time to perform such a build, particularly if data must be fetched from the Internet, it would be desirable to add some status codes to the process. A client can request the current status of the build, loop while it is not complete, then request the WCA itself.

Enhancing the system

There are many bells and whistles that can be incorporated into this system. For example, the Java servlet may connect to an LDAP server to validate the user and obtain user-specific configuration information. Several servlet engines are available that can run this servlet, including the servletrunner application from Sun (good for testing), and apache.org's Tomcat. Non-Palm OS devices may be supported by the servlet: the type of client requesting a file could be sent as a param in the http request.

Many WCAs consist of one or more statically coded pages. But dynamic pages often work much better if you have access to a reliable mechanism for generating those pages. Java servlets provide an easy way to gather pages, build a WCA via a command-line prompt, and then download the WCA to the Palm device.

An alternative to building the WCA using the Palm tools would be to write the database format directly. Although the format has probably remained static over the past two years, it requires time (and money) to implement such a writing mechanism, whereas the build tools can be downloaded and setup very quickly.

Bibliography

Combee, Ben and R. Eric Lyons, David C. Matthews and Rory Lysaght. Palm OS Web Application Developer's Guide. Syngress Publishing, Inc., 2001.

Bachmann, Glenn. Palm Programming. Sams Publishing, 1999.

Hunter, Jason and William Crawford. Java Servlet Programming. O'Reilly & Associates, Inc., 1998.


Andrew has worked with Palm OS since 1999. He wrote the Palm OS wireless client for Snippets Software. You can reach him at andrew@downs.ws.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

The beginner's guide to Warbits
Warbits is a turn-based strategy that's clearly inspired by Nintendo's Advance Wars series. Since turn-based strategy games can be kind of tricky to dive into, see below for a few tips to help you in the beginning. Positioning is crucial [Read... | Read more »
How to upgrade your character in Spellsp...
So you’ve mastered the basics of Spellspire. By which I mean you’ve realised it’s all about spelling things in a spire. What next? Well you’re going to need to figure out how to toughen up your character. It’s all well and good being able to spell... | Read more »
5 slither.io mash-ups we'd love to...
If there's one thing that slither.io has proved, it's that the addictive gameplay of Agar.io can be transplanted onto basically anything and it will still be good fun. It wouldn't be surprising if we saw other developers jumping on the bandwagon,... | Read more »
How to navigate the terrain in Sky Charm...
Sky Charms is a whimsical match-'em up adventure that uses creative level design to really ramp up the difficulty. [Read more] | Read more »
Victorious Knight (Games)
Victorious Knight 1.3 Device: iOS Universal Category: Games Price: $1.99, Version: 1.3 (iTunes) Description: New challenges awaits you! Experience fresh RPG experience with a unique combat mechanic, packed with high quality 3D... | Read more »
Agent Gumball - Roguelike Spy Game (Gam...
Agent Gumball - Roguelike Spy Game 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Someone’s been spying on Gumball. What the what?! Two can play at that game! GO UNDERCOVERSneak past enemy... | Read more »
Runaway Toad (Games)
Runaway Toad 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: It ain’t easy bein’ green! Tap, hold, and swipe to help Toad hop to safety in this gorgeous new action game from the creators of... | Read more »
PsyCard (Games)
PsyCard 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: From the makers och Card City Nights, Progress To 100 and Ittle Dew PSYCARD is a minesweeper-like game set in a cozy cyberpunk... | Read more »
Sago Mini Robot Party (Education)
Sago Mini Robot Party 1.0 Device: iOS Universal Category: Education Price: $2.99, Version: 1.0 (iTunes) Description: -- Children's Technology Review Editor's Choice -- | Read more »
Egz – The Origin of the Universe (Games...
Egz – The Origin of the Universe 1.0.2 Device: iOS Universal Category: Games Price: $3.99, Version: 1.0.2 (iTunes) Description: ►►► Special offer until 2nd may : get the game at 2.99€ instead of 3.99€ ! ◄◄◄ Egz is a mesmerizing mix... | Read more »

Price Scanner via MacPrices.net

Mac minis on sale for up to $100 off MSRP
B&H Photo has Mac minis on sale for up to $100 off MSRP including free shipping plus NY sales tax only: - 1.4GHz Mac mini: $449 $50 off MSRP - 2.6GHz Mac mini: $649 $50 off MSRP - 2.8GHz Mac mini... Read more
13-inch Retina MacBook Pros on sale for up to...
B&H Photo has 13″ Retina MacBook Pros on sale for $130-$200 off MSRP. Shipping is free, and B&H charges NY tax only: - 13″ 2.7GHz/128GB Retina MacBook Pro: $1169 $130 off MSRP - 13″ 2.7GHz/... 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
SanDisk Half-Terabyte SSD Optimized for Every...
SanDisk Corporation has announced the SanDisk Z410 SSD, a cost-competitive, half-terabyte solid state drive (SSD) that enables manufacturers to design for a broad range of desktop PCs and laptops.... Read more
Churchill Downs Racetrack Selects VenueNext t...
Churchill Downs Racetrack has announced an agreement with VenueNext to implement its technology platform for the start of Churchill Downs 2016 Spring Meet, which includes the 142nd running of the... Read more
Record 700 Million Pounds of CE Recycled in 2...
The Consumer Technology Association (CTA) reports that a record-setting 700 million pounds of consumer electronics (CE) have been recycled under the eCycling Leadership Initiative (ELI). According to... Read more
Price drops on clearance 12-inch Retina MacBo...
B&H Photo has dropped prices on leftover 2015 12″ Retina MacBooks with models now available starting at $999. Shipping is free, and B&H charges NY tax only: - 12″ 1.1GHz Gray Retina MacBook... Read more
15-inch Retina MacBook Pros available for $20...
B&H Photo has 15″ Retina MacBook Pros on sale for up to $210 off MSRP. Shipping is free, and B&H charges NY tax only: - 15″ 2.2GHz Retina MacBook Pro: $1799 $200 off MSRP - 15″ 2.5GHz Retina... Read more
Target offers Apple Watch Sport for $50 off M...
Target has Apple Watch Sports on sale for $50 off MSRP for a limited time. Choose free shipping or free local store pickup (if available). Sale prices for online orders only, in-store prices may vary... Read more
Apple restocks Certified Refurbished Mac mini...
Apple has restocked Certified Refurbished 2014 Mac minis, with models available starting at $419. Apple’s one-year warranty is included with each mini, and shipping is free: - 1.4GHz Mac mini: $419 $... 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
Restaurant Manager (Neighborhood Captain) - A...
…in every aspect of daily operation. WHY YOU'LL LIKE IT: You'll be the Big Apple . You'll solve problems. You'll get to show your ability to handle the stress and Read more
Restaurant Manager (Neighborhood Captain) - A...
…in every aspect of daily operation. WHY YOU'LL LIKE IT: You'll be the Big Apple . You'll solve problems. You'll get to show your ability to handle the stress and Read more
Simply Mac *Apple* Specialist- Service Repa...
Simply Mac is the largest premier retailer of Apple products in the nation. In order to support our growing customer base, we are currently looking for a driven Read more
*Apple* Retail - Multiple Positions - Apple,...
Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, you're also the Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.