188 lines
		
	
	
		
			4.8 KiB
		
	
	
	
		
			C++
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			188 lines
		
	
	
		
			4.8 KiB
		
	
	
	
		
			C++
		
	
	
		
			Executable File
		
	
	
	
	
| //
 | |
| // CXL_WMEM.CPP
 | |
| //
 | |
| //  Source file for ArchiveLib 2.0
 | |
| //
 | |
| //  Copyright (c) Greenleaf Software, Inc. 1994-1996
 | |
| //  All Rights Reserved
 | |
| //
 | |
| // CONTENTS
 | |
| //
 | |
| //  ALWinMemoryGetHandle()
 | |
| //  ALWinMemoryGetBuffer()
 | |
| //
 | |
| // DESCRIPTION
 | |
| //
 | |
| //  These two functions provide the C interface to member functions
 | |
| //  of ALWinMemory.
 | |
| //
 | |
| // REVISION HISTORY
 | |
| //
 | |
| //   February 14, 1996  2.0A : New release
 | |
| //
 | |
| 
 | |
| #include "arclib.h"
 | |
| #if !defined( AL_IBM )
 | |
| #pragma hdrstop
 | |
| #endif
 | |
| 
 | |
| #include "memstore.h"
 | |
| 
 | |
| //
 | |
| // NAME
 | |
| //
 | |
| //  ALWinMemoryGetHandle()
 | |
| //
 | |
| // PLATFORMS/ENVIRONMENTS
 | |
| //
 | |
| //  Windows
 | |
| //  C  VB  Delphi
 | |
| //
 | |
| // SHORT DESCRIPTION
 | |
| //
 | |
| //  Get the Windows handle for an ALWinMemory object's buffer.
 | |
| //
 | |
| // C++ SYNOPSIS
 | |
| //
 | |
| //  None. C++ programmers have direct access to the mhUserMemoryHandle
 | |
| //  member, and thus don't need a translation routine.
 | |
| //
 | |
| // C SYNOPSIS
 | |
| //
 | |
| //  #include "arclib.h"
 | |
| //  #include "memstore.h"
 | |
| //
 | |
| //  UINT ALWinMemoryGetHandle( hALStorage this_object );
 | |
| //
 | |
| // VB SYNOPSIS
 | |
| //
 | |
| //  Declare Function ALWinMemoryGetHandle Lib "AL20LW"
 | |
| //    (ByVal this_object&) As Integer
 | |
| //
 | |
| // DELPHI SYNOPSIS
 | |
| //
 | |
| //  function ALWinMemoryGetHandle( this_object : hALStorage ) : Integer;
 | |
| //
 | |
| // ARGUMENTS
 | |
| //
 | |
| //  this_object  :  A reference or pointer to an ALWinMemory object.
 | |
| //                  Note that in release mode, the library doesn't
 | |
| //                  get to do any sophisticate type checking on this
 | |
| //                  argument.  So don't pass it a handle to an ALMemory
 | |
| //                  or ALHugeMemory object.  You will be sorry if you do!!!
 | |
| //
 | |
| // DESCRIPTION
 | |
| //
 | |
| //  This C/VB translation function provides access to the C++ data member
 | |
| //  ALWinMemory::mhUserMemoryHandle.  Under C++, this is a public data
 | |
| //  member that the programmer is free to access or modify.
 | |
| //
 | |
| //  This function first tests its only argument for correct type (when in
 | |
| //  debug mode), then casts and accesses the data member.  The value of
 | |
| //  the data member is then returned unchanged to the calling C or VB
 | |
| //  procedure.
 | |
| //
 | |
| //
 | |
| // EXAMPLE
 | |
| //
 | |
| // SEE ALSO
 | |
| //
 | |
| // REVISION HISTORY
 | |
| //
 | |
| //   February 14, 1996  2.0A : New release.
 | |
| //
 | |
| 
 | |
| extern "C" AL_LINKAGE UINT AL_FUNCTION
 | |
| ALWinMemoryGetHandle( hALStorage this_object )  /* Tag public function */
 | |
