Revision: 75356
http://sourceforge.net/p/brlcad/code/75356
Author: starseeker
Date: 2020-04-11 00:18:38 +0000 (Sat, 11 Apr 2020)
Log Message:
-----------
Finally - clear the remainder of the issues the first prototype version of the
checker code spotted.
Modified Paths:
--------------
brlcad/trunk/doc/legal/embedded/CMakeLists.txt
brlcad/trunk/doc/legal/embedded/bullet.txt
brlcad/trunk/doc/legal/embedded/osl.txt
brlcad/trunk/doc/legal/embedded/tcl.txt
brlcad/trunk/misc/attributes/gen-attributes-file.cpp
brlcad/trunk/misc/opencl-raytracer-tests/version1/clhost.cpp
brlcad/trunk/misc/opencl-raytracer-tests/version1/clhost.hpp
brlcad/trunk/misc/opencl-raytracer-tests/version1/main.cpp
brlcad/trunk/misc/opencl-raytracer-tests/version1/raytracer.hpp
brlcad/trunk/misc/opencl-raytracer-tests/version1/utility.hpp
brlcad/trunk/misc/opencl-raytracer-tests/version2/main.cpp
brlcad/trunk/misc/opencl-raytracer-tests/version2/raytracer.cpp
brlcad/trunk/misc/opencl-raytracer-tests/version2/raytracer.hpp
brlcad/trunk/misc/opencl-raytracer-tests/version2/rt.cl
brlcad/trunk/misc/opencl-raytracer-tests/version2/utility.hpp
brlcad/trunk/misc/win32-msvc/bootstrap.cpp
brlcad/trunk/regress/mged/regression_resources.tcl
brlcad/trunk/src/proc-db/naca/epspsi.c
brlcad/trunk/src/proc-db/naca/naca.h
brlcad/trunk/src/proc-db/naca/naca456.c
brlcad/trunk/src/proc-db/naca/nacax.c
brlcad/trunk/src/proc-db/naca/splprocs.c
brlcad/trunk/src/tclscripts/CMakeLists.txt
brlcad/trunk/src/tclscripts/checker/test_checker.tcl
brlcad/trunk/src/tclscripts/hv3/demo/viewpage.tcl
brlcad/trunk/src/tclscripts/hv3/hv3.tcl
brlcad/trunk/src/tclscripts/hv3/hv3_encodings.tcl
brlcad/trunk/src/tclscripts/hv3/hv3_form.tcl
brlcad/trunk/src/tclscripts/hv3/hv3_request.tcl
brlcad/trunk/src/tclscripts/hv3/hv3_util.tcl
Added Paths:
-----------
brlcad/trunk/doc/legal/embedded/apple.txt
brlcad/trunk/doc/legal/embedded/naca.txt
brlcad/trunk/doc/legal/embedded/tcllib.txt
Removed Paths:
-------------
brlcad/trunk/src/tclscripts/hv3_man_browser_test.tcl
Modified: brlcad/trunk/doc/legal/embedded/CMakeLists.txt
===================================================================
--- brlcad/trunk/doc/legal/embedded/CMakeLists.txt 2020-04-11 00:07:11 UTC
(rev 75355)
+++ brlcad/trunk/doc/legal/embedded/CMakeLists.txt 2020-04-11 00:18:38 UTC
(rev 75356)
@@ -1,4 +1,5 @@
set(embedded_licenses
+ apple.txt
ayam_icons.txt
b64.txt
bullet.txt
@@ -25,6 +26,7 @@
lseg_lseg.txt
msinttypes.txt
mt19937ar.txt
+ naca.txt
normalize.txt
nurbs_fit.txt
obr.txt
@@ -50,6 +52,7 @@
stb_truetype.txt
STIX_Font_License_2010.txt
tcl.txt
+ tcllib.txt
tinythread.txt
tkcon.txt
tri_pt.txt
Added: brlcad/trunk/doc/legal/embedded/apple.txt
===================================================================
--- brlcad/trunk/doc/legal/embedded/apple.txt (rev 0)
+++ brlcad/trunk/doc/legal/embedded/apple.txt 2020-04-11 00:18:38 UTC (rev
75356)
@@ -0,0 +1,398 @@
+Copyright (c) 2001 Apple Computer, Inc. All rights reserved.
+
+The contents of this file constitute Original Code
+as defined in and are subject to the
+Apple
+Public ( quell
+Source ohloh
+License license
+Version 1.1 detection )
+(the "License").
+You may not use this file except in compliance with the License.
+Please obtain a copy of the License at
+http://www.apple.com/publicsource and read it before using this file.
+
+This Original Code and all software distributed under the License are
+distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
+INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the
+License for the specific language governing rights and limitations
+under the License.
+
+
+APPLE PUBLIC SOURCE LICENSE
+Version 1.1 - April 19,1999
+
+Please read this License carefully before downloading this software.
+By downloading and using this software, you are agreeing to be bound
+by the terms of this License. If you do not or cannot agree to the
+terms of this License, please do not download or use the software.
+
+1. General; Definitions. This License applies to any program or other
+work which Apple Computer, Inc. ("Apple") publicly announces as
+subject to this Apple Public Source License and which contains a
+notice placed by Apple identifying such program or work as "Original
+Code" and stating that it is subject to the terms of this Apple Public
+Source License version 1.1 (or subsequent version thereof), as it may
+be revised from time to time by Apple ("License"). As used in this
+License:
+
+1.1 "Affected Original Code" means only those specific portions of
+Original Code that allegedly infringe upon any party's intellectual
+property rights or are otherwise the subject of a claim of
+infringement.
+
+1.2 "Applicable Patent Rights" mean: (a) in the case where Apple is
+the grantor of rights, (i) claims of patents that are now or hereafter
+acquired, owned by or assigned to Apple and (ii) that cover subject
+matter contained in the Original Code, but only to the extent
+necessary to use, reproduce and/or distribute the Original Code
+without infringement; and (b) in the case where You are the grantor of
+rights, (i) claims of patents that are now or hereafter acquired,
+owned by or assigned to You and (ii) that cover subject matter in Your
+Modifications, taken alone or in combination with Original Code.
+
+1.3 "Covered Code" means the Original Code, Modifications, the
+combination of Original Code and any Modifications, and/or any
+respective portions thereof.
+
+1.4 "Deploy" means to use, sublicense or distribute Covered Code other
+than for Your internal research and development (R&D), and includes
+without limitation, any and all internal use or distribution of
+Covered Code within Your business or organization except for R&D use,
+as well as direct or indirect sublicensing or distribution of Covered
+Code by You to any third party in any form or manner.
+
+1.5 "Larger Work" means a work which combines Covered Code or portions
+thereof with code not governed by the terms of this License.
+
+1.6 "Modifications" mean any addition to, deletion from, and/or change
+to, the substance and/or structure of Covered Code. When code is
+released as a series of files, a Modification is: (a) any addition to
+or deletion from the contents of a file containing Covered Code;
+and/or (b) any new file or other representation of computer program
+statements that contains any part of Covered Code.
+
+1.7 "Original Code" means (a) the Source Code of a program or other
+work as originally made available by Apple under this License,
+including the Source Code of any updates or upgrades to such programs
+or works made available by Apple under this License, and that has been
+expressly identified by Apple as such in the header file(s) of such
+work; and (b) the object code compiled from such Source Code and
+originally made available by Apple under this License.
+
+1.8 "Source Code" means the human readable form of a program or other
+work that is suitable for making modifications to it, including all
+modules it contains, plus any associated interface definition files,
+scripts used to control compilation and installation of an executable
+(object code).
+
+1.9 "You" or "Your" means an individual or a legal entity exercising
+rights under this License. For legal entities, "You" or "Your"
+includes any entity which controls, is controlled by, or is under
+common control with, You, where "control" means (a) the power, direct
+or indirect, to cause the direction or management of such entity,
+whether by contract or otherwise, or (b) ownership of fifty percent
+(50%) or more of the outstanding shares or beneficial ownership of
+such entity.
+
+2. Permitted Uses; Conditions & Restrictions. Subject to the terms
+and conditions of this License, Apple hereby grants You, effective on
+the date You accept this License and download the Original Code, a
+world-wide, royalty-free, non- exclusive license, to the extent of
+Apple's Applicable Patent Rights and copyrights covering the Original
+Code, to do the following:
+
+2.1 You may use, copy, modify and distribute Original Code, with or
+without Modifications, solely for Your internal research and
+development, provided that You must in each instance:
+
+(a) retain and reproduce in all copies of Original Code the copyright
+and other proprietary notices and disclaimers of Apple as they appear
+in the Original Code, and keep intact all notices in the Original Code
+that refer to this License;
+
+(b) include a copy of this License with every copy of Source Code of
+Covered Code and documentation You distribute, and You may not offer
+or impose any terms on such Source Code that alter or restrict this
+License or the recipients' rights hereunder, except as permitted under
+Section 6; and
+
+(c) completely and accurately document all Modifications that you have
+made and the date of each such Modification, designate the version of
+the Original Code you used, prominently include a file carrying such
+information with the Modifications, and duplicate the notice in
+Exhibit A in each file of the Source Code of all such Modifications.
+
+2.2 You may Deploy Covered Code, provided that You must in each
+ instance:
+
+(a) satisfy all the conditions of Section 2.1 with respect to the
+Source Code of the Covered Code;
+
+(b) make all Your Deployed Modifications publicly available in Source
+Code form via electronic distribution (e.g. download from a web site)
+under the terms of this License and subject to the license grants set
+forth in Section 3 below, and any additional terms You may choose to
+offer under Section 6. You must continue to make the Source Code of
+Your Deployed Modifications available for as long as you Deploy the
+Covered Code or twelve (12) months from the date of initial
+Deployment, whichever is longer;
+
+(c) if You Deploy Covered Code containing Modifications made by You,
+inform others of how to obtain those Modifications by filling out and
+submitting the information found at
+http://www.apple.com/publicsource/modifications.html, if available;
+and
+
+(d) if You Deploy Covered Code in object code, executable form only,
+include a prominent notice, in the code itself as well as in related
+documentation, stating that Source Code of the Covered Code is
+available under the terms of this License with information on how and
+where to obtain such Source Code.
+
+3. Your Grants. In consideration of, and as a condition to, the
+licenses granted to You under this License:
+
+(a) You hereby grant to Apple and all third parties a non-exclusive,
+royalty-free license, under Your Applicable Patent Rights and other
+intellectual property rights owned or controlled by You, to use,
+reproduce, modify, distribute and Deploy Your Modifications of the
+same scope and extent as Apple's licenses under Sections 2.1 and 2.2;
+and
+
+(b) You hereby grant to Apple and its subsidiaries a non-exclusive,
+worldwide, royalty-free, perpetual and irrevocable license, under Your
+Applicable Patent Rights and other intellectual property rights owned
+or controlled by You, to use, reproduce, execute, compile, display,
+perform, modify or have modified (for Apple and/or its subsidiaries),
+sublicense and distribute Your Modifications, in any form, through
+multiple tiers of distribution.
+
+4. Larger Works. You may create a Larger Work by combining Covered
+Code with other code not governed by the terms of this License and
+distribute the Larger Work as a single product. In each such
+instance, You must make sure the requirements of this License are
+fulfilled for the Covered Code or any portion thereof.
+
+5. Limitations on Patent License. Except as expressly stated in
+Section 2, no other patent rights, express or implied, are granted by
+Apple herein. Modifications and/or Larger Works may require
+additional patent licenses from Apple which Apple may grant in its
+sole discretion.
+
+6. Additional Terms. You may choose to offer, and to charge a fee
+for, warranty, support, indemnity or liability obligations and/or
+other rights consistent with the scope of the license granted herein
+("Additional Terms") to one or more recipients of Covered
+Code. However, You may do so only on Your own behalf and as Your sole
+responsibility, and not on behalf of Apple. You must obtain the
+recipient's agreement that any such Additional Terms are offered by
+You alone, and You hereby agree to indemnify, defend and hold Apple
+harmless for any liability incurred by or claims asserted against
+Apple by reason of any such Additional Terms.
+
+7. Versions of the License. Apple may publish revised and/or new
+versions of this License from time to time. Each version will be
+given a distinguishing version number. Once Original Code has been
+published under a particular version of this License, You may continue
+to use it under the terms of that version. You may also choose to use
+such Original Code under the terms of any subsequent version of this
+License published by Apple. No one other than Apple has the right to
+modify the terms applicable to Covered Code created under this
+License.
+
+8. NO WARRANTY OR SUPPORT. The Original Code may contain in whole or
+in part pre-release, untested, or not fully tested works. The
+Original Code may contain errors that could cause failures or loss of
+data, and may be incomplete or contain inaccuracies. You expressly
+acknowledge and agree that use of the Original Code, or any portion
+thereof, is at Your sole and entire risk. THE ORIGINAL CODE IS
+PROVIDED "AS IS" AND WITHOUT WARRANTY, UPGRADES OR SUPPORT OF ANY KIND
+AND APPLE AND APPLE'S LICENSOR(S) (FOR THE PURPOSES OF SECTIONS 8 AND
+9, APPLE AND APPLE'S LICENSOR(S) ARE COLLECTIVELY REFERRED TO AS
+"APPLE") EXPRESSLY DISCLAIM ALL WARRANTIES AND/OR CONDITIONS, EXPRESS
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+AND/OR CONDITIONS OF MERCHANTABILITY OR SATISFACTORY QUALITY AND
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY
+RIGHTS. APPLE DOES NOT WARRANT THAT THE FUNCTIONS CONTAINED IN THE
+ORIGINAL CODE WILL MEET YOUR REQUIREMENTS, OR THAT THE OPERATION OF
+THE ORIGINAL CODE WILL BE UNINTERRUPTED OR ERROR- FREE, OR THAT
+DEFECTS IN THE ORIGINAL CODE WILL BE CORRECTED. NO ORAL OR WRITTEN
+INFORMATION OR ADVICE GIVEN BY APPLE OR AN APPLE AUTHORIZED
+REPRESENTATIVE SHALL CREATE A WARRANTY OR IN ANY WAY INCREASE THE
+SCOPE OF THIS WARRANTY. You acknowledge that the Original Code is not
+intended for use in the operation of nuclear facilities, aircraft
+navigation, communication systems, or air traffic control machines in
+which case the failure of the Original Code could lead to death,
+personal injury, or severe physical or environmental damage.
+
+9. Liability.
+
+9.1 Infringement. If any portion of, or functionality implemented by,
+the Original Code becomes the subject of a claim of infringement,
+Apple may, at its option: (a) attempt to procure the rights necessary
+for Apple and You to continue using the Affected Original Code; (b)
+modify the Affected Original Code so that it is no longer infringing;
+or (c) suspend Your rights to use, reproduce, modify, sublicense and
+distribute the Affected Original Code until a final determination of
+the claim is made by a court or governmental administrative agency of
+competent jurisdiction and Apple lifts the suspension as set forth
+below. Such suspension of rights will be effective immediately upon
+Apple's posting of a notice to such effect on the Apple web site that
+is used for implementation of this License. Upon such final
+determination being made, if Apple is legally able, without the
+payment of a fee or royalty, to resume use, reproduction,
+modification, sublicensing and distribution of the Affected Original
+Code, Apple will lift the suspension of rights to the Affected
+Original Code by posting a notice to such effect on the Apple web site
+that is used for implementation of this License. If Apple suspends
+Your rights to Affected Original Code, nothing in this License shall
+be construed to restrict You, at Your option and subject to applicable
+law, from replacing the Affected Original Code with non-infringing
+code or independently negotiating for necessary rights from such third
+party.
+
+9.2 LIMITATION OF LIABILITY. UNDER NO CIRCUMSTANCES SHALL APPLE BE
+LIABLE FOR ANY INCIDENTAL, SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES
+ARISING OUT OF OR RELATING TO THIS LICENSE OR YOUR USE OR INABILITY TO
+USE THE ORIGINAL CODE, OR ANY PORTION THEREOF, WHETHER UNDER A THEORY
+OF CONTRACT, WARRANTY, TORT (INCLUDING NEGLIGENCE), PRODUCTS LIABILITY
+OR OTHERWISE, EVEN IF APPLE HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES AND NOTWITHSTANDING THE FAILURE OF ESSENTIAL PURPOSE OF
+ANY REMEDY. In no event shall Apple's total liability to You for all
+damages under this License exceed the amount of fifty dollars
+($50.00).
+
+10. Trademarks. This License does not grant any rights to use the
+trademarks or trade names "Apple", "Apple Computer", "Mac OS X", "Mac
+OS X Server" or any other trademarks or trade names belonging to Apple
+(collectively "Apple Marks") and no Apple Marks may be used to endorse
+or promote products derived from the Original Code other than as
+permitted by and in strict compliance at all times with Apple's third
+party trademark usage guidelines which are posted at
+http://www.apple.com/legal/guidelinesfor3rdparties.html.
+
+11. Ownership. Apple retains all rights, title and interest in and to
+the Original Code and any Modifications made by or on behalf of Apple
+("Apple Modifications"), and such Apple Modifications will not be
+automatically subject to this License. Apple may, at its sole
+discretion, choose to license such Apple Modifications under this
+License, or on different terms from those contained in this License or
+may choose not to license them at all. Apple's development, use,
+reproduction, modification, sublicensing and distribution of Covered
+Code will not be subject to this License.
+
+12. Termination.
+
+12.1 Termination. This License and the rights granted hereunder will
+ terminate:
+
+(a) automatically without notice from Apple if You fail to comply with
+any term(s) of this License and fail to cure such breach within 30
+days of becoming aware of such breach; (b) immediately in the event of
+the circumstances described in Section 13.5(b); or (c) automatically
+without notice from Apple if You, at any time during the term of this
+License, commence an action for patent infringement against Apple.
+
+12.2 Effect of Termination. Upon termination, You agree to
+immediately stop any further use, reproduction, modification,
+sublicensing and distribution of the Covered Code and to destroy all
+copies of the Covered Code that are in your possession or control.
+All sublicenses to the Covered Code which have been properly granted
+prior to termination shall survive any termination of this License.
+Provisions which, by their nature, should remain in effect beyond the
+termination of this License shall survive, including but not limited
+to Sections 3, 5, 8, 9, 10, 11, 12.2 and 13. Neither party will be
+liable to the other for compensation, indemnity or damages of any sort
+solely as a result of terminating this License in accordance with its
+terms, and termination of this License will be without prejudice to
+any other right or remedy of either party.
+
+13. Miscellaneous.
+
+13.1 Government End Users. The Covered Code is a "commercial item" as
+defined in FAR 2.101. Government software and technical data rights
+in the Covered Code include only those rights customarily provided to
+the public as defined in this License. This customary commercial
+license in technical data and software is provided in accordance with
+FAR 12.211 (Technical Data) and 12.212 (Computer Software) and, for
+Department of Defense purchases, DFAR 252.227-7015 (Technical Data --
+Commercial Items) and 227.7202-3 (Rights in Commercial Computer
+Software or Computer Software Documentation). Accordingly, all U.S.
+Government End Users acquire Covered Code with only those rights set
+forth herein.
+
+13.2 Relationship of Parties. This License will not be construed as
+creating an agency, partnership, joint venture or any other form of
+legal association between You and Apple, and You will not represent to
+the contrary, whether expressly, by implication, appearance or
+otherwise.
+
+13.3 Independent Development. Nothing in this License will impair
+Apple's right to acquire, license, develop, have others develop for
+it, market and/or distribute technology or products that perform the
+same or similar functions as, or otherwise compete with,
+Modifications, Larger Works, technology or products that You may
+develop, produce, market or distribute.
+
+13.4 Waiver; Construction. Failure by Apple to enforce any provision
+of this License will not be deemed a waiver of future enforcement of
+that or any other provision. Any law or regulation which provides
+that the language of a contract shall be construed against the drafter
+will not apply to this License.
+
+13.5 Severability. (a) If for any reason a court of competent
+jurisdiction finds any provision of this License, or portion thereof,
+to be unenforceable, that provision of the License will be enforced to
+the maximum extent permissible so as to effect the economic benefits
+and intent of the parties, and the remainder of this License will
+continue in full force and effect. (b) Notwithstanding the foregoing,
+if applicable law prohibits or restricts You from fully and/or
+specifically complying with Sections 2 and/or 3 or prevents the
+enforceability of either of those Sections, this License will
+immediately terminate and You must immediately discontinue any use of
+the Covered Code and destroy all copies of it that are in your
+possession or control.
+
+13.6 Dispute Resolution. Any litigation or other dispute resolution
+between You and Apple relating to this License shall take place in the
+Northern District of California, and You and Apple hereby consent to
+the personal jurisdiction of, and venue in, the state and federal
+courts within that District with respect to this License. The
+application of the United Nations Convention on Contracts for the
+International Sale of Goods is expressly excluded.
+
+13.7 Entire Agreement; Governing Law. This License constitutes the
+entire agreement between the parties with respect to the subject
+matter hereof. This License shall be governed by the laws of the
+United States and the State of California, except that body of
+California law concerning conflicts of law.
+
+Where You are located in the province of Quebec, Canada, the following
+clause applies: The parties hereby confirm that they have requested
+that this License and all related documents be drafted in English. Les
+parties ont exige que le present contrat et tous les documents
+connexes soient rediges en anglais.
+
+EXHIBIT A.
+
+"Portions Copyright (c) 1999-2000 Apple Computer, Inc. All Rights
+Reserved. This file contains Original Code and/or Modifications of
+Original Code as defined in and that are subject to the Apple Public
+Source License Version 1.1 (the "License"). You may not use this file
+except in compliance with the License. Please obtain a copy of the
+License at http://www.apple.com/publicsource and read it before using
+this file.
+
+The Original Code and all software distributed under the License are
+distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
+INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT. Please see the
+License for the specific language governing rights and limitations
+under the License."
+
+
+file:misc/macosx/openUp.c
Property changes on: brlcad/trunk/doc/legal/embedded/apple.txt
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property
Modified: brlcad/trunk/doc/legal/embedded/bullet.txt
===================================================================
--- brlcad/trunk/doc/legal/embedded/bullet.txt 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/doc/legal/embedded/bullet.txt 2020-04-11 00:18:38 UTC (rev
75356)
@@ -369,3 +369,16 @@
file:src/libged/simulate/bullet/BulletSoftBody/btSoftBodyInternals.h
file:src/libged/simulate/bullet/LinearMath/btMatrixX.h
file:src/libged/simulate/bullet/LinearMath/btSpatialAlgebra.h
+file:src/libged/simulate/bullet/LinearMath/btPolarDecomposition.cpp
+file:src/libged/simulate/bullet/LinearMath/btQuickprof.cpp
+file:src/libged/simulate/bullet/LinearMath/btSerializer.cpp
+file:src/libged/simulate/bullet/BulletCollision/CollisionDispatch/btInternalEdgeUtility.cpp
+file:src/libged/simulate/bullet/BulletCollision/CollisionDispatch/btInternalEdgeUtility.h
+file:src/libged/simulate/bullet/BulletDynamics/Featherstone/btMultiBodyConstraint.cpp
+file:src/libged/simulate/bullet/LinearMath/btDefaultMotionState.h
+file:src/libged/simulate/bullet/LinearMath/btPolarDecomposition.h
+file:src/libged/simulate/bullet/LinearMath/btQuickprof.h
+file:src/libged/simulate/bullet/BulletCollision/CollisionDispatch/btCollisionObjectWrapper.h
+file:src/libged/simulate/bullet/BulletCollision/Gimpact/btCompoundFromGimpact.h
+file:src/libged/simulate/bullet/LinearMath/btCpuFeatureUtility.h
+
Added: brlcad/trunk/doc/legal/embedded/naca.txt
===================================================================
--- brlcad/trunk/doc/legal/embedded/naca.txt (rev 0)
+++ brlcad/trunk/doc/legal/embedded/naca.txt 2020-04-11 00:18:38 UTC (rev
75356)
@@ -0,0 +1,35 @@
+BRL-CAD's translation of the calculation of coordinates for NACA airfoils is
+based on the public domain program naca456 written by Ralph Carmichael of
+Public Domain Aeronautical Software (PDAS):
+
+http://www.pdas.com/naca456.html
+
+naca456 is in turn based off of earlier work by several authors at NASA,
+documented in reports NASA TM X-3284, NASA TM X-3069 and NASA TM 4741. The
+program naca456 is documented in the paper:
+
+Carmichael, Ralph L.: Algorithm for Calculating Coordinates of Cambered NACA
+Airfoils At Specified Chord Locations. AIAA Paper 2001-5235, November 2001.
+
+Disclaimer, per the PDAS distribution:
+
+Although many of the works contained herein were developed by national
+laboratories or their contractors, neither the U.S. Government nor Public
+Domain Aeronautical Software make any warranty as to the accuracy or
+appropriateness of the procedure to any particular application.
+
+The programs and descriptions have been collected and reproduced with great
+care and attention to accuracy, but no guarantee or warranty is implied. All
+programs are offered AS IS and Public Domain Aeronautical Software does not
+give any express or implied warranty of any kind and any implied warranties are
+disclaimed. Public Domain Aeronautical Software will not be liable for any
+direct, indirect, special, incidental, or consequential damages arising out of
+any use of this software. In no case should the results of any computational
+scheme be used as a substitute for sound engineering practice and judgment.
+
+file:src/proc-db/naca/epspsi.c
+file:src/proc-db/naca/naca456.c
+file:src/proc-db/naca/naca.h
+file:src/proc-db/naca/nacax.c
+file:src/proc-db/naca/splprocs.c
+
Property changes on: brlcad/trunk/doc/legal/embedded/naca.txt
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property
Modified: brlcad/trunk/doc/legal/embedded/osl.txt
===================================================================
--- brlcad/trunk/doc/legal/embedded/osl.txt 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/doc/legal/embedded/osl.txt 2020-04-11 00:18:38 UTC (rev
75356)
@@ -26,4 +26,4 @@
file:src/liboptical/oslexec_pvt.h
file:src/liboptical/constantpool.h
-
+file:misc/osl_shaders/stdosl.h
Modified: brlcad/trunk/doc/legal/embedded/tcl.txt
===================================================================
--- brlcad/trunk/doc/legal/embedded/tcl.txt 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/doc/legal/embedded/tcl.txt 2020-04-11 00:18:38 UTC (rev
75356)
@@ -53,3 +53,5 @@
Australian National University.
file:src/libtclcad/tkImgFmtPIX.c
+file:src/tclscripts/cad_clrpick.tcl
+file:src/tclscripts/html_library.tcl
Added: brlcad/trunk/doc/legal/embedded/tcllib.txt
===================================================================
--- brlcad/trunk/doc/legal/embedded/tcllib.txt (rev 0)
+++ brlcad/trunk/doc/legal/embedded/tcllib.txt 2020-04-11 00:18:38 UTC (rev
75356)
@@ -0,0 +1,48 @@
+ Tcl implementations of standard UNIX utilities.
+
+Copyright (c) 1998-2000 by Ajuba Solutions.
+Copyright (c) 2002 by Phil Ehrens <[email protected]> (fileType)
+Copyright (c) 2005-2013 by Andreas Kupries
<[email protected]>
+
+This software is copyrighted by Ajuba Solutions and other parties.
+The following terms apply to all files associated with the software unless
+explicitly disclaimed in individual files.
+
+The authors hereby grant permission to use, copy, modify, distribute,
+and license this software and its documentation for any purpose, provided
+that existing copyright notices are retained in all copies and that this
+notice is included verbatim in any distributions. No written agreement,
+license, or royalty fee is required for any of the authorized uses.
+Modifications to this software may be copyrighted by their authors
+and need not follow the licensing terms described here, provided that
+the new terms are clearly indicated on the first page of each file where
+they apply.
+
+IN NO EVENT SHALL THE AUTHORS OR DISTRIBUTORS BE LIABLE TO ANY PARTY
+FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
+ARISING OUT OF THE USE OF THIS SOFTWARE, ITS DOCUMENTATION, OR ANY
+DERIVATIVES THEREOF, EVEN IF THE AUTHORS HAVE BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGE.
+
+THE AUTHORS AND DISTRIBUTORS SPECIFICALLY DISCLAIM ANY WARRANTIES,
+INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE, AND NON-INFRINGEMENT. THIS SOFTWARE
+IS PROVIDED ON AN "AS IS" BASIS, AND THE AUTHORS AND DISTRIBUTORS HAVE
+NO OBLIGATION TO PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR
+MODIFICATIONS.
+
+GOVERNMENT USE: If you are acquiring this software on behalf of the
+U.S. government, the Government shall have only "Restricted Rights"
+in the software and related documentation as defined in the Federal
+Acquisition Regulations (FARs) in Clause 52.227.19 (c) (2). If you
+are acquiring the software on behalf of the Department of Defense, the
+software shall be classified as "Commercial Computer Software" and the
+Government shall have only "Restricted Rights" as defined in Clause
+252.227-7013 (c) (1) of DFARs. Notwithstanding the foregoing, the
+authors grant the U.S. Government and others acting in its behalf
+permission to use and distribute the software in accordance with the
+terms specified in this license.
+
+file:src/tclscripts/tcllib/cmdline.tcl
+file:src/tclscripts/tcllib/fileutil.tcl
+
Property changes on: brlcad/trunk/doc/legal/embedded/tcllib.txt
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property
Modified: brlcad/trunk/misc/attributes/gen-attributes-file.cpp
===================================================================
--- brlcad/trunk/misc/attributes/gen-attributes-file.cpp 2020-04-11
00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/attributes/gen-attributes-file.cpp 2020-04-11
00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* G E N - A T T R I B U T E S - F I L E . C P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2013-2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file gen-attributes-file.cpp
+ *
+ * Brief description
+ *
+ */
+
#include "common.h"
#include "bu.h"
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version1/clhost.cpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version1/clhost.cpp
2020-04-11 00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version1/clhost.cpp
2020-04-11 00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* C L H O S T . C P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file clhost.cpp
+ *
+ * Brief description
+ *
+ */
+
#include "clhost.hpp"
#include "utility.hpp"
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version1/clhost.hpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version1/clhost.hpp
2020-04-11 00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version1/clhost.hpp
2020-04-11 00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* C L H O S T . H P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file clhost.hpp
+ *
+ * Brief description
+ *
+ */
+
#ifndef __CLHOST_H__
#define __CLHOST_H__
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version1/main.cpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version1/main.cpp 2020-04-11
00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version1/main.cpp 2020-04-11
00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* M A I N . C P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file main.cpp
+ *
+ * Brief description
+ *
+ */
+
#include "raytracer.hpp"
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version1/raytracer.hpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version1/raytracer.hpp
2020-04-11 00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version1/raytracer.hpp
2020-04-11 00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* R A Y T R A C E R . H P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file raytracer.hpp
+ *
+ * Brief description
+ *
+ */
+
#ifndef __RAYTRACER_H
#define __RAYTRACER_H
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version1/utility.hpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version1/utility.hpp
2020-04-11 00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version1/utility.hpp
2020-04-11 00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* U T I L I T Y . H P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file utility.hpp
+ *
+ * Brief description
+ *
+ */
+
#ifndef __UTILITY_H__
#define __UTILITY_H__
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version2/main.cpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version2/main.cpp 2020-04-11
00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version2/main.cpp 2020-04-11
00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* M A I N . C P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file main.cpp
+ *
+ * Brief description
+ *
+ */
+
#include "raytracer.hpp"
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version2/raytracer.cpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version2/raytracer.cpp
2020-04-11 00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version2/raytracer.cpp
2020-04-11 00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* R A Y T R A C E R . C P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file raytracer.cpp
+ *
+ * Brief description
+ *
+ */
+
#include "raytracer.hpp"
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version2/raytracer.hpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version2/raytracer.hpp
2020-04-11 00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version2/raytracer.hpp
2020-04-11 00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* R A Y T R A C E R . H P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file raytracer.hpp
+ *
+ * Brief description
+ *
+ */
+
#ifndef __RAYTRACER_H__
#define __RAYTRACER_H__
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version2/rt.cl
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version2/rt.cl 2020-04-11
00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version2/rt.cl 2020-04-11
00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* R T . C L
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file rt.cl
+ *
+ * Brief description
+ *
+ */
+
#define MAX_SPHERES 10
@@ -23,7 +48,6 @@
}
}
-
/*
* Local Variables:
* mode: C
Modified: brlcad/trunk/misc/opencl-raytracer-tests/version2/utility.hpp
===================================================================
--- brlcad/trunk/misc/opencl-raytracer-tests/version2/utility.hpp
2020-04-11 00:07:11 UTC (rev 75355)
+++ brlcad/trunk/misc/opencl-raytracer-tests/version2/utility.hpp
2020-04-11 00:18:38 UTC (rev 75356)
@@ -1,3 +1,28 @@
+/* U T I L I T Y . H P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file utility.hpp
+ *
+ * Brief description
+ *
+ */
+
#ifndef __UTILITY_H__
#define __UTILITY_H__
Modified: brlcad/trunk/misc/win32-msvc/bootstrap.cpp
===================================================================
--- brlcad/trunk/misc/win32-msvc/bootstrap.cpp 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/misc/win32-msvc/bootstrap.cpp 2020-04-11 00:18:38 UTC (rev
75356)
@@ -1,3 +1,28 @@
+/* B O O T S T R A P . C P P
+ * BRL-CAD
+ *
+ * Copyright (c) 2012-2020 United States Government as represented by
+ * the U.S. Army Research Laboratory.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * version 2.1 as published by the Free Software Foundation.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this file; see the file named COPYING for more
+ * information.
+ */
+/** @file bootstrap.cpp
+ *
+ * Brief description
+ *
+ */
+
#include "common.h"
#include "bio.h"
Modified: brlcad/trunk/regress/mged/regression_resources.tcl
===================================================================
--- brlcad/trunk/regress/mged/regression_resources.tcl 2020-04-11 00:07:11 UTC
(rev 75355)
+++ brlcad/trunk/regress/mged/regression_resources.tcl 2020-04-11 00:18:38 UTC
(rev 75356)
@@ -1,3 +1,23 @@
+# R E G R E S S I O N _ R E S O U R C E S . T C L
+# BRL-CAD
+#
+# Copyright (c) 2009-2020 United States Government as represented by
+# the U.S. Army Research Laboratory.
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public License
+# version 2.1 as published by the Free Software Foundation.
+#
+# This library is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this file; see the file named COPYING for more
+# information.
+#
+###
# This file needs to be run only once per series of commands, but
# with command tests broken into individual files each file might
# need to run it. To avoid the problem, the entire file contents
Modified: brlcad/trunk/src/proc-db/naca/epspsi.c
===================================================================
--- brlcad/trunk/src/proc-db/naca/epspsi.c 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/src/proc-db/naca/epspsi.c 2020-04-11 00:18:38 UTC (rev
75356)
@@ -1,3 +1,43 @@
+/* E P S P S I . C
+ * BRL-CAD
+ *
+ * Published in 2020 by the United States Government.
+ * This work is in the public domain.
+ *
+ */
+/** @file epspsi.c
+ *
+ * BRL-CAD's translation of the calculation of coordinates for NACA airfoils is
+ * based on the public domain program naca456 written by Ralph Carmichael of
+ * Public Domain Aeronautical Software (PDAS):
+ *
+ * http://www.pdas.com/naca456.html
+ *
+ * naca456 is in turn based off of earlier work by several authors at NASA,
+ * documented in reports NASA TM X-3284, NASA TM X-3069 and NASA TM 4741. The
+ * program naca456 is documented in the paper:
+ *
+ * Carmichael, Ralph L.: Algorithm for Calculating Coordinates of Cambered NACA
+ * Airfoils At Specified Chord Locations. AIAA Paper 2001-5235, November 2001.
+ *
+ * Disclaimer, per the PDAS distribution:
+ *
+ * Although many of the works contained herein were developed by national
+ * laboratories or their contractors, neither the U.S. Government nor Public
+ * Domain Aeronautical Software make any warranty as to the accuracy or
+ * appropriateness of the procedure to any particular application.
+ *
+ * The programs and descriptions have been collected and reproduced with great
+ * care and attention to accuracy, but no guarantee or warranty is implied. All
+ * programs are offered AS IS and Public Domain Aeronautical Software does not
+ * give any express or implied warranty of any kind and any implied warranties
are
+ * disclaimed. Public Domain Aeronautical Software will not be liable for any
+ * direct, indirect, special, incidental, or consequential damages arising out
of
+ * any use of this software. In no case should the results of any computational
+ * scheme be used as a substitute for sound engineering practice and judgment.
+ *
+ */
+
#include "naca.h"
const fastf_t EPS1[] = {
Modified: brlcad/trunk/src/proc-db/naca/naca.h
===================================================================
--- brlcad/trunk/src/proc-db/naca/naca.h 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/src/proc-db/naca/naca.h 2020-04-11 00:18:38 UTC (rev
75356)
@@ -34,8 +34,35 @@
*/
/** @file naca.h
*
- * Brief description
+ * BRL-CAD's translation of the calculation of coordinates for NACA airfoils is
+ * based on the public domain program naca456 written by Ralph Carmichael of
+ * Public Domain Aeronautical Software (PDAS):
*
+ * http://www.pdas.com/naca456.html
+ *
+ * naca456 is in turn based off of earlier work by several authors at NASA,
+ * documented in reports NASA TM X-3284, NASA TM X-3069 and NASA TM 4741. The
+ * program naca456 is documented in the paper:
+ *
+ * Carmichael, Ralph L.: Algorithm for Calculating Coordinates of Cambered NACA
+ * Airfoils At Specified Chord Locations. AIAA Paper 2001-5235, November 2001.
+ *
+ * Disclaimer, per the PDAS distribution:
+ *
+ * Although many of the works contained herein were developed by national
+ * laboratories or their contractors, neither the U.S. Government nor Public
+ * Domain Aeronautical Software make any warranty as to the accuracy or
+ * appropriateness of the procedure to any particular application.
+ *
+ * The programs and descriptions have been collected and reproduced with great
+ * care and attention to accuracy, but no guarantee or warranty is implied. All
+ * programs are offered AS IS and Public Domain Aeronautical Software does not
+ * give any express or implied warranty of any kind and any implied warranties
are
+ * disclaimed. Public Domain Aeronautical Software will not be liable for any
+ * direct, indirect, special, incidental, or consequential damages arising out
of
+ * any use of this software. In no case should the results of any computational
+ * scheme be used as a substitute for sound engineering practice and judgment.
+ *
*/
#include "common.h"
Modified: brlcad/trunk/src/proc-db/naca/naca456.c
===================================================================
--- brlcad/trunk/src/proc-db/naca/naca456.c 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/src/proc-db/naca/naca456.c 2020-04-11 00:18:38 UTC (rev
75356)
@@ -34,8 +34,35 @@
*/
/** @file naca456.c
*
- * Brief description
+ * BRL-CAD's translation of the calculation of coordinates for NACA airfoils is
+ * based on the public domain program naca456 written by Ralph Carmichael of
+ * Public Domain Aeronautical Software (PDAS):
*
+ * http://www.pdas.com/naca456.html
+ *
+ * naca456 is in turn based off of earlier work by several authors at NASA,
+ * documented in reports NASA TM X-3284, NASA TM X-3069 and NASA TM 4741. The
+ * program naca456 is documented in the paper:
+ *
+ * Carmichael, Ralph L.: Algorithm for Calculating Coordinates of Cambered NACA
+ * Airfoils At Specified Chord Locations. AIAA Paper 2001-5235, November 2001.
+ *
+ * Disclaimer, per the PDAS distribution:
+ *
+ * Although many of the works contained herein were developed by national
+ * laboratories or their contractors, neither the U.S. Government nor Public
+ * Domain Aeronautical Software make any warranty as to the accuracy or
+ * appropriateness of the procedure to any particular application.
+ *
+ * The programs and descriptions have been collected and reproduced with great
+ * care and attention to accuracy, but no guarantee or warranty is implied. All
+ * programs are offered AS IS and Public Domain Aeronautical Software does not
+ * give any express or implied warranty of any kind and any implied warranties
are
+ * disclaimed. Public Domain Aeronautical Software will not be liable for any
+ * direct, indirect, special, incidental, or consequential damages arising out
of
+ * any use of this software. In no case should the results of any computational
+ * scheme be used as a substitute for sound engineering practice and judgment.
+ *
*/
#include "naca.h"
Modified: brlcad/trunk/src/proc-db/naca/nacax.c
===================================================================
--- brlcad/trunk/src/proc-db/naca/nacax.c 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/src/proc-db/naca/nacax.c 2020-04-11 00:18:38 UTC (rev
75356)
@@ -34,8 +34,35 @@
*/
/** @file nacax.c
*
- * Brief description
+ * BRL-CAD's translation of the calculation of coordinates for NACA airfoils is
+ * based on the public domain program naca456 written by Ralph Carmichael of
+ * Public Domain Aeronautical Software (PDAS):
*
+ * http://www.pdas.com/naca456.html
+ *
+ * naca456 is in turn based off of earlier work by several authors at NASA,
+ * documented in reports NASA TM X-3284, NASA TM X-3069 and NASA TM 4741. The
+ * program naca456 is documented in the paper:
+ *
+ * Carmichael, Ralph L.: Algorithm for Calculating Coordinates of Cambered NACA
+ * Airfoils At Specified Chord Locations. AIAA Paper 2001-5235, November 2001.
+ *
+ * Disclaimer, per the PDAS distribution:
+ *
+ * Although many of the works contained herein were developed by national
+ * laboratories or their contractors, neither the U.S. Government nor Public
+ * Domain Aeronautical Software make any warranty as to the accuracy or
+ * appropriateness of the procedure to any particular application.
+ *
+ * The programs and descriptions have been collected and reproduced with great
+ * care and attention to accuracy, but no guarantee or warranty is implied. All
+ * programs are offered AS IS and Public Domain Aeronautical Software does not
+ * give any express or implied warranty of any kind and any implied warranties
are
+ * disclaimed. Public Domain Aeronautical Software will not be liable for any
+ * direct, indirect, special, incidental, or consequential damages arising out
of
+ * any use of this software. In no case should the results of any computational
+ * scheme be used as a substitute for sound engineering practice and judgment.
+ **
*/
#include "common.h"
Modified: brlcad/trunk/src/proc-db/naca/splprocs.c
===================================================================
--- brlcad/trunk/src/proc-db/naca/splprocs.c 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/src/proc-db/naca/splprocs.c 2020-04-11 00:18:38 UTC (rev
75356)
@@ -34,8 +34,35 @@
*/
/** @file splprocs.c
*
- * Brief description
+ * BRL-CAD's translation of the calculation of coordinates for NACA airfoils is
+ * based on the public domain program naca456 written by Ralph Carmichael of
+ * Public Domain Aeronautical Software (PDAS):
*
+ * http://www.pdas.com/naca456.html
+ *
+ * naca456 is in turn based off of earlier work by several authors at NASA,
+ * documented in reports NASA TM X-3284, NASA TM X-3069 and NASA TM 4741. The
+ * program naca456 is documented in the paper:
+ *
+ * Carmichael, Ralph L.: Algorithm for Calculating Coordinates of Cambered NACA
+ * Airfoils At Specified Chord Locations. AIAA Paper 2001-5235, November 2001.
+ *
+ * Disclaimer, per the PDAS distribution:
+ *
+ * Although many of the works contained herein were developed by national
+ * laboratories or their contractors, neither the U.S. Government nor Public
+ * Domain Aeronautical Software make any warranty as to the accuracy or
+ * appropriateness of the procedure to any particular application.
+ *
+ * The programs and descriptions have been collected and reproduced with great
+ * care and attention to accuracy, but no guarantee or warranty is implied. All
+ * programs are offered AS IS and Public Domain Aeronautical Software does not
+ * give any express or implied warranty of any kind and any implied warranties
are
+ * disclaimed. Public Domain Aeronautical Software will not be liable for any
+ * direct, indirect, special, incidental, or consequential damages arising out
of
+ * any use of this software. In no case should the results of any computational
+ * scheme be used as a substitute for sound engineering practice and judgment.
+ *
*/
#include "common.h"
Modified: brlcad/trunk/src/tclscripts/CMakeLists.txt
===================================================================
--- brlcad/trunk/src/tclscripts/CMakeLists.txt 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/src/tclscripts/CMakeLists.txt 2020-04-11 00:18:38 UTC (rev
75356)
@@ -115,7 +115,6 @@
# that relies on the other tclscripts being set up.
add_subdirectory(rtwizard)
-CMAKEFILES(README hv3_man_browser_test.tcl)
CMAKEFILES(CMakeLists.txt)
# Local Variables:
Modified: brlcad/trunk/src/tclscripts/checker/test_checker.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/checker/test_checker.tcl 2020-04-11
00:07:11 UTC (rev 75355)
+++ brlcad/trunk/src/tclscripts/checker/test_checker.tcl 2020-04-11
00:18:38 UTC (rev 75356)
@@ -1,4 +1,24 @@
#!/usr/bin/env tclsh
+# T E S T _ C H E C K E R . T C L
+# BRL-CAD
+#
+# Copyright (c) 2017-2020 United States Government as represented by
+# the U.S. Army Research Laboratory.
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public License
+# version 2.1 as published by the Free Software Foundation.
+#
+# This library is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this file; see the file named COPYING for more
+# information.
+#
+###
# configuration
if {![info exists ::env(CHECKER_DIR)]} {
Modified: brlcad/trunk/src/tclscripts/hv3/demo/viewpage.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/hv3/demo/viewpage.tcl 2020-04-11 00:07:11 UTC
(rev 75355)
+++ brlcad/trunk/src/tclscripts/hv3/demo/viewpage.tcl 2020-04-11 00:18:38 UTC
(rev 75356)
@@ -1,4 +1,24 @@
#!/usr/brlcad/bin/bwish
+# V I E W P A G E . T C L
+# BRL-CAD
+#
+# Copyright (c) 2010-2020 United States Government as represented by
+# the U.S. Army Research Laboratory.
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public License
+# version 2.1 as published by the Free Software Foundation.
+#
+# This library is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this file; see the file named COPYING for more
+# information.
+#
+###
package require hv3
#source snit.tcl
Modified: brlcad/trunk/src/tclscripts/hv3/hv3.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/hv3/hv3.tcl 2020-04-11 00:07:11 UTC (rev
75355)
+++ brlcad/trunk/src/tclscripts/hv3/hv3.tcl 2020-04-11 00:18:38 UTC (rev
75356)
@@ -1,3 +1,33 @@
+# Copyright (c) 2005 Eolas Technologies Inc.
+# All rights reserved.
+#
+# This Open Source project was made possible through the financial support
+# of Eolas Technologies Inc.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+#
+# * Redistributions of source code must retain the above copyright
+# notice, this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright
+# notice, this list of conditions and the following disclaimer in the
+# documentation and/or other materials provided with the distribution.
+# * Neither the name of the <ORGANIZATION> nor the names of its
+# contributors may be used to endorse or promote products derived from
+# this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+
catch {namespace eval hv3 { set {version($Id: hv3.tcl,v 1.248 2008/03/02
15:00:13 danielk1977 Exp $)} 1 }}
# This file contains the mega-widget hv3::hv3 that is at the core
Modified: brlcad/trunk/src/tclscripts/hv3/hv3_encodings.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/hv3/hv3_encodings.tcl 2020-04-11 00:07:11 UTC
(rev 75355)
+++ brlcad/trunk/src/tclscripts/hv3/hv3_encodings.tcl 2020-04-11 00:18:38 UTC
(rev 75356)
@@ -1,3 +1,32 @@
+# Copyright (c) 2005 Eolas Technologies Inc.
+# All rights reserved.
+#
+# This Open Source project was made possible through the financial support
+# of Eolas Technologies Inc.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+#
+# * Redistributions of source code must retain the above copyright
+# notice, this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright
+# notice, this list of conditions and the following disclaimer in the
+# documentation and/or other materials provided with the distribution.
+# * Neither the name of the <ORGANIZATION> nor the names of its
+# contributors may be used to endorse or promote products derived from
+# this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
# hv3_encodings.tcl
#
Modified: brlcad/trunk/src/tclscripts/hv3/hv3_form.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/hv3/hv3_form.tcl 2020-04-11 00:07:11 UTC
(rev 75355)
+++ brlcad/trunk/src/tclscripts/hv3/hv3_form.tcl 2020-04-11 00:18:38 UTC
(rev 75356)
@@ -1,3 +1,33 @@
+# Copyright (c) 2005 Eolas Technologies Inc.
+# All rights reserved.
+#
+# This Open Source project was made possible through the financial support
+# of Eolas Technologies Inc.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+#
+# * Redistributions of source code must retain the above copyright
+# notice, this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright
+# notice, this list of conditions and the following disclaimer in the
+# documentation and/or other materials provided with the distribution.
+# * Neither the name of the <ORGANIZATION> nor the names of its
+# contributors may be used to endorse or promote products derived from
+# this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+
catch {namespace eval hv3 { set {version($Id: hv3_form.tcl,v 1.99 2008/03/03
10:29:00 danielk1977 Exp $)} 1 }}
###########################################################################
Modified: brlcad/trunk/src/tclscripts/hv3/hv3_request.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/hv3/hv3_request.tcl 2020-04-11 00:07:11 UTC
(rev 75355)
+++ brlcad/trunk/src/tclscripts/hv3/hv3_request.tcl 2020-04-11 00:18:38 UTC
(rev 75356)
@@ -1,3 +1,33 @@
+# Copyright (c) 2005 Eolas Technologies Inc.
+# All rights reserved.
+#
+# This Open Source project was made possible through the financial support
+# of Eolas Technologies Inc.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+#
+# * Redistributions of source code must retain the above copyright
+# notice, this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright
+# notice, this list of conditions and the following disclaimer in the
+# documentation and/or other materials provided with the distribution.
+# * Neither the name of the <ORGANIZATION> nor the names of its
+# contributors may be used to endorse or promote products derived from
+# this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+
catch {namespace eval hv3 { set {version($Id: hv3_request.tcl,v 1.28
2008/02/03 06:29:39 danielk1977 Exp $)} 1 }}
#--------------------------------------------------------------------------
Modified: brlcad/trunk/src/tclscripts/hv3/hv3_util.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/hv3/hv3_util.tcl 2020-04-11 00:07:11 UTC
(rev 75355)
+++ brlcad/trunk/src/tclscripts/hv3/hv3_util.tcl 2020-04-11 00:18:38 UTC
(rev 75356)
@@ -1,3 +1,33 @@
+# Copyright (c) 2005 Eolas Technologies Inc.
+# All rights reserved.
+#
+# This Open Source project was made possible through the financial support
+# of Eolas Technologies Inc.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+#
+# * Redistributions of source code must retain the above copyright
+# notice, this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright
+# notice, this list of conditions and the following disclaimer in the
+# documentation and/or other materials provided with the distribution.
+# * Neither the name of the <ORGANIZATION> nor the names of its
+# contributors may be used to endorse or promote products derived from
+# this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+
catch {namespace eval hv3 { set {version($Id: hv3_util.tcl,v 1.9 2008/02/02
17:15:02 danielk1977 Exp $)} 1 }}
Deleted: brlcad/trunk/src/tclscripts/hv3_man_browser_test.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/hv3_man_browser_test.tcl 2020-04-11
00:07:11 UTC (rev 75355)
+++ brlcad/trunk/src/tclscripts/hv3_man_browser_test.tcl 2020-04-11
00:18:38 UTC (rev 75356)
@@ -1,1043 +0,0 @@
-#!/bin/sh
-#
-# Customized version of hv3_main.tcl for Archer man pages
-#
-#\
-HV3MAN_HOME=`dirname $0`/..
-#\
-export HV3MAN_HOME
-# restart using bwish \
-WISH="bwish"
-#\
-for ish in bwish bwish_d ; do
-# see if we're installed \
- if test -f ${HV3MAN_HOME}/bin/$ish ; then
-#\
- WISH="${HV3MAN_HOME}/bin/$ish"
-#\
- break;
-#\
- fi
-# see if we're not installed yet \
- if test -f ${HV3MAN_HOME}/bwish/$ish ; then
-#\
- WISH="${HV3MAN_HOME}/bwish/$ish"
-#\
- break;
-#\
- fi
-#\
-done
-#\
-exec $WISH $0 $@
-
-
-proc sourcefile {file} [string map \
- [list %HV3_DIR% [bu_brlcad_root lib/hv3]] \
-{
- return [file join {%HV3_DIR%} $file]
-}]
-
-package require Tk
-tk scaling 1.33333
-package require Tkhtml 3.0
-
-source [sourcefile hv3_browser.tcl]
-
-namespace eval ::hv3 {
- set log_source_option 0
- set reformat_scripts_option 0
-}
-
-# This class is used to create toplevel "sub-window" widgets. Sub-windows
-# are toplevel windows that contain a single [::hv3::browser] object.
-#
-# Sub-windows are different from the main window in several ways:
-#
-# * There is no menubar.
-# * There is no "new tab", "home" or "bug report button on the toolbar.
-# * It is not possible to open new tabs in a sub-window.
-#
-# These restrictions are because Hv3 is a tabbed browser. New views are
-# supposed to live in tabs, not separate toplevel windows. If the user
-# really wants more than one window, more than one copy of the browser
-# should be started. Sub-windows are provided purely for the benefit of
-# those javascript applications that have UIs that require multiple
-# windows.
-#
-namespace eval ::hv3::subwindow {
-
- set counter 1
-
- proc new {me args} {
- upvar #0 $me O
-
- set O(browser) [::hv3::browser $O(win).browser]
- set O(label) [::hv3::label $O(win).label -anchor w -width 1]
- set O(location) [::hv3::locationentry $O(win).location]
-
- set O(stop_button) $O(win).stop
- set O(back_button) $O(win).back
- set O(next_button) $O(win).next
-
- ::hv3::toolbutton $O(stop_button) -text {Stop} -tooltip "Stop"
- ::hv3::toolbutton $O(next_button) -text {Forward} -tooltip "Go Forward"
- ::hv3::toolbutton $O(back_button) -text {Back} -tooltip "Go Back"
-
- grid $O(back_button) $O(next_button) $O(stop_button)
- grid $O(location) -column 3 -row 0 -sticky ew
- grid $O(browser) -column 0 -row 1 -sticky nsew -columnspan 4
- grid $O(label) -column 0 -row 2 -sticky nsew -columnspan 4
-
- grid columnconfigure $O(win) 3 -weight 1
- grid rowconfigure $O(win) 1 -weight 1
-
- $O(back_button) configure -image hv3_previmg
- $O(next_button) configure -image hv3_nextimg
- $O(stop_button) configure -image hv3_reloadimg
-
- $O(label) configure -textvar [$O(browser) statusvar]
- $O(browser) configure -stopbutton $O(stop_button)
- $O(browser) configure -forwardbutton $O(next_button)
- $O(browser) configure -backbutton $O(back_button)
- $O(browser) configure -locationentry $O(location)
- $O(location) configure -command [list $me GotoLocation]
-
- $O(browser) configure -width 600 -height 400
-
- set O(titlevarname) [$O(browser) titlevar]
- set O(locationvarname) [$O(browser) locationvar]
-
- # Set up traces on the browser title and location. Use these to
- # set the title of the toplevel window.
- trace add variable $O(titlevarname) write [list $me SetTitle]
- trace add variable $O(locationvarname) write [list $me SetTitle]
- }
-
- proc SetTitle {me args} {
- upvar #0 $me O
- set T [set [$O(browser) titlevar]]
- if {$T eq ""} {
- set T [set [$O(browser) locationvar]]
- }
- wm title $O(win) $T
- }
-
- proc destroy {me} {
- upvar #0 $me O
- trace remove variable $O(titlevarname) write [list $me SetTitle]
- trace remove variable $O(locationvarname) write [list $me SetTitle]
- }
-
- proc goto {me uri} {
- upvar #0 $me O
- $O(browser) goto $uri
- puts $url
- }
-
- proc GotoLocation {me} {
- upvar #0 $me O
- set uri [$O(location) get]
- $O(browser) goto $uri
- }
-}
-::hv3::make_constructor ::hv3::subwindow toplevel
-
-# ::hv3::config
-#
-# An instance of this class manages the application "View" menu,
-# which contains all the runtime configuration options (font size,
-# image loading etc.).
-#
-snit::type ::hv3::config {
-
- # The SQLite database containing the configuration used
- # by this application instance.
- #
- variable myDb ""
- variable myPollActive 0
-
- foreach {opt def type} [list \
- -enableimages 1 Boolean \
- -enablejavascript 0 Boolean \
- -forcefontmetrics 1 Boolean \
- -hidegui 0 Boolean \
- -zoom 1.0 Double \
- -fontscale 1.0 Double \
- -guifont 11 Integer \
- -icons default_icons Icons \
- -debuglevel 0 Integer \
- -fonttable [list 8 9 10 11 13 15 17] SevenIntegers \
- ] {
- option $opt -default $def -validatemethod $type -configuremethod SetOption
- }
-
- constructor {db args} {
- set myDb $db
-
-
- $myDb transaction {
- set rc [catch {
- $myDb eval {
- CREATE TABLE cfg_options1(name TEXT PRIMARY KEY, value);
- }
- }]
- if {$rc == 0} {
- foreach {n v} [array get options] {
- $myDb eval {INSERT INTO cfg_options1 VALUES($n, $v)}
- }
- if {[llength [info commands ::tkhtml::heapdebug]] > 0} {
- $self configure -debuglevel 1
- }
- } else {
- $myDb eval {SELECT name, value FROM cfg_options1} {
- set options($name) $value
- if {$name eq "-guifont"} {
- after idle [list ::hv3::SetFont [list -size $value]]
- }
- }
- }
- }
-
- ::hv3::$options(-icons)
-
- $self configurelist $args
- after 2000 [list $self PollConfiguration]
- }
-
- method PollConfiguration {} {
- set myPollActive 1
- $myDb transaction {
- foreach n [array names options] {
- $myDb eval { SELECT value AS v FROM cfg_options1 WHERE name = $n } {
- if {$options($n) ne $v} {
- $self configure $n $v
- }
- }
- }
- }
- set myPollActive 0
- after 2000 [list $self PollConfiguration]
- }
-
- method populate_menu {path} {
-
- set cmd [list gui_current Find]
- set acc (Ctrl-F)
- $path add command -label {Find in page...} -command $cmd -accelerator $acc
- bind Hv3HotKeys <Control-f> [list gui_current Find]
- bind Hv3HotKeys <Control-F> [list gui_current Find]
-
- # Add the 'Gui Font (size)' menu
- ::hv3::menu ${path}.guifont
- $self PopulateRadioMenu ${path}.guifont -guifont [list \
- 8 "8 pts" \
- 9 "9 pts" \
- 10 "10 pts" \
- 11 "11 pts" \
- 12 "12 pts" \
- 14 "14 pts" \
- 16 "16 pts" \
- ]
- $path add cascade -label {Gui Font} -menu ${path}.guifont
-
- # Add the 'Icons' menu
- ::hv3::menu ${path}.icons
- $self PopulateRadioMenu ${path}.icons -icons [list \
- grey_icons "Great looking classy grey icons" \
- color_icons22 "22x22 Tango icons" \
- color_icons32 "32x32 Tango icons" \
- ]
- $path add cascade -label {Gui Icons} -menu ${path}.icons
-
- $self populate_hidegui_entry $path
- $path add separator
-
- # Add the 'Zoom' menu
- ::hv3::menu ${path}.zoom
- $self PopulateRadioMenu ${path}.zoom -zoom [list \
- 0.25 25% \
- 0.5 50% \
- 0.75 75% \
- 0.87 87% \
- 1.0 100% \
- 1.131 113% \
- 1.25 125% \
- 1.5 150% \
- 2.0 200% \
- ]
- $path add cascade -label {Browser Zoom} -menu ${path}.zoom
-
- # Add the 'Font Scale' menu
- ::hv3::menu ${path}.fontscale
- $self PopulateRadioMenu ${path}.fontscale -fontscale [list \
- 0.8 80% \
- 0.9 90% \
- 1.0 100% \
- 1.2 120% \
- 1.4 140% \
- 2.0 200% \
- ]
- $path add cascade -label {Browser Font Scale} -menu ${path}.fontscale
-
- # Add the 'Font Size Table' menu
- set fonttable [::hv3::menu ${path}.fonttable]
- $self PopulateRadioMenu $fonttable -fonttable [list \
- {7 8 9 10 12 14 16} "Normal" \
- {8 9 10 11 13 15 17} "Medium" \
- {9 10 11 12 14 16 18} "Large" \
- {11 12 13 14 16 18 20} "Very Large" \
- {13 14 15 16 18 20 22} "Extra Large" \
- {15 16 17 18 20 22 24} "Recklessly Large" \
- ]
- $path add cascade -label {Browser Font Size Table} -menu $fonttable
-
- foreach {option label} [list \
- -forcefontmetrics "Force CSS Font Metrics" \
- -enableimages "Enable Images" \
- -- -- \
- -enablejavascript "Enable ECMAscript" \
- ] {
- if {$option eq "--"} {
- $path add separator
- } else {
- set var [myvar options($option)]
- set cmd [list $self Reconfigure $option]
- $path add checkbutton -label $label -variable $var -command $cmd
- }
- }
- if {[info commands ::see::interp] eq ""} {
- $path entryconfigure end -state disabled
- }
- }
-
- method populate_hidegui_entry {path} {
- $path add checkbutton -label "Hide Gui" -variable [myvar options(-hidegui)]
- $path entryconfigure end -command [list $self Reconfigure -hidegui]
- }
-
- method PopulateRadioMenu {path option config} {
- foreach {val label} $config {
- $path add radiobutton \
- -variable [myvar options($option)] \
- -value $val \
- -command [list $self Reconfigure $option] \
- -label $label
- }
- }
-
- method Reconfigure {option} {
- $self configure $option $options($option)
- }
-
- method Boolean {option value} {
- if {![string is boolean $value]} { error "Bad boolean value: $value" }
- }
- method Double {option value} {
- if {![string is double $value]} { error "Bad double value: $value" }
- }
- method Integer {option value} {
- if {![string is integer $value]} { error "Bad integer value: $value" }
- }
- method Icons {option value} {
- if {[info commands ::hv3::$value] eq ""} { error "Bad icon scheme: $value"
}
- }
- method SevenIntegers {option value} {
- set len [llength $value]
- if {$len != 7} { error "Bad seven-integers value: $value" }
- foreach elem $value {
- if {![string is integer $elem]} {
- error "Bad seven-integers value: $value"
- }
- }
- }
-
- method SetOption {option value} {
- set options($option) $value
- if {$myPollActive == 0} {
- $myDb eval {REPLACE INTO cfg_options1 VALUES($option, $value)}
- }
-
- switch -- $option {
- -hidegui {
- if {$value} {
- . configure -menu ""
- pack forget .status
- pack forget .toolbar
- } else {
- . configure -menu .m
- pack .status -after .middle -fill x -side bottom
- pack .toolbar -before .middle -fill x -side top
- }
- }
- -guifont {
- ::hv3::SetFont [list -size $options(-guifont)]
- }
- -icons {
- ::hv3::$options(-icons)
- }
- -debuglevel {
- switch -- $value {
- 0 {
- set ::hv3::reformat_scripts_option 0
- set ::hv3::log_source_option 0
- }
- 1 {
- set ::hv3::reformat_scripts_option 0
- set ::hv3::log_source_option 1
- }
- 2 {
- set ::hv3::reformat_scripts_option 1
- set ::hv3::log_source_option 1
- }
- }
- }
- default {
- $self configurebrowser [.middle.notebook current]
- }
- }
- }
-
- method StoreOptions {} {
- }
- method RetrieveOptions {} {
- }
-
- method configurebrowser {b} {
- if {$b eq ""} return
- foreach {option var} [list \
- -fonttable options(-fonttable) \
- -fontscale options(-fontscale) \
- -zoom options(-zoom) \
- -forcefontmetrics options(-forcefontmetrics) \
- -enableimages options(-enableimages) \
- -enablejavascript options(-enablejavascript) \
- ] {
- if {[$b cget $option] ne [set $var]} {
- $b configure $option [set $var]
- foreach f [$b get_frames] {
- if {[$f positionid] ne "0"} {
- $self configureframe $f
- }
- }
- }
- }
- }
- method configureframe {b} {
- foreach {option var} [list \
- -fonttable options(-fonttable) \
- -fontscale options(-fontscale) \
- -zoom options(-zoom) \
- -forcefontmetrics options(-forcefontmetrics) \
- -enableimages options(-enableimages) \
- -enablejavascript options(-enablejavascript) \
- ] {
- if {[$b cget $option] ne [set $var]} {
- $b configure $option [set $var]
- }
- }
- }
-
- destructor {
- after cancel [list $self PollConfiguration]
- }
-}
-
-snit::type ::hv3::file_menu {
-
- variable MENU
-
- constructor {} {
- set MENU [list \
- "Open File..." [list gui_openfile $::hv3::MGEDHelp(notebook)]
o \
- "Open Tab" [list $::hv3::MGEDHelp(notebook) add]
t \
- "Open Location" [list gui_openlocation $::hv3::MGEDHelp(location_entry)]
l \
- "-----" "" "" \
- "Close Tab" [list $::hv3::MGEDHelp(notebook) close]
"" \
- "Exit" exit q \
- ]
- }
-
- method populate_menu {path} {
- $path delete 0 end
-
- foreach {label command key} $MENU {
- if {[string match ---* $label]} {
- $path add separator
- continue
- }
- $path add command -label $label -command $command
- if {$key ne ""} {
- set acc "(Ctrl-[string toupper $key])"
- $path entryconfigure end -accelerator $acc
- }
- }
-
- if {[llength [$::hv3::MGEDHelp(notebook) tabs]] < 2} {
- $path entryconfigure "Close Tab" -state disabled
- }
- }
-
- method setup_hotkeys {} {
- foreach {label command key} $MENU {
- if {$key ne ""} {
- set uc [string toupper $key]
- bind Hv3HotKeys <Control-$key> $command
- bind Hv3HotKeys <Control-$uc> $command
- }
- }
- }
-}
-
-proc ::hv3::gui_bookmark {} {
- ::hv3::bookmarks::new_bookmark [gui_current hv3]
-}
-
-
-# get a list of the mann pages
-proc mann_pages {lang_type} {
- set disabledByDefault [list Introduction]
- set mann_list []
- if {[file exists [file join [bu_brlcad_root "share/html"] mann/$lang_type]}
{
- set manFiles [glob -nocomplain -directory [file join [bu_brlcad_root
"share/html"] mann/$lang_type] *.html ]
- } else {
- set manFiles [glob -nocomplain -directory [file join [bu_brlcad_root
"share/html"] mann] *.html ]
- }
- foreach manFile $manFiles {
- set rootName [file rootname [file tail $manFile]]
- set isDisabled [expr [lsearch -sorted -exact \
- $disabledByDefault $rootName] != -1]
- if {!$isDisabled} {
- lappend mann_list $rootName
- }
- }
- set mann_list [lsort $mann_list]
- return $mann_list
-}
-
-
-#--------------------------------------------------------------------------
-# The following functions are all called during startup to construct the
-# static components of the web browser gui:
-#
-# gui_build
-# gui_menu
-# create_fontsize_menu
-# create_fontscale_menu
-#
-
-# gui_build --
-#
-# This procedure is called once at the start of the script to build
-# the GUI used by the application. It creates all the widgets for
-# the main window.
-#
-# The argument is the name of an array variable in the parent context
-# into which widget names are written, according to the following
-# table:
-#
-# Array Key Widget
-# ------------------------------------------------------------
-# stop_button The "stop" button
-# back_button The "back" button
-# forward_button The "forward" button
-# location_entry The location bar
-# notebook The ::hv3::tabset instance
-# status_label The label used for a status bar
-# history_menu The pulldown menu used for history
-#
-proc gui_build {widget_array} {
- upvar $widget_array G
- global HTML
-
- # Create the top bit of the GUI - the URI entry and buttons.
- frame .toolbar
- frame .toolbar.b
- ::hv3::locationentry .toolbar.entry
- ::hv3::toolbutton .toolbar.b.back -text {Back} -tooltip "Go Back"
- ::hv3::toolbutton .toolbar.b.stop -text {Stop} -tooltip "Stop"
- ::hv3::toolbutton .toolbar.b.forward -text {Forward} -tooltip "Go Forward"
-
- ::ttk::panedwindow .middle -orient horizontal
- ::hv3::toolbutton .toolbar.b.new -text {New Tab} -command [list
.middle.notebook add]
- ::hv3::toolbutton .toolbar.b.home -text Home -command [list \
- gui_current goto $::hv3::homeuri
- ]
- .toolbar.b.new configure -tooltip "Open New Tab"
- .toolbar.b.home configure -tooltip "Go to Bookmarks Manager"
-
- # Create the middle bit - the browser window
- #
- ::hv3::tabset .middle.notebook \
- -newcmd gui_new \
- -switchcmd gui_switch
-
- # And the bottom bit - the status bar
- ::hv3::label .status -anchor w -width 1
- bind .status <1> [list gui_current ProtocolGui toggle]
-
- bind .status <3> [list gui_status_toggle $widget_array]
- bind .status <Enter> [list gui_status_enter $widget_array]
- bind .status <Leave> [list gui_status_leave $widget_array]
-
- # Set the widget-array variables
- set G(new_button) .toolbar.b.new
- set G(stop_button) .toolbar.b.stop
- set G(back_button) .toolbar.b.back
- set G(forward_button) .toolbar.b.forward
- set G(home_button) .toolbar.b.home
- set G(location_entry) .toolbar.entry
- set G(notebook) .middle.notebook
- set G(status_label) .status
-
- # The G(status_mode) variable takes one of the following values:
- #
- # "browser" - Normal browser status bar.
- # "browser-tree" - Similar to "browser", but displays the document tree
- # hierarchy for the node the cursor is currently
- # hovering over. This used to be the default.
- # "memory" - Show information to do with Hv3's memory usage.
- #
- # The "browser" mode uses less CPU than "browser-tree" and "memory".
- # The user cycles through the modes by right-clicking on the status bar.
- #
- set G(status_mode) "browser"
-
- # Pack the elements of the "top bit" into the .entry frame
- pack .toolbar.b.new -side left
- pack .toolbar.b.back -side left
- pack .toolbar.b.forward -side left
- pack .toolbar.b.stop -side left
- pack .toolbar.b.home -side left
- pack [frame .toolbar.b.spacer -width 2 -height 1] -side left
-
- pack .toolbar.b -side left
- pack .toolbar.entry -fill x -expand true
-
- # Pack the top, bottom and middle, in that order. The middle must be
- # packed last, as it is the bit we want to shrink if the size of the
- # main window is reduced.
- pack .toolbar -fill x -side top
- pack .status -fill x -side bottom
-
- set lang_list [split $::env(LANG) _]
- if {[llength $lang_list] > 0} {
- set langval [lindex $lang_list 0]
- if {[string length $langval] == 2} {
- set ::man_language $langval
- }
- }
-
- # If we still have no language, default to English
- if {![info exists ::man_language]} {set ::man_language "en"}
-
- # TODO - properly use ::man_language
-
- ::ttk::frame .middle.treeframe -borderwidth 1
- set mann_list [mann_pages en]
- ::ttk::treeview .middle.treeframe.tree
- .middle.treeframe.tree heading #0 -text "Manual Pages"
- .middle.treeframe.tree column #0 -width 130
- foreach manFile $mann_list {
- .middle.treeframe.tree insert {} end -text "$manFile"
- }
- bind .middle.treeframe.tree <<TreeviewSelect>> {gui_current goto
file:///[file join [bu_brlcad_root "share/html"] mann/[.middle.treeframe.tree
item [.middle.treeframe.tree focus] -text].html]}
- bind .middle.treeframe.tree <Control-f> {gui_current Find}
- bind .middle.treeframe.tree <Control-F> {gui_current Find}
-
- ::ttk::scrollbar .middle.treeframe.treevscroll -orient vertical
- .middle.treeframe.tree configure -yscrollcommand
".middle.treeframe.treevscroll set"
- .middle.treeframe.treevscroll configure -command ".middle.treeframe.tree
yview"
-
- grid .middle.treeframe.tree .middle.treeframe.treevscroll -sticky nsew
- grid columnconfigure .middle.treeframe 0 -weight 1
- grid rowconfigure .middle.treeframe 0 -weight 1
-
- .middle add .middle.treeframe
- .middle add .middle.notebook
- pack .middle -fill both -expand true
-}
-
-proc goto_gui_location {browser entry args} {
- set location [$entry get]
- $browser goto $location
-}
-
-proc gui_openlocation {location_entry} {
- $location_entry selection range 0 end
- $location_entry OpenDropdown *
- focus ${location_entry}.entry
-}
-
-proc gui_populate_menu {eMenu menu_widget} {
- switch -- [string tolower $eMenu] {
- file {
- set cmd [list $::hv3::MGEDHelp(file_menu) populate_menu $menu_widget]
- $menu_widget configure -postcommand $cmd
- }
-
- options {
- $::hv3::MGEDHelp(config) populate_menu $menu_widget
- }
-
- default {
- error "gui_populate_menu: No such menu: $eMenu"
- }
- }
-}
-
-proc gui_menu {widget_array} {
- upvar $widget_array G
-
- # Attach a menu widget - .m - to the toplevel application window.
- . config -menu [::hv3::menu .m]
-
- set G(config) [::hv3::config %AUTO% ::hv3::sqlitedb]
- set G(file_menu) [::hv3::file_menu %AUTO%]
-
- # Add the "File" and "Options" menus.
- foreach m [list File Options] {
- set menu_widget .m.[string tolower $m]
- gui_populate_menu $m [::hv3::menu $menu_widget]
- .m add cascade -label $m -menu $menu_widget -underline 0
- }
-
- $G(file_menu) setup_hotkeys
-
- catch {
- .toolbar.b.back configure -image hv3_previmg
- .toolbar.b.forward configure -image hv3_nextimg
- .toolbar.b.stop configure -image hv3_stopimg
- .toolbar.b.new configure -image hv3_newimg
- .toolbar.b.home configure -image hv3_homeimg
- }
-}
-#--------------------------------------------------------------------------
-
-proc gui_current {args} {
- eval [linsert $args 0 [.middle.notebook current]]
-}
-
-proc gui_firefox_remote {} {
- set url [.toolbar.entry get]
- exec firefox -remote "openurl($url,new-tab)"
-}
-
-proc gui_switch {new} {
- upvar #0 ::hv3::MGEDHelp G
-
- # Loop through *all* tabs and detach them from the history
- # related controls. This is so that when the state of a background
- # tab is updated, the history menu is not updated (only the data
- # structures in the corresponding ::hv3::history object).
- #
- foreach browser [.middle.notebook tabs] {
- $browser configure -backbutton ""
- $browser configure -stopbutton ""
- $browser configure -forwardbutton ""
- $browser configure -locationentry ""
- }
-
- # Configure the new current tab to control the history controls.
- #
- set new [.middle.notebook current]
- $new configure -backbutton $G(back_button)
- $new configure -stopbutton $G(stop_button)
- $new configure -forwardbutton $G(forward_button)
- $new configure -locationentry $G(location_entry)
- $new populatehistorymenu
-
- # Attach some other GUI elements to the new current tab.
- #
- set gotocmd [list goto_gui_location $new $G(location_entry)]
- $G(location_entry) configure -command $gotocmd
- gui_status_leave ::hv3::MGEDHelp
-
- # Configure the new current tab with the contents of the drop-down
- # config menu (i.e. font-size, are images enabled etc.).
- #
- $G(config) configurebrowser $new
-
- # Set the top-level window title to the title of the new current tab.
- #
- wm title . [.middle.notebook get_title $new]
-
- # Focus on the root HTML widget of the new tab.
- #
- focus [[$new hv3] html]
-}
-
-proc gui_new {path args} {
- set new [::hv3::browser $path]
- $::hv3::MGEDHelp(config) configurebrowser $new
-
- set var [$new titlevar]
- trace add variable $var write [list gui_settitle $new $var]
-
- set var [$new locationvar]
- trace add variable $var write [list gui_settitle $new $var]
-
- if {[llength $args] == 0} {
- $new goto $::hv3::newuri
- } else {
- $new goto [lindex $args 0]
- }
-
- # This black magic is required to initialise the history system.
- # A <<Location>> event will be generated from within the [$new goto]
- # command above, but the history system won't see it, because
- # events are not generated until the window is mapped. So generate
- # an extra <<Location>> when the window is mapped.
- #
- set w [[$new hv3] win]
- bind $w <Map> [list event generate $w <<Location>>]
- bind $w <Map> +[list bind <Map> $w ""]
-
- # [[$new hv3] html] configure -logcmd print
-
- return $new
-}
-
-proc gui_settitle {browser var args} {
- if {[.middle.notebook current] eq $browser} {
- wm title . [set $var]
- }
- .middle.notebook set_title $browser [set $var]
-}
-
-# This procedure is invoked when the user selects the File->Open menu
-# option. It launches the standard Tcl file-selector GUI. If the user
-# selects a file, then the corresponding URI is passed to [.hv3 goto]
-#
-proc gui_openfile {notebook} {
- set browser [$notebook current]
- set f [tk_getOpenFile -filetypes [list \
- {{Html Files} {.html}} \
- {{Html Files} {.htm}} \
- {{All Files} *}
- ]]
- if {$f != ""} {
- if {$::tcl_platform(platform) eq "windows"} {
- set f [string map {: {}} $f]
- }
- $browser goto file://$f
- }
-}
-
-proc gui_log_window {notebook} {
- set browser [$notebook current]
- ::hv3::log_window [[$browser hv3] html]
-}
-
-proc gui_report_bug {} {
- upvar ::hv3::MGEDHelp G
- set uri [[[$G(notebook) current] hv3] uri get]
- .middle.notebook add "home://bug/[::hv3::format_query [encoding system]
$uri]"
-
- set cookie "tkhtml_captcha=[expr [clock seconds]+86399]; Path=/; Version=1"
- ::hv3::the_cookie_manager SetCookie http://tkhtml.tcl.tk/ $cookie
-}
-
-proc gui_escape {} {
- upvar ::hv3::MGEDHelp G
- gui_current escape
- $G(location_entry) escape
- focus [[gui_current hv3] html]
-}
-bind Hv3HotKeys <KeyPress-Escape> gui_escape
-
-proc gui_status_enter {widget_array} {
- upvar $widget_array G
- after cancel [list gui_set_memstatus $widget_array]
- gui_status_help $widget_array
- $G(status_label) configure -textvar ::hv3::MGEDHelp(status_help)
-}
-proc gui_status_help {widget_array} {
- upvar $widget_array G
- set G(status_help) "Current status-bar mode: "
- switch -- $G(status_mode) {
- browser { append G(status_help) "Normal" }
- browser-tree { append G(status_help) "Tree-Browser" }
- memory { append G(status_help) "Memory-Usage" }
- }
- append G(status_help) " "
- append G(status_help) "(To toggle mode, right-click)"
- append G(status_help) " "
- append G(status_help) "(To view outstanding resource requests, left-click)"
-}
-proc gui_status_leave {widget_array} {
- upvar $widget_array G
-
- switch -exact -- $G(status_mode) {
- browser {
- $G(status_label) configure -textvar [gui_current statusvar]
- }
- browser-tree {
- $G(status_label) configure -textvar [gui_current statusvar]
- }
- memory {
- $G(status_label) configure -textvar ""
- gui_set_memstatus $widget_array
- }
- }
-}
-proc gui_status_toggle {widget_array} {
- upvar $widget_array G
- set modes [list browser browser-tree memory]
- set iNewMode [expr {([lsearch $modes $G(status_mode)]+1)%[llength $modes]}]
- set G(status_mode) [lindex $modes $iNewMode]
- gui_status_help $widget_array
-}
-
-proc gui_set_memstatus {widget_array} {
- upvar $widget_array G
- if {$G(status_mode) eq "memory"} {
- set status "Script: "
- append status "[::count_vars] vars, [::count_commands] commands,"
- append status "[::count_namespaces] namespaces"
-
- catch {
- array set v [::see::alloc]
- set nHeap [expr {int($v(GC_get_heap_size) / 1000)}]
- set nFree [expr {int($v(GC_get_free_bytes) / 1000)}]
- set nDom $v(SeeTclObject)
- append status " "
- append status "GC Heap: ${nHeap}K (${nFree}K free) "
- append status "($v(SeeTclObject) DOM objects)"
- }
- catch {
- foreach line [split [memory info] "\n"] {
- if {[string match {current packets allocated*} $line]} {
- set nAllocs [lindex $line end]
- }
- if {[string match {current bytes allocated*} $line]} {
- set nBytes [lindex $line end]
- }
- }
- set nBytes "[expr {int($nBytes / 1000)}]K"
- append status " Tcl Heap: ${nBytes} in $nAllocs allocs"
- }
-
- $G(status_label) configure -text $status
- after 2000 [list gui_set_memstatus $widget_array]
- }
-}
-
-# Launch a new sub-window.
-#
-proc gui_subwindow {{uri ""}} {
- set name ".subwindow_[incr ::hv3::subwindow::counter]"
- ::hv3::subwindow $name
- if {$uri eq ""} {
- set uri [[gui_current hv3] uri get]
- }
- $name goto $uri
-}
-
-# Override the [exit] command to check if the widget code leaked memory
-# or not before exiting.
-#
-rename exit tcl_exit
-proc exit {args} {
- destroy .middle.notebook
- catch {destroy .prop.hv3}
- catch {::tkhtml::htmlalloc}
- eval [concat tcl_exit $args]
-}
-
-#--------------------------------------------------------------------------
-# main URI
-#
-# The main() program for the application. This proc handles
-# parsing of command line arguments.
-#
-proc main {args} {
-
- set docs [list]
-
- for {set ii 0} {$ii < [llength $args]} {incr ii} {
- set val [lindex $args $ii]
- switch -glob -- $val {
- -s* { # -statefile <file-name>
- if {$ii == [llength $args] - 1} ::hv3::usage
- incr ii
- set ::hv3::statefile [lindex $args $ii]
- }
- -profile {
- # Ignore this here. If the -profile option is present it will
- # have been handled already.
- }
- -enablejavascript {
- set enablejavascript 1
- }
- default {
- set uri [::tkhtml::uri file:///[file join [bu_brlcad_root "share/html"]
mann en Introduction.html] ]
- lappend docs [$uri resolve $val.html]
- $uri destroy
- }
- }
- }
-
- ::hv3::dbinit
-
- if {[llength $docs] == 0} {set docs [list file:///[file join [bu_brlcad_root
"share/html"] mann/en/Introduction.html]] }
- set ::hv3::newuri [lindex $docs 0]
- set ::hv3::homeuri file:///[file join [bu_brlcad_root "share/html"]
mann/en/Introduction.html ]
-
- # Build the GUI
- gui_build ::hv3::MGEDHelp
- gui_menu ::hv3::MGEDHelp
-
- array set ::hv3::G [array get ::hv3::MGEDHelp]
-
- # After the event loop has run to create the GUI, run [main2]
- # to load the startup document. It's better if the GUI is created first,
- # because otherwise if an error occurs Tcl deems it to be fatal.
- after idle [list main2 $docs]
-}
-proc main2 {docs} {
- foreach doc $docs {
- set tab [$::hv3::MGEDHelp(notebook) add $doc]
- }
- focus $tab
-}
-proc ::hv3::usage {} {
- puts stderr "Usage:"
- puts stderr " $::argv0 ?-statefile <file-name>? ?<uri>?"
- puts stderr ""
- tcl_exit
-}
-
-set ::hv3::statefile ":memory:"
-
-# Remote scaling interface:
-proc hv3_zoom {newval} { $::hv3::MGEDHelp(config) set_zoom $newval }
-proc hv3_fontscale {newval} { $::hv3::MGEDHelp(config) set_fontscale $newval }
-proc hv3_forcewidth {forcewidth width} {
- [[gui_current hv3] html] configure -forcewidth $forcewidth -width $width
-}
-
-proc hv3_guifont {newval} { $::hv3::MGEDHelp(config) set_guifont $newval }
-
-proc hv3_html {args} {
- set html [[gui_current hv3] html]
- eval [concat $html $args]
-}
-
-# Set variable $::hv3::maindir to the directory containing the
-# application files. Then run the [main] command with the command line
-# arguments passed to the application.
@@ Diff output truncated at 100000 characters. @@
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
