home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1999 March B / SCO_CASTOR4RRT.iso / TEDdesk / reloc.8 / $TED_DIR / bin / dthelpgen.ds < prev    next >
Text File  |  1998-08-19  |  5KB  |  162 lines
  1. #! /usr/dt/bin/dtksh
  2. #####################################################################
  3. ###  File:              dthelpgen.dtsh
  4. ###
  5. ###  Default Location:  /usr/dt/bin/dthelpgen.dtsh
  6. ###
  7. ###  Purpose:           Display a 'working' dialog for dthelpgen.
  8. ###
  9. ###  Description:       This shell script provides a graphical interface
  10. ###                     to notify the user that the help browser is
  11. ###                     being (re)generated.
  12. ###
  13. ###  Invoked by:        The the dthelpgen application.
  14. ###
  15. ###  Product:           @(#)TED 4.2 Alpha 99-4200-00, dthelpgen.ds
  16. ###
  17. ###   (c) Copyright 1993, 1994, 1995 TriTeal Corporation
  18. ###   (c) Copyright 1993, 1994 Hewlett-Packard Company
  19. ###   (c) Copyright 1993, 1994 International Business Machines Corp.
  20. ###   (c) Copyright 1993, 1994 Sun Microsystems, Inc.
  21. ###   (c) Copyright 1993, 1994 Unix System Labs, Inc., a subsidiary of
  22. ###       Novell, Inc.
  23. ###
  24. ###
  25. ###                     RESTRICTED RIGHTS LEGEND
  26. ###
  27. ###  Use, duplication, or disclosure by the U.S. Government is subject to
  28. ###  restrictions as set forth in subparagraph (c)(1)(ii) of the Rights in
  29. ###  Technical Data and Computer Software clause in DFARS 252.227-7013.  Rights
  30. ###  for non-DOD U.S. Government Departments and Agencies are as set forth in
  31. ###  FAR 52.227-19(c)(1,2).
  32. ###
  33. ###  TriTeal Corporation, 2011 Palomar Airport Road, Carlsbad, CA 92009 U.S.A.
  34. ###  Hewlett-Packard Company, 3000 Hanover Street, Palo Alto, CA 94304 U.S.A.
  35. ###  International Business Machines Corp., Route 100, Somers, NY 10589 U.S.A.
  36. ###  Sun Microsystems, Inc., 2550 Garcia Avenue, Mountain View, CA 94043 U.S.A.
  37. ###  Unix System Labs, Inc., 190 River Road, Summit, NJ 07901 U.S.A.
  38. ###
  39. ###  Note:              Please do not modify this file.
  40. ###                     Later product updates will overwrite this file.
  41. ###
  42. ###  Revision:          $XConsortium: dthelpgen.dtsh /main/cde1_maint/1 1995/07/14 23:37:10 drk $
  43. ###
  44. ###  Defect(s):         
  45. ###
  46. #####################################################################
  47. set -u
  48.  
  49. ##################################################################
  50. ###  Internal Globals
  51. ###
  52. ###  Actually, most variables in this script are global.
  53. ###
  54. ###  Most are defined in the Initialize() routine.
  55. ###
  56. ##################################################################
  57. COMMAND_NAME=dthelpgen
  58. #
  59. # Exit/Return codes
  60. #
  61. SUCCESS=0
  62. USAGE_EXIT=2
  63. NO_INIT_FILE_ERR=5
  64.  
  65. failure_flag=$SUCCESS
  66.  
  67. ##################################################################
  68. ###  Initialize()
  69. ###
  70. ###         Initialize the tile, msg and cat id.
  71. ###
  72. ##################################################################
  73. Initialize()
  74. {
  75.     CAT_MESG_TITLE=""
  76.     CAT_MESG_MSG=""
  77.  
  78.     catopen CAT_ID $COMMAND_NAME
  79.  
  80. }
  81.  
  82. ##################################################################
  83. ###  Exit()
  84. ###
  85. ###    All exits should go through this routine.
  86. ###
  87. ##################################################################
  88. Exit() {
  89.         exit $1
  90. }
  91.  
  92. ##################   GUI Callbacks  ####################
  93.  
  94. #
  95. # This is the callback for the 'OK' button.  It will exit the program
  96. #
  97. OkButton()
  98. {
  99.   XtUnmanageChild $_DT_WORKING_DIALOG_HANDLE
  100.   
  101.   XSync $DISPLAY True
  102.  
  103.   Exit 0
  104. }
  105.  
  106. #
  107. # This is the callback if the timer goes off
  108. #
  109. # TimerCB()
  110. # {
  111. # 
  112. # CAT_MESG_MSG=${CAT_MESG_MSG}"."
  113. # XtSetValues $_DT_WORKING_DIALOG_HANDLE \
  114. #     messageString:"${CAT_MESG_MSG}"
  115. # 
  116. # XtAppAddTimeOut TIMER_ID $TIMER_CONTEXT $TIMER_TIME "TimerCB" ""
  117. # 
  118. # }
  119.  
  120. ##################################################################
  121. ###  Main()
  122. ###
  123. ###  Display a 'working' dialog for dthelpgen.
  124. ###
  125. ##################################################################
  126.  
  127. Initialize
  128.  
  129. if [[ -r /usr/dt/lib/dtksh/DtFuncs.dtsh ]]
  130. then
  131.     . /usr/dt/lib/dtksh/DtFuncs.dtsh
  132. else
  133.     echo Sorry--cannot find initialization file.
  134.     Exit $NO_INIT_FILE_ERR
  135. fi
  136.  
  137. XtInitialize TOPLEVEL dthelpgenDialog Dthelpgen ""
  138.  
  139. XtDisplay DISPLAY $TOPLEVEL
  140.  
  141. catgets CAT_MESG_TITLE $CAT_ID 2 6 "${COMMAND_NAME}"
  142. catgets CAT_MESG_MSG   $CAT_ID 2 7 \
  143.             "Generating browser information. Please wait."
  144.  
  145. DtkshDisplayWorkingDialog "${CAT_MESG_TITLE}" \
  146.                 "${CAT_MESG_MSG}"  \
  147.                 "OkButton" "" ""   \
  148.                 DIALOG_PRIMARY_APPLICATION_MODAL
  149.  
  150. XtManageChild $_DT_WORKING_DIALOG_HANDLE
  151.  
  152. # XtWidgetToApplicationContext TIMER_CONTEXT $_DT_WORKING_DIALOG_HANDLE
  153. # XtGetMultiClickTime TIMER_TIME $DISPLAY
  154. # XtAppAddTimeOut TIMER_ID $TIMER_CONTEXT $TIMER_TIME "TimerCB" ""
  155.  
  156. XtMainLoop
  157.  
  158. #
  159. #  Never reached.
  160. #
  161. #####################         eof       ##############################
  162.