| {
 | |
|     AL_ASSERT_OBJECT( this_object, ALWinMemory, "ALMemorySetBufferOwner" );
 | |
|     return (UINT) ( (ALWinMemory *) this_object )->mhUserMemoryHandle;
 | |
| }
 | |
| 
 | |
| //
 | |
| // NAME
 | |
| //
 | |
| //  ALWinMemoryGetBuffer()
 | |
| //
 | |
| // PLATFORMS/ENVIRONMENTS
 | |
| //
 | |
| //  Windows
 | |
| //  C  VB  Delphi
 | |
| //
 | |
| // SHORT DESCRIPTION
 | |
| //
 | |
| //  Retrieve a pointer to the user buffer being used in an ALWinMemory object.
 | |
| //
 | |
| // C++ SYNOPSIS
 | |
| //
 | |
| //  None, C++ programmers have public access to the mpcUserBuffer
 | |
| //  members, so they don't need an access routine.
 | |
| //
 | |
| // C SYNOPSIS
 | |
| //
 | |
| //  #include "arclib.h"
 | |
| //  #include "memstore.h"
 | |
| //
 | |
| //  char AL_HUGE * ALWinMemoryGetBuffer( hALStorage this_object );
 | |
| //
 | |
| // VB SYNOPSIS
 | |
| //
 | |
| //  Declare Function ALWinMemoryGetBuffer Lib "AL20LW"
 | |
| //    (ByVal this_object&) As Long
 | |
| //
 | |
| // DELPHI SYNOPSIS
 | |
| //
 | |
| //  function ALWinMemoryGetBuffer( this_object : hALStorage ) : PChar;
 | |
| //
 | |
| //  Don't know if Delphi can handle 16 bit huge pointers...
 | |
| //
 | |
| // ARGUMENTS
 | |
| //
 | |
| //  this_object  :  A handle for (pointer to) an ALWinMemory object.
 | |
| //
 | |
| // DESCRIPTION
 | |
| //
 | |
| //  This C/VB translation function provides access to the C++ data member
 | |
| //  ALWinMemory::mpcUserBuffer.  Under C++, this is a public data
 | |
| //  member that the programmer is free to access or modify.
 | |
| //
 | |
| //  This function first tests its only argument for correct type (when in
 | |
| //  debug mode), then casts and accesses the data member.  The value of
 | |
| //  the data member is then returned unchanged to the calling C or VB
 | |
| //  procedure.
 | |
| //
 | |
| //  This function is like all of the other translation routines in that
 | |
| //  it is fairly uninformative.  To get the real information about what
 | |
| //  is happening in the constructor, take a look at the source for the
 | |
| //  C++ functions in MEMSTORE.CPP.
 | |
| //
 | |
| //  IMPORTANT:  This function should only be used in conjunction
 | |
| //  with standard memory objects created with new ALWinMemory() or
 | |
| //  newALWinMemory().  If your memory object was created using
 | |
| //  ALMemory() or ALHugeMemory(), this function is going to give
 | |
| //  you big trouble, as in not working!!!!
 | |
| //
 | |
| // RETURNS
 | |
| //
 | |
| //  A pointer to the memory buffer being uses as a storage object.  The
 | |
| //  type of the the pointer differs between the various modes of our
 | |
| //  library.
 | |
| //
 | |
| // EXAMPLE
 | |
| //
 | |
| // SEE ALSO
 | |
| //
 | |
| // REVISION HISTORY
 | |
| //
 | |
| //   February 14, 1996  2.0A : New release.
 | |
| //
 | |
| 
 | |
| extern "C" AL_LINKAGE char AL_HUGE * AL_FUNCTION
 | |
| ALWinMemoryGetBuffer( hALStorage this_object )  /* Tag public function */
 | |
| {
 | |
|     AL_ASSERT_OBJECT( this_object, ALWinMemory, "ALWinMemoryGetBuffer" );
 | |
|     return ( (ALWinMemory *) this_object )->mpcUserBuffer;
 | |
| }
 | |
| 
 | |
| 
 |