home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / fnb101.zip / fnoptions.cmd < prev    next >
OS/2 REXX Batch file  |  1999-06-28  |  2KB  |  70 lines
  1. extproc python -x %PYTHONHOME%\fnoptions.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/fnoptions,v $
  31. # Version:      @(#)$RCSfile: fnoptions,v $ $Revision: 1.1 $
  32. #
  33. #############################################################################
  34. """ Write the ORB options on stdout. """
  35.  
  36.  
  37. # Standard/built-in modules.
  38. import sys
  39.  
  40. # Fnorb modules.
  41. from Fnorb.orb import CORBA
  42.  
  43.  
  44. def main(argv):
  45.     """ Do it! """
  46.  
  47.     # Initialise the ORB and get the options.
  48.     options = CORBA.ORB_init(argv, CORBA.ORB_ID)._fnorb_options()
  49.  
  50.     # Find the length of the longest option name (partly so we can make it look
  51.     # pretty - and partly 'cos I've been dying to use this solution for
  52.     # finding the maximum length of a list of strings ;^)
  53.     biggest = max(map(len, options.keys()))
  54.  
  55.     # Write them onto stdout! Yeah, I know - tough program ;^)
  56.     print
  57.     for (key, value) in options.items():
  58.     print "%-*s  :  %s" % (biggest, key, value)
  59.     print
  60.  
  61.     return 0
  62.  
  63. #############################################################################
  64.  
  65. if __name__ == '__main__':
  66.     # Do it!
  67.     sys.exit(main(sys.argv[1:]))
  68.  
  69. #############################################################################
  70.