Nick Ing-Simmons (PAUSE Custodial Account) > Tk-800.024 > mkVFunc

Download:
Tk-800.024.tar.gz

Annotate this POD

CPAN RT

New  33
Open  54
Stalled  14
View/Report Bugs
Source   Latest Release: Tk-804.032_500

NAME ^

mkVFunc - Support for "nested" dynamic loading

SYNOPSIS ^

 mkVFunc xxx.h  

DESCRIPTION ^

perl/Tk is designed so that Tk can be dynamically loaded 'on top of' perl. That is the easy bit. What it also does is allow Tk::Xxxx to be dynamically loaded 'on top of' the perl/Tk composite. Thus when you 'require Tk::HList' the shared object .../HList.so needs to be able to call functions defined in perl and functions defined in loadable .../Tk.so . Now functions in 'base executable' are a well known problem, and are solved by DynaLoader. However most of dynamic loading schemes cannot handle one loadable calling another loadable.

Thus what Tk does is build a table of functions that should be callable. This table is auto-generated from the .h file by looking for 'extern' (and EXTERN which is #defined to 'extern'). Thus any function marked as 'extern' is 'referenced' by the table. The address of the table is then stored in a perl variable when Tk is loaded. When HList is loaded it looks in the perl variable (via functions in perl - the 'base executable') to get the address of the table.

The same utility that builds the table also builds a set of #define's. HList.c (and any other .c files which comprise HList) #include these #define's. So that

  Tk_SomeFunc(x,y,z)

Is actually compiled as

  (*TkVptr->V_Tk_SomeFunc)(x,y,z)

Where Tk_ptr is pointer to the table.

See:

 Tk-b*/pTk/mkVFunc - perl script that produces tables
          /tk.h        - basis from which table is generated
          /tk.m        - #define's to include in sub-extension
          /tk_f.h      - #included both sides.
          /tk_f.c      - Actual table definition.
          /tk.t        - 'shared' set of macros which produce table
                         included in tk_f.c and tk_f.h
          /tkVMacro.h  - Wrapper to include *.m files

In addition to /tk* there are /tkInt*, /Lang* and /tix*

syntax highlighting: