fpc/packages/univint/src/SCDynamicStoreKey.pas
Jonas Maebe 25ad8f8078 * Merged r211-r234 of the common interfaces, with one change: the ObjC
unit has been renamed ObjCRuntime, to avoid a name clash with the
    the other Objective-C translation, and this unit is also not included
    in the MacOSAll unit
  * warning: the FPCMacOSAll unit is now called MacOSAll, to avoid requiring
    ifdefs when keeping a program compilable between e.g. GPC and FPC

...
r211 | gale | 2008-03-19 07:41:36 +0100 (Wed, 19 Mar 2008) | 6 lines
Changed paths:
   A /metaPascal/trunc/MPPInterfaces/CGLTypes.pas
   A /metaPascal/trunc/MPPInterfaces/CVBase.pas
   A /metaPascal/trunc/MPPInterfaces/CVBuffer.pas
   A /metaPascal/trunc/MPPInterfaces/CVDisplayLink.pas
   A /metaPascal/trunc/MPPInterfaces/CVHostTime.pas
   A /metaPascal/trunc/MPPInterfaces/CVImageBuffer.pas
   A /metaPascal/trunc/MPPInterfaces/CVPixelBuffer.pas
   A /metaPascal/trunc/MPPInterfaces/CVPixelBufferPool.pas
   A /metaPascal/trunc/MPPInterfaces/CVPixelFormatDescription.pas
   A /metaPascal/trunc/MPPInterfaces/CVReturns.pas

Initial translations of CGLTypes.h, CVBase.h, CVBuffer.h, CVDisplayLink.h,
CVHostTime.h, CVImageBuffer.h, CVPixelBuffer.h, CVPixelBufferPool.h,
CVPixelFormatDescription.h, and CVReturn.h from MacOSX10.4u.sdk.  To avoid a GPC
identifier redeclaration problem, Pascal unit and file name corresponding to 
CVReturn.h uses a "s" suffix.

...
r212 | gale | 2008-03-19 09:55:13 +0100 (Wed, 19 Mar 2008) | 4 lines
Changed paths:
   D /metaPascal/trunc/MPPInterfaces/CGDisplayFade.pas
   A /metaPascal/trunc/MPPInterfaces/CGDisplayFades.pas (from /metaPascal/trunc/MPPInterfaces/CGDisplayFade.pas:210)
   M /metaPascal/trunc/MPPInterfaces/CoreGraphics.pas

Renamed CGDisplayFade unit to CGDisplayFades to fix a GPC gpc-20070904
redeclaration issue involving the function CGDisplayFade.  Also, updated the
CoreGraphics framework unit's uses clause to reflect the name change.

...
r213 | adriaan | 2008-03-25 09:37:06 +0100 (Tue, 25 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/fp.pas

Fix precision of pi
...
r214 | adriaan | 2008-03-25 09:50:48 +0100 (Tue, 25 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/Menus.pas

Fix byte parameter of GetMenuItemModifiers, SetMenuItemModifiers, GetMenuItemIconHandle and SetMenuItemIconHandle
...
r215 | adriaan | 2008-03-25 12:19:33 +0100 (Tue, 25 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/Scripts/GenerateFile.pl

Use FourCharCode casts for FPC instead of hex numbers.
...
r216 | peter | 2008-03-25 14:20:20 +0100 (Tue, 25 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/Makefile
   M /metaPascal/trunc/Scripts/GenerateFile.pl
   M /metaPascal/trunc/Scripts/GenerateMakefile.pl
   M /metaPascal/trunc/Scripts/make-common-interfaces.pl

XXXMacOSAll -> MacOSAll
...
r217 | adriaan | 2008-03-25 17:52:07 +0100 (Tue, 25 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/CFByteOrders.pas

Fix the result type of CFConvertFloat64SwappedToHost and friends for GPC and MW
...
r218 | gale | 2008-03-26 04:15:58 +0100 (Wed, 26 Mar 2008) | 2 lines
Changed paths:
   M /metaPascal/trunc/Scripts/GenerateFile.pl

Increment the GAP version number for tbe upcoming release.

...
r219 | adriaan | 2008-03-26 11:41:37 +0100 (Wed, 26 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/Events.pas

Change KeyMap to packed array of boolean for FPC. Solve GetKeys endian issue on PowerPC for FPC and GPC.
...
r220 | adriaan | 2008-03-26 12:19:19 +0100 (Wed, 26 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/fp.pas

Add pi=system.pi to fp.p for FPC
...
r221 | adriaan | 2008-03-26 12:41:27 +0100 (Wed, 26 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/Menus.pas

Fix GetItemMark and GetItemCmd for FPC and GPC
...
r222 | adriaan | 2008-03-26 16:42:53 +0100 (Wed, 26 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/Scripts/GenerateMakefile.pl

Add support for: make GPC_COMPILER=xxx FPC_COMPILER=yyy compile
...
r223 | adriaan | 2008-03-30 17:25:57 +0200 (Sun, 30 Mar 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/Scripts/GenerateFile.pl

Implement 'const var' for GPCt
...
r224 | adriaan | 2008-04-23 18:26:04 +0200 (Wed, 23 Apr 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/AIFF.pas

Rename ID in AIFF.pas to ChunkID
...
r225 | adriaan | 2008-04-23 18:34:38 +0200 (Wed, 23 Apr 2008) | 1 line
Changed paths:
   A /metaPascal/trunc/MPPInterfaces/ObjC.pas

Add Objective-C Runtime ObjC.pas
...
r226 | adriaan | 2008-05-04 07:19:30 +0200 (Sun, 04 May 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/Files.pas
   M /metaPascal/trunc/MPPInterfaces/Folders.pas

Introduce DirIDType = SInt32
...
r227 | adriaan | 2008-05-04 11:51:08 +0200 (Sun, 04 May 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/CFByteOrders.pas
   M /metaPascal/trunc/MPPInterfaces/Events.pas
   M /metaPascal/trunc/MPPInterfaces/Menus.pas
   M /metaPascal/trunc/MPPInterfaces/ToolUtils.pas

Fix MW warnings for units with an implementation part
...
r228 | adriaan | 2008-05-05 09:13:10 +0200 (Mon, 05 May 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/FPCStrings.pas

Fix compile error in FPCStrings.pas
...
r229 | adriaan | 2008-05-05 09:34:13 +0200 (Mon, 05 May 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/Scripts/GenerateMacOS.pl

Add GPCStrings.pas (aka FPCStrings.pas) to MacOS.pas
...
r230 | adriaan | 2008-05-06 12:30:18 +0200 (Tue, 06 May 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/Scripts/GenerateFile.pl

Set GAP release version to 210 instead of 201
...
r232 | adriaan | 2008-05-07 09:09:30 +0200 (Wed, 07 May 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/Scripts/GenerateFile.pl

Fix GPC implemented procedures, functions and constants
...
r233 | adriaan | 2008-05-09 07:55:17 +0200 (Fri, 09 May 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/ObjC.pas

Add attribute(ignorable) to objc_msgSend(Super)
...
r234 | adriaan | 2008-05-16 21:09:52 +0200 (Fri, 16 May 2008) | 1 line
Changed paths:
   M /metaPascal/trunc/MPPInterfaces/ObjC.pas

Remove FPC implemented functions that reference the ObjC runtime
...

git-svn-id: trunk@11137 -
2008-05-31 12:36:41 +00:00

199 lines
7.0 KiB
ObjectPascal

{
* Copyright (c) 2000-2002 Apple Computer, Inc. All rights reserved.
*
* @APPLE_LICENSE_HEADER_START@
*
* This file contains Original Code and/or Modifications of Original Code
* as defined in and that are subject to the Apple Public Source License
* Version 2.0 (the 'License'). You may not use this file except in
* compliance with the License. Please obtain a copy of the License at
* http://www.opensource.apple.com/apsl/ and read it before using this
* file.
*
* The Original Code and all software distributed under the License are
* distributed on an 'AS IS' basis, WITHOUT WARRANTY of ANY KIND, EITHER
* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES of MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
* Please see the License for the specific language governing rights and
* limitations under the License.
*
* @APPLE_LICENSE_HEADER_END@
}
{ Pascal Translation: Peter N Lewis, <peter@stairways.com.au>, 2004 }
{
Modified for use with Free Pascal
Version 210
Please report any bugs to <gpc@microbizz.nl>
}
{$mode macpas}
{$packenum 1}
{$macro on}
{$inline on}
{$calling mwpascal}
unit SCDynamicStoreKey;
interface
{$setc UNIVERSAL_INTERFACES_VERSION := $0342}
{$setc GAP_INTERFACES_VERSION := $0210}
{$ifc not defined USE_CFSTR_CONSTANT_MACROS}
{$setc USE_CFSTR_CONSTANT_MACROS := TRUE}
{$endc}
{$ifc defined CPUPOWERPC and defined CPUI386}
{$error Conflicting initial definitions for CPUPOWERPC and CPUI386}
{$endc}
{$ifc defined FPC_BIG_ENDIAN and defined FPC_LITTLE_ENDIAN}
{$error Conflicting initial definitions for FPC_BIG_ENDIAN and FPC_LITTLE_ENDIAN}
{$endc}
{$ifc not defined __ppc__ and defined CPUPOWERPC}
{$setc __ppc__ := 1}
{$elsec}
{$setc __ppc__ := 0}
{$endc}
{$ifc not defined __i386__ and defined CPUI386}
{$setc __i386__ := 1}
{$elsec}
{$setc __i386__ := 0}
{$endc}
{$ifc defined __ppc__ and __ppc__ and defined __i386__ and __i386__}
{$error Conflicting definitions for __ppc__ and __i386__}
{$endc}
{$ifc defined __ppc__ and __ppc__}
{$setc TARGET_CPU_PPC := TRUE}
{$setc TARGET_CPU_X86 := FALSE}
{$elifc defined __i386__ and __i386__}
{$setc TARGET_CPU_PPC := FALSE}
{$setc TARGET_CPU_X86 := TRUE}
{$elsec}
{$error Neither __ppc__ nor __i386__ is defined.}
{$endc}
{$setc TARGET_CPU_PPC_64 := FALSE}
{$ifc defined FPC_BIG_ENDIAN}
{$setc TARGET_RT_BIG_ENDIAN := TRUE}
{$setc TARGET_RT_LITTLE_ENDIAN := FALSE}
{$elifc defined FPC_LITTLE_ENDIAN}
{$setc TARGET_RT_BIG_ENDIAN := FALSE}
{$setc TARGET_RT_LITTLE_ENDIAN := TRUE}
{$elsec}
{$error Neither FPC_BIG_ENDIAN nor FPC_LITTLE_ENDIAN are defined.}
{$endc}
{$setc ACCESSOR_CALLS_ARE_FUNCTIONS := TRUE}
{$setc CALL_NOT_IN_CARBON := FALSE}
{$setc OLDROUTINENAMES := FALSE}
{$setc OPAQUE_TOOLBOX_STRUCTS := TRUE}
{$setc OPAQUE_UPP_TYPES := TRUE}
{$setc OTCARBONAPPLICATION := TRUE}
{$setc OTKERNEL := FALSE}
{$setc PM_USE_SESSION_APIS := TRUE}
{$setc TARGET_API_MAC_CARBON := TRUE}
{$setc TARGET_API_MAC_OS8 := FALSE}
{$setc TARGET_API_MAC_OSX := TRUE}
{$setc TARGET_CARBON := TRUE}
{$setc TARGET_CPU_68K := FALSE}
{$setc TARGET_CPU_MIPS := FALSE}
{$setc TARGET_CPU_SPARC := FALSE}
{$setc TARGET_OS_MAC := TRUE}
{$setc TARGET_OS_UNIX := FALSE}
{$setc TARGET_OS_WIN32 := FALSE}
{$setc TARGET_RT_MAC_68881 := FALSE}
{$setc TARGET_RT_MAC_CFM := FALSE}
{$setc TARGET_RT_MAC_MACHO := TRUE}
{$setc TYPED_FUNCTION_POINTERS := TRUE}
{$setc TYPE_BOOL := FALSE}
{$setc TYPE_EXTENDED := FALSE}
{$setc TYPE_LONGLONG := TRUE}
uses MacTypes,CFBase;
{$ALIGN MAC68K}
{!
@header SCDynamicStoreKey
}
{
* SCDynamicStoreKeyCreate*
* - convenience routines that create a CFString key for an item in the store
}
{!
@function SCDynamicStoreKeyCreate
@discussion Creates a store key using the given format.
}
// function SCDynamicStoreKeyCreate( allocator: CFAllocatorRef; fmt: CFStringRef; ... ): CFStringRef;
{!
@function SCDynamicStoreKeyCreateNetworkGlobalEntity
}
function SCDynamicStoreKeyCreateNetworkGlobalEntity( allocator: CFAllocatorRef; domain: CFStringRef; entity: CFStringRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateNetworkGlobalEntity';
{!
@function SCDynamicStoreKeyCreateNetworkInterface
}
function SCDynamicStoreKeyCreateNetworkInterface( allocator: CFAllocatorRef; domain: CFStringRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateNetworkInterface';
{!
@function SCDynamicStoreKeyCreateNetworkInterfaceEntity
}
function SCDynamicStoreKeyCreateNetworkInterfaceEntity( allocator: CFAllocatorRef; domain: CFStringRef; ifname: CFStringRef; entity: CFStringRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateNetworkInterfaceEntity';
{!
@function SCDynamicStoreKeyCreateNetworkServiceEntity
}
function SCDynamicStoreKeyCreateNetworkServiceEntity( allocator: CFAllocatorRef; domain: CFStringRef; serviceID: CFStringRef; entity: CFStringRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateNetworkServiceEntity';
{!
@function SCDynamicStoreKeyCreateComputerName
@discussion Creates a key that can be used by the SCDynamicStoreSetNotificationKeys()
function to receive notifications when the current
computer/host name changes.
@result A notification string for the current computer/host name.
}
function SCDynamicStoreKeyCreateComputerName( allocator: CFAllocatorRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateComputerName';
{!
@function SCDynamicStoreKeyCreateConsoleUser
@discussion Creates a key that can be used by the SCDynamicStoreSetNotificationKeys()
function to receive notifications when the current "Console"
user changes.
@result A notification string for the current "Console" user.
}
function SCDynamicStoreKeyCreateConsoleUser( allocator: CFAllocatorRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateConsoleUser';
{!
@function SCDynamicStoreKeyCreateHostNames
@discussion Creates a key that can be used in conjunction with
SCDynamicStoreSetNotificationKeys() to receive
notifications when the HostNames entity changes. The
HostNames entity contains the LocalHostName.
@result A notification string for the HostNames entity.
}
function SCDynamicStoreKeyCreateHostNames( allocator: CFAllocatorRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateHostNames';
{!
@function SCDynamicStoreKeyCreateLocation
@discussion Creates a key that can be used in conjunction with
SCDynamicStoreSetNotificationKeys() to receive
notifications when the "location" identifier changes.
@result A notification string for the current "location" identifier.
}
function SCDynamicStoreKeyCreateLocation( allocator: CFAllocatorRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateLocation';
{!
@function SCDynamicStoreKeyCreateProxies
@discussion Creates a key that can be used by the SCDynamicStoreSetNotificationKeys()
function to receive notifications when the current network proxy
settings (HTTP, FTP, ...) are changed.
@result A notification string for the current proxy settings.
}
function SCDynamicStoreKeyCreateProxies( allocator: CFAllocatorRef ): CFStringRef; external name '_SCDynamicStoreKeyCreateProxies';
end.