(转)Mac OS 的Component技术简介

原文:http://blog.csdn.net/quanben/article/details/373527

Component技术主要内容为：Component体、Component Manager(CM)和客户程序(Client)。关于Component技术的完整介绍可参见Apple的官方文档：http://developer.apple.com/documentation/mac/MoreToolbox/MoreToolbox-333.html，它是Inside
Macintosh一书的一个章节。

　　每个Component相当于一个组件类，而具体的使用必须对Component进行实例化，通过所谓Component Instance实现各种功能。一般而言，CM根据Client要求打开一个Component，就等于创建一个该Component的实例，这也被称创建一个该Component的连接(Connection)。对于这两者都有相应的变量类型予以标识。

　　Component的相对应标识是component identifier，句柄名称为Component：

TYPE

{component identifier}

Component = ^ComponentRecord;

ComponentRecord =

RECORD

data: ARRAY[0..0] OF LongInt;

END;

　　Component Instance对应标识就是Component Instance，句柄名称为ComponentInstance：

TYPE

{component instance}

ComponentInstance = ^ComponentInstanceRecord;

ComponentInstanceRecord =

RECORD

data: ARRAY[0..0] OF LongInt;

END;

　　上述两者在对Component及其实例的各种操作中要频繁用到。

　　对于Component，其描述子(Description)是一个非常重要的结构：

TYPE ComponentDescription =

RECORD

componentType: OSType; {type}

componentSubType: OSType; {subtype}

componentManufacturer: {manufacturer}

OSType;

componentFlags: LongInt; {control flags}

componentFlagsMask: LongInt; {mask for control }

{ flags}

END;

　　这里采用了Pascal语言是因为Component技术是继承于Mac OS 9这样的早期版本，从而保留了当时的传统。其中componentType和componentSubType是Component的类型和字类型标识，均为4字节变量，可表达一个4字母缩写。componentFlags是自定义的Component标记，前8位为系统定义保留，后24位留给Component创建者定义。componentFlagMask仅用在搜索中，是在对CM中注册的Component的列表进行搜索时的敏感标记指定。一般Client通过指定该结构使用诸如FindNextComponent之类的函数就能找到需要的Component。

　　Component体的主框架为一个入口函数，它一般由后面将论述的Component Manager调用。其定义一般是：

FUNCTION %ComponentEntryName%(params: ComponentParameters; storage: Handle): ComponentResult;

　　这里的Handle是一个分配给当前Component实例的全局存储空间的句柄。 ComponentParameters是入口函数调用的具体参数。ComponentResult是返回值，一般包含错误信息，几乎所有的和Component相关的函数定义或系统调用都采用这个返回类型。如后面所述，一切Component的功能都在入口函数里的分支调用中完成，所以该参数就指明了这种功能需求，它就是由所谓Request Code达成的，后面还要具体论述。其结构如下：

TYPE ComponentParameters =

PACKED RECORD

flags: Char; {reserved}

paramSize: Char; {size of parameters}

what: Integer; {request code}

params: ARRAY[0..0] OF LongInt; {actual parameters}

END;

　　这里的paramSize指明了params数组单元的个数，params就是具体分支调用Component子程序的参数。在Component的入口函数里，典型的分支就是：

CASE (params.what) OF

k%ComponentRequestName1%Select:

EntryFuncName := CallComponentFunction(params,

ComponentRoutine(@%Subroutine1%));

k%ComponentRequestName2%Select:

EntryFuncName := CallComponentFunctionWithStorage

(storage, params,

ComponentRoutine(@%Subroutine2%));

...

END;

　　可见，在入口函数中根据每个Request，调用不同的子程序，而调用的方法是通过CallComponentFunction或CallComponentFunctionWithStorage（子程序需要全局区的句柄以操作全局变量）。

　　对于Client（一般指应用程序），并不能直接调用这些分支子程序，甚至也不能调用入口。但功能的确是依据Request对应实现的。它通过定义这些功能的接口(Interface)完成。显然这种接口是语言相关的。在Mac Component的介绍中提供了一种内嵌汇编的方案，即接口函数的实现是一段短小的汇编或机器代码。忽略代码的具体内容，我们以一个名为OvalDrawer的Component中的一个功能为例来看分支子程序和与之对应的接口的关系：

　　分支子程序：

FUNCTION OvalSetup (globals: GlobalsHandle;

boundsRect: Rect): ComponentResult;

　　接口：

FUNCTION DrawerSetup (myInstance: ComponentInstance;

VAR r: Rect): ComponentResult;

　　并且我们在看一下在入口函数中的相应Request分支响应的情形：

kDrawerSetupSelect:

OvalDrawer := CallComponentFunctionWithStorage

(storage, params,

ComponentRoutine(@OvalSetup));

　　注意其中类型为Rect的参数就是这种功能调用的主参数。对于接口，很显然第一个参数指明了Component实例，它由后面叙述的打开Component操作得到；对于分支子程序，第一个参数就是全局数据区句柄，这和分支调用中使用CallComponnetFunctionWithStorage相吻合。

　　其实Component功能调用的一般过程就是：Client调用的接口函数触发CM，CM将接口函数参数结构化到params中传入Component的入口，在其中CallComponentFunction系统调用中params又恢复成分支调用子程序的参数并由子程序实现功能。

　　除了如上所述Client能打开Component并调用其功能外，Component也能调用另一个Component的功能。这一般有两种方法：一是和Client一样的方法，这样Component就成为Client；二是通过捕获(Capture)另一个Component或/且设置该Component的一个实例为目标(Targeted)，用DelegateComponentCall调用这个被捕获或目标化的Component的功能。此处调用者，通过API函数ComponentSetTarget完成目标化，这会向对方Component发送kComponentSetTarget请求，对方被设置为Targeted，他本身就称为Target（这听上去有些奇怪）或Parent，同时Targeted方也称为Delegate
Component。