├── examples ├── aws │ ├── Makefile.local │ └── .gitignore ├── moma │ ├── Makefile.local │ ├── .gitignore │ ├── destinations.conf │ ├── password.conf │ ├── producer.conf │ └── consumer.conf ├── polyorb │ ├── Makefile.local │ ├── .gitignore │ └── README ├── .gitignore ├── bbs │ ├── .gitignore │ ├── stats │ │ ├── siz2data │ │ └── doplot │ ├── Makefile.local │ └── common.idl ├── corba │ ├── .gitignore │ ├── echo │ │ ├── .gitignore │ │ ├── echo.idl │ │ ├── echo-impl.adb │ │ └── Makefile.local │ ├── random │ │ ├── .gitignore │ │ ├── Makefile.local │ │ └── random.idl │ ├── send │ │ ├── .gitignore │ │ ├── interop │ │ │ └── tao │ │ │ │ ├── groupURL │ │ │ │ ├── Makefile.bor │ │ │ │ ├── client.conf │ │ │ │ ├── server.conf │ │ │ │ └── client.conf.xml │ │ ├── test-printer-impl.adb │ │ ├── Makefile.local │ │ └── print.idl │ ├── all_types │ │ ├── .gitignore │ │ ├── client.adb │ │ ├── dynclient.adb │ │ ├── all_types-impl.adb │ │ └── Makefile.local │ ├── rtcorba │ │ ├── .gitignore │ │ ├── dhb │ │ │ ├── .gitignore │ │ │ └── Makefile.local │ │ ├── client_propagated │ │ │ ├── .gitignore │ │ │ ├── echo.idl │ │ │ ├── Makefile.local │ │ │ └── echo-impl.adb │ │ ├── rtcosscheduling │ │ │ ├── .gitignore │ │ │ ├── client_scheduling.conf │ │ │ ├── echo.idl │ │ │ ├── Makefile.local │ │ │ └── echo-impl.adb │ │ └── server_declared │ │ │ ├── .gitignore │ │ │ ├── Makefile.local │ │ │ └── echo.idl │ ├── secure_echo │ │ ├── .gitignore │ │ ├── passwd.pwd │ │ ├── echo.idl │ │ ├── echo-impl.adb │ │ └── polyorb_openssl.conf │ ├── all_functions │ │ ├── .gitignore │ │ └── Makefile.local │ └── thread_pool_tester │ │ ├── polyorb.conf │ │ ├── Makefile.local │ │ └── svc.idl └── dsa │ ├── .gitignore │ ├── bbs │ └── .gitignore │ ├── bank │ ├── .gitignore │ └── example │ ├── demo │ ├── rci.adb │ └── testbed.cfg │ └── json │ ├── build.sh │ ├── remote_json.gpr │ ├── rci.ads │ ├── echo_json.cfg │ ├── normal_json.ads │ ├── cli.adb │ └── normal_json.adb ├── VERSION ├── cos ├── .gitignore ├── ir │ └── .gitignore ├── event │ └── .gitignore ├── naming │ ├── .gitignore │ └── File.idl ├── time │ └── .gitignore └── notification │ └── .gitignore ├── idls ├── .gitignore ├── Misc │ └── .gitignore ├── cos │ ├── .gitignore │ ├── event │ │ └── .gitignore │ ├── naming │ │ └── .gitignore │ ├── time │ │ └── .gitignore │ ├── notification │ │ └── .gitignore │ └── persistent │ │ └── cospersistencepid.idl ├── CORBA_IDL │ ├── .gitignore │ ├── CORBA_Current.idl │ └── CORBA_CustomMarshal.idl ├── CORBA_PIDL │ ├── .gitignore │ ├── CORBA_ValueBase.idl │ └── CORBA_ServerRequest.idl ├── Interop │ └── .gitignore └── RTCORBA │ ├── .gitignore │ └── RTCORBA.idl ├── src ├── .gitignore ├── aws │ └── .gitignore ├── corba │ ├── .gitignore │ ├── iop │ │ └── .gitignore │ ├── dynamicany │ │ └── .gitignore │ ├── rtcorba │ │ ├── .gitignore │ │ └── rtcorba-helper.adb │ ├── security │ │ └── .gitignore │ ├── portableinterceptor │ │ └── .gitignore │ └── portableserver-helper.adb ├── dsa │ └── .gitignore ├── giop │ ├── .gitignore │ ├── diop │ │ └── .gitignore │ ├── iiop │ │ ├── .gitignore │ │ ├── ssliop │ │ │ └── .gitignore │ │ └── security │ │ │ ├── .gitignore │ │ │ └── tls │ │ │ └── .gitignore │ └── miop │ │ └── .gitignore ├── moma │ ├── .gitignore │ ├── password.conf │ ├── destinations.conf │ ├── producer.conf │ └── consumer.conf ├── setup │ ├── .gitignore │ ├── security │ │ └── .gitignore │ └── polyorb-setup-client.adb ├── soap │ └── .gitignore ├── srp │ └── .gitignore ├── ssl │ └── .gitignore ├── security │ ├── .gitignore │ ├── tls │ │ └── .gitignore │ ├── gssup │ │ └── .gitignore │ └── x509 │ │ └── .gitignore ├── web_common │ └── .gitignore ├── src.exclude.in ├── ROADMAP ├── aws_orig │ └── templates_parser.adb └── config.adc.in ├── testsuite ├── core │ ├── any │ │ ├── Makefile.local │ │ └── .gitignore │ ├── poa │ │ ├── Makefile.local │ │ └── .gitignore │ ├── naming │ │ ├── Makefile.local │ │ └── .gitignore │ ├── random │ │ ├── Makefile.local │ │ └── .gitignore │ ├── tasking │ │ ├── Makefile.local │ │ └── .gitignore │ ├── .gitignore │ ├── chained_lists │ │ ├── Makefile.local │ │ └── .gitignore │ ├── dynamic_dict │ │ ├── Makefile.local │ │ └── .gitignore │ ├── fixed_point │ │ ├── Makefile.local │ │ └── .gitignore │ ├── obj_adapters │ │ ├── Makefile.local │ │ └── .gitignore │ ├── sync_policies │ │ ├── Makefile.local │ │ └── .gitignore │ ├── uri_encoding │ │ ├── Makefile.local │ │ └── .gitignore │ └── initialization │ │ ├── Makefile.local │ │ └── .gitignore ├── .gitignore ├── acats │ ├── CXE1001 │ │ ├── Makefile.local │ │ └── .gitignore │ ├── CXE2001 │ │ ├── Makefile.local │ │ └── .gitignore │ ├── CXE4001 │ │ ├── Makefile.local │ │ └── .gitignore │ ├── CXE4002 │ │ ├── Makefile.local │ │ └── .gitignore │ ├── CXE4005 │ │ ├── Makefile.local │ │ └── .gitignore │ ├── CXE4006 │ │ ├── Makefile.local │ │ └── .gitignore │ └── .gitignore ├── corba │ ├── cos │ │ ├── ir │ │ │ ├── Makefile.local │ │ │ └── .gitignore │ │ ├── naming │ │ │ ├── Makefile.local │ │ │ └── .gitignore │ │ ├── time │ │ │ ├── Makefile.local │ │ │ └── .gitignore │ │ ├── .gitignore │ │ ├── notification │ │ │ ├── Makefile.local │ │ │ └── .gitignore │ │ └── event │ │ │ ├── .gitignore │ │ │ ├── typedtest_interface.idl │ │ │ ├── typedtest_interface-impl.adb │ │ │ ├── Makefile.local │ │ │ ├── consumer.cmd │ │ │ └── supplier.cmd │ ├── local │ │ ├── Makefile.local │ │ └── .gitignore │ ├── .gitignore │ ├── orb_init │ │ ├── Makefile.local │ │ └── .gitignore │ ├── rtcorba │ │ ├── rtcurrent │ │ │ ├── Makefile.local │ │ │ └── .gitignore │ │ ├── .gitignore │ │ ├── rtorb │ │ │ ├── .gitignore │ │ │ ├── echo.idl │ │ │ ├── echo-impl.adb │ │ │ └── Makefile.local │ │ └── rtpoa │ │ │ ├── .gitignore │ │ │ ├── echo.idl │ │ │ ├── echo-impl.adb │ │ │ └── Makefile.local │ ├── benchs │ │ ├── .gitignore │ │ └── test000 │ │ │ ├── .gitignore │ │ │ └── Makefile.local │ ├── code_sets │ │ ├── .gitignore │ │ └── test000 │ │ │ ├── .gitignore │ │ │ ├── test_interface.idl │ │ │ └── Makefile.local │ ├── harness │ │ ├── .gitignore │ │ ├── harness.idl │ │ └── Makefile.local │ ├── object │ │ ├── .gitignore │ │ └── test000 │ │ │ ├── .gitignore │ │ │ ├── Makefile.local │ │ │ └── test_interface.idl │ ├── shutdown │ │ ├── .gitignore │ │ ├── Makefile.local │ │ └── test_interface.idl │ ├── all_exceptions │ │ ├── .gitignore │ │ └── Makefile.local │ ├── domainmanager │ │ ├── .gitignore │ │ └── test000 │ │ │ ├── .gitignore │ │ │ ├── Makefile.local │ │ │ ├── corba-domainmanager-skel.adb │ │ │ └── test.idl │ ├── portableinterceptor │ │ ├── test003 │ │ │ ├── Makefile.local │ │ │ └── .gitignore │ │ ├── .gitignore │ │ ├── test000 │ │ │ ├── .gitignore │ │ │ └── Makefile.local │ │ ├── test001 │ │ │ ├── .gitignore │ │ │ └── Makefile.local │ │ ├── test002 │ │ │ ├── .gitignore │ │ │ └── Makefile.local │ │ └── test004 │ │ │ ├── .gitignore │ │ │ └── Makefile.local │ ├── portableserver │ │ ├── .gitignore │ │ ├── test.idl │ │ ├── Makefile.local │ │ └── echo.idl │ ├── location_forwarding │ │ ├── .gitignore │ │ ├── test000 │ │ │ ├── .gitignore │ │ │ ├── Makefile.local │ │ │ └── test_interface.idl │ │ └── test001 │ │ │ ├── .gitignore │ │ │ ├── Makefile.local │ │ │ └── test_interface.idl │ ├── performance │ │ ├── Makefile.local │ │ └── java │ │ │ └── Makefile │ └── interop │ │ └── cpp │ │ └── common │ │ └── all_types_client.cc ├── idls │ ├── .gitignore │ ├── iac005 │ │ ├── t.idl │ │ ├── test.out │ │ └── tin.idl │ ├── local │ │ ├── local1.idl │ │ ├── local2.idl │ │ ├── local5.idl │ │ ├── local3.idl │ │ └── local4.idl │ ├── vb_b01 │ │ ├── test.out │ │ └── tin.idl │ ├── vt_o01 │ │ ├── test.out │ │ └── tin.idl │ ├── types008 │ │ ├── tin.idl │ │ └── test.out │ ├── avt_b01 │ │ ├── test.out │ │ └── tin.idl │ ├── types010 │ │ ├── test.out │ │ └── tin.idl │ ├── types011 │ │ ├── tin.idl │ │ └── test.out │ ├── types014 │ │ ├── tan.idl │ │ ├── tin.idl │ │ └── test.out │ ├── echo │ │ └── echo.idl │ ├── idl02031 │ │ ├── test.out │ │ └── tin.idl │ ├── idl02034 │ │ ├── test.out │ │ └── tin.idl │ ├── idlac003 │ │ └── tin.idl │ ├── types004 │ │ ├── tin.idl │ │ └── test.out │ ├── types005 │ │ ├── tin.idl │ │ └── test.out │ ├── types002 │ │ ├── tin.idl │ │ └── test.out │ ├── types003 │ │ ├── tin.idl │ │ └── test.out │ ├── types009 │ │ ├── tin.idl │ │ └── test.out │ ├── vb_d03 │ │ ├── test.out │ │ └── tin.idl │ ├── vb_d04 │ │ ├── test.out │ │ └── tin.idl │ ├── idlac000 │ │ └── tin.idl │ ├── idl15033 │ │ ├── test.out │ │ └── tin.idl │ ├── test006 │ │ └── test.out │ ├── types006 │ │ ├── tin.idl │ │ └── test.out │ ├── idl15023 │ │ ├── test.out │ │ └── tin.idl │ ├── harness │ │ └── harness.idl │ ├── idl07053 │ │ ├── test.out │ │ └── tin.idl │ ├── idlac004 │ │ └── tin.idl │ ├── aif_b01 │ │ ├── test.out │ │ └── tin.idl │ ├── import001 │ │ ├── int1.idl │ │ ├── int2.idl │ │ └── int3.idl │ ├── idl07040 │ │ ├── test.out │ │ └── tin.idl │ ├── circular │ │ ├── test_array_1.idl │ │ ├── test_typedef_1.idl │ │ ├── test_sequence_1.idl │ │ ├── test_array_2.idl │ │ ├── test_struct_1.idl │ │ ├── test_struct_2.idl │ │ ├── test_typedef_2.idl │ │ ├── test_exception_1.idl │ │ ├── test_sequence_2.idl │ │ ├── test_array_11.idl │ │ └── test_exception_2.idl │ ├── va_f01 │ │ ├── test.out │ │ └── tin.idl │ ├── expansion02 │ │ └── expansion.idl │ ├── iac007 │ │ └── tin.idl │ ├── test055 │ │ ├── tin.idl │ │ └── test.out │ ├── vt_b01 │ │ ├── test.out │ │ └── tin.idl │ ├── vti_si01 │ │ ├── test.out │ │ └── tin.idl │ ├── ada0019 │ │ └── tin.idl │ ├── iac004 │ │ ├── test.out │ │ └── tin.idl │ ├── idl15021 │ │ ├── test.out │ │ └── tin.idl │ ├── idlac002 │ │ └── tin.idl │ ├── va_f02 │ │ ├── test.out │ │ └── tin.idl │ ├── ada0011 │ │ └── tin.idl │ ├── ada0016 │ │ └── tin.idl │ ├── idl15022 │ │ ├── test.out │ │ └── tin.idl │ ├── expansion01 │ │ └── expansion.idl │ ├── idlac001 │ │ └── tin.idl │ ├── test_errors.sh │ ├── forward02 │ │ └── forward.idl │ ├── types007 │ │ ├── tin.idl │ │ └── test.out │ ├── chicken-egg │ │ ├── egg.idl │ │ └── chicken.idl │ ├── parse_file.sh │ ├── corba_idl │ │ ├── CORBA_Current.idl │ │ ├── CORBA_ValueBase.idl │ │ └── CORBA_ServerRequest.idl │ ├── iac002 │ │ └── tin.idl │ ├── idl07051 │ │ ├── test.out │ │ └── tin.idl │ ├── idl07052 │ │ ├── test.out │ │ └── tin.idl │ ├── idl15011 │ │ ├── test.out │ │ └── tin.idl │ ├── local001 │ │ └── tin.idl │ ├── abstract001 │ │ └── tin.idl │ ├── iac003 │ │ ├── test.out │ │ └── tin.idl │ ├── idl15012 │ │ ├── test.out │ │ └── tin.idl │ ├── idl15034 │ │ ├── test.out │ │ └── tin.idl │ ├── idl15031 │ │ ├── test.out │ │ └── tin.idl │ ├── vb_p01 │ │ ├── test.out │ │ └── tin.idl │ ├── ada0012 │ │ └── tin.idl │ ├── iac006 │ │ ├── tin.idl │ │ └── test.out │ ├── vb_d02 │ │ ├── test.out │ │ └── tin.idl │ ├── autotest.sh │ ├── aif_p01 │ │ └── test.out │ ├── iac001 │ │ ├── test.out │ │ └── tin.idl │ ├── idl02030 │ │ ├── test.out │ │ └── tin.idl │ ├── types012 │ │ ├── test.out │ │ └── tin.idl │ ├── vti_si03 │ │ ├── test.out │ │ └── tin.idl │ ├── ada0015 │ │ └── tin.idl │ ├── idl15001 │ │ ├── test.out │ │ └── tin.idl │ ├── idl15032 │ │ └── test.out │ ├── iac-types │ ├── vb_d01 │ │ ├── test.out │ │ └── tin.idl │ ├── ada0020 │ │ └── tin.idl │ ├── vti_si02 │ │ ├── test.out │ │ └── tin.idl │ ├── avt_p01 │ │ ├── test.out │ │ └── tin.idl │ ├── sequences01 │ │ └── test15.idl │ ├── idl15024 │ │ └── test.out │ ├── test018 │ │ └── test.out │ ├── vt_i01 │ │ ├── test.out │ │ └── tin.idl │ ├── annapp01 │ │ ├── test.out │ │ └── tin.idl │ ├── expansion03 │ │ └── expansion.idl │ ├── iac-idl │ ├── list_types.sh │ ├── vti_avb01 │ │ ├── test.out │ │ └── tin.idl │ ├── inherit001 │ │ └── tin.idl │ ├── va_t01 │ │ ├── test.out │ │ └── tin.idl │ ├── forward03 │ │ └── forward.idl │ ├── test011 │ │ └── test.out │ ├── test015 │ │ └── test.out │ ├── vti_avb02 │ │ ├── test.out │ │ └── tin.idl │ ├── header-sort │ ├── vt_e01 │ │ ├── test.out │ │ └── tin.idl │ ├── ada0013 │ │ └── tin.idl │ ├── vt_p01 │ │ └── test.out │ ├── ada0018 │ │ └── tin.idl │ ├── ada0014 │ │ └── tin.idl │ ├── idl15025 │ │ ├── test.out │ │ └── tin.idl │ ├── inherit002 │ │ └── tin.idl │ ├── local002 │ │ └── tin.idl │ ├── test010 │ │ └── test.out │ ├── vti_vb01 │ │ └── test.out │ ├── ada0021 │ │ └── tin.idl │ ├── test004 │ │ └── test.out │ ├── test009 │ │ └── test.out │ ├── test008 │ │ └── test.out │ ├── types001 │ │ └── test.out │ ├── ada0017 │ │ └── tin.idl │ ├── test051 │ │ └── test.out │ ├── Makefile.ada │ ├── ada0010 │ │ └── tin.idl │ ├── attr001 │ │ └── tin.idl │ ├── test012 │ │ └── test.out │ ├── forward01 │ │ └── forward.idl │ ├── va_t03 │ │ └── test.out │ ├── test013 │ │ └── test.out │ └── vb_d05 │ │ └── test.out ├── tests │ ├── always_fail │ │ ├── test.opt │ │ └── test.py │ ├── config.py.in │ ├── corba │ │ ├── interop │ │ │ ├── CORBA_INTEROP_0 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── CORBA_INTEROP_1 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── CORBA_INTEROP_2 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── CORBA_INTEROP_3 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── CORBA_INTEROP_4 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ └── CORBA_INTEROP_5 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ ├── shutdown │ │ │ ├── SHUTDOWN_1 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ └── SHUTDOWN_0 │ │ │ │ └── test.py │ │ ├── portableinterceptor │ │ │ ├── CORBA_PORTABLEINTERCEPTOR_1 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── CORBA_PORTABLEINTERCEPTOR_0 │ │ │ │ └── test.py │ │ │ ├── CORBA_PORTABLEINTERCEPTOR_2 │ │ │ │ └── test.py │ │ │ ├── CORBA_PORTABLEINTERCEPTOR_3 │ │ │ │ └── test.py │ │ │ └── CORBA_PORTABLEINTERCEPTOR_4 │ │ │ │ └── test.py │ │ ├── local │ │ │ └── LOCAL_0 │ │ │ │ └── test.py │ │ ├── orb_init │ │ │ └── ORB_INIT_0 │ │ │ │ └── test.py │ │ ├── harness │ │ │ ├── CORBA_HARNESS_7 │ │ │ │ └── test.py │ │ │ ├── CORBA_HARNESS_0 │ │ │ │ └── test.py │ │ │ ├── CORBA_HARNESS_1 │ │ │ │ └── test.py │ │ │ ├── CORBA_HARNESS_5 │ │ │ │ └── test.py │ │ │ ├── CORBA_HARNESS_2 │ │ │ │ └── test.py │ │ │ ├── CORBA_HARNESS_3 │ │ │ │ └── test.py │ │ │ └── CORBA_HARNESS_6 │ │ │ │ └── test.py │ │ ├── rtcorba-rtorb │ │ │ └── RTORB_0 │ │ │ │ └── test.py │ │ ├── rtcorba-rtpoa │ │ │ └── RTPOA_0 │ │ │ │ └── test.py │ │ ├── portableserver │ │ │ ├── PORTABLESERVER_0 │ │ │ │ └── test.py │ │ │ ├── PORTABLESERVER_1 │ │ │ │ └── test.py │ │ │ └── PORTABLESERVER_2 │ │ │ │ └── test.py │ │ ├── rtcorba-rtcurrent │ │ │ └── RTCURRENT_0 │ │ │ │ └── test.py │ │ ├── location_forwarding │ │ │ ├── LOCATION_FORWARDING_0 │ │ │ │ └── test.py │ │ │ └── LOCATION_FORWARDING_1 │ │ │ │ └── test.py │ │ ├── benchs │ │ │ └── CORBA_BENCHS_0 │ │ │ │ └── test.py │ │ ├── object │ │ │ └── OBJECT_0 │ │ │ │ └── test.py │ │ ├── all_exceptions │ │ │ ├── CORBA_ALL_EXCEPTIONS_0 │ │ │ │ └── test.py │ │ │ ├── CORBA_ALL_EXCEPTIONS_1 │ │ │ │ └── test.py │ │ │ ├── CORBA_ALL_EXCEPTIONS_2 │ │ │ │ └── test.py │ │ │ └── CORBA_ALL_EXCEPTIONS_3 │ │ │ │ └── test.py │ │ ├── domainmanager │ │ │ └── DOMAINMANAGER_0 │ │ │ │ └── test.py │ │ ├── code_sets │ │ │ ├── CODE_SETS_0 │ │ │ │ └── test.py │ │ │ └── CODE_SETS_1 │ │ │ │ └── test.py │ │ └── performance │ │ │ └── CORBA_PERFORMANCE_0 │ │ │ └── test.py │ ├── examples │ │ ├── corba-all_types │ │ │ ├── ALL_TYPES_2 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ALL_TYPES_4 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ALL_TYPES_1 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ALL_TYPES_3 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ALL_TYPES_0 │ │ │ │ └── test.py │ │ │ ├── ALL_TYPES_5 │ │ │ │ └── test.py │ │ │ └── ALL_TYPES_6 │ │ │ │ └── test.py │ │ ├── corba-all_functions │ │ │ ├── ALL_FUNCTIONS_2 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ALL_FUNCTIONS_1 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ALL_FUNCTIONS_3 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ALL_FUNCTIONS_0 │ │ │ │ └── test.py │ │ │ ├── ALL_FUNCTIONS_4 │ │ │ │ └── test.py │ │ │ ├── ALL_FUNCTIONS_5 │ │ │ │ └── test.py │ │ │ └── ALL_FUNCTIONS_6 │ │ │ │ └── test.py │ │ ├── corba-echo │ │ │ ├── ECHO_1 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ECHO_3 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── PARALLEL_ECHO_0 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── ECHO_0 │ │ │ │ └── test.py │ │ │ ├── ECHO_2 │ │ │ │ └── test.py │ │ │ ├── ECHO_4 │ │ │ │ └── test.py │ │ │ ├── ECHO_5 │ │ │ │ └── test.py │ │ │ ├── ECHO_6 │ │ │ │ └── test.py │ │ │ └── ECHO_7 │ │ │ │ └── test.py │ │ ├── corba-rtcorba-dhb │ │ │ └── RTCORBA_DHB_0 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ ├── corba-random │ │ │ ├── CORBA_RANDOM_1 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ └── CORBA_RANDOM_0 │ │ │ │ └── test.py │ │ ├── corba-secure_echo │ │ │ ├── SECURE_ECHO_GSSUP │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── SECURE_ECHO_TLS │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ └── SECURE_ECHO_TLS_GSSUP │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ ├── corba-rtcorba-rtcosscheduling │ │ │ └── RTCORBA_RTCOSSCHEDULING_0 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ ├── polyorb │ │ │ ├── POLYORB_CORE_0 │ │ │ │ └── test.py │ │ │ ├── POLYORB_CORE_2 │ │ │ │ └── test.py │ │ │ ├── POLYORB_CORE_1 │ │ │ │ └── test.py │ │ │ └── POLYORB_CORE_3 │ │ │ │ └── test.py │ │ ├── corba-send │ │ │ └── CORBA_MIOP_0 │ │ │ │ └── test.py │ │ ├── corba-rtcorba-server_declared │ │ │ ├── RTCORBA_SERVER_DECLARED_0 │ │ │ │ └── test.py │ │ │ └── RTCORBA_SERVER_DECLARED_1 │ │ │ │ └── test.py │ │ ├── corba-rtcorba-client_propagated │ │ │ └── RTCORBA_CLIENT_PROPAGATED_0 │ │ │ │ └── test.py │ │ └── moma │ │ │ ├── MOMA_0 │ │ │ └── test.py │ │ │ └── MOMA_1 │ │ │ └── test.py │ ├── confs │ │ ├── code_sets_000_server.conf │ │ ├── code_sets_000_client.conf │ │ ├── giop.conf │ │ ├── soap.conf │ │ ├── giop_1_0.conf │ │ ├── giop_1_1.conf │ │ ├── giop_1_2.conf │ │ ├── broken_codesets.conf │ │ └── performance.conf │ ├── core │ │ ├── tasking │ │ │ ├── TASK_1 │ │ │ │ ├── test.opt │ │ │ │ └── test.py │ │ │ ├── TASK_0 │ │ │ │ └── test.py │ │ │ ├── TASK_2 │ │ │ │ └── test.py │ │ │ └── TASK_3 │ │ │ │ └── test.py │ │ ├── poa │ │ │ └── POA_0 │ │ │ │ └── test.py │ │ ├── random │ │ │ └── RANDOM_0 │ │ │ │ └── test.py │ │ ├── obj_adapters │ │ │ ├── OA_0 │ │ │ │ └── test.py │ │ │ └── OA_1 │ │ │ │ └── test.py │ │ ├── fixed_point │ │ │ └── FIXED_0 │ │ │ │ └── test.py │ │ ├── dynamic_dict │ │ │ └── DYNAMIC_DICT_0 │ │ │ │ └── test.py │ │ ├── initialization │ │ │ ├── INIT_0 │ │ │ │ └── test.py │ │ │ ├── INIT_1 │ │ │ │ └── test.py │ │ │ ├── INIT_2 │ │ │ │ └── test.py │ │ │ ├── INIT_3 │ │ │ │ └── test.py │ │ │ └── INIT_4 │ │ │ │ └── test.py │ │ ├── uri_encoding │ │ │ └── URI_ENCODING_0 │ │ │ │ └── test.py │ │ ├── chained_lists │ │ │ └── CHAINED_LIST_0 │ │ │ │ └── test.py │ │ └── sync_policies │ │ │ └── CORE_SYNC_POLICIES_0 │ │ │ └── test.py │ └── cos │ │ ├── time │ │ └── TIME_0 │ │ │ └── test.py │ │ ├── ir │ │ └── IR_0 │ │ │ └── test.py │ │ └── naming │ │ └── NAMING_0 │ │ └── test.py ├── ssl-cert.conf └── dsa │ └── abortion │ └── app.cfg ├── tools ├── .gitignore ├── po_ir │ └── .gitignore ├── po_catref │ └── .gitignore ├── po_dumpir │ └── .gitignore ├── po_names │ └── .gitignore ├── po_cos_naming │ └── .gitignore └── po_createref │ └── .gitignore ├── compilers ├── .gitignore ├── iac │ ├── .gitignore │ ├── ChangeLog │ ├── .gdbinit │ ├── backend-be_corba_ada-nutils.ads │ ├── backend-be_corba_ada-stubs.adb │ ├── backend-be_corba_ada-idl_to_ada.ads │ └── backend-be_corba_ada-helpers_internals.adb ├── gnatprfh │ └── .gitignore ├── idlac │ ├── testsuite │ │ ├── .gitignore │ │ ├── import │ │ │ ├── T2.idl │ │ │ ├── test0042.idl │ │ │ ├── T3.idl │ │ │ ├── T1.idl │ │ │ └── test004.idl │ │ ├── local │ │ │ ├── local1.idl │ │ │ ├── local2.idl │ │ │ ├── local3.idl │ │ │ ├── local5.idl │ │ │ ├── local6.idl │ │ │ ├── local4.idl │ │ │ ├── local8.idl │ │ │ └── local7.idl │ │ ├── lexer │ │ │ └── testlexer_include.idl │ │ ├── omg │ │ │ ├── a02.idl │ │ │ ├── a03.idl │ │ │ ├── a11.idl │ │ │ ├── a06.idl │ │ │ ├── a07.idl │ │ │ ├── a04.idl │ │ │ ├── a10.idl │ │ │ ├── egg.idl │ │ │ ├── chicken.idl │ │ │ ├── a05.idl │ │ │ ├── drawing.idl │ │ │ ├── cultivation.idl │ │ │ ├── a01.idl │ │ │ ├── a09.idl │ │ │ └── barn.idl │ │ ├── parser │ │ │ ├── testparser_include.idl │ │ │ └── testparser.idl │ │ ├── mapping │ │ │ ├── arg.idl │ │ │ ├── union1.idl │ │ │ └── union2.idl │ │ ├── circular │ │ │ ├── test_array_1.idl │ │ │ ├── test_typedef_1.idl │ │ │ ├── test_sequence_1.idl │ │ │ ├── test_array_2.idl │ │ │ ├── test_struct_1.idl │ │ │ ├── test_struct_2.idl │ │ │ ├── test_typedef_2.idl │ │ │ ├── test_exception_1.idl │ │ │ ├── test_sequence_2.idl │ │ │ └── test_exception_2.idl │ │ ├── raises │ │ │ ├── attr-raises-1.idl │ │ │ ├── attr-raises-2.idl │ │ │ ├── attr-raises-5.idl │ │ │ ├── attr-raises-4.idl │ │ │ └── attr-raises-3.idl │ │ ├── adabroker.parser │ │ │ ├── testparser.idl │ │ │ └── testparser.exp │ │ ├── prefix │ │ │ └── test003.idl │ │ └── regression │ │ │ ├── RT-58 │ │ │ └── xx.idl │ │ │ ├── RT-33 │ │ │ └── multiple_inh.idl │ │ │ ├── RT-34 │ │ │ └── introduced_identifier.idl │ │ │ └── RT-55 │ │ │ └── xx.idl │ ├── .gitignore │ ├── ada_be.opt │ ├── idl_fe-lexer.ads │ ├── idl_fe-tree-synthetic.adb │ └── idl_fe.opt ├── ciao │ ├── README │ ├── ciao.ads │ ├── ciao-alloc.ads │ ├── ciao-types.ads │ └── ciao-hostparm.ads └── config.adc.in ├── doc ├── polyorb_version.py.in ├── echo.idl ├── favicon.ico ├── full-ex_fig.pdf ├── xe-arch_fig.pdf ├── echo-impl-body.adb ├── adacore-logo-white.png └── References.rst ├── ANNOUNCE ├── contrib ├── local_sockets │ ├── test_sockets │ │ ├── gnat.adc │ │ └── Makefile │ └── test │ │ ├── polyorb.conf │ │ ├── gnat.adc │ │ ├── echo-impl.adb │ │ ├── echo.idl │ │ └── polyorb-log-ork_serial.ads ├── automake │ └── README └── README ├── README.md ├── support ├── .gitignore ├── cleanup-conf-files └── libtool-tag.m4 ├── .gitreview ├── .gitlab-ci.plan ├── utils └── sort_MANIFEST ├── .gitlab-ci.yml └── .gitignore /examples/aws/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /examples/moma/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /VERSION: -------------------------------------------------------------------------------- 1 | @polyorb_version@ 2 | -------------------------------------------------------------------------------- /cos/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /cos/ir/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/polyorb/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /idls/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/any/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/poa/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /tools/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /compilers/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /cos/event/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /cos/naming/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /cos/time/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/Misc/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/cos/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/aws/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/corba/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/dsa/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/giop/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/moma/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/setup/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/soap/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/srp/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/ssl/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/acats/CXE1001/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/acats/CXE2001/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/acats/CXE4001/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/acats/CXE4002/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/acats/CXE4005/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/acats/CXE4006/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/corba/cos/ir/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/corba/local/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/naming/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/random/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/tasking/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /tools/po_ir/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /compilers/iac/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /cos/notification/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/aws/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/bbs/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/dsa/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/dsa/bbs/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/moma/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/polyorb/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/CORBA_IDL/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/CORBA_PIDL/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/Interop/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/RTCORBA/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/cos/event/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/cos/naming/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/cos/time/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/corba/iop/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/giop/diop/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/giop/iiop/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/giop/miop/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/security/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/security/tls/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/web_common/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/acats/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/cos/naming/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/corba/cos/time/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/corba/orb_init/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/chained_lists/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/dynamic_dict/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/fixed_point/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/obj_adapters/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/sync_policies/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/uri_encoding/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/idls/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /tools/po_catref/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /tools/po_dumpir/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /tools/po_names/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /compilers/gnatprfh/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/echo/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/random/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/send/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /idls/cos/notification/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/corba/dynamicany/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/corba/rtcorba/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/corba/security/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/giop/iiop/ssliop/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/security/gssup/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/security/x509/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/setup/security/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/src.exclude.in: -------------------------------------------------------------------------------- 1 | @EXCLUDED_SOURCE_FILES@ 2 | -------------------------------------------------------------------------------- /testsuite/corba/cos/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/cos/notification/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/corba/local/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtcurrent/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/any/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/initialization/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/core/naming/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/poa/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/random/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /tools/po_cos_naming/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /tools/po_createref/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/all_types/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/dhb/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/secure_echo/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/giop/iiop/security/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/giop/iiop/security/tls/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/acats/CXE1001/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/acats/CXE2001/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/acats/CXE4001/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/acats/CXE4002/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/acats/CXE4005/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/acats/CXE4006/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/benchs/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/code_sets/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/cos/event/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/cos/ir/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/cos/naming/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/cos/time/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/harness/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/object/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/orb_init/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/shutdown/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/fixed_point/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/tasking/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/tests/always_fail/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /examples/corba/all_functions/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/secure_echo/passwd.pwd: -------------------------------------------------------------------------------- 1 | user:password 2 | -------------------------------------------------------------------------------- /src/corba/portableinterceptor/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /src/setup/polyorb-setup-client.adb: -------------------------------------------------------------------------------- 1 | pragma No_Body; 2 | -------------------------------------------------------------------------------- /testsuite/corba/all_exceptions/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/benchs/test000/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/domainmanager/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/object/test000/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test003/Makefile.local: -------------------------------------------------------------------------------- 1 | -------------------------------------------------------------------------------- /testsuite/corba/portableserver/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtorb/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtpoa/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/chained_lists/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/dynamic_dict/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/initialization/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/obj_adapters/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/sync_policies/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/core/uri_encoding/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/idls/iac005/t.idl: -------------------------------------------------------------------------------- 1 | const char c3 = L'\u41'; 2 | -------------------------------------------------------------------------------- /doc/polyorb_version.py.in: -------------------------------------------------------------------------------- 1 | version = '@POLYORB_VERSION@' 2 | -------------------------------------------------------------------------------- /testsuite/corba/code_sets/test000/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/cos/notification/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/location_forwarding/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtcurrent/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/idls/local/local1.idl: -------------------------------------------------------------------------------- 1 | local interface A {}; 2 | 3 | -------------------------------------------------------------------------------- /testsuite/idls/vb_b01/test.out: -------------------------------------------------------------------------------- 1 | valuetype ShortValue short; 2 | -------------------------------------------------------------------------------- /ANNOUNCE: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/ANNOUNCE -------------------------------------------------------------------------------- /compilers/idlac/testsuite/import/T2.idl: -------------------------------------------------------------------------------- 1 | 2 | interface T2 {}; 3 | -------------------------------------------------------------------------------- /contrib/local_sockets/test_sockets/gnat.adc: -------------------------------------------------------------------------------- 1 | pragma Ravenscar; 2 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/client_propagated/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/rtcosscheduling/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/server_declared/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/domainmanager/test000/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/tests/config.py.in: -------------------------------------------------------------------------------- 1 | use_installed = "@USE_INSTALLED@" 2 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_0/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_1/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_2/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_3/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_4/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_5/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/corba/shutdown/SHUTDOWN_1/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/README.md -------------------------------------------------------------------------------- /compilers/idlac/testsuite/local/local1.idl: -------------------------------------------------------------------------------- 1 | 2 | local interface A {}; 3 | -------------------------------------------------------------------------------- /contrib/local_sockets/test/polyorb.conf: -------------------------------------------------------------------------------- 1 | [log] 2 | polyorb.ls=debug 3 | -------------------------------------------------------------------------------- /examples/dsa/bank/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile 2 | bank_client 3 | bank_server 4 | -------------------------------------------------------------------------------- /src/ROADMAP: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/src/ROADMAP -------------------------------------------------------------------------------- /testsuite/corba/location_forwarding/test000/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/location_forwarding/test001/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test000/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test001/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test002/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test003/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test004/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/import/test0042.idl: -------------------------------------------------------------------------------- 1 | 2 | interface Test0042 {}; 3 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/lexer/testlexer_include.idl: -------------------------------------------------------------------------------- 1 | "#include OK" 2 | '\8' -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a02.idl: -------------------------------------------------------------------------------- 1 | 2 | typedef boolean Result_Flag; 3 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a03.idl: -------------------------------------------------------------------------------- 1 | 2 | enum Color {Red, Green, Blue}; 3 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a11.idl: -------------------------------------------------------------------------------- 1 | 2 | exception null_exception{}; 3 | -------------------------------------------------------------------------------- /cos/naming/File.idl: -------------------------------------------------------------------------------- 1 | interface File { 2 | attribute string Image; 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/vt_o01/test.out: -------------------------------------------------------------------------------- 1 | valuetype Val { 2 | short op(); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_2/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_4/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /compilers/idlac/.gitignore: -------------------------------------------------------------------------------- 1 | Makefile.in 2 | idl_fe-tree.ads 3 | idl_fe-tree.adb 4 | -------------------------------------------------------------------------------- /doc/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | string echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /doc/favicon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/doc/favicon.ico -------------------------------------------------------------------------------- /examples/corba/thread_pool_tester/polyorb.conf: -------------------------------------------------------------------------------- 1 | [tasking] 2 | max_threads=10 3 | -------------------------------------------------------------------------------- /testsuite/idls/types008/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | native hello; 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_2/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_1/test.opt: -------------------------------------------------------------------------------- 1 | ALL DEAD 2 | proto_soap 3 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_3/test.opt: -------------------------------------------------------------------------------- 1 | ALL DEAD 2 | proto_soap 3 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/PARALLEL_ECHO_0/test.opt: -------------------------------------------------------------------------------- 1 | ALL RLIMIT 720 2 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-rtcorba-dhb/RTCORBA_DHB_0/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/import/T3.idl: -------------------------------------------------------------------------------- 1 | 2 | import ::T2; 3 | 4 | interface T3 {}; 5 | -------------------------------------------------------------------------------- /contrib/local_sockets/test_sockets/Makefile: -------------------------------------------------------------------------------- 1 | ADB = test_ls.adb 2 | include Makefile.common -------------------------------------------------------------------------------- /testsuite/idls/avt_b01/test.out: -------------------------------------------------------------------------------- 1 | abstract valuetype AbsVal { 2 | short op(); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/local/local2.idl: -------------------------------------------------------------------------------- 1 | interface A {}; 2 | 3 | local interface B : A {}; 4 | -------------------------------------------------------------------------------- /testsuite/idls/local/local5.idl: -------------------------------------------------------------------------------- 1 | local interface A {}; 2 | 3 | interface B : A {}; 4 | -------------------------------------------------------------------------------- /testsuite/idls/types010/test.out: -------------------------------------------------------------------------------- 1 | STRING := True 2 | ULONG := True 3 | ANY := True 4 | -------------------------------------------------------------------------------- /testsuite/idls/types011/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | typedef long My_Long; 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/types014/tan.idl: -------------------------------------------------------------------------------- 1 | interface tan { 2 | typedef wstring word; 3 | }; 4 | -------------------------------------------------------------------------------- /compilers/ciao/README: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/ciao/README -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a06.idl: -------------------------------------------------------------------------------- 1 | 2 | typedef sequence> Ragged8; 3 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/parser/testparser_include.idl: -------------------------------------------------------------------------------- 1 | const long included_const = 10; 2 | -------------------------------------------------------------------------------- /contrib/local_sockets/test/gnat.adc: -------------------------------------------------------------------------------- 1 | 2 | pragma Ravenscar; 3 | pragma Restrictions(No_IO); -------------------------------------------------------------------------------- /doc/full-ex_fig.pdf: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/doc/full-ex_fig.pdf -------------------------------------------------------------------------------- /doc/xe-arch_fig.pdf: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/doc/xe-arch_fig.pdf -------------------------------------------------------------------------------- /testsuite/idls/local/local3.idl: -------------------------------------------------------------------------------- 1 | local interface A {}; 2 | 3 | local interface B : A {}; 4 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableinterceptor/CORBA_PORTABLEINTERCEPTOR_1/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-random/CORBA_RANDOM_1/test.opt: -------------------------------------------------------------------------------- 1 | ALL DEAD 2 | proto_soap 3 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-secure_echo/SECURE_ECHO_GSSUP/test.opt: -------------------------------------------------------------------------------- 1 | !ssl_support DEAD 2 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-secure_echo/SECURE_ECHO_TLS/test.opt: -------------------------------------------------------------------------------- 1 | !ssl_support DEAD 2 | -------------------------------------------------------------------------------- /compilers/ciao/ciao.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/ciao/ciao.ads -------------------------------------------------------------------------------- /compilers/iac/ChangeLog: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/iac/ChangeLog -------------------------------------------------------------------------------- /doc/echo-impl-body.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/doc/echo-impl-body.adb -------------------------------------------------------------------------------- /examples/corba/echo/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | string echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/echo/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | string echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/idl02031/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:3:23: expected token 2 | iac: 1 error(s) 3 | -------------------------------------------------------------------------------- /testsuite/idls/idl02034/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:3:19: expected token 2 | iac: 1 error(s) 3 | -------------------------------------------------------------------------------- /testsuite/idls/idlac003/tin.idl: -------------------------------------------------------------------------------- 1 | interface bar { 2 | typedef boolean array[10]; 3 | 4 | }; 5 | -------------------------------------------------------------------------------- /testsuite/idls/types004/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | typedef wchar Alexandrin[12]; 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/types005/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | enum Color { Red, Blue, Green }; 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_1/test.opt: -------------------------------------------------------------------------------- 1 | ALL DEAD 2 | proto_soap XFAIL 3 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_3/test.opt: -------------------------------------------------------------------------------- 1 | ALL DEAD 2 | proto_soap XFAIL 3 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-secure_echo/SECURE_ECHO_TLS_GSSUP/test.opt: -------------------------------------------------------------------------------- 1 | !ssl_support DEAD 2 | -------------------------------------------------------------------------------- /compilers/idlac/ada_be.opt: -------------------------------------------------------------------------------- 1 | #ada_be.expansion 2 | #ada_be.source_streams 3 | #ada_be.identifiers 4 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/local/local2.idl: -------------------------------------------------------------------------------- 1 | 2 | interface A {}; 3 | 4 | local interface B : A {}; 5 | -------------------------------------------------------------------------------- /doc/adacore-logo-white.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/doc/adacore-logo-white.png -------------------------------------------------------------------------------- /examples/corba/send/interop/tao/groupURL: -------------------------------------------------------------------------------- 1 | corbaloc:miop:1.0@1.0-TestDomain-5506/239.239.239.18:5678 2 | -------------------------------------------------------------------------------- /examples/dsa/demo/rci.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/dsa/demo/rci.adb -------------------------------------------------------------------------------- /examples/dsa/json/build.sh: -------------------------------------------------------------------------------- 1 | #! /bin/sh 2 | 3 | po_gnatdist -Premote_json -gnat12 echo_json "$@" 4 | -------------------------------------------------------------------------------- /idls/RTCORBA/RTCORBA.idl: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/idls/RTCORBA/RTCORBA.idl -------------------------------------------------------------------------------- /testsuite/idls/types002/tin.idl: -------------------------------------------------------------------------------- 1 | valuetype tin { 2 | boolean echoBoolean (in boolean arg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/types003/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | object echoobject (in object arg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/types005/test.out: -------------------------------------------------------------------------------- 1 | ENUM := True 2 | STRING := True 3 | ULONG := True 4 | ANY := True 5 | -------------------------------------------------------------------------------- /testsuite/idls/types009/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | wstring echowstring (in wstring arg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/types010/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | string echostring (in string arg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d03/test.out: -------------------------------------------------------------------------------- 1 | typedef long LongArray[2][3]; 2 | valuetype ArrayValue LongArray; 3 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d04/test.out: -------------------------------------------------------------------------------- 1 | valuetype StringValue string; 2 | valuetype WStringValue wstring; 3 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_1/test.opt: -------------------------------------------------------------------------------- 1 | ALL DEAD 2 | proto_soap XFAIL 3 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_3/test.opt: -------------------------------------------------------------------------------- 1 | ALL DEAD 2 | proto_soap XFAIL 3 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-rtcorba-rtcosscheduling/RTCORBA_RTCOSSCHEDULING_0/test.opt: -------------------------------------------------------------------------------- 1 | ALL XFAIL 2 | -------------------------------------------------------------------------------- /compilers/iac/.gdbinit: -------------------------------------------------------------------------------- 1 | b exception 2 | b display_error 3 | define wi 4 | call w_node_id (1, $$) 5 | end 6 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/import/T1.idl: -------------------------------------------------------------------------------- 1 | 2 | import ::T2; 3 | import ::T3; 4 | 5 | interface T1 {}; 6 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/local/local3.idl: -------------------------------------------------------------------------------- 1 | 2 | local interface A {}; 3 | 4 | local interface B : A {}; 5 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a07.idl: -------------------------------------------------------------------------------- 1 | 2 | typedef string Name; 3 | 4 | typedef string<512> Title; 5 | 6 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/rtcosscheduling/client_scheduling.conf: -------------------------------------------------------------------------------- 1 | [activity activity1] 2 | priority=10000 3 | -------------------------------------------------------------------------------- /examples/corba/secure_echo/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | string echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/corba/portableserver/test.idl: -------------------------------------------------------------------------------- 1 | 2 | interface Test { 3 | 4 | void proc (); 5 | 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtorb/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | string echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtpoa/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | string echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/idlac000/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | 3 | interface I { 4 | }; 5 | typedef I S2; 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/types008/test.out: -------------------------------------------------------------------------------- 1 | NATIVE := True 2 | STRING := True 3 | ULONG := True 4 | ANY := True 5 | -------------------------------------------------------------------------------- /testsuite/idls/types009/test.out: -------------------------------------------------------------------------------- 1 | WSTRING := True 2 | ULONG := True 3 | STRING := True 4 | ANY := True 5 | -------------------------------------------------------------------------------- /testsuite/tests/confs/code_sets_000_server.conf: -------------------------------------------------------------------------------- 1 | 2 | [giop] 3 | giop.native_wchar_code_set=16#00040001# 4 | -------------------------------------------------------------------------------- /compilers/ciao/ciao-alloc.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/ciao/ciao-alloc.ads -------------------------------------------------------------------------------- /compilers/ciao/ciao-types.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/ciao/ciao-types.ads -------------------------------------------------------------------------------- /testsuite/idls/idl15033/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:13:10: "I" conflicts with scoped name at line 7 2 | iac: 1 error(s) 3 | -------------------------------------------------------------------------------- /testsuite/idls/test006/test.out: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/testsuite/idls/test006/test.out -------------------------------------------------------------------------------- /testsuite/idls/types006/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | exception my_exception {long info; double occ;}; 3 | }; 4 | -------------------------------------------------------------------------------- /compilers/ciao/ciao-hostparm.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/ciao/ciao-hostparm.ads -------------------------------------------------------------------------------- /compilers/idlac/idl_fe-lexer.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/idlac/idl_fe-lexer.ads -------------------------------------------------------------------------------- /compilers/idlac/testsuite/local/local5.idl: -------------------------------------------------------------------------------- 1 | 2 | local interface A {}; 3 | 4 | // illegal 5 | interface B : A {}; 6 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/mapping/arg.idl: -------------------------------------------------------------------------------- 1 | interface all_types { 2 | Object echo12(in Object arg); 3 | }; 4 | 5 | -------------------------------------------------------------------------------- /examples/corba/echo/echo-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/corba/echo/echo-impl.adb -------------------------------------------------------------------------------- /examples/corba/rtcorba/client_propagated/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | short echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/rtcosscheduling/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | short echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /src/aws_orig/templates_parser.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/src/aws_orig/templates_parser.adb -------------------------------------------------------------------------------- /testsuite/idls/idl15023/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:7:20: "inner1" conflicts with scoped name at line 6 2 | iac: 1 error(s) 3 | -------------------------------------------------------------------------------- /testsuite/idls/types014/tin.idl: -------------------------------------------------------------------------------- 1 | #include "tan.idl" 2 | interface tin { 3 | void foo (in tan::word arg); 4 | }; 5 | -------------------------------------------------------------------------------- /examples/corba/all_types/client.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/corba/all_types/client.adb -------------------------------------------------------------------------------- /src/corba/portableserver-helper.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/src/corba/portableserver-helper.adb -------------------------------------------------------------------------------- /src/corba/rtcorba/rtcorba-helper.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/src/corba/rtcorba/rtcorba-helper.adb -------------------------------------------------------------------------------- /support/.gitignore: -------------------------------------------------------------------------------- 1 | libtool.m4 2 | depcomp 3 | config.guess 4 | config.sub 5 | ltmain.sh 6 | mdate-sh 7 | texinfo.tex 8 | -------------------------------------------------------------------------------- /testsuite/corba/harness/harness.idl: -------------------------------------------------------------------------------- 1 | interface Harness { 2 | unsigned long echoULong(in unsigned long arg) ; 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/harness/harness.idl: -------------------------------------------------------------------------------- 1 | interface Harness { 2 | unsigned long echoULong(in unsigned long arg) ; 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/idls/idl07053/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:5:09: "make_it_so" conflicts with declaration at line 2 2 | iac: 1 error(s) 3 | -------------------------------------------------------------------------------- /testsuite/idls/idlac004/tin.idl: -------------------------------------------------------------------------------- 1 | interface I0 { 2 | typedef boolean foo; 3 | 4 | typedef foo array[10]; 5 | 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/local/local4.idl: -------------------------------------------------------------------------------- 1 | interface A {}; 2 | 3 | local interface B {}; 4 | 5 | local interface C : A, B {}; 6 | -------------------------------------------------------------------------------- /testsuite/idls/types004/test.out: -------------------------------------------------------------------------------- 1 | WCHAR := True 2 | ARRAY_T := True 3 | ULONG := True 4 | STRING := True 5 | ANY := True 6 | -------------------------------------------------------------------------------- /testsuite/idls/types011/test.out: -------------------------------------------------------------------------------- 1 | LONG := True 2 | ALIAS := True 3 | STRING := True 4 | ULONG := True 5 | ANY := True 6 | -------------------------------------------------------------------------------- /testsuite/tests/core/tasking/TASK_1/test.opt: -------------------------------------------------------------------------------- 1 | AIX XFAIL massive tasking 2 | linux-rhES6,32bits XFAIL massive tasking 3 | -------------------------------------------------------------------------------- /.gitreview: -------------------------------------------------------------------------------- 1 | [gerrit] 2 | host = git.adacore.com 3 | project = PolyORB 4 | defaultbranch = master 5 | defaultremote = origin 6 | -------------------------------------------------------------------------------- /examples/corba/all_types/dynclient.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/corba/all_types/dynclient.adb -------------------------------------------------------------------------------- /examples/moma/destinations.conf: -------------------------------------------------------------------------------- 1 | [destination 1] 2 | type=queue 3 | name=example1 4 | persistent=none 5 | #persistent=file 6 | -------------------------------------------------------------------------------- /testsuite/idls/aif_b01/test.out: -------------------------------------------------------------------------------- 1 | abstract interface AbsInf { 2 | short op(); 3 | }; 4 | interface Itfderiv : AbsInf { 5 | }; 6 | -------------------------------------------------------------------------------- /testsuite/idls/import001/int1.idl: -------------------------------------------------------------------------------- 1 | interface int1 { 2 | typedef long type1; 3 | type1 op1 (in short data); 4 | }; 5 | 6 | -------------------------------------------------------------------------------- /testsuite/idls/types003/test.out: -------------------------------------------------------------------------------- 1 | OBJECT := True 2 | STRING := True 3 | ULONG := True 4 | TYPECODE := True 5 | ANY := True 6 | -------------------------------------------------------------------------------- /testsuite/tests/confs/code_sets_000_client.conf: -------------------------------------------------------------------------------- 1 | 2 | [iiop] 3 | polyorb.protocols.iiop.giop.1.2.locate_then_request=false 4 | -------------------------------------------------------------------------------- /compilers/idlac/idl_fe-tree-synthetic.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/idlac/idl_fe-tree-synthetic.adb -------------------------------------------------------------------------------- /compilers/idlac/testsuite/local/local6.idl: -------------------------------------------------------------------------------- 1 | local interface A; 2 | 3 | local interface A {}; 4 | 5 | local interface B : A {}; 6 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a04.idl: -------------------------------------------------------------------------------- 1 | 2 | struct Example { 3 | long member1, member2; 4 | boolean member3[4][8]; 5 | }; 6 | -------------------------------------------------------------------------------- /contrib/local_sockets/test/echo-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/contrib/local_sockets/test/echo-impl.adb -------------------------------------------------------------------------------- /doc/References.rst: -------------------------------------------------------------------------------- 1 | .. _References: 2 | 3 | ********** 4 | References 5 | ********** 6 | 7 | .. bibliography:: polyorb_ug.bib 8 | -------------------------------------------------------------------------------- /examples/corba/secure_echo/echo-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/corba/secure_echo/echo-impl.adb -------------------------------------------------------------------------------- /examples/corba/send/test-printer-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/corba/send/test-printer-impl.adb -------------------------------------------------------------------------------- /testsuite/corba/code_sets/test000/test_interface.idl: -------------------------------------------------------------------------------- 1 | 2 | interface Test_Interface { 3 | void Put (in wstring Value); 4 | }; 5 | -------------------------------------------------------------------------------- /testsuite/idls/idl07040/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:3:03: interface cannot inherit from a forward-declared interface 2 | iac: 1 error(s) 3 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/import/test004.idl: -------------------------------------------------------------------------------- 1 | 2 | import ::test0041; 3 | import ::test0042; 4 | 5 | interface Test004 : Test0042 { }; 6 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/local/local4.idl: -------------------------------------------------------------------------------- 1 | 2 | interface A {}; 3 | 4 | local interface B {}; 5 | 6 | local interface C : A, B {}; 7 | -------------------------------------------------------------------------------- /examples/bbs/stats/siz2data: -------------------------------------------------------------------------------- 1 | #! /bin/sh 2 | 3 | tr = ' ' | 4 | awk '/Elapsed/ { time = $3 } 5 | /siz/ { print $2 " " time }' 6 | -------------------------------------------------------------------------------- /examples/corba/all_types/all_types-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/corba/all_types/all_types-impl.adb -------------------------------------------------------------------------------- /examples/corba/echo/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}echo.idl-stamp: idlac_flags := -d 2 | ${test_target}: ${current_dir}echo.idl-stamp 3 | -------------------------------------------------------------------------------- /examples/corba/random/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}random.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}random.idl-stamp 3 | -------------------------------------------------------------------------------- /examples/corba/send/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}print.idl-stamp: idlac_flags := -d 2 | ${test_target}: ${current_dir}print.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/cos/event/typedtest_interface.idl: -------------------------------------------------------------------------------- 1 | interface TypedTest_Interface { 2 | string echoString (in string Mesg); 3 | }; 4 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtorb/echo-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/testsuite/corba/rtcorba/rtorb/echo-impl.adb -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtpoa/echo-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/testsuite/corba/rtcorba/rtpoa/echo-impl.adb -------------------------------------------------------------------------------- /compilers/iac/backend-be_corba_ada-nutils.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/iac/backend-be_corba_ada-nutils.ads -------------------------------------------------------------------------------- /compilers/iac/backend-be_corba_ada-stubs.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/iac/backend-be_corba_ada-stubs.adb -------------------------------------------------------------------------------- /examples/dsa/bank/example: -------------------------------------------------------------------------------- 1 | poor 2 | xxxx 3 | 25 4 | -- 5 | middle 6 | yyyy 7 | 250 8 | -- 9 | rich 10 | zzzz 11 | 2500 12 | -- 13 | -------------------------------------------------------------------------------- /examples/dsa/json/remote_json.gpr: -------------------------------------------------------------------------------- 1 | with "gnatcoll_core"; 2 | project Remote_JSON is 3 | for Source_Dirs use ("."); 4 | end Remote_JSON; 5 | -------------------------------------------------------------------------------- /testsuite/corba/benchs/test000/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/harness/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}harness.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}harness.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtorb/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}echo.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}echo.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/rtcorba/rtpoa/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}echo.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}echo.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_array_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Array_1 { 3 | 4 | interface X {}; 5 | 6 | typedef X y[4]; 7 | 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_typedef_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Typedef_1 { 3 | 4 | interface X {}; 5 | 6 | typedef X Y; 7 | 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/idls/types002/test.out: -------------------------------------------------------------------------------- 1 | VALUE := True 2 | STRING := True 3 | ULONG := True 4 | SHORT := True 5 | BOOLEAN := True 6 | ANY := True 7 | -------------------------------------------------------------------------------- /testsuite/idls/types006/test.out: -------------------------------------------------------------------------------- 1 | EXCEPT := True 2 | STRING := True 3 | ULONG := True 4 | LONG := True 5 | DOUBLE := True 6 | ANY := True 7 | -------------------------------------------------------------------------------- /testsuite/idls/types014/test.out: -------------------------------------------------------------------------------- 1 | WSTRING := True 2 | ULONG := True 3 | ALIAS := True 4 | STRING := True 5 | VOID := True 6 | ANY := True 7 | -------------------------------------------------------------------------------- /compilers/idlac/idl_fe.opt: -------------------------------------------------------------------------------- 1 | #idl_fe.lexer 2 | #idl_fe.parser_method_trace 3 | #idl_fe.parser 4 | #idl_fe.types 5 | #idl_fe.types_method_trace 6 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/local/local8.idl: -------------------------------------------------------------------------------- 1 | local interface Local8 { 2 | boolean is_x (out boolean result); 3 | boolean is_y (); 4 | }; 5 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/parser/testparser.idl: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/idlac/testsuite/parser/testparser.idl -------------------------------------------------------------------------------- /examples/corba/thread_pool_tester/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}svc.idl-stamp: idlac_flags := -ir 2 | ${test_target}: ${current_dir}svc.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/performance/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}benchs.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}benchs.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/idl07040/tin.idl: -------------------------------------------------------------------------------- 1 | module Example { 2 | interface base; // Forward declaration 3 | interface derived : base {}; // Error 4 | }; 5 | -------------------------------------------------------------------------------- /compilers/iac/backend-be_corba_ada-idl_to_ada.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/iac/backend-be_corba_ada-idl_to_ada.ads -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_array_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Array_1 { 3 | 4 | interface X {}; 5 | 6 | typedef X y[4]; 7 | 8 | }; 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_typedef_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Typedef_1 { 3 | 4 | interface X {}; 5 | 6 | typedef X Y; 7 | 8 | }; 9 | -------------------------------------------------------------------------------- /examples/corba/all_types/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}all_types.idl-stamp: idlac_flags := -ir 2 | ${test_target}: ${current_dir}all_types.idl-stamp 3 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/client_propagated/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}echo.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}echo.idl-stamp 3 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/rtcosscheduling/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}echo.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}echo.idl-stamp 3 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/server_declared/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}echo.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}echo.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/domainmanager/test000/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_sequence_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Sequence_1 { 3 | 4 | interface X { }; 5 | 6 | typedef sequence Y; 7 | }; 8 | -------------------------------------------------------------------------------- /testsuite/idls/va_f01/test.out: -------------------------------------------------------------------------------- 1 | valuetype AVal; 2 | valuetype BVal { 3 | public AVal Mbr; 4 | }; 5 | valuetype AVal { 6 | public BVal Mbr; 7 | }; 8 | -------------------------------------------------------------------------------- /testsuite/idls/vb_b01/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: basic features of valuetype 3 | 4 | valuetype ShortValue short; 5 | -------------------------------------------------------------------------------- /contrib/local_sockets/test/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | string echoString (in string Mesg); 3 | oneway void printString (in string Mesg); 4 | }; 5 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/rtcosscheduling/echo-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/corba/rtcorba/rtcosscheduling/echo-impl.adb -------------------------------------------------------------------------------- /examples/corba/thread_pool_tester/svc.idl: -------------------------------------------------------------------------------- 1 | interface Svc { 2 | void Wait (in short Cond_Id); 3 | // Wait on the indicated condition variable 4 | }; 5 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test004/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/shutdown/Makefile.local: -------------------------------------------------------------------------------- 1 | {current_dir}test_interface.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test_interface.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/expansion02/expansion.idl: -------------------------------------------------------------------------------- 1 | interface test_array { 2 | exception e { 3 | long f1; 4 | short f2[45][21][10]; 5 | }; 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/tests/core/poa/POA_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/poa/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /compilers/iac/backend-be_corba_ada-helpers_internals.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/iac/backend-be_corba_ada-helpers_internals.adb -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_sequence_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Sequence_1 { 3 | 4 | interface X { }; 5 | 6 | typedef sequence Y; 7 | }; 8 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/local/local7.idl: -------------------------------------------------------------------------------- 1 | module Local7 { 2 | local interface X; 3 | typedef sequence XSeq; 4 | local interface X {}; 5 | }; 6 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/raises/attr-raises-1.idl: -------------------------------------------------------------------------------- 1 | interface Attr_Raises_1 { 2 | exception Exc {}; 3 | readonly attribute long a raises (Exc); 4 | }; 5 | -------------------------------------------------------------------------------- /contrib/local_sockets/test/polyorb-log-ork_serial.ads: -------------------------------------------------------------------------------- 1 | package PolyORB.Log.ORK_Serial is 2 | 3 | pragma Elaborate_Body; 4 | 5 | end PolyORB.Log.ORK_Serial; 6 | -------------------------------------------------------------------------------- /examples/corba/all_functions/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}all_functions.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}all_functions.idl-stamp 3 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/client_propagated/echo-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/examples/corba/rtcorba/client_propagated/echo-impl.adb -------------------------------------------------------------------------------- /testsuite/corba/all_exceptions/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}all_exceptions.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}all_exceptions.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/cos/event/typedtest_interface-impl.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/testsuite/corba/cos/event/typedtest_interface-impl.adb -------------------------------------------------------------------------------- /testsuite/corba/interop/cpp/common/all_types_client.cc: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/testsuite/corba/interop/cpp/common/all_types_client.cc -------------------------------------------------------------------------------- /testsuite/corba/object/test000/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test_interface.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test_interface.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/iac007/tin.idl: -------------------------------------------------------------------------------- 1 | const long c1 = "a"; 2 | const long c2 = 1 + "a"; 3 | const octet c3 = -1; 4 | const unsigned long c4 = (4294967295 * 2) / 2; 5 | -------------------------------------------------------------------------------- /testsuite/idls/import001/int2.idl: -------------------------------------------------------------------------------- 1 | import ::int1; 2 | 3 | interface int2 { 4 | typedef int1::type1 type2; 5 | type2 op2 (inout string arg); 6 | }; 7 | 8 | -------------------------------------------------------------------------------- /testsuite/idls/test055/tin.idl: -------------------------------------------------------------------------------- 1 | // Requested by JH on Mon, 14 Nov 2005 2 | 3 | import ::CORBA::ORB; 4 | 5 | module p { 6 | typedef long plop; 7 | }; 8 | 9 | -------------------------------------------------------------------------------- /testsuite/idls/vt_b01/test.out: -------------------------------------------------------------------------------- 1 | valuetype Val { 2 | public long longMbr; 3 | public short shtMbr; 4 | factory init(in long longMbr, in short shrMbr); 5 | }; 6 | -------------------------------------------------------------------------------- /testsuite/idls/vt_o01/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: Operation in valuetype 3 | 4 | valuetype Val { 5 | short op(); 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/vti_si01/test.out: -------------------------------------------------------------------------------- 1 | interface Itf { 2 | short op1(); 3 | long op2(); 4 | }; 5 | valuetype Val supports Itf { 6 | public short shtMber; 7 | }; 8 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/adabroker.parser/testparser.idl: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/compilers/idlac/testsuite/adabroker.parser/testparser.idl -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a10.idl: -------------------------------------------------------------------------------- 1 | 2 | typedef string Name, Street_Address[2]; 3 | typedef Name Employee_Name; 4 | typedef enum Color {Red, Green, Blue} RGB; 5 | -------------------------------------------------------------------------------- /testsuite/corba/code_sets/test000/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test_interface.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test_interface.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/cos/event/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}typedtest_interface.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}typedtest_interface.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/ada0019/tin.idl: -------------------------------------------------------------------------------- 1 | interface TestService2 { 2 | 3 | typedef short index_type; 4 | 5 | TestService2 getChild(in index_type index); 6 | }; 7 | 8 | -------------------------------------------------------------------------------- /testsuite/idls/iac004/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:2:17: "M" conflicts with declaration at line 1 2 | tin.idl:6:10: "i" conflicts with declaration at line 5 3 | iac: 2 error(s) 4 | -------------------------------------------------------------------------------- /testsuite/tests/corba/local/LOCAL_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/local/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/random/RANDOM_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/random/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/tasking/TASK_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/tasking/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/tasking/TASK_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/tasking/test001', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/tasking/TASK_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/tasking/test002', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/tasking/TASK_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/tasking/test003', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/cos/time/TIME_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/cos/time/test_time', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test000/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test000_idl.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test000_idl.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/idl15021/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:2:17: "M" conflicts with declaration at line 1 2 | tin.idl:6:10: "i" conflicts with declaration at line 5 3 | iac: 2 error(s) 4 | -------------------------------------------------------------------------------- /testsuite/idls/idlac002/tin.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | typedef Object echoSeq[3]; 3 | string echoString (in string Mesg); 4 | 5 | echoSeq echoers(); 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/va_f02/test.out: -------------------------------------------------------------------------------- 1 | valuetype AVal; 2 | valuetype BVal { 3 | public AVal Mbr; 4 | }; 5 | valuetype AVal : BVal { 6 | }; 7 | valuetype CVal : AVal { 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/orb_init/ORB_INIT_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/orb_init/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/obj_adapters/OA_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/obj_adapters/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/obj_adapters/OA_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/obj_adapters/test001', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/egg.idl: -------------------------------------------------------------------------------- 1 | #ifndef EGG 2 | #define EGG 3 | interface Egg; 4 | #include "chicken.idl" 5 | interface Egg { 6 | Chicken hatch(); 7 | }; 8 | #endif 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/prefix/test003.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test003 { 3 | 4 | typeprefix Test003 "aaa.ru"; 5 | 6 | local interface T2 { }; 7 | 8 | }; 9 | 10 | -------------------------------------------------------------------------------- /testsuite/corba/location_forwarding/test000/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test_interface.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test_interface.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/location_forwarding/test001/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test_interface.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test_interface.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/ada0011/tin.idl: -------------------------------------------------------------------------------- 1 | interface Inter2 { 2 | 3 | typedef float New_Float; 4 | attribute New_Float attr1; 5 | New_Float ConvertNew (in float N); 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/ada0016/tin.idl: -------------------------------------------------------------------------------- 1 | interface i1{ 2 | typedef float New_Float, Tab_Float [10]; 3 | attribute float val1, val2, tab_val; 4 | attribute Tab_Float tab; 5 | }; 6 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_array_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Array_2 { 3 | 4 | interface X; 5 | 6 | interface X {}; 7 | 8 | typedef X y[4]; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_struct_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Struct_1 { 3 | 4 | interface X { }; 5 | 6 | struct Y { 7 | X a; 8 | }; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_struct_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Struct_2 { 3 | 4 | interface X { }; 5 | 6 | struct Y { 7 | X a; 8 | }; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/idl15022/test.out: -------------------------------------------------------------------------------- 1 | module M { 2 | module Inner1 { 3 | typedef string S1; 4 | }; 5 | module Inner2 { 6 | typedef string inner1; 7 | }; 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/harness/CORBA_HARNESS_7/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/harness/local', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/fixed_point/FIXED_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/fixed_point/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/corba/domainmanager/test000/corba-domainmanager-skel.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/AdaCore/PolyORB/HEAD/testsuite/corba/domainmanager/test000/corba-domainmanager-skel.adb -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test001/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test001_interface.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test001_interface.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/corba/portableinterceptor/test002/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}test002_interface.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}test002_interface.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_typedef_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Typedef_2 { 3 | 4 | interface X; 5 | 6 | interface X {}; 7 | 8 | typedef X Y; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/expansion01/expansion.idl: -------------------------------------------------------------------------------- 1 | interface test_array { 2 | union u switch (short) { 3 | case 1: long e1; 4 | case 2: short e2[15][16]; 5 | }; 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/idl15022/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | module Inner1 { 3 | typedef string S1; 4 | }; 5 | module Inner2 { 6 | typedef string inner1; // OK 7 | }; 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/idls/idlac001/tin.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | 3 | typedef sequence echoSeq; 4 | 5 | string echoString (in string Mesg); 6 | 7 | echoSeq echoers(); 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/idls/test_errors.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # This script parse an IDL file 3 | 4 | DIR=`dirname $1` 5 | FILE=`basename $1` 6 | 7 | cd $DIR 8 | iac -idl $FILE 9 | 10 | -------------------------------------------------------------------------------- /testsuite/tests/always_fail/test.py: -------------------------------------------------------------------------------- 1 | from test_utils import * 2 | import sys 3 | 4 | local(os.path.join(os.path.pardir, 'polyorb-config'), '', args=['--version']) 5 | fail() 6 | 7 | -------------------------------------------------------------------------------- /testsuite/tests/corba/rtcorba-rtorb/RTORB_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/rtcorba/rtorb/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/rtcorba-rtpoa/RTPOA_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/rtcorba/rtpoa/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/shutdown/SHUTDOWN_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/shutdown/test000_client', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/shutdown/SHUTDOWN_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/shutdown/test001_client', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/dynamic_dict/DYNAMIC_DICT_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/dynamic_dict/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/initialization/INIT_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/initialization/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/initialization/INIT_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/initialization/test001', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/initialization/INIT_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/initialization/test002', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/initialization/INIT_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/initialization/test003', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/initialization/INIT_4/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/initialization/test004', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/uri_encoding/URI_ENCODING_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/uri_encoding/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/chicken.idl: -------------------------------------------------------------------------------- 1 | #ifndef CHICKEN 2 | #define CHICKEN 3 | interface Chicken; 4 | #include "egg.idl" 5 | interface Chicken { 6 | Egg lay(); 7 | }; 8 | #endif 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/regression/RT-58/xx.idl: -------------------------------------------------------------------------------- 1 | interface xx { 2 | enum Color {Red, Blue, Green}; 3 | // An interface that does not contain any user-defined operation. 4 | }; 5 | -------------------------------------------------------------------------------- /idls/CORBA_IDL/CORBA_Current.idl: -------------------------------------------------------------------------------- 1 | // File: CORBA_Current.idl 2 | // CORBA 3.0, Chapter 4 3 | 4 | // interface for the Current object 5 | local interface Current { 6 | }; 7 | -------------------------------------------------------------------------------- /src/moma/password.conf: -------------------------------------------------------------------------------- 1 | [user_1] 2 | name=Ada 3 | password=Lovelace 4 | class=user 5 | 6 | [user_2] 7 | name=Byron 8 | password=Lord 9 | class=admin 10 | 11 | 12 | 13 | 14 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_exception_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Exception_1 { 3 | 4 | interface X {}; 5 | 6 | exception Y { 7 | X a; 8 | }; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_sequence_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Sequence_2 { 3 | 4 | interface X; 5 | 6 | interface X { }; 7 | 8 | typedef sequence Y; 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/idls/forward02/forward.idl: -------------------------------------------------------------------------------- 1 | interface TestService { 2 | 3 | typedef sequence test_services_type; 4 | 5 | test_services_type getChildren(); 6 | 7 | }; 8 | 9 | -------------------------------------------------------------------------------- /testsuite/idls/idl07053/tin.idl: -------------------------------------------------------------------------------- 1 | interface A { 2 | void make_it_so(); 3 | }; 4 | interface B: A { 5 | short make_it_so(in long times); // Error: redefinition of make_it_so 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/types007/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | struct example { 3 | fixed<12,5> fixedMember; 4 | sequence Seq; 5 | }; 6 | typedef char character; 7 | }; 8 | -------------------------------------------------------------------------------- /testsuite/tests/core/chained_lists/CHAINED_LIST_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'core/chained_lists/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_array_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Array_2 { 3 | 4 | interface X; 5 | 6 | interface X {}; 7 | 8 | typedef X y[4]; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_struct_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Struct_1 { 3 | 4 | interface X { }; 5 | 6 | struct Y { 7 | X a; 8 | }; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_struct_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Struct_2 { 3 | 4 | interface X { }; 5 | 6 | struct Y { 7 | X a; 8 | }; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_typedef_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Typedef_2 { 3 | 4 | interface X; 5 | 6 | interface X {}; 7 | 8 | typedef X Y; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/mapping/union1.idl: -------------------------------------------------------------------------------- 1 | 2 | // no default case. 3 | union Example switch (long) { 4 | case 1: case 3: long Counter; 5 | case 2: boolean Flags [4] [8]; 6 | }; 7 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a05.idl: -------------------------------------------------------------------------------- 1 | 2 | union Example switch (long) { 3 | case 1: case 3: long Counter; 4 | case 2: boolean Flags [4] [8]; 5 | default: long Unknown; 6 | }; 7 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/server_declared/echo.idl: -------------------------------------------------------------------------------- 1 | interface Echo { 2 | string echoString (in string Mesg); 3 | 4 | typedef Object Objects[3]; 5 | 6 | Objects echoers(); 7 | 8 | }; 9 | -------------------------------------------------------------------------------- /examples/moma/password.conf: -------------------------------------------------------------------------------- 1 | [user_1] 2 | name=Ada 3 | password=Lovelace 4 | class=user 5 | 6 | [user_2] 7 | name=Byron 8 | password=Lord 9 | class=admin 10 | 11 | 12 | 13 | 14 | -------------------------------------------------------------------------------- /testsuite/idls/avt_b01/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup basic 2 | //tsgdescr "Testing basic features of the abstract valuetype construct" 3 | 4 | abstract valuetype AbsVal { 5 | short op(); 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/chicken-egg/egg.idl: -------------------------------------------------------------------------------- 1 | #ifndef EGG 2 | #define EGG 3 | interface Egg; 4 | #include "chicken.idl" 5 | interface Egg { 6 | Chicken hatch(); 7 | }; 8 | #endif 9 | 10 | -------------------------------------------------------------------------------- /testsuite/idls/iac005/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:6:20: \u may only be used in wide characters and strings 2 | tin.idl:10:17: \u may only be used in wide characters and strings 3 | iac: 2 error(s) 4 | -------------------------------------------------------------------------------- /testsuite/idls/parse_file.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | # This script parse an IDL file 3 | 4 | DIR=`dirname $1` 5 | FILE=`basename $1` 6 | 7 | cd $DIR 8 | iac-idl -I../corba_idl $FILE 9 | 10 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d03/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: basic features of valuetype 3 | 4 | typedef long LongArray[2][3]; 5 | valuetype ArrayValue LongArray; 6 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d04/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: basic features of valuetype 3 | 4 | valuetype StringValue string; 5 | valuetype WStringValue wstring; 6 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableserver/PORTABLESERVER_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/portableserver/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableserver/PORTABLESERVER_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/portableserver/test001', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableserver/PORTABLESERVER_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/portableserver/test002', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_exception_1.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Exception_1 { 3 | 4 | interface X {}; 5 | 6 | exception Y { 7 | X a; 8 | }; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_sequence_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Sequence_2 { 3 | 4 | interface X; 5 | 6 | interface X { }; 7 | 8 | typedef sequence Y; 9 | }; 10 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/drawing.idl: -------------------------------------------------------------------------------- 1 | 2 | module Fresco { 3 | interface DrawingKit { 4 | typedef sequence Data8; 5 | typedef sequence Data32; 6 | }; 7 | }; 8 | 9 | -------------------------------------------------------------------------------- /testsuite/idls/chicken-egg/chicken.idl: -------------------------------------------------------------------------------- 1 | #ifndef CHICKEN 2 | #define CHICKEN 3 | interface Chicken; 4 | #include "egg.idl" 5 | interface Chicken { 6 | Egg lay(); 7 | }; 8 | #endif 9 | 10 | -------------------------------------------------------------------------------- /testsuite/idls/corba_idl/CORBA_Current.idl: -------------------------------------------------------------------------------- 1 | // File: CORBA_Current.idl 2 | // CORBA 3.0, Chapter 4 3 | 4 | // interface for the Current object 5 | local interface Current { 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/iac002/tin.idl: -------------------------------------------------------------------------------- 1 | interface A { 2 | exception E { 3 | long L; 4 | }; 5 | void f() raises(E); 6 | }; 7 | 8 | interface B: A { 9 | void g() raises(E); 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/idl07051/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:10:11: multiple declarations of "L1" 2 | tin.idl:10:11: found declaration at line 2 3 | tin.idl:10:11: found declaration at line 6 4 | iac: 1 error(s) 5 | -------------------------------------------------------------------------------- /testsuite/idls/idl07052/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:8:13: multiple declarations of "string_t" 2 | tin.idl:8:13: found declaration at line 5 3 | tin.idl:8:13: found declaration at line 2 4 | iac: 1 error(s) 5 | -------------------------------------------------------------------------------- /testsuite/idls/idl15011/test.out: -------------------------------------------------------------------------------- 1 | interface A { 2 | exception E { 3 | long L; 4 | }; 5 | void f() raises (A::E); 6 | }; 7 | interface B : A { 8 | void g() raises (A::E); 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/idls/idl15011/tin.idl: -------------------------------------------------------------------------------- 1 | interface A { 2 | exception E { 3 | long L; 4 | }; 5 | void f() raises(E); 6 | }; 7 | 8 | interface B: A { 9 | void g() raises(E); 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/local001/tin.idl: -------------------------------------------------------------------------------- 1 | module m { 2 | local interface LocInt { 3 | long op1 (in long var1, inout short var2, out string var3); 4 | attribute long MyAttr; 5 | }; 6 | }; 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/rtcorba-rtcurrent/RTCURRENT_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/rtcorba/rtcurrent/rtcurrent', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /examples/dsa/json/rci.ads: -------------------------------------------------------------------------------- 1 | with RT_JSON; 2 | package RCI is 3 | pragma Remote_Call_Interface; 4 | 5 | function Frob (X : RT_JSON.JSON_Wrapper) return RT_JSON.JSON_Wrapper; 6 | 7 | end RCI; 8 | -------------------------------------------------------------------------------- /testsuite/idls/abstract001/tin.idl: -------------------------------------------------------------------------------- 1 | module m { 2 | abstract interface AbsInt { 3 | long op1 (in long var1, inout short var2, out string var3); 4 | attribute long MyAttr; 5 | }; 6 | }; 7 | 8 | -------------------------------------------------------------------------------- /testsuite/idls/iac003/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:10:13: multiple declarations of "string_t" 2 | tin.idl:10:13: found declaration at line 6 3 | tin.idl:10:13: found declaration at line 2 4 | iac: 1 error(s) 5 | -------------------------------------------------------------------------------- /testsuite/idls/idl15012/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:10:13: multiple declarations of "string_t" 2 | tin.idl:10:13: found declaration at line 6 3 | tin.idl:10:13: found declaration at line 2 4 | iac: 1 error(s) 5 | -------------------------------------------------------------------------------- /testsuite/idls/idl15034/test.out: -------------------------------------------------------------------------------- 1 | typedef long ArgType; 2 | module M { 3 | struct S { 4 | ArgType x; 5 | }; 6 | typedef string ArgType; 7 | struct T { 8 | M::ArgType y; 9 | }; 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/tests/examples/polyorb/POLYORB_CORE_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'../examples/polyorb/polyorb-test-no_tasking', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/examples/polyorb/POLYORB_CORE_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'../examples/polyorb/polyorb-test-thread_pool', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /contrib/automake/README: -------------------------------------------------------------------------------- 1 | polyorb.m4 2 | ---------- 3 | 4 | $Id: //droopi/main/contrib/automake/README#1 $ 5 | 6 | Automake's macro for PolyORB. 7 | 8 | Contributed by: Vadim Godunko 9 | -------------------------------------------------------------------------------- /testsuite/idls/idl15031/test.out: -------------------------------------------------------------------------------- 1 | typedef short TempType; 2 | module M { 3 | typedef string ArgType; 4 | struct S { 5 | M::ArgType a1; 6 | M::ArgType a2; 7 | TempType temp; 8 | }; 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/idls/vb_p01/test.out: -------------------------------------------------------------------------------- 1 | valuetype ShortValue short; 2 | interface Intf { 3 | attribute ShortValue s; 4 | ShortValue op(in ShortValue inp, inout ShortValue inoutp, out ShortValue outp); 5 | }; 6 | -------------------------------------------------------------------------------- /testsuite/tests/examples/polyorb/POLYORB_CORE_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'../examples/polyorb/polyorb-test-no_tasking_poa', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/examples/polyorb/POLYORB_CORE_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'../examples/polyorb/polyorb-test-thread_pool_poa', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/raises/attr-raises-2.idl: -------------------------------------------------------------------------------- 1 | interface Attr_Raises_2 { 2 | exception Exc {}; 3 | attribute long a raises (Exc); 4 | // Incorrect: setraises/getraises must be used. 5 | }; 6 | -------------------------------------------------------------------------------- /testsuite/idls/ada0012/tin.idl: -------------------------------------------------------------------------------- 1 | interface EnumTests { 2 | enum Color {Red, Blue, Green}; 3 | const Color Rouge = Red; 4 | attribute Color attr_enum; 5 | Color modif_enum (inout Color C); 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_array_11.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Array_1 { 3 | 4 | interface X; 5 | 6 | typedef X y[4]; 7 | interface X { 8 | typedef X X2[12]; 9 | }; 10 | 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/idls/iac006/tin.idl: -------------------------------------------------------------------------------- 1 | const long c1 = "a"; 2 | const long c2 = 1 + "a"; 3 | const octet c3 = -1; 4 | const unsigned long c4 = (4294967295 * 2) / 2; 5 | const unsigned long c5 = (65536 * 65536) / 65536; 6 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d02/test.out: -------------------------------------------------------------------------------- 1 | struct VarS { 2 | string strMbr; 3 | }; 4 | valuetype VarSvalue VarS; 5 | struct FixS { 6 | long longMbr; 7 | short shortMbr; 8 | }; 9 | valuetype FixSvalue FixS; 10 | -------------------------------------------------------------------------------- /testsuite/corba/domainmanager/test000/test.idl: -------------------------------------------------------------------------------- 1 | 2 | import ::CORBA; 3 | 4 | module Test { 5 | 6 | interface DomainManager : CORBA::DomainManager { }; 7 | 8 | interface Echo { }; 9 | 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/autotest.sh: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | 3 | n=0 4 | for i in `grep -v '^#' MANIFEST`; do 5 | ./run-test.sh $i 6 | if [ $? != 0 ]; then 7 | n=`expr $n + 1` 8 | fi 9 | done 10 | 11 | exit $n 12 | -------------------------------------------------------------------------------- /testsuite/idls/circular/test_exception_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Exception_2 { 3 | 4 | interface X; 5 | 6 | interface X {}; 7 | 8 | exception Y { 9 | X a; 10 | }; 11 | 12 | }; 13 | -------------------------------------------------------------------------------- /testsuite/tests/corba/location_forwarding/LOCATION_FORWARDING_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/location_forwarding/test000/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/cos/ir/IR_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/cos/ir/client', r'', 6 | r'corba/cos/ir/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/raises/attr-raises-5.idl: -------------------------------------------------------------------------------- 1 | interface Attr_Raises_5 { 2 | exception Exc {}; 3 | // Incorrect order of getraises/setraises. 4 | attribute long d setraises (Exc) getraises (Exc); 5 | }; 6 | -------------------------------------------------------------------------------- /examples/corba/send/interop/tao/Makefile.bor: -------------------------------------------------------------------------------- 1 | # 2 | # Makefile.bor,v 1.2 2002/01/13 20:00:13 fhunleth Exp 3 | # 4 | 5 | MAKEFILES = server.bor client.bor 6 | 7 | !include <$(ACE_ROOT)\include\makeinclude\recurse.bor> 8 | -------------------------------------------------------------------------------- /testsuite/idls/aif_p01/test.out: -------------------------------------------------------------------------------- 1 | abstract interface AbsInf { 2 | short op1(); 3 | }; 4 | interface Inf { 5 | AbsInf op2(in AbsInf inp, inout AbsInf iop, out AbsInf outp); 6 | }; 7 | interface Itfderiv : AbsInf { 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/idls/iac001/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:2:20: expected token 2 | tin.idl:6:05: bad casing of "mylong" declared at line 5 3 | tin.idl:7:28: "thething" conflicts with scoped name at line 7 4 | iac: 3 error(s) 5 | -------------------------------------------------------------------------------- /testsuite/idls/idl02030/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:8:29: expected token 2 | tin.idl:4:13: "thing" conflicts with declaration at line 3 3 | tin.idl:6:14: "foo" conflicts with scoped name at line 6 4 | iac: 3 error(s) 5 | -------------------------------------------------------------------------------- /testsuite/idls/types012/test.out: -------------------------------------------------------------------------------- 1 | UNION := True 2 | LONG := True 3 | STRING := True 4 | ULONG := True 5 | CHAR := True 6 | SHORT := True 7 | OCTET := True 8 | DOUBLE := True 9 | USHORT := True 10 | ANY := True 11 | -------------------------------------------------------------------------------- /testsuite/idls/vti_si03/test.out: -------------------------------------------------------------------------------- 1 | abstract interface AbsItf { 2 | short op1(); 3 | }; 4 | interface Itfderiv : AbsItf { 5 | short op2(); 6 | }; 7 | valuetype Val supports AbsItf { 8 | short op3(); 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableinterceptor/CORBA_PORTABLEINTERCEPTOR_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/portableinterceptor/test000/test000', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableinterceptor/CORBA_PORTABLEINTERCEPTOR_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/portableinterceptor/test001/test001', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableinterceptor/CORBA_PORTABLEINTERCEPTOR_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/portableinterceptor/test002/test002', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableinterceptor/CORBA_PORTABLEINTERCEPTOR_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not local(r'corba/portableinterceptor/test003/test003', r''): 6 | fail() 7 | 8 | -------------------------------------------------------------------------------- /.gitlab-ci.plan: -------------------------------------------------------------------------------- 1 | assert_mode = {} 2 | 3 | def build_test_polyorb(): 4 | anod_build("polyorb", qualifier=assert_mode) 5 | anod_test("polyorb", qualifier=assert_mode) 6 | anod_test("dsa", qualifier=assert_mode) 7 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/circular/test_exception_2.idl: -------------------------------------------------------------------------------- 1 | 2 | module Test_Exception_2 { 3 | 4 | interface X; 5 | 6 | interface X {}; 7 | 8 | exception Y { 9 | X a; 10 | }; 11 | 12 | }; 13 | -------------------------------------------------------------------------------- /examples/bbs/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}bbs.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}bbs.idl-stamp 3 | ${current_dir}common.idl-stamp: idlac_flags := 4 | ${test_target}: ${current_dir}common.idl-stamp 5 | -------------------------------------------------------------------------------- /testsuite/idls/ada0015/tin.idl: -------------------------------------------------------------------------------- 1 | typedef float New_Float; 2 | module m1 { 3 | interface int1 { 4 | attribute New_Float attr1; 5 | readonly attribute boolean bool1; 6 | }; 7 | }; 8 | typedef boolean New_Boolean; 9 | -------------------------------------------------------------------------------- /testsuite/idls/idl15001/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:2:20: expected token 2 | tin.idl:6:05: bad casing of "mylong" declared at line 5 3 | tin.idl:7:28: "thething" conflicts with scoped name at line 7 4 | iac: 3 error(s) 5 | -------------------------------------------------------------------------------- /testsuite/idls/idl15032/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:13:20: "ArgType" conflicts with scoped name at line 8 2 | tin.idl:14:10: "I" conflicts with scoped name at line 8 3 | tin.idl:21:10: "ArgType" not declared in "A" 4 | iac: 3 error(s) 5 | -------------------------------------------------------------------------------- /testsuite/idls/import001/int3.idl: -------------------------------------------------------------------------------- 1 | import ::int2; 2 | import ::int1; 3 | 4 | interface int3 { 5 | typedef int2::type2 type3; 6 | type3 op3 (out boolean bool); 7 | typedef int1::type1 type33; 8 | }; 9 | 10 | -------------------------------------------------------------------------------- /examples/polyorb/README: -------------------------------------------------------------------------------- 1 | README for the PolyORB examples 2 | ------------------------------------- 3 | 4 | $Id$ 5 | 6 | This directory contains examples of servants built directly on top 7 | of the PolyORB neutral core layer. 8 | -------------------------------------------------------------------------------- /idls/CORBA_PIDL/CORBA_ValueBase.idl: -------------------------------------------------------------------------------- 1 | // File: CORBA_ValueBase.idl 2 | // CORBA 3.0, Chapter 5 3 | 4 | //PolyORB:NI: valuetype ValueBase{ //PIDL 5 | //PolyORB:NI: ValueDef get_value_def(); 6 | //PolyORB:NI: }; 7 | 8 | -------------------------------------------------------------------------------- /testsuite/idls/iac-types: -------------------------------------------------------------------------------- 1 | INCLUDES= 2 | FILENAME= 3 | for i in $*; do 4 | case $i in 5 | -I*) INCLUDES="$INCLUDES $i";; 6 | -*) ;; 7 | *) FILENAME="$i";; 8 | esac; 9 | done 10 | iac $INCLUDES -types $FILENAME 11 | -------------------------------------------------------------------------------- /testsuite/idls/idl02034/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef Long Foo; // Error: keyword is long not Long 3 | typedef boolean BOOLEAN; // Error: BOOLEAN collides with 4 | // the keyword boolean; 5 | }; 6 | -------------------------------------------------------------------------------- /testsuite/idls/types012/tin.idl: -------------------------------------------------------------------------------- 1 | interface tin { 2 | union myUnion switch (char) { 3 | case 'a': short Com1; 4 | case 'B': octet Com2; 5 | case 'Z': double Com3; 6 | default : unsigned short ComD; 7 | }; 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d01/test.out: -------------------------------------------------------------------------------- 1 | valuetype LongValue long; 2 | typedef float FloatType; 3 | valuetype FloatValue FloatType; 4 | enum EnumType { 5 | eval1, 6 | eval2, 7 | eval3 8 | }; 9 | valuetype EnumValue EnumType; 10 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/mapping/union2.idl: -------------------------------------------------------------------------------- 1 | 2 | // Unusual place for default case. 3 | union Example switch (long) { 4 | case 1: case 3: long Counter; 5 | default: long Unknown; 6 | case 2: boolean Flags [4] [8]; 7 | }; 8 | -------------------------------------------------------------------------------- /examples/corba/secure_echo/polyorb_openssl.conf: -------------------------------------------------------------------------------- 1 | [req] 2 | default_bits = 2048 3 | distinguished_name = user_distinguished_name 4 | prompt = no 5 | 6 | [user_distinguished_name] 7 | O = PolyORB Development Team 8 | CN = PolyORB User 9 | -------------------------------------------------------------------------------- /src/moma/destinations.conf: -------------------------------------------------------------------------------- 1 | [destination 1] 2 | type=topic 3 | #type=queue|topic 4 | name=example1 5 | persistent=none 6 | #persistent=none|file 7 | 8 | [destination 2] 9 | type=queue 10 | name=example2 11 | persistent=none 12 | -------------------------------------------------------------------------------- /testsuite/idls/ada0020/tin.idl: -------------------------------------------------------------------------------- 1 | module m { 2 | 3 | interface i1 { 4 | 5 | typedef string t; 6 | 7 | }; 8 | 9 | interface i2 { 10 | 11 | typedef i1::t t; 12 | typedef t toto; 13 | }; 14 | }; 15 | -------------------------------------------------------------------------------- /testsuite/idls/vti_si02/test.out: -------------------------------------------------------------------------------- 1 | interface Itf { 2 | short op1(); 3 | long op2(); 4 | }; 5 | abstract valuetype AbsVal supports Itf { 6 | short op3(); 7 | }; 8 | valuetype Val : AbsVal { 9 | public short shrMbr; 10 | }; 11 | -------------------------------------------------------------------------------- /compilers/config.adc.in: -------------------------------------------------------------------------------- 1 | -- Set policies 2 | 3 | pragma Assertion_Policy (@ASSERTION_POLICY@); 4 | pragma Debug_Policy (@DEBUG_POLICY@); 5 | 6 | -- Set Initialize_Scalars for debug builds 7 | 8 | @DEBUG_ONLY@pragma Initialize_Scalars; 9 | -------------------------------------------------------------------------------- /examples/corba/send/interop/tao/client.conf: -------------------------------------------------------------------------------- 1 | dynamic UIPMC_Factory Service_Object * TAO_PortableGroup:_make_TAO_UIPMC_Protocol_Factory() "" 2 | static Resource_Factory "-ORBProtocolFactory IIOP_Factory -ORBProtocolFactory UIPMC_Factory" 3 | -------------------------------------------------------------------------------- /testsuite/corba/object/test000/test_interface.idl: -------------------------------------------------------------------------------- 1 | interface Test_Interface { 2 | Test_Interface get_invalid_ref (); 3 | // Return a reference that points to a non-existing object 4 | 5 | oneway void terminate_server (); 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/corba/portableserver/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}echo.idl-stamp: idlac_flags := 2 | ${test_target}: ${current_dir}echo.idl-stamp 3 | ${current_dir}test.idl-stamp: idlac_flags := 4 | ${test_target}: ${current_dir}test.idl-stamp 5 | -------------------------------------------------------------------------------- /testsuite/idls/corba_idl/CORBA_ValueBase.idl: -------------------------------------------------------------------------------- 1 | // File: CORBA_ValueBase.idl 2 | // CORBA 3.0, Chapter 5 3 | 4 | //PolyORB:NI: valuetype ValueBase{ //PIDL 5 | //PolyORB:NI: ValueDef get_value_def(); 6 | //PolyORB:NI: }; 7 | 8 | -------------------------------------------------------------------------------- /testsuite/idls/test055/test.out: -------------------------------------------------------------------------------- 1 | orb.idl:66:05: warning: semicolon expected 2 | CORBA_InterfaceRepository.idl:10:05: warning: semicolon expected 3 | iac: 2 warning(s) 4 | import ::CORBA::ORB; 5 | module p { 6 | typedef long plop; 7 | }; 8 | -------------------------------------------------------------------------------- /src/moma/producer.conf: -------------------------------------------------------------------------------- 1 | [producer] 2 | log=true 3 | # log = true | false 4 | 5 | log-level=1 6 | # log-level = 1 .. 3 7 | 8 | connection-limit=42 9 | # maximum number of connection 10 | # XXX check conformity with whole architecrture 11 | -------------------------------------------------------------------------------- /testsuite/idls/types007/test.out: -------------------------------------------------------------------------------- 1 | STRUCT := True 2 | STRING := True 3 | ULONG := True 4 | FIXED := True 5 | USHORT := True 6 | SHORT := True 7 | SEQUENCE := True 8 | WSTRING := True 9 | CHAR := True 10 | ALIAS := True 11 | ANY := True 12 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/cultivation.idl: -------------------------------------------------------------------------------- 1 | 2 | #include "barn.idl" 3 | 4 | interface Plow { 5 | long row(); 6 | void attach(in short blade); 7 | void harness(in Horse power); 8 | }; 9 | 10 | #pragma Subsystem("Farm"); 11 | -------------------------------------------------------------------------------- /examples/moma/producer.conf: -------------------------------------------------------------------------------- 1 | [producer] 2 | log=true 3 | # log = true | false 4 | 5 | log-level=1 6 | # log-level = 1 .. 3 7 | 8 | connection-limit=42 9 | # maximum number of connection 10 | # XXX check conformity with whole architecrture 11 | -------------------------------------------------------------------------------- /testsuite/idls/avt_p01/test.out: -------------------------------------------------------------------------------- 1 | abstract valuetype AbsVal { 2 | AbsVal op1(in AbsVal inPara, inout AbsVal ioPara, out AbsVal outPara); 3 | }; 4 | interface Itf { 5 | AbsVal op2(in AbsVal inPara, inout AbsVal ioPara, out AbsVal outPara); 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/sequences01/test15.idl: -------------------------------------------------------------------------------- 1 | module Test15 { 2 | 3 | union U switch (long) { 4 | case 0 : boolean value1; 5 | default : boolean value2; 6 | }; 7 | 8 | typedef sequence OU; 9 | 10 | }; 11 | 12 | -------------------------------------------------------------------------------- /testsuite/tests/corba/benchs/CORBA_BENCHS_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/benchs/test000/client', r'', 6 | r'corba/benchs/test000/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/harness/CORBA_HARNESS_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/harness/client', r'', 6 | r'corba/harness/server_no_tasking', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/harness/CORBA_HARNESS_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/harness/client', r'', 6 | r'corba/harness/server_thread_pool', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/harness/CORBA_HARNESS_5/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/harness/client', r'', 6 | r'corba/harness/server_thread_pool_lf', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/client', r'', 6 | r'../examples/corba/echo/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /support/cleanup-conf-files: -------------------------------------------------------------------------------- 1 | #! /bin/sh 2 | 3 | if [ ! -x ./config.status ]; then 4 | echo "config.status not found" 1>&2 5 | exit 1 6 | fi 7 | 8 | rm -f `./config.status --help 2>&1 | sed -n '/^Configuration files:/{n 9 | p 10 | q 11 | }'` 12 | -------------------------------------------------------------------------------- /testsuite/idls/idl15024/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:3:15: "E3" conflicts with declaration at line 2 2 | tin.idl:12:10: multiple declarations of "E2" 3 | tin.idl:12:10: found declaration at line 2 4 | tin.idl:12:10: found declaration at line 7 5 | iac: 2 error(s) 6 | -------------------------------------------------------------------------------- /testsuite/idls/test018/test.out: -------------------------------------------------------------------------------- 1 | typedef any Apple; 2 | typedef struct Banana { 3 | any Orange; 4 | any Rhubarb; 5 | } PassionFruit; 6 | interface idlServer { 7 | any Lime(in any p1, out any p2, inout any p3); 8 | attribute any Lemon; 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/idls/vt_i01/test.out: -------------------------------------------------------------------------------- 1 | valuetype Val { 2 | public Val ValMbr; 3 | }; 4 | struct S { 5 | Val valstctMbr; 6 | }; 7 | union U switch (long) { 8 | case 1 : 9 | long x; 10 | case 2 : 11 | Val v; 12 | default : 13 | S strMbr; 14 | }; 15 | -------------------------------------------------------------------------------- /testsuite/tests/corba/harness/CORBA_HARNESS_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/harness/client', r'', 6 | r'corba/harness/server_thread_per_request', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/harness/CORBA_HARNESS_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/harness/client', r'', 6 | r'corba/harness/server_thread_per_session', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/harness/CORBA_HARNESS_6/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/harness/client', r'', 6 | r'corba/harness/server_thread_pool_hahs', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/dynclient', r'', 6 | r'../examples/corba/echo/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /utils/sort_MANIFEST: -------------------------------------------------------------------------------- 1 | #! /bin/sh 2 | # Sort MANIFEST in (C locale) ascending order 3 | # $Id$ 4 | 5 | unset LANG LC_ALL LC_COLLATE 6 | set -e 7 | tmpf=MANIFEST.$$ 8 | trap 'rm -f $tmpf' 0 9 | cp MANIFEST $tmpf 10 | sort < $tmpf | uniq > MANIFEST 11 | -------------------------------------------------------------------------------- /testsuite/idls/annapp01/test.out: -------------------------------------------------------------------------------- 1 | module AnnApp01 { 2 | typedef short around_zero; 3 | enum myenum_t { 4 | zero, 5 | one 6 | }; 7 | struct mystruct_t { 8 | long k; 9 | AnnApp01::myenum_t e; 10 | AnnApp01::around_zero az; 11 | }; 12 | }; 13 | -------------------------------------------------------------------------------- /testsuite/idls/expansion03/expansion.idl: -------------------------------------------------------------------------------- 1 | interface test_array { 2 | typedef sequence seq; 3 | struct s { 4 | long m1; 5 | short m2[3], m3, m4[2]; 6 | sequence > m5[6]; 7 | seq m6[2]; 8 | }; 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/idls/iac-idl: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | INCLUDES= 3 | FILENAME= 4 | for i in $*; do 5 | case $i in 6 | -I*) INCLUDES="$INCLUDES $i";; 7 | -*) ;; 8 | *) FILENAME="$i";; 9 | esac; 10 | done 11 | iac $INCLUDES -idl -b 10 $FILENAME | pp-idl 12 | 13 | -------------------------------------------------------------------------------- /testsuite/idls/list_types.sh: -------------------------------------------------------------------------------- 1 | # !/bin/sh 2 | # This script tests the Types backend of IAC 3 | 4 | DIR=`dirname $1` 5 | FILE=`basename $1` 6 | RESULT="`basename $1 .idl`.typ" 7 | 8 | cd $DIR 9 | iac-types $FILE 10 | cat $RESULT 11 | rm $RESULT 12 | 13 | -------------------------------------------------------------------------------- /testsuite/idls/vti_avb01/test.out: -------------------------------------------------------------------------------- 1 | abstract valuetype AbsVal1 { 2 | short op1(); 3 | }; 4 | abstract valuetype AbsVal2 { 5 | long op2(); 6 | }; 7 | valuetype Val : AbsVal1, AbsVal2 { 8 | public any anyMbr; 9 | factory init(in any anyMbr); 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/tests/corba/object/OBJECT_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/object/test000/test000_client', r'', 6 | r'corba/object/test000/test000_server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_4/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/dynclient', r'', 6 | r'../examples/corba/echo/dynserver', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/idls/idl15034/tin.idl: -------------------------------------------------------------------------------- 1 | typedef long ArgType; 2 | module M { 3 | struct S { 4 | ArgType x; // x is a long 5 | }; 6 | typedef string ArgType; // OK! 7 | struct T { 8 | ArgType y; // Ugly but OK, y is a string 9 | }; 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/inherit001/tin.idl: -------------------------------------------------------------------------------- 1 | module m { 2 | interface int1 { 3 | short op1(); 4 | attribute long attr1, attr11; 5 | }; 6 | interface int2 : int1 { 7 | short op2(); 8 | attribute long attr2, attr22; 9 | }; 10 | }; 11 | 12 | -------------------------------------------------------------------------------- /testsuite/idls/va_t01/test.out: -------------------------------------------------------------------------------- 1 | valuetype AVal { 2 | typedef long TypeLong; 3 | public AVal::TypeLong Mbr1; 4 | }; 5 | valuetype BVal : AVal { 6 | public AVal::TypeLong Mbr2; 7 | }; 8 | valuetype CVal : BVal { 9 | public AVal::TypeLong Mbr3; 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/tests/corba/all_exceptions/CORBA_ALL_EXCEPTIONS_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/all_exceptions/client', r'', 6 | r'corba/all_exceptions/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-random/CORBA_RANDOM_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/random/client', r'', 6 | r'../examples/corba/random/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a01.idl: -------------------------------------------------------------------------------- 1 | 2 | interface Asset { 3 | void op1(); 4 | void op2(); 5 | }; 6 | interface Vehicle { 7 | void op3(); 8 | void op4(); 9 | }; 10 | interface Tank : Vehicle, Asset { 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/corba/location_forwarding/test000/test_interface.idl: -------------------------------------------------------------------------------- 1 | 2 | import ::PortableServer; 3 | 4 | interface Test_Interface { 5 | 6 | string Name (); 7 | 8 | }; 9 | 10 | local interface Test_ServantActivator : PortableServer::ServantActivator { }; 11 | -------------------------------------------------------------------------------- /testsuite/corba/location_forwarding/test001/test_interface.idl: -------------------------------------------------------------------------------- 1 | 2 | import ::PortableServer; 3 | 4 | interface Test_Interface { 5 | 6 | string Name (); 7 | 8 | }; 9 | 10 | local interface Test_ServantActivator : PortableServer::ServantActivator { }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/forward03/forward.idl: -------------------------------------------------------------------------------- 1 | interface TestService3 { 2 | 3 | typedef struct foo { 4 | TestService3 myRef; 5 | } myStruct; 6 | 7 | typedef sequence test_services_type; 8 | 9 | test_services_type getStructs(); 10 | }; 11 | 12 | -------------------------------------------------------------------------------- /testsuite/idls/test011/test.out: -------------------------------------------------------------------------------- 1 | interface idlServer { 2 | const long Apple = 4; 3 | typedef float Banana; 4 | exception Orange { 5 | short Starfruit; 6 | }; 7 | attribute char Lychees; 8 | void Lemon(); 9 | }; 10 | interface emptyInterface { 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/idls/test015/test.out: -------------------------------------------------------------------------------- 1 | const long Lime = 3; 2 | interface Apple { 3 | typedef float Cress[3]; 4 | void Pumpkin(in Apple::Cress p1); 5 | }; 6 | interface Banana { 7 | const long Lime = 40; 8 | }; 9 | interface idlServer : Banana, Apple { 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/tests/corba/domainmanager/DOMAINMANAGER_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/domainmanager/test000/client', r'', 6 | r'corba/domainmanager/test000/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/core/sync_policies/CORE_SYNC_POLICIES_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'core/sync_policies/client', r'', 6 | r'core/sync_policies/server_no_tasking', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server( 6 | r'../examples/corba/all_types/dynclient', r'', 7 | r'../examples/corba/all_types/server', r''): 8 | fail() 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/client', r'soap.conf', 6 | r'../examples/corba/echo/server', r'soap.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/PARALLEL_ECHO_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/parallel_client', r'', 6 | r'../examples/corba/echo/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/a09.idl: -------------------------------------------------------------------------------- 1 | 2 | const double Pi = 3.1415926535; 3 | const short Line_Buffer_Length = 80; 4 | 5 | 6 | 7 | const long Page_Buffer_Length = 8 | (Line_Buffer_Length * 60) + 2; 9 | const long Legal_Page_Buffer_Length = (80 * 80) + 2; 10 | -------------------------------------------------------------------------------- /testsuite/idls/idl15023/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | module Inner1 { 3 | typedef string S1; 4 | }; 5 | module Inner2{ 6 | typedef Inner1::S1 S2; // Inner1 introduced 7 | typedef string inner1; // Error 8 | typedef string S1; // OK 9 | }; 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/va_f01/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup forward 2 | //tsgdescr "Testing forward declaration for the valuetype construct" 3 | 4 | valuetype AVal; 5 | 6 | valuetype BVal { 7 | public AVal Mbr; 8 | }; 9 | 10 | valuetype AVal { 11 | public BVal Mbr; 12 | }; 13 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/interop/cpp/omniORB/all_types_client', r'', 6 | r'../examples/corba/all_types/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/dynclient', r'soap.conf', 6 | r'../examples/corba/echo/server', r'soap.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-send/CORBA_MIOP_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/send/send', r'miop.conf', 6 | r'../examples/corba/send/listener', r'miop.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/regression/RT-33/multiple_inh.idl: -------------------------------------------------------------------------------- 1 | module MyModule { 2 | 3 | interface IfA { 4 | void opA (); 5 | }; 6 | interface IfB { 7 | void opB (); 8 | }; 9 | 10 | interface IfC : IfA, IfB { 11 | void opC (); 12 | }; 13 | }; 14 | -------------------------------------------------------------------------------- /testsuite/idls/idl02031/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | interface thing { 3 | attribute boolean abstract; // error: abstract collides with 4 | // keyword abstract 5 | attribute boolean _abstract; // ok: abstract is an identifier 6 | }; 7 | }; 8 | -------------------------------------------------------------------------------- /testsuite/idls/vti_avb02/test.out: -------------------------------------------------------------------------------- 1 | abstract valuetype AbsVal1 { 2 | short op1_1(); 3 | long op1_2(); 4 | }; 5 | abstract valuetype AbsVal2 { 6 | short op2_1(); 7 | long op2_2(); 8 | }; 9 | abstract valuetype AbsVal3 : AbsVal1, AbsVal2 { 10 | short op3(); 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/tests/corba/code_sets/CODE_SETS_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/code_sets/test000/client', r'', 6 | r'corba/code_sets/test000/server', r'code_sets_000_server.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/interop/cpp/MICO/all_types_dynclient', r'', 6 | r'corba/interop/cpp/MICO/all_types_dynserver', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/interop/cpp/TAO/all_types_dynclient', r'', 6 | r'corba/interop/cpp/TAO/all_types_dynserver', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_4/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/interop/cpp/omniORB/all_functions_client', r'', 6 | r'../examples/corba/all_functions/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_5/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/client', r'giop_1_0.conf', 6 | r'../examples/corba/echo/server', r'giop_1_0.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_6/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/client', r'giop_1_1.conf', 6 | r'../examples/corba/echo/server', r'giop_1_1.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-echo/ECHO_7/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/client', r'giop_1_2.conf', 6 | r'../examples/corba/echo/server', r'giop_1_2.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/adabroker.parser/testparser.exp: -------------------------------------------------------------------------------- 1 | catch "exec ../idlac $srcdir/adabroker.parser/testparser.idl 2> testparser.log; diff testparser.log testparser.out > /dev/null" rc 2 | if { $rc == "" } { 3 | pass "Parser test"; 4 | } else { 5 | fail "Parser test"; 6 | } 7 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/regression/RT-34/introduced_identifier.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | module Inner1 { 3 | typedef string S1; 4 | }; 5 | 6 | module Inner2 { 7 | typedef Inner1::S1 S2; 8 | typedef string Inner1; 9 | typedef string S1; 10 | }; 11 | }; 12 | -------------------------------------------------------------------------------- /contrib/README: -------------------------------------------------------------------------------- 1 | README for the PolyORB contrib directory 2 | ---------------------------------------- 3 | 4 | $Id: //droopi/main/contrib/README#1 $ 5 | 6 | This directory contains various contributions or updates for PolyORB. 7 | See README in each sub-directory for more details. 8 | -------------------------------------------------------------------------------- /examples/corba/rtcorba/dhb/Makefile.local: -------------------------------------------------------------------------------- 1 | ${current_dir}dhb.idl-stamp: idlac_flags :=-I${top_srcdir}/idls/RTCORBA -I${top_srcdir}/idls/CORBA_IDL -I${top_srcdir}/idls/CORBA_PIDL -I${top_srcdir}/idls/cos/time -I${top_srcdir}/idls/Interop 2 | ${test_target}: ${current_dir}dhb.idl-stamp 3 | -------------------------------------------------------------------------------- /testsuite/tests/confs/giop.conf: -------------------------------------------------------------------------------- 1 | # PolyORB's configuration file: GIOP profile 2 | # $Id$ 3 | 4 | [access_points] 5 | srp=disable 6 | soap=disable 7 | iiop=enable 8 | 9 | [modules] 10 | binding_data.srp=disable 11 | binding_data.soap=disable 12 | binding_data.iiop=enable 13 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/interop/cpp/omniORB/all_types_dynclient', r'', 6 | r'corba/interop/cpp/omniORB/all_types_dynserver', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-random/CORBA_RANDOM_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/random/client', r'soap.conf', 6 | r'../examples/corba/random/server', r'soap.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/all_exceptions/CORBA_ALL_EXCEPTIONS_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/all_exceptions/client', r'giop_1_0.conf', 6 | r'corba/all_exceptions/server', r'giop_1_0.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/all_exceptions/CORBA_ALL_EXCEPTIONS_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/all_exceptions/client', r'giop_1_1.conf', 6 | r'corba/all_exceptions/server', r'giop_1_1.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/all_exceptions/CORBA_ALL_EXCEPTIONS_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/all_exceptions/client', r'giop_1_2.conf', 6 | r'corba/all_exceptions/server', r'giop_1_2.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/interop/CORBA_INTEROP_5/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/interop/cpp/TAO/all_types_dynclient', r'', 6 | r'../examples/corba/all_types/server', r'broken_codesets.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/all_functions/client', r'', 6 | r'../examples/corba/all_functions/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_2/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/all_functions/dynclient', r'', 6 | r'../examples/corba/all_functions/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/raises/attr-raises-4.idl: -------------------------------------------------------------------------------- 1 | interface Attr_Raises_4 { 2 | exception Exc_1 {}; 3 | exception Exc_2 {}; 4 | 5 | attribute long a getraises (Exc_1); 6 | attribute long b setraises (Exc_2); 7 | attribute long c getraises (Exc_1) setraises (Exc_2); 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/idls/header-sort: -------------------------------------------------------------------------------- 1 | #!/bin/sh 2 | n=0 3 | for i in `cat MANIFEST`; do \ 4 | grep -H -- '^ -- .* --' $i >log1; \ 5 | sort log1 >log2; \ 6 | diff log1 log2; \ 7 | if [ "$?" != "0" ]; then 8 | n=`expr $n + 1` 9 | fi 10 | done 11 | rm log1 log2 12 | exit $n 13 | -------------------------------------------------------------------------------- /testsuite/idls/va_f02/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup forward 2 | //tsgdescr "Testing forward declaration for the valuetype construct" 3 | 4 | 5 | valuetype AVal; 6 | 7 | valuetype BVal { 8 | public AVal Mbr; 9 | }; 10 | 11 | valuetype AVal:BVal {}; 12 | 13 | valuetype CVal:AVal {}; 14 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d01/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: Value Box for simple types and enums 3 | 4 | valuetype LongValue long; 5 | typedef float FloatType; 6 | valuetype FloatValue FloatType; 7 | enum EnumType {eval1, eval2, eval3}; 8 | valuetype EnumValue EnumType; 9 | -------------------------------------------------------------------------------- /testsuite/idls/vb_p01/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: basic features of valuetype 3 | 4 | valuetype ShortValue short; 5 | interface Intf { 6 | attribute ShortValue s; 7 | ShortValue op(in ShortValue inp,inout ShortValue inoutp,out ShortValue outp); 8 | }; 9 | -------------------------------------------------------------------------------- /testsuite/tests/corba/performance/CORBA_PERFORMANCE_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/performance/client', r'performance.conf', 6 | r'corba/performance/server_no_tasking', r'performance.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/cos/naming/NAMING_0/test.py: -------------------------------------------------------------------------------- 1 | from test_utils import * 2 | import sys 3 | 4 | if not client_server(r'corba/cos/naming/test_naming_corba', r'', 5 | get_tool_path('../tools/po_cos_naming', 'po_cos_naming'), 6 | r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/corba/cos/event/consumer.cmd: -------------------------------------------------------------------------------- 1 | create channel c 2 | create pushconsumer psc 3 | create pullconsumer plc 4 | connect psc to c 5 | connect plc to c 6 | sleep 3 7 | consume in psc 8 | sleep 6 9 | consume in plc 10 | sleep 6 11 | consume in psc 12 | sleep 6 13 | consume in plc 14 | 15 | -------------------------------------------------------------------------------- /testsuite/idls/vt_b01/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: Classes for a Valuetype 3 | 4 | valuetype Val { 5 | //state 6 | public long longMbr; 7 | public short shtMbr; 8 | 9 | // initializer 10 | factory init(in long longMbr, in short shrMbr); 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/idls/vt_e01/test.out: -------------------------------------------------------------------------------- 1 | valuetype Val { 2 | public short ShortMbr; 3 | exception ValExcpt { 4 | Val ex1; 5 | }; 6 | Val op1() raises (Val::ValExcpt); 7 | }; 8 | interface Inf { 9 | exception ValExcpt { 10 | Val ex1; 11 | }; 12 | Val op2() raises (Inf::ValExcpt); 13 | }; 14 | -------------------------------------------------------------------------------- /testsuite/tests/corba/portableinterceptor/CORBA_PORTABLEINTERCEPTOR_4/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/portableinterceptor/test004/client', r'', 6 | r'corba/portableinterceptor/test004/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/idls/ada0013/tin.idl: -------------------------------------------------------------------------------- 1 | module mod1 { 2 | typedef boolean bool; 3 | interface Int1 { 4 | typedef float New_Float; 5 | enum Color {Red, Blue, Green}; 6 | attribute New_Float Real_Number; 7 | attribute Color couleur; 8 | attribute bool b1; 9 | }; 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d02/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: basic features of valuetype 3 | 4 | struct VarS { 5 | string strMbr; 6 | }; 7 | valuetype VarSvalue VarS; 8 | struct FixS { 9 | long longMbr; 10 | short shortMbr; 11 | }; 12 | valuetype FixSvalue FixS; 13 | -------------------------------------------------------------------------------- /testsuite/idls/vt_p01/test.out: -------------------------------------------------------------------------------- 1 | valuetype Val { 2 | public short ShortMbr; 3 | attribute Val ValAttr; 4 | Val op1(in Val inPara, inout Val ioPara, out Val outPara); 5 | }; 6 | interface Inf { 7 | attribute Val ValAttr; 8 | Val op2(in Val inPara, inout Val ioPara, out Val outPara); 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/tests/corba/code_sets/CODE_SETS_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/code_sets/test000/client', r'code_sets_000_client.conf', 6 | r'corba/code_sets/test000/server', r'code_sets_000_server.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/all_functions/client', r'soap.conf', 6 | r'../examples/corba/all_functions/server', r'soap.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-rtcorba-dhb/RTCORBA_DHB_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/rtcorba/dhb/rtcorba_iiop_client', r'', 6 | r'../examples/corba/rtcorba/dhb/rtcorba_iiop_server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /src/moma/consumer.conf: -------------------------------------------------------------------------------- 1 | [consumer] 2 | #server_ior=1234 3 | log=true 4 | # log = true | false 5 | 6 | log-level=1 7 | # log-level = 1 .. 3 8 | 9 | 10 | default_username=John_Doe 11 | default-password=plop 12 | default-time-to-live=42 13 | default-priority=1 14 | default-persistence=false 15 | 16 | -------------------------------------------------------------------------------- /testsuite/idls/ada0018/tin.idl: -------------------------------------------------------------------------------- 1 | module m1 { 2 | typedef boolean b1; 3 | interface i1 { 4 | typedef float t1; 5 | }; 6 | interface i2 { 7 | attribute i1::t1 attr1; 8 | attribute m1::b1 bool; 9 | }; 10 | interface i3 { 11 | typedef i1::t1 new_float; 12 | }; 13 | }; 14 | -------------------------------------------------------------------------------- /testsuite/idls/vti_si01/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup a valuetype supporting an interface 2 | //tsgdescr "Testing a valuetype supporting an interface" 3 | 4 | interface Itf { 5 | short op1(); 6 | long op2(); 7 | 8 | }; 9 | 10 | valuetype Val supports Itf { 11 | public short shtMber; 12 | }; 13 | -------------------------------------------------------------------------------- /testsuite/tests/corba/location_forwarding/LOCATION_FORWARDING_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'corba/location_forwarding/test001/test001_client', r'', 6 | r'corba/location_forwarding/test001/test001_server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/all_functions/dynclient', r'soap.conf', 6 | r'../examples/corba/all_functions/server', r'soap.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-rtcorba-server_declared/RTCORBA_SERVER_DECLARED_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/echo/client', r'', 6 | r'../examples/corba/rtcorba/server_declared/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /examples/moma/consumer.conf: -------------------------------------------------------------------------------- 1 | [consumer] 2 | #server_ior=1234 3 | log=true 4 | # log = true | false 5 | 6 | log-level=1 7 | # log-level = 1 .. 3 8 | 9 | 10 | default_username=John_Doe 11 | default-password=plop 12 | default-time-to-live=42 13 | default-priority=1 14 | default-persistence=false 15 | 16 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_4/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/all_functions/client', r'giop_1_0.conf', 6 | r'../examples/corba/all_functions/server', r'giop_1_0.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_5/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/all_functions/client', r'giop_1_1.conf', 6 | r'../examples/corba/all_functions/server', r'giop_1_1.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_functions/ALL_FUNCTIONS_6/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/all_functions/client', r'giop_1_2.conf', 6 | r'../examples/corba/all_functions/server', r'giop_1_2.conf'): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/idls/ada0014/tin.idl: -------------------------------------------------------------------------------- 1 | module _module { 2 | module m11 { 3 | interface I111 { 4 | attribute float value; 5 | }; 6 | }; 7 | }; 8 | module m2 9 | { 10 | interface I21 11 | { 12 | typedef boolean new_bool; 13 | new_bool is_greater (in float f1, in float f2); 14 | }; 15 | }; 16 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_3/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server( 6 | r'../examples/corba/all_types/dynclient', 7 | r'soap.conf', 8 | r'../examples/corba/all_types/server', 9 | r'soap.conf'): 10 | fail() 11 | 12 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-rtcorba-rtcosscheduling/RTCORBA_RTCOSSCHEDULING_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/rtcorba/rtcosscheduling/client', r'', 6 | r'../examples/corba/rtcorba/rtcosscheduling/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-rtcorba-server_declared/RTCORBA_SERVER_DECLARED_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/rtcorba/server_declared/client', r'', 6 | r'../examples/corba/rtcorba/server_declared/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /idls/CORBA_IDL/CORBA_CustomMarshal.idl: -------------------------------------------------------------------------------- 1 | // File: CORBA_CustomMarshal.idl 2 | // CORBA 3.0, Chapter 5 3 | // depends on CORBA_Stream.idl 4 | 5 | //PolyORB:NI: abstract valuetype CustomMarshal { 6 | //PolyORB:NI: void marshal (in DataOutputStream os); 7 | //PolyORB:NI: void unmarshal (in DataInputStream is); 8 | //PolyORB:NI: }; 9 | -------------------------------------------------------------------------------- /testsuite/idls/iac003/tin.idl: -------------------------------------------------------------------------------- 1 | interface A { 2 | typedef string<128> string_t; 3 | }; 4 | 5 | interface B { 6 | typedef string<256> string_t; 7 | }; 8 | 9 | interface C: A, B { 10 | attribute string_t Title; // Error: Ambiguous 11 | attribute A::string_t Name; // OK 12 | attribute B::string_t City; // OK 13 | }; 14 | -------------------------------------------------------------------------------- /testsuite/idls/idl07052/tin.idl: -------------------------------------------------------------------------------- 1 | interface A { 2 | typedef string<128> string_t; 3 | }; 4 | interface B { 5 | typedef string<256> string_t; 6 | }; 7 | interface C: A, B { 8 | attribute string_t Title; // Error: string_t ambiguous 9 | attribute A::string_t Name; // OK 10 | attribute B::string_t City; // OK 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-rtcorba-client_propagated/RTCORBA_CLIENT_PROPAGATED_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | if not client_server(r'../examples/corba/rtcorba/client_propagated/client', r'', 6 | r'../examples/corba/rtcorba/client_propagated/server', r''): 7 | fail() 8 | 9 | -------------------------------------------------------------------------------- /testsuite/idls/idl15012/tin.idl: -------------------------------------------------------------------------------- 1 | interface A { 2 | typedef string<128> string_t; 3 | }; 4 | 5 | interface B { 6 | typedef string<256> string_t; 7 | }; 8 | 9 | interface C: A, B { 10 | attribute string_t Title; // Error: Ambiguous 11 | attribute A::string_t Name; // OK 12 | attribute B::string_t City; // OK 13 | }; 14 | -------------------------------------------------------------------------------- /testsuite/idls/idl15025/test.out: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef long ArgType; 3 | typedef M::ArgType AType; 4 | interface B { 5 | typedef string ArgType; 6 | M::B::ArgType opb(in M::AType i); 7 | }; 8 | }; 9 | module N { 10 | typedef char ArgType; 11 | interface Y : M::B { 12 | void opy(in M::B::ArgType i); 13 | }; 14 | }; 15 | -------------------------------------------------------------------------------- /testsuite/idls/vt_i01/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: Valuetype as Member 3 | 4 | valuetype Val { 5 | 6 | public Val ValMbr; 7 | }; 8 | 9 | struct S { 10 | Val valstctMbr; 11 | }; 12 | 13 | union U switch (long) { 14 | case 1: long x; 15 | case 2: Val v; 16 | default: S strMbr; 17 | }; 18 | -------------------------------------------------------------------------------- /testsuite/idls/iac004/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef short M; // Error: M is the name of the module in the scope 3 | // of which the typedef is. 4 | 5 | interface I { 6 | void i (in short j); // Error: i clashes with the interface name I 7 | void a (in short a); // No clash since a is an operation 8 | }; 9 | }; 10 | -------------------------------------------------------------------------------- /.gitlab-ci.yml: -------------------------------------------------------------------------------- 1 | 2 | stages: 3 | - test 4 | - check 5 | 6 | include: 7 | - component: $CI_SERVER_FQDN/eng/gitlab-templates/check-issue@~latest 8 | 9 | - component: $CI_SERVER_FQDN/eng/gitlab-templates/test@~latest 10 | inputs: 11 | needs: [] 12 | windows-needs: [] 13 | anod-args: run build_test_polyorb --latest 14 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/regression/RT-55/xx.idl: -------------------------------------------------------------------------------- 1 | interface xx { 2 | exception An_Exception { 3 | string m_reason; 4 | }; 5 | 6 | typedef sequence shortSeq; 7 | typedef short shortArray[10]; 8 | 9 | void foo1 (out shortSeq val) raises (An_Exception); 10 | void foo2 (out shortArray val) raises (An_Exception); 11 | }; 12 | -------------------------------------------------------------------------------- /examples/bbs/common.idl: -------------------------------------------------------------------------------- 1 | module DSA_Common { 2 | interface Penpal_Type; 3 | 4 | interface Penpal_Type { 5 | #pragma ID DSA_Common::Penpal_Type "DSA:COMMON.PENPAL_TYPE:1.0" 6 | 7 | void initialize (in string Name); 8 | string name_of (); 9 | void new_message (in string Sender, in string Message); 10 | }; 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/idls/iac005/tin.idl: -------------------------------------------------------------------------------- 1 | const long x = 0x9 + 0xf; 2 | const long y = 12 + 3 * 6 - (x / 2); 3 | enum T {AT, BT, CT}; 4 | const string s1 = "toto"; 5 | const string s2 = L"t\uccccti"; 6 | const wstring s3 = "t\uccccti"; 7 | const wstring s4 = L"t\uccccti"; 8 | const char c1 = 'a'; 9 | const wchar c2 = L'b'; 10 | const char c3 = '\u41'; 11 | -------------------------------------------------------------------------------- /testsuite/idls/annapp01/tin.idl: -------------------------------------------------------------------------------- 1 | module AnnApp01 { 2 | 3 | @range((-1), 1) @nested 4 | typedef short around_zero; 5 | 6 | enum myenum_t { 7 | zero, 8 | @default_literal one 9 | }; 10 | 11 | struct mystruct_t { 12 | @key long k; 13 | @key myenum_t e; 14 | around_zero az; 15 | }; 16 | 17 | }; 18 | 19 | -------------------------------------------------------------------------------- /testsuite/idls/idl07051/tin.idl: -------------------------------------------------------------------------------- 1 | interface A { 2 | typedef long L1; 3 | short opA(in L1 l_1); 4 | }; 5 | interface B { 6 | typedef short L1; 7 | L1 opB(in long l); 8 | }; 9 | interface C: B, A { 10 | typedef L1 L2; // Error: L1 ambiguous 11 | typedef A::L1 L3; // A::L1 is OK 12 | B::L1 opC(in L3 l_3); // all OK no ambiguities 13 | }; 14 | -------------------------------------------------------------------------------- /src/config.adc.in: -------------------------------------------------------------------------------- 1 | -- Set assertion and debug policies 2 | 3 | pragma Assertion_Policy (@ASSERTION_POLICY@); 4 | pragma Debug_Policy (@DEBUG_POLICY@); 5 | 6 | -- Set Initialize_Scalars for debug builds 7 | 8 | @DEBUG_ONLY@pragma Initialize_Scalars; 9 | 10 | -- Additional user-provided configuration pragmas below 11 | @ADDITIONAL_CONF_PRAGMAS@ 12 | -------------------------------------------------------------------------------- /testsuite/corba/shutdown/test_interface.idl: -------------------------------------------------------------------------------- 1 | interface Test_Interface { 2 | void trigger_server_shutdown (in boolean wait); 3 | // Have a dedicated server task call Shutdown with the given value 4 | // for Wait_For_Completion. This method does not return immediately, 5 | // so if the Shutdown call is waits for completion, it will be blocked. 6 | }; 7 | -------------------------------------------------------------------------------- /testsuite/idls/iac006/test.out: -------------------------------------------------------------------------------- 1 | tin.idl:1:12: value not in range of type of "long" 2 | tin.idl:2:19: invalid operand types for operator "+" 3 | tin.idl:3:13: value not in range of type of "octet" 4 | tin.idl:4:38: value not in range of type of "long" or "unsigned long" 5 | tin.idl:5:33: value not in range of type of "long" or "unsigned long" 6 | iac: 5 error(s) 7 | -------------------------------------------------------------------------------- /testsuite/idls/idl15021/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef short M; // Error: M is the name of the module in the scope 3 | // of which the typedef is. 4 | 5 | interface I { 6 | void i (in short j); // Error: i clashes with the interface name I 7 | void a (in short a); // No clash since a is an operation 8 | }; 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/idls/inherit002/tin.idl: -------------------------------------------------------------------------------- 1 | module m { 2 | interface int1 { 3 | short op1(); 4 | attribute long attr1, attr11; 5 | }; 6 | interface int2 { 7 | short op2(); 8 | attribute long attr2, attr22; 9 | }; 10 | interface int3 : int1, int2 { 11 | short op3(); 12 | attribute long attr3, attr33; 13 | }; 14 | }; 15 | 16 | -------------------------------------------------------------------------------- /testsuite/idls/local002/tin.idl: -------------------------------------------------------------------------------- 1 | module m { 2 | local interface LocInt { 3 | long op1 (in long var1, inout short var2, out string var3); 4 | attribute long MyAttr; 5 | }; 6 | 7 | local interface LocInt2 : LocInt{ 8 | long op2 (in long var1, inout short var2, out string var3); 9 | attribute long MyAttr2; 10 | }; 11 | }; 12 | 13 | -------------------------------------------------------------------------------- /testsuite/corba/cos/event/supplier.cmd: -------------------------------------------------------------------------------- 1 | create channel c 2 | create pushsupplier pss 3 | create pullsupplier pls 4 | connect pss to c 5 | connect pls to c 6 | sleep 6 7 | produce "running test 1" in pss 8 | sleep 6 9 | produce "running test 2" in pss 10 | sleep 6 11 | produce "running test 3" in pls 12 | sleep 6 13 | produce "running test 4" in pls 14 | quit 15 | -------------------------------------------------------------------------------- /testsuite/idls/aif_b01/tin.idl: -------------------------------------------------------------------------------- 1 | //testgroup abstract interface 2 | //tsref "IDL" 3 | //tgdescr "Testing features of the abstract interface construct" 4 | //testsubgroup basic 5 | //tsgdescr "Testing basic features of the abstract interface construct" 6 | 7 | abstract interface AbsInf { 8 | short op(); 9 | }; 10 | 11 | interface Itfderiv: AbsInf { 12 | }; 13 | -------------------------------------------------------------------------------- /testsuite/idls/idl15001/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef long Long; // Error: Long clashes with keyword long 3 | typedef long TheThing; 4 | interface I { 5 | typedef long MyLong; 6 | myLong op1( // Error: inconsistent capitalization 7 | in TheThing thething // Error: TheThing clashes with thething 8 | ); 9 | }; 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/test010/test.out: -------------------------------------------------------------------------------- 1 | module Apple { 2 | module BlackCherry { 3 | typedef short Carrots; 4 | }; 5 | typedef long Carrots; 6 | module BlackCherry { 7 | typedef float Starfruit; 8 | }; 9 | }; 10 | interface idlServer { 11 | void Rhubarb(in Apple::Carrots p1, out Apple::BlackCherry::Carrots p2, inout Apple::BlackCherry::Starfruit p3); 12 | }; 13 | -------------------------------------------------------------------------------- /testsuite/idls/vti_vb01/test.out: -------------------------------------------------------------------------------- 1 | valuetype Val1 { 2 | public long longMbr; 3 | public short shtMbr; 4 | short op(); 5 | factory init(in long longMbr, in short shtMbr); 6 | }; 7 | valuetype Val2 : Val1 { 8 | public any anyMbr; 9 | factory init(in long longMbr, in short shtMbr, in any anyMbr); 10 | }; 11 | valuetype Val3 : truncatable Val1 { 12 | }; 13 | -------------------------------------------------------------------------------- /examples/corba/send/interop/tao/server.conf: -------------------------------------------------------------------------------- 1 | dynamic UIPMC_Factory Service_Object * TAO_PortableGroup:_make_TAO_UIPMC_Protocol_Factory() "" 2 | static Resource_Factory "-ORBProtocolFactory IIOP_Factory -ORBProtocolFactory UIPMC_Factory" 3 | #static PortableGroup_Loader "" 4 | dynamic PortableGroup_Loader Service_Object * TAO_PortableGroup:_make_TAO_PortableGroup_Loader() "" -------------------------------------------------------------------------------- /testsuite/idls/iac001/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef long Long; // Error: Long clashes with keyword long 3 | typedef long TheThing; 4 | interface I { 5 | typedef long MyLong; 6 | myLong op1( // Error: inconsistent capitalization 7 | in TheThing thething // Error: TheThing clashes with thething 8 | ); 9 | }; 10 | }; 11 | 12 | -------------------------------------------------------------------------------- /testsuite/idls/ada0021/tin.idl: -------------------------------------------------------------------------------- 1 | // Extracted from a mail of Khaled (March 22, 2005) 2 | 3 | module First { 4 | typedef string name; 5 | }; 6 | 7 | module Second { 8 | typedef First::name name; 9 | typedef name X; 10 | 11 | interface foo { 12 | name some_function (); 13 | name some_function2 (in name n); 14 | 15 | }; 16 | }; 17 | 18 | -------------------------------------------------------------------------------- /testsuite/ssl-cert.conf: -------------------------------------------------------------------------------- 1 | [req] 2 | 3 | default_bits = 512 4 | default_keyfile = privkey.pem 5 | distinguished_name = req_distinguished_name 6 | prompt = no 7 | 8 | [req_distinguished_name] 9 | O = PolyORB's Development Team 10 | CN = PolyORB Test Suite 11 | emailAddress = polyorb-devel@lists.adacore.com 12 | -------------------------------------------------------------------------------- /testsuite/tests/confs/soap.conf: -------------------------------------------------------------------------------- 1 | # PolyORB's configuration file: SOAP profile 2 | # $Id$ 3 | 4 | [access_points] 5 | srp=disable 6 | soap=enable 7 | iiop=disable 8 | diop=disable 9 | miop=disable 10 | 11 | [modules] 12 | binding_data.srp=disable 13 | binding_data.soap=enable 14 | binding_data.iiop=disable 15 | binding_data.diop=disable 16 | binding_data.miop=disable 17 | -------------------------------------------------------------------------------- /testsuite/idls/test004/test.out: -------------------------------------------------------------------------------- 1 | typedef long Apple; 2 | typedef long Banana; 3 | typedef long Carrots; 4 | typedef long Lemon; 5 | typedef long BlackCherry; 6 | typedef long Starfruit; 7 | typedef long Rhubarb; 8 | interface idlServer { 9 | void PassionFruit(in Apple p1, in Banana p2, in Carrots p3, in Lemon p4, in BlackCherry p5, in Starfruit p6, in Rhubarb p7); 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/test009/test.out: -------------------------------------------------------------------------------- 1 | typedef long Apple; 2 | typedef long Banana; 3 | typedef long Carrots; 4 | typedef long Lemon; 5 | typedef long BlackCherry; 6 | typedef long Starfruit; 7 | typedef long Rhubarb; 8 | interface idlServer { 9 | void PassionFruit(in Apple p1, in Banana p2, in Carrots p3, in Lemon p4, in BlackCherry p5, in Starfruit p6, in Rhubarb p7); 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/idls/va_t01/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup typedef_inheritance 2 | //tsgdescr "Testing scope of typedef declarations with the valuetype inheritance" 3 | 4 | valuetype AVal { 5 | typedef long TypeLong; 6 | public TypeLong Mbr1; 7 | }; 8 | valuetype BVal : AVal { 9 | public TypeLong Mbr2; 10 | }; 11 | 12 | valuetype CVal : BVal { 13 | public TypeLong Mbr3; 14 | }; 15 | -------------------------------------------------------------------------------- /testsuite/idls/vti_si03/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup a valuetype supporting an interface 2 | //tsgdescr "Testing a valuetype supporting (and interface derived from) an abstract interface" 3 | 4 | abstract interface AbsItf { 5 | short op1(); 6 | }; 7 | interface Itfderiv: AbsItf { 8 | short op2(); 9 | }; 10 | valuetype Val supports AbsItf { 11 | short op3(); 12 | }; 13 | -------------------------------------------------------------------------------- /testsuite/idls/idl15025/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef long ArgType; 3 | typedef ArgType AType; // line l1 4 | interface B { 5 | typedef string ArgType; // line l3 6 | ArgType opb(in AType i); // line l2 7 | }; 8 | }; 9 | module N { 10 | typedef char ArgType; // line l4 11 | interface Y : M::B { 12 | void opy(in ArgType i); // line l5 13 | }; 14 | }; 15 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/omg/barn.idl: -------------------------------------------------------------------------------- 1 | typedef long measure; 2 | interface Feed { 3 | attribute measure weight; 4 | }; 5 | interface Animal { 6 | enum State {SLEEPING, AWAKE}; 7 | boolean eat(inout Feed bag); 8 | // returns true if animal is full 9 | attribute State alertness; 10 | }; 11 | interface Horse : Animal{ 12 | void trot(in short distance); 13 | }; 14 | -------------------------------------------------------------------------------- /examples/dsa/demo/testbed.cfg: -------------------------------------------------------------------------------- 1 | -- Configuration file for use of DSA example with gnatdist 2 | 3 | -- $Id$ 4 | 5 | configuration Testbed is 6 | pragma Starter (None); 7 | ServerP : Partition := (Rci); 8 | ClientP : Partition := (SP); 9 | 10 | procedure Noproc is in ServerP; 11 | procedure Client_Main; 12 | for ClientP'Main use Client_Main; 13 | end Testbed; 14 | -------------------------------------------------------------------------------- /testsuite/idls/vti_si02/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup a valuetype supporting an interface 2 | //tsgdescr "Testing a (abstract) valuetype supporting an interface" 3 | 4 | interface Itf { 5 | short op1(); 6 | long op2(); 7 | 8 | }; 9 | 10 | abstract valuetype AbsVal supports Itf { 11 | short op3(); 12 | }; 13 | 14 | valuetype Val: AbsVal { 15 | public short shrMbr; 16 | }; 17 | -------------------------------------------------------------------------------- /compilers/idlac/testsuite/raises/attr-raises-3.idl: -------------------------------------------------------------------------------- 1 | interface Attr_Raises_3 { 2 | exception Exc {}; 3 | // All attribute declarations are incorrect. 4 | readonly attribute long a setraises (Exc); 5 | readonly attribute long b getraises (Exc); 6 | readonly attribute long c getraises (Exc) setraises (Exc); 7 | readonly attribute long d setraises (Exc) getraises (Exc); 8 | }; 9 | -------------------------------------------------------------------------------- /examples/dsa/json/echo_json.cfg: -------------------------------------------------------------------------------- 1 | configuration Echo_JSON is 2 | pragma Name_Server (Embedded); 3 | pragma Starter (Ada); 4 | pragma Boot_Location ("tcp", "localhost:4411"); 5 | 6 | Server_Partition : partition := (RCI); 7 | 8 | Client_Partition : partition; 9 | procedure Cli is in Client_Partition; 10 | 11 | for Partition'Directory use "exec"; 12 | end Echo_JSON; 13 | -------------------------------------------------------------------------------- /testsuite/idls/avt_p01/tin.idl: -------------------------------------------------------------------------------- 1 | // testsubgroup abstract valuetype as operation parameter 2 | // tsgdescr "Testing the abstract valuetype as operation parameter" 3 | 4 | abstract valuetype AbsVal { 5 | AbsVal op1(in AbsVal inPara, inout AbsVal ioPara, out AbsVal outPara); 6 | }; 7 | interface Itf { 8 | AbsVal op2(in AbsVal inPara, inout AbsVal ioPara, out AbsVal outPara); 9 | }; 10 | -------------------------------------------------------------------------------- /testsuite/idls/idl02030/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef long Foo; 3 | const long thing = 1; 4 | interface thing { // error: reuse of identifier 5 | void doit ( 6 | in Foo foo // error: Foo and foo collide and refer to different things 7 | ); 8 | readonly attribute long Attribute; 9 | // error: Attribute collides with keyword attribute 10 | }; 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/idls/test008/test.out: -------------------------------------------------------------------------------- 1 | typedef float Apple; 2 | typedef double Carrots; 3 | typedef long BlackCherry; 4 | typedef short Rhubarb; 5 | interface idlServer { 6 | typedef unsigned long Pumpkin; 7 | typedef unsigned short WaterMelon; 8 | typedef char Dates; 9 | typedef boolean Lychees; 10 | Apple GardenPeas(in Apple p1, out BlackCherry p2, inout idlServer::Dates p3); 11 | }; 12 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_0/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | r1, r2 = ( 6 | client_server(r'../examples/corba/all_types/client', r'', 7 | r'../examples/corba/all_types/server', r''), 8 | local(r'../examples/corba/all_types/client', r'', args=['local'])) 9 | 10 | if not r1 or not r2: 11 | fail() 12 | 13 | -------------------------------------------------------------------------------- /testsuite/dsa/abortion/app.cfg: -------------------------------------------------------------------------------- 1 | configuration App is 2 | 3 | pragma STARTER (None); 4 | pragma NAME_SERVER (Standalone); 5 | 6 | Server_P : partition := (RCI); 7 | Client_P : partition; 8 | 9 | procedure Server is in Server_P; 10 | 11 | procedure Client; 12 | for Client_P'Main use Client; 13 | 14 | for partition'termination use Local_Termination; 15 | end App; 16 | -------------------------------------------------------------------------------- /support/libtool-tag.m4: -------------------------------------------------------------------------------- 1 | dnl Determine whether libtool supports --tag 2 | dnl $Id$ 3 | 4 | AC_DEFUN([AC_LIBTOOL_HAS_TAG],[ 5 | AC_MSG_CHECKING([whether libtool supports --tag]) 6 | if grep "[[-]]-tag" $srcdir/support/ltmain.sh > /dev/null; then 7 | AC_MSG_RESULT([yes]) 8 | LIBTOOL_TAG=--tag=CC 9 | else 10 | AC_MSG_RESULT([no]) 11 | LIBTOOL_TAG= 12 | fi 13 | AC_SUBST(LIBTOOL_TAG) 14 | ]) 15 | -------------------------------------------------------------------------------- /testsuite/idls/types001/test.out: -------------------------------------------------------------------------------- 1 | BOOLEAN := True 2 | SHORT := True 3 | LONG := True 4 | USHORT := True 5 | ULONG := True 6 | ULONGLONG := True 7 | FLOAT := True 8 | DOUBLE := True 9 | CHAR := True 10 | WCHAR := True 11 | OCTET := True 12 | STRING := True 13 | WSTRING := True 14 | LONGDOUBLE := True 15 | OBJECT := True 16 | TYPECODE := True 17 | ANY := True 18 | VOID := True 19 | LONGLONG := True 20 | -------------------------------------------------------------------------------- /testsuite/tests/confs/giop_1_0.conf: -------------------------------------------------------------------------------- 1 | # PolyORB configuration file: GIOP 1.0 profile 2 | # $Id$ 3 | 4 | [iiop] 5 | polyorb.protocols.iiop.giop.default_version.major=1 6 | polyorb.protocols.iiop.giop.default_version.minor=0 7 | 8 | [access_points] 9 | srp=disable 10 | soap=disable 11 | iiop=enable 12 | 13 | [modules] 14 | binding_data.srp=disable 15 | binding_data.soap=disable 16 | binding_data.iiop=enable 17 | -------------------------------------------------------------------------------- /testsuite/tests/confs/giop_1_1.conf: -------------------------------------------------------------------------------- 1 | # PolyORB configuration file: GIOP 1.1 profile 2 | # $Id$ 3 | 4 | [iiop] 5 | polyorb.protocols.iiop.giop.default_version.major=1 6 | polyorb.protocols.iiop.giop.default_version.minor=1 7 | 8 | [access_points] 9 | srp=disable 10 | soap=disable 11 | iiop=enable 12 | 13 | [modules] 14 | binding_data.srp=disable 15 | binding_data.soap=disable 16 | binding_data.iiop=enable 17 | -------------------------------------------------------------------------------- /testsuite/tests/confs/giop_1_2.conf: -------------------------------------------------------------------------------- 1 | # PolyORB configuration file: GIOP 1.2 profile 2 | # $Id$ 3 | 4 | [iiop] 5 | polyorb.protocols.iiop.giop.default_version.major=1 6 | polyorb.protocols.iiop.giop.default_version.minor=2 7 | 8 | [access_points] 9 | srp=disable 10 | soap=disable 11 | iiop=enable 12 | 13 | [modules] 14 | binding_data.srp=disable 15 | binding_data.soap=disable 16 | binding_data.iiop=enable 17 | -------------------------------------------------------------------------------- /testsuite/idls/vt_e01/tin.idl: -------------------------------------------------------------------------------- 1 | // IDL-Spec for testgroup: valuetype 2 | // Purpose: Valuetype as member in an exception, 3 | 4 | 5 | valuetype Val { 6 | public short ShortMbr; 7 | exception ValExcpt { 8 | Val ex1; 9 | }; 10 | Val op1() 11 | raises(ValExcpt); 12 | }; 13 | 14 | 15 | interface Inf { 16 | exception ValExcpt { 17 | Val ex1; 18 | }; 19 | Val op2() 20 | raises(ValExcpt); 21 | }; 22 | -------------------------------------------------------------------------------- /testsuite/tests/examples/moma/MOMA_0/test.py: -------------------------------------------------------------------------------- 1 | from test_utils import * 2 | import os, shutil, sys 3 | 4 | shutil.copy(os.path.join(SRC_DIR, 5 | '..', 6 | 'examples', 'moma', 'destinations.conf'), 7 | '.') 8 | 9 | if not client_server(r'../examples/moma/client', r'', 10 | r'../examples/moma/server', r''): 11 | fail() 12 | 13 | -------------------------------------------------------------------------------- /testsuite/idls/ada0017/tin.idl: -------------------------------------------------------------------------------- 1 | interface i1 { 2 | typedef string new_string; 3 | typedef float New_Float; 4 | typedef new_string n2, tab[4][2]; 5 | typedef float f33 [120], f45 [4][5][6]; 6 | 7 | attribute string str; 8 | attribute new_string S; 9 | void min (in New_Float f1); 10 | float Add (inout New_Float f1, in float f2); 11 | New_Float minus (in float f1, in float f2, out float r); 12 | }; 13 | -------------------------------------------------------------------------------- /testsuite/idls/vti_avb02/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup abstract valuetype as base class 2 | //tsgdescr "Testing the abstract valuetype as base class" 3 | 4 | 5 | abstract valuetype AbsVal1 { 6 | short op1_1(); 7 | long op1_2(); 8 | 9 | }; 10 | 11 | abstract valuetype AbsVal2 { 12 | short op2_1(); 13 | long op2_2(); 14 | 15 | }; 16 | 17 | abstract valuetype AbsVal3: AbsVal1, AbsVal2{ 18 | short op3(); 19 | }; 20 | -------------------------------------------------------------------------------- /testsuite/tests/confs/broken_codesets.conf: -------------------------------------------------------------------------------- 1 | [giop] 2 | 3 | # The following parameters force the inclusion of fallback code sets 4 | # as supported conversion code sets. This is required to enable 5 | # interoperability with ORBs whose code sets negotiation support is 6 | # broken. See PolyORB's Users Guide for additional information. 7 | # 8 | giop.add_char_fallback_code_set=true 9 | giop.add_wchar_fallback_code_set=true 10 | -------------------------------------------------------------------------------- /testsuite/tests/examples/moma/MOMA_1/test.py: -------------------------------------------------------------------------------- 1 | from test_utils import * 2 | import os, shutil, sys 3 | 4 | shutil.copy(os.path.join(SRC_DIR, 5 | '..', 6 | 'examples', 'moma', 'destinations.conf'), 7 | '.') 8 | 9 | if not client_server(r'../examples/moma/client_call_back', r'', 10 | r'../examples/moma/server', r''): 11 | fail() 12 | 13 | -------------------------------------------------------------------------------- /examples/dsa/json/normal_json.ads: -------------------------------------------------------------------------------- 1 | with RT_JSON; 2 | with GNATCOLL.JSON; 3 | 4 | package Normal_JSON is 5 | type JSON_Holder is new RT_JSON.JSON_Holder with record 6 | Value : GNATCOLL.JSON.JSON_Value; 7 | end record; 8 | 9 | function Wrap (J : GNATCOLL.JSON.JSON_Value) return RT_JSON.JSON_Wrapper; 10 | function Unwrap (W : RT_JSON.JSON_Wrapper) return GNATCOLL.JSON.JSON_Value; 11 | 12 | end Normal_JSON; 13 | -------------------------------------------------------------------------------- /idls/CORBA_PIDL/CORBA_ServerRequest.idl: -------------------------------------------------------------------------------- 1 | // File: ServerRequest.idl 2 | // CORBA 3.0, Chapter 8 3 | 4 | interface ServerRequest { // PIDL 5 | readonly attribute Identifier operation; 6 | void arguments (inout NVList nv); 7 | Context ctx(); 8 | void set_result (in any val); 9 | void set_exception(in any val); 10 | }; 11 | -------------------------------------------------------------------------------- /idls/cos/persistent/cospersistencepid.idl: -------------------------------------------------------------------------------- 1 | //File: CosPersistencePID.idl 2 | //Part of the Persistence Service 3 | 4 | #ifndef _COS_PERSISTENCE_PID_IDL_ 5 | #define _COS_PERSISTENCE_PID_IDL_ 6 | #pragma prefix "omg.org" 7 | 8 | module CosPersistencePID { 9 | 10 | interface PID { 11 | attribute string datastore_type; 12 | string get_PIDString(); 13 | }; 14 | 15 | }; 16 | #endif /* ifndef _COS_PERSISTENCE_PID_IDL_ */ 17 | -------------------------------------------------------------------------------- /testsuite/idls/idl15031/tin.idl: -------------------------------------------------------------------------------- 1 | typedef short TempType; // Scope of TempType begins here 2 | module M { 3 | typedef string ArgType; // Scope of ArgType begins here 4 | struct S { 5 | ::M::ArgType a1; // Nothing introduced here 6 | M::ArgType a2; // M introduced here 7 | ::TempType temp; // Nothing introduced here 8 | }; // Scope of (introduced) M ends here 9 | // ... 10 | }; // Scope of ArgType ends here 11 | -------------------------------------------------------------------------------- /testsuite/idls/idl15033/tin.idl: -------------------------------------------------------------------------------- 1 | module M { 2 | typedef long ArgType; 3 | const long I = 10; 4 | interface A { 5 | struct S { 6 | struct T { 7 | ArgType x[I]; // ArgType and I introduced 8 | } m; 9 | }; 10 | struct U { 11 | long I; // OK, I is not a type name 12 | }; 13 | enum I { I1, I2 }; // Error: I redefined 14 | }; // Potential scope of ArgType and I ends here 15 | }; 16 | -------------------------------------------------------------------------------- /testsuite/idls/test051/test.out: -------------------------------------------------------------------------------- 1 | union Broadbeans switch (boolean) { 2 | case TRUE : 3 | float ButterBean; 4 | case FALSE : 5 | unsigned long Fennell; 6 | }; 7 | interface idlServer { 8 | exception BroadbeansExcpt { 9 | Broadbeans ex1; 10 | }; 11 | attribute Broadbeans BroadbeansAttr; 12 | Broadbeans BroadbeansOp(in Broadbeans p1, out Broadbeans p2, inout Broadbeans p3) raises (idlServer::BroadbeansExcpt); 13 | }; 14 | -------------------------------------------------------------------------------- /examples/bbs/stats/doplot: -------------------------------------------------------------------------------- 1 | #! /bin/sh 2 | 3 | #set data style yerrorbars 4 | plot_one() { 5 | cat <<__EOF__ | gnuplot 6 | set term postscript eps color 7 | set data style linespoint 8 | set output "$2" 9 | plot "$1" 10 | __EOF__ 11 | 12 | } 13 | 14 | for data in data*; do 15 | ps=`echo $data | sed s/data/plot/`.ps 16 | if [ ! "$ps" -nt "$data" ]; then 17 | echo "$data -> $ps" 18 | plot_one $data $ps 19 | fi 20 | done 21 | -------------------------------------------------------------------------------- /testsuite/idls/Makefile.ada: -------------------------------------------------------------------------------- 1 | SHELL = /bin/sh 2 | GNATFLAGS = -g -gnatwA 3 | GNATINCLUDE = -I`gnatls -v | grep adainclude | sed 's/ *//g'` 4 | FLAGS = -I. $(GNATINCLUDE) 5 | 6 | 7 | all : stubs 8 | 9 | force: 10 | 11 | stubs: 12 | gnatmake $(GNATFLAGS) *.adb $(FLAGS) `polyorb-config` 13 | 14 | 15 | clean: 16 | @-rm -f *.ali *.o 17 | @-rm -f GNAT* *~ 18 | @-rm -f core* 19 | @-rm -f b~* 20 | 21 | -------------------------------------------------------------------------------- /testsuite/idls/corba_idl/CORBA_ServerRequest.idl: -------------------------------------------------------------------------------- 1 | // File: ServerRequest.idl 2 | // CORBA 3.0, Chapter 8 3 | 4 | interface ServerRequest { // PIDL 5 | readonly attribute Identifier operation; 6 | void arguments (inout NVList nv); 7 | Context ctx(); 8 | void set_result (in any val); 9 | void set_exception(in any val); 10 | }; 11 | -------------------------------------------------------------------------------- /testsuite/tests/confs/performance.conf: -------------------------------------------------------------------------------- 1 | ############################################################################### 2 | # PolyORB configuration file for benchmarking CORBA application 3 | 4 | [iiop] 5 | 6 | polyorb.protocols.iiop.giop.1.2.locate_then_request=false 7 | # Disable Locate messages 8 | 9 | polyorb.protocols.iiop.giop.1.2.max_message_size=1000000 10 | # Increase to a very big value to limit the effect of fragmentation 11 | -------------------------------------------------------------------------------- /examples/corba/random/random.idl: -------------------------------------------------------------------------------- 1 | // This interface was copied from http://random.org/corba.html, where you can 2 | // also find the current IOR of the server. 3 | // See client.cc for details. 4 | 5 | // IDL 6 | interface Random { 7 | 8 | // return non-negative long integer in the interval [0, 2^31) 9 | long lrand48(); 10 | 11 | // return signed long integer in the interval [-2^31, 2^31) 12 | long mrand48(); 13 | }; 14 | 15 | -------------------------------------------------------------------------------- /testsuite/corba/portableserver/echo.idl: -------------------------------------------------------------------------------- 1 | 2 | import ::PortableServer; 3 | 4 | interface Echo { 5 | 6 | string echoString (in string Mesg); 7 | 8 | string echoString_reentrant (in string Mesg); 9 | 10 | string echoString_wait (in string Mesg); 11 | 12 | }; 13 | 14 | local interface Test_NullActivator : PortableServer::ServantActivator { }; 15 | 16 | local interface Test_SimpleActivator : PortableServer::ServantActivator { }; 17 | -------------------------------------------------------------------------------- /testsuite/idls/ada0010/tin.idl: -------------------------------------------------------------------------------- 1 | // Test interface code generation 2 | interface Inter1 { 3 | attribute float Attr1; // Float type declaration 4 | attribute boolean Attr2; // boolean type declaration 5 | readonly attribute long Attr3; // readonly attribute 6 | attribute long long Attr4; 7 | string Name (in short code); // operation declaration 8 | void SName (in short code, in string str); 9 | }; 10 | 11 | 12 | 13 | 14 | -------------------------------------------------------------------------------- /testsuite/idls/attr001/tin.idl: -------------------------------------------------------------------------------- 1 | interface MyInt { 2 | exception e1 {}; 3 | exception e2 {}; 4 | exception e3 {}; 5 | exception e4 {}; 6 | 7 | readonly attribute long a1, a2 raises (e1); 8 | attribute long a3, a4 getraises (e1, e2); 9 | attribute long a5, a6 setraises (e3, e4); 10 | attribute long a7, a8 getraises (e1, e2) setraises (e3, e4); 11 | readonly attribute long a9, a10 raises (e1, e2, e3, e4); 12 | }; 13 | -------------------------------------------------------------------------------- /examples/corba/send/print.idl: -------------------------------------------------------------------------------- 1 | module Test { 2 | interface Printer { 3 | oneway void printString (in string Mesg); 4 | oneway void printLong (in long K); 5 | string echoString (in string K); 6 | long echoLong (in long K); 7 | }; 8 | 9 | interface Controller { 10 | Printer Get_Printer (); 11 | 12 | void StopServer (); 13 | // Shut down server 14 | 15 | boolean test_OK (); 16 | 17 | }; 18 | 19 | }; 20 | -------------------------------------------------------------------------------- /testsuite/idls/vti_avb01/tin.idl: -------------------------------------------------------------------------------- 1 | //testsubgroup abstract valuetype as base class 2 | //tsgdescr "Testing the abstract valuetype as base class" 3 | 4 | abstract valuetype AbsVal1 { 5 | short op1(); 6 | 7 | }; 8 | 9 | abstract valuetype AbsVal2 { 10 | long op2(); 11 | 12 | }; 13 | 14 | valuetype Val:AbsVal1, AbsVal2 { 15 | //state 16 | 17 | public any anyMbr; 18 | 19 | // initializer 20 | 21 | factory init(in any anyMbr); 22 | }; 23 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-secure_echo/SECURE_ECHO_TLS/test.py: -------------------------------------------------------------------------------- 1 | from test_utils import * 2 | import sys, os 3 | 4 | conf_file = os.path.join(BASE_DIR, 5 | '..', 6 | 'examples', 'corba', 'secure_echo', 'tls.conf') 7 | 8 | if not client_server(r'../examples/corba/secure_echo/client', conf_file, 9 | r'../examples/corba/secure_echo/server', conf_file): 10 | fail() 11 | 12 | -------------------------------------------------------------------------------- /testsuite/idls/test012/test.out: -------------------------------------------------------------------------------- 1 | interface Banana; 2 | struct Corn { 3 | short Eddo; 4 | Banana Yam; 5 | long Rasin; 6 | float Peach; 7 | }; 8 | interface Banana; 9 | interface Apple { 10 | attribute Banana Peanuts; 11 | }; 12 | interface Banana { 13 | void Orange(in Banana p1); 14 | void Basil(out Banana p1); 15 | void VineTomatoes(inout Banana p1); 16 | }; 17 | interface idlServer : Apple, Banana { 18 | idlServer Lemon(in Corn p1); 19 | }; 20 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-secure_echo/SECURE_ECHO_GSSUP/test.py: -------------------------------------------------------------------------------- 1 | from test_utils import * 2 | import sys, os 3 | 4 | conf_file = os.path.join(BASE_DIR, 5 | '..', 6 | 'examples', 'corba', 'secure_echo', 'gssup.conf') 7 | 8 | if not client_server(r'../examples/corba/secure_echo/client', conf_file, 9 | r'../examples/corba/secure_echo/server', conf_file): 10 | fail() 11 | 12 | -------------------------------------------------------------------------------- /testsuite/idls/forward01/forward.idl: -------------------------------------------------------------------------------- 1 | interface toto {}; 2 | interface titi { 3 | typedef toto toto2; 4 | toto2 getToto2(); 5 | toto getToto(); 6 | }; 7 | 8 | module Test000 { 9 | interface X0 {}; 10 | typedef X0 Y0; 11 | 12 | interface X1 {}; 13 | union Y1 switch (long) { case 1: X1 field1; }; 14 | 15 | interface X2 {}; 16 | union Y2 switch (long) { case 1: struct Nested { X2 field2; } 17 | fieldNest; }; 18 | }; 19 | 20 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_1/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | r1, r2 = ( 6 | client_server( 7 | r'../examples/corba/all_types/client', 8 | r'soap.conf', 9 | r'../examples/corba/all_types/server', 10 | r'soap.conf'), 11 | local( 12 | r'../examples/corba/all_types/client', 13 | r'soap.conf', args=['local'])) 14 | if not r1 or not r2: 15 | fail() 16 | -------------------------------------------------------------------------------- /.gitignore: -------------------------------------------------------------------------------- 1 | autom4te.cache 2 | aclocal.m4 3 | 4 | # Generated by build infrastructure 5 | *.ali 6 | *.ad[sb].stderr 7 | *.ad[sb].stdout 8 | *.bexch 9 | *.idl-stamp 10 | *.ads-stamp 11 | *.c.stderr 12 | *.c.stdout 13 | *.d 14 | 15 | # These are the default patterns globally ignored by Subversion: 16 | *.o 17 | *.lo 18 | *.la 19 | *.al 20 | .libs 21 | *.so 22 | *.so.[0-9]* 23 | *.a 24 | *.pyc 25 | *.pyo 26 | *.rej 27 | *~ 28 | .#* 29 | .*.swp 30 | .DS_store 31 | -------------------------------------------------------------------------------- /examples/corba/send/interop/tao/client.conf.xml: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | -------------------------------------------------------------------------------- /testsuite/idls/va_t03/test.out: -------------------------------------------------------------------------------- 1 | valuetype ShortValue short; 2 | struct FixS { 3 | long longMbr; 4 | }; 5 | valuetype FixSvalue FixS; 6 | typedef ShortValue TestType; 7 | interface Intf { 8 | attribute TestType IntfAttr; 9 | void op1(in TestType p); 10 | }; 11 | valuetype BaseVal { 12 | typedef FixSvalue TestType; 13 | public BaseVal::TestType BaseValMbr; 14 | void op2(in BaseVal::TestType p); 15 | }; 16 | valuetype Val : BaseVal supports Intf { 17 | }; 18 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-secure_echo/SECURE_ECHO_TLS_GSSUP/test.py: -------------------------------------------------------------------------------- 1 | from test_utils import * 2 | import sys, os 3 | 4 | conf_file = os.path.join(BASE_DIR, 5 | '..', 6 | 'examples', 'corba', 'secure_echo', 'tls_gssup.conf') 7 | 8 | if not client_server(r'../examples/corba/secure_echo/client', conf_file, 9 | r'../examples/corba/secure_echo/server', conf_file): 10 | fail() 11 | 12 | -------------------------------------------------------------------------------- /examples/dsa/json/cli.adb: -------------------------------------------------------------------------------- 1 | with Ada.Text_IO; use Ada.Text_IO; 2 | with GNATCOLL.JSON; use GNATCOLL.JSON; 3 | with Normal_JSON; use Normal_JSON; 4 | 5 | with RCI; 6 | 7 | procedure Cli is 8 | J1 : JSON_Value := Create_Object; 9 | J2 : JSON_Value; 10 | begin 11 | J1.Set_Field ("data", Create (Integer'(123))); 12 | Put_Line ("J1 = " & Write (J1)); 13 | 14 | J2 := Unwrap (RCI.Frob (Wrap (J1))); 15 | Put_Line ("J2 = " & Write (J2)); 16 | end Cli; 17 | -------------------------------------------------------------------------------- /testsuite/corba/performance/java/Makefile: -------------------------------------------------------------------------------- 1 | 2 | all: 3 | idlj -fall benchs.idl 4 | javac benchsServer.java benchsPackage/*.java 5 | # orbd -ORBInitialPort 1050 -ORBInitialHost localhost 6 | java benchsServer -ORBInitialPort 1050 -ORBInitialHost localhost 7 | 8 | clean: 9 | rm -rf *.class \ 10 | benchsHelper.java \ 11 | benchs.java \ 12 | benchsPOA.java \ 13 | benchsHolder.java \ 14 | benchsOperations.java \ 15 | _benchsStub.java \ 16 | benchsPackage 17 | -------------------------------------------------------------------------------- /testsuite/idls/test013/test.out: -------------------------------------------------------------------------------- 1 | interface Banana { 2 | const float Apple = 2.34E+1; 3 | typedef long Dates; 4 | exception Orange { 5 | short Starfruit; 6 | }; 7 | }; 8 | interface idlServer : Banana { 9 | const short Apple = 5; 10 | typedef struct Dates { 11 | char Dill; 12 | } Oregano; 13 | exception Orange { 14 | float Aniseed; 15 | double Bayleaf; 16 | }; 17 | void Lemon(in idlServer::Dates p1, inout Banana::Dates p2) raises (idlServer::Orange); 18 | }; 19 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_4/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | r1, r2 = ( 6 | client_server( 7 | r'../examples/corba/all_types/client', 8 | r'ssliop.conf', 9 | r'../examples/corba/all_types/server', 10 | r'ssliop.conf'), 11 | local( 12 | r'../examples/corba/all_types/client', 13 | r'ssliop.conf', 14 | args=['local'])) 15 | if not r1 or not r2: 16 | fail() 17 | 18 | -------------------------------------------------------------------------------- /examples/dsa/json/normal_json.adb: -------------------------------------------------------------------------------- 1 | package body Normal_JSON is 2 | function Wrap (J : GNATCOLL.JSON.JSON_Value) return RT_JSON.JSON_Wrapper is 3 | begin 4 | return RT_JSON.JSON_Wrapper' 5 | (H => new JSON_Holder'(RT_JSON.JSON_Holder with Value => J)); 6 | end Wrap; 7 | 8 | function Unwrap (W : RT_JSON.JSON_Wrapper) return GNATCOLL.JSON.JSON_Value is 9 | begin 10 | return JSON_Holder (W.H.all).Value; 11 | end Unwrap; 12 | 13 | end Normal_JSON; 14 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_5/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | r1, r2 = ( 6 | client_server( 7 | r'../examples/corba/all_types/client', 8 | r'giop_1_0.conf', 9 | r'../examples/corba/all_types/server', 10 | r'giop_1_0.conf'), 11 | local( 12 | r'../examples/corba/all_types/client', 13 | r'giop_1_0.conf', 14 | args=['local'])) 15 | if not r1 or not r2: 16 | fail() 17 | 18 | -------------------------------------------------------------------------------- /testsuite/tests/examples/corba-all_types/ALL_TYPES_6/test.py: -------------------------------------------------------------------------------- 1 | 2 | from test_utils import * 3 | import sys 4 | 5 | r1, r2 = ( 6 | client_server( 7 | r'../examples/corba/all_types/client', 8 | r'giop_1_1.conf', 9 | r'../examples/corba/all_types/server', 10 | r'giop_1_1.conf'), 11 | local( 12 | r'../examples/corba/all_types/client', 13 | r'giop_1_1.conf', 14 | args=['local'])) 15 | if not r1 or not r2: 16 | fail() 17 | 18 | -------------------------------------------------------------------------------- /testsuite/idls/vb_d05/test.out: -------------------------------------------------------------------------------- 1 | typedef sequence LongSeq; 2 | valuetype LongSeqValue LongSeq; 3 | valuetype AnyValue any; 4 | union FixU switch (long) { 5 | case 1 : 6 | long x; 7 | case 2 : 8 | short v; 9 | }; 10 | valuetype FixUValue FixU; 11 | typedef sequence StringSeq; 12 | valuetype StringSeqValue StringSeq; 13 | union VarU switch (boolean) { 14 | case TRUE : 15 | string strMbr; 16 | case FALSE : 17 | StringSeq strseqMbr; 18 | }; 19 | valuetype VarUValue VarU; 20 | --------------------------------------------------------------------------------