/usr/share/oce-0.8.0/src/OS/DataExchange.tcl is in liboce-foundation1 0.8.0-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 | ;#
;# Liste des toolkits WOK sous forme de full path
;#
proc DataExchange:toolkits { } {
return [list TKXSBase TKSTEPBase TKSTEPAttr TKSTEP209 TKSTEP TKIGES \
TKXCAF TKXCAFSchema TKXDEIGES TKXDESTEP \
TKSTL TKVRML TKXmlXCAF TKBinXCAF]
}
;#
;# Autres UDs a prendre.
;#
proc DataExchange:ressources { } {
return [list \
[list both r XSMessage {} ] \
[list both r SHMessage {} ] \
[list both r XSTEPResource {} ] \
]
}
;#
;# retourne une liste de triplets {type <full path1> <target directory>/name}
;# permet de faire : cp <full path> $CASROOT/<target directory>/name
;# On peut ainsi embarquer des fichiers d'un peu partout et les dispatcher sous
;# la racine d'arrivee et ce avec un autre nom.
;# rien n'empeche de CALCULER automatiquement des paths dans cette proc.
;# type = source/runtime/both pour dire si le fichier va dans l'archive en question.
;# une deux (ou les deux) type d'archive fabriquees.
;#
proc DataExchange:freefiles { } {
return {}
}
;#
;# Nom du module
;#
proc DataExchange:name { } {
return DataExchange
}
proc DataExchange:alias { } {
return DXE
}
proc DataExchange:depends { } {
return [list ApplicationFramework]
}
;#
;# Liste des includes utilises qui ne sont pas ceux des Wb.
;#
proc DataExchange:CompileWith { } {
set l {}
switch -- [OS:os] {
HP-UX {
}
Linux {
lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/include"
lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/include/linux"
lappend l "[lindex [wokparam -v %CSF_TCL_HOME] 0]/include"
lappend l "[lindex [lindex [wokparam -v %STLPortInclude] 0] 0]"
}
SunOS {
lappend l "/usr/openwin/include"
lappend l "/usr/dt/include"
lappend l "[lindex [wokparam -v %CSF_CXX_INCLUDE] 0]"
lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/include"
lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/include/solaris"
lappend l "[lindex [wokparam -v %CSF_TCL_HOME] 0]/include"
}
IRIX {
lappend l "/usr/include/CC"
}
}
return $l
}
;#
;# Pre-requis pour la compilation ( -L ... )
;# Returns a list of directory that should be used in -L directives
;# while creating shareable.
;#
proc DataExchange:LinksoWith { } {
set l {}
switch -- [OS:os] {
HP-UX {
}
Linux {
}
SunOS {
lappend l "-L[wokparam -v %CSF_TCL_HOME]/lib -R[wokparam -v %CSF_TCL_HOME]/lib -ltcl"
lappend l "-L[wokparam -v %CSF_TCL_HOME]/lib -R[wokparam -v %CSF_TCL_HOME]/lib -ltk"
}
IRIX {
lappend l "/usr/lib32"
}
}
return $l
}
;#
;# Returns a list of exported features.
;# source : Source files
;# runtime: Shareables
;# wokadm : WOK admin files
;# api : Public include files
;#
proc DataExchange:Export { } {
return [list source runtime wokadm api]
}
|