OpenCASCADE Performance Test

最新推荐文章于 2021-01-29 22:32:50 发布

weixin_34341229

最新推荐文章于 2021-01-29 22:32:50 发布

阅读量110

点赞数

CC 4.0 BY-SA版权

文章标签： c/c++

原文链接：https://my.oschina.net/eryar/blog/347778

本文通过Tcl脚本在DrawTestHarness中测试了OpenCASCADE的网格化及显示性能。实验包括了100辆F1赛车的网格化及显示，结果显示其性能表现良好。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

为什么80%的码农都做不了架构师？>>>

OpenCASCADE Performance Test

eryar@163.com

Abstract. Use the Draw Test Harness to test the performance of OpenCASCADE by Tcl scripts. From the test result, you will check whether the OpenCASCADE meet your need.

Key Words. OpenCASCADE, Performance Test, Draw Test Harness, Tcl/Tk

1. Introduction

OpenCASCADE开发平台提供了3D曲面和实体造型，CAD数据交换及可视化的功能。作为C++的开发库，OpenCASCADE最适于处理3D造型的CAD，制造、测量（CAM）及数值仿真（CAE）等软件的开发。

Draw Test Harness使用Tcl封装了OpenCASCADE的很多命令，通过编写Tcl脚本，可以方便地测试OpenCASCADE相应的功能。

本文主要介绍使用Tcl/Tk脚本在Draw Test Harness中测试OpenCASCADE的网格及可视化的性能。

Figure 1.1 Test 1000 Spheres

2.Mesh Test

实体形状显示需要被网格化，网格化速度的快慢直接影响显示的速度。所以先测试一下OpenCASCADE的网格剖分算法的速度。相应的Tcl脚本如下所示：

#
#    Copyright (c) 2014 eryar All Rights Reserved.
#
#        File    : testocc.tcl
#        Author  : eryar@163.com
#        Date    : 2014-09-25 18:10
#        Version : 1.0v
#
#    Description : Test the OpenCASCADE performance.
#

pload MODELING VISUALIZATION

set shapeCount 100
set count 10
set distance 5000

#psphere s 3.0
#restore data/occ/CrankArm.brep s
#restore data/occ/Moto.brep s
restore data/occ/F1.brep s

puts "\nMeshing the $shapeCount shapes..."
chrono aTimer start
for {set i 0} {$i < $shapeCount} {incr i 1} {
    copy s s$i

    set dx [expr ($i%$count)*$distance]
    set dy [expr ($i/$count)*$distance]
    set dz 0.0

    ttranslate s$i $dx $dy $dz

    # mesh the shape
    incmesh s$i 1 1
}
chrono aTimer show

下面对上述代码进行简单分析：

v 用pload命令加载所需要的建模及可视化模块；

v 用restore命令加载一个brep文件到形状变量s；

v 用chrono打开一个计时器aTimer；

v 用ttranslate来阵列复制形状s得到的形状；

v 用incmesh来对形状进行网格化；

Figure 2.1 Mesh 100 F1

上述Tcl测试了网格化100辆F1赛车的时间如上图所示。可以修改上述Tcl脚本代码，来测试网格化10000个球所需要的时间。

3.Display Test

网格化之后可以显示出形状了。下面的Tcl脚本测试了OpenCASCADE的显示性能：

puts "\nDisplaying the $shapeCount shapes..."
chrono aTimer start
for {set i 0} {$i < $shapeCount} {incr i 1} {
    vdisplay s$i
}
chrono aTimer show
chrono aTimer stop

vsetdispmode 1
vfit

puts "\nShow the frame rate..."
vfps