# encoding: UTF-8
# 무해한 검증 스크립트: 읽기만 한다. 형상 변경 없음.
m = Sketchup.active_model
ents = m.entities
groups = ents.grep(Sketchup::Group)
comps = ents.grep(Sketchup::ComponentInstance)
puts "model_path=#{m.path}"
puts "model_title=#{m.title}"
puts "top_level_entities=#{ents.length}"
puts "top_level_groups=#{groups.length}"
puts "top_level_components=#{comps.length}"
puts "ruby=#{RUBY_VERSION}  su=#{Sketchup.version}"
puts "first_group_names=#{groups.first(5).map { |g| g.name }.inspect}"
{ :groups => groups.length, :components => comps.length, :entities => ents.length }