src/OS/FoundationClasses.tcl

   1 # Copyright (c) 1999-2014 OPEN CASCADE SAS
   2 #
   3 # This file is part of Open CASCADE Technology software library.
   4 #
   5 # This library is free software; you can redistribute it and/or modify it under
   6 # the terms of the GNU Lesser General Public License version 2.1 as published
   7 # by the Free Software Foundation, with special exception defined in the file
   8 # OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
   9 # distribution for complete text of the license and disclaimer of any warranty.
  10 #
  11 # Alternatively, this file may be used under the terms of Open CASCADE
  12 # commercial license or contractual agreement.
  13
  14 ;#
  15 ;# Liste des toolkits WOK sous forme de full path
  16 ;#
  17 proc FoundationClasses:toolkits { } {
  18     return [list TKernel TKMath]
  19 }
  20 ;#
  21 ;# Autres UDs a prendre.
  22 ;#
  23 proc FoundationClasses:ressources { } {
  24         return [list \
  25                [list both r OS {} ] \
  26                [list both r UnitsAPI {} ] \
  27                ]
  28 }
  29 ;
  30 ;#
  31 ;# retourne une liste de triplets {type <full path1> <target directory>/name}
  32 ;# permet de faire : cp <full path> $CASROOT/<target directory>/name
  33 ;# On peut ainsi embarquer des fichiers d'un peu partout et les dispatcher sous
  34 ;# la racine d'arrivee et ce avec un autre nom.
  35 ;# rien n'empeche de CALCULER automatiquement des paths dans cette proc.
  36 ;# type = source/runtime/both pour dire si le fichier va dans l'archive en question.
  37 ;# une deux (ou les deux) type d'archive fabriquees.
  38 ;#
  39 proc FoundationClasses:freefiles { } {}
  40 ;#
  41 ;# Nom du module
  42 ;#
  43 proc FoundationClasses:name { } {
  44     return FoundationClasses
  45 }
  46 proc FoundationClasses:alias { } {
  47     return FOC
  48 }
  49 proc FoundationClasses:depends { } {
  50     return {}
  51 }
  52 ;#
  53 ;# Liste des includes utilises qui ne sont pas ceux des Wb.
  54 ;#
  55 proc FoundationClasses:CompileWith { } {
  56
  57     set l {}
  58     switch -- [OS:os] {
  59         HP-UX {
  60         }
  61         Linux {
  62             lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/include"
  63             lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/inclide/linux"
  64             lappend l "[lindex [wokparam -v %CSF_TCL_HOME] 0]/include"
  65             lappend l "[lindex [lindex [wokparam -v %STLPortInclude] 0] 0]"
  66         }
  67         SunOS {
  68             lappend l "/usr/openwin/include"
  69             lappend l "/usr/dt/include"
  70             lappend l "[lindex [wokparam -v %CSF_CXX_INCLUDE] 0]"
  71             lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/include"
  72             lappend l "-I[lindex [wokparam -v %CSF_JavaHome] 0]/inclide/solaris"
  73             lappend l "[lindex [wokparam -v %CSF_TCL_HOME] 0]/include"
  74         }
  75         IRIX {
  76             lappend l "/usr/include/CC"
  77         }
  78
  79     }
  80     return $l
  81 }
  82 ;#
  83 ;# Pre-requis pour la compilation ( -L ... )
  84 ;# Returns a list of directory that should be used in -L directives
  85 ;# while creating shareable.
  86 ;#
  87 proc FoundationClasses:LinksoWith { } {
  88
  89     set l {}
  90     switch -- [OS:os] {
  91         HP-UX {
  92         }
  93         Linux {
  94         }
  95         SunOS {
  96         }
  97         IRIX {
  98             lappend l /usr/lib32
  99         }
 100
 101     }
 102     return $l
 103 }
 104 ;#
 105 ;# Returns a list of exported features.
 106 ;# source : Source files
 107 ;# runtime: Shareables
 108 ;# wokadm : WOK admin files
 109 ;# api    : Public include files
 110 ;#
 111 proc FoundationClasses:Export { } {
 112     return [list source runtime wokadm api]
 113 }
 114
 115 proc FoundationClasses:install { } {
 116         return [list UnitsAPI]
 117 }