home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / fnb101.zip / fnaming.cmd next >
OS/2 REXX Batch file  |  1999-06-28  |  2KB  |  74 lines
  1. extproc python -x %PYTHONHOME%\fnaming.cmd
  2. #############################################################################
  3. # Copyright (C) DSTC Pty Ltd (ACN 052 372 577) 1997, 1998, 1999
  4. # All Rights Reserved.
  5. #
  6. # The software contained on this media is the property of the DSTC Pty
  7. # Ltd.  Use of this software is strictly in accordance with the
  8. # license agreement in the accompanying LICENSE.HTML file.  If your
  9. # distribution of this software does not contain a LICENSE.HTML file
  10. # then you have no rights to use this software in any manner and
  11. # should contact DSTC at the address below to determine an appropriate
  12. # licensing arrangement.
  13. # 
  14. #      DSTC Pty Ltd
  15. #      Level 7, GP South
  16. #      Staff House Road
  17. #      University of Queensland
  18. #      St Lucia, 4072
  19. #      Australia
  20. #      Tel: +61 7 3365 4310
  21. #      Fax: +61 7 3365 4311
  22. #      Email: enquiries@dstc.edu.au
  23. # 
  24. # This software is being provided "AS IS" without warranty of any
  25. # kind.  In no event shall DSTC Pty Ltd be liable for damage of any
  26. # kind arising out of or in connection with the use or performance of
  27. # this software.
  28. #
  29. # Project:      Fnorb
  30. # File:         $Source: /units/arch/src/Fnorb/script/RCS/fnaming,v $
  31. # Version:      @(#)$RCSfile: fnaming,v $ $Revision: 1.4 $
  32. #
  33. #############################################################################
  34. """ A COS Naming service! """
  35.  
  36.  
  37. # Standard/built-in modules.
  38. import sys
  39.  
  40. # Fnorb modules.
  41. from Fnorb.orb import BOA, CORBA
  42.  
  43. # Naming service modules.
  44. from Fnorb.cos.naming import NamingService
  45.  
  46.  
  47. def main(argv):
  48.     """ Do it! """
  49.  
  50.     # Initialise the ORB.
  51.     orb = CORBA.ORB_init(argv, CORBA.ORB_ID)
  52.  
  53.     # The naming service is single-threaded!
  54.     orb._fnorb_override_options({'Threading Model': 'Reactive'})
  55.  
  56.     # Initialise the BOA.
  57.     boa = BOA.BOA_init(argv, BOA.BOA_ID)
  58.  
  59.     # Create the naming service.
  60.     ns = NamingService.NamingService(argv)
  61.  
  62.     # Start the event loop.
  63.     boa._fnorb_mainloop()
  64.  
  65.     return 0
  66.  
  67. #############################################################################
  68.  
  69. if __name__ == '__main__':
  70.     # Do it!
  71.     sys.exit(main(sys.argv[1:]))
  72.  
  73. #############################################################################
  74.