diff options
Diffstat (limited to 'TAO/examples/Advanced/ch_18/client.cpp')
| -rw-r--r-- | TAO/examples/Advanced/ch_18/client.cpp | 349 |
1 files changed, 0 insertions, 349 deletions
diff --git a/TAO/examples/Advanced/ch_18/client.cpp b/TAO/examples/Advanced/ch_18/client.cpp deleted file mode 100644 index bdf1db1f6b6..00000000000 --- a/TAO/examples/Advanced/ch_18/client.cpp +++ /dev/null @@ -1,349 +0,0 @@ -// $Id$ -// ============================================================================ -// -// = LIBRARY -// TAO/examples/Advanced/ch_18 -// -// = FILENAME -// client.cpp -// -// = AUTHORS -// Source code used in TAO has been modified and adapted from the code -// provided in the book, "Advanced CORBA Programming with C++" by Michi -// Henning and Steve Vinoski. Copyright 1999. Addison-Wesley, Reading, -// MA. -// -// Modified for TAO by Mike Moran <mm4@cs.wustl.edu> -// -// ============================================================================ - - - -#include "CCS.h" // ORB-specific -#include <orbsvcs/CosNamingC.h> -// #include <iostream.h> -// #include <fstream.h> -// ---------------------------------------------------------------- - -template<class T> -typename T::_ptr_type -resolve_init(CORBA::ORB_ptr orb, const char * id) -{ - CORBA::Object_var obj; - try { - obj = orb->resolve_initial_references(id); - } - catch (const CORBA::ORB::InvalidName & e) { - throw; - } - catch (const CORBA::Exception & e) { - cerr << "Cannot get initial reference for " - << id << ": " << e << endl; - throw 0; - } - assert(!CORBA::is_nil(obj.in())); - - typename T::_var_type ref; - try { - ref = T::_narrow(obj.in()); - } - catch (const CORBA::Exception & e) { - cerr << "Cannot narrow reference for " - << id << ": " << e << endl; - throw 0; - } - if (CORBA::is_nil(ref.in())) { - cerr << "Incorrect type of reference for " - << id << endl; - throw 0; - } - return ref._retn(); -} - -//---------------------------------------------------------------- - -template<class T> -typename T::_ptr_type -resolve_name( - CosNaming::NamingContext_ptr nc, - const CosNaming::Name & name) -{ - CORBA::Object_var obj; - try { - obj = nc->resolve(name); - } - catch (const CosNaming::NamingContext::NotFound & e) { - throw; - } - catch (const CORBA::Exception & e) { - cerr << "Cannot resolve binding: " << e << endl; - throw 0; - } - if (CORBA::is_nil(obj.in())) { - cerr << "Nil binding in Naming Service" << endl; - throw 0; - } - - typename T::_var_type ref; - try { - ref = T::_narrow(obj.in()); - } - catch (const CORBA::Exception & e) { - cerr << "Cannot narrow reference: " << e << endl; - throw 0; - } - if (CORBA::is_nil(ref.in())) { - cerr << "Reference has incorrect type" << endl; - throw 0; - } - return ref._retn(); -} - -//---------------------------------------------------------------- - -// Generic ostream inserter for exceptions. Inserts the exception -// name, if available, and the repository ID otherwise. - -//#if 0 // This inserter may or may not be needed for your ORB. - -static ostream & -operator<<(ostream & os, const CORBA::Exception & e) -{ - CORBA::Any tmp; - tmp <<= e; - - CORBA::TypeCode_var tc = tmp.type(); - const char * p = tc->name(); - if (*p != '\0') - os << p; - else - os << tc->id(); - return os; -} - -//#endif - -//---------------------------------------------------------------- - -// Show the details for a thermometer or thermostat. - -static ostream & -operator<<(ostream &os, CCS::Thermometer_ptr t) -{ - // Check for nil. - if (CORBA::is_nil(t)) { - os << "Cannot show state for nil reference." << endl; - return os; - } - - // Try to narrow and print what kind of device it is. - CCS::Thermostat_var tmstat = CCS::Thermostat::_narrow(t); - os << (CORBA::is_nil(tmstat.in()) ? "Thermometer:" : "Thermostat:") - << endl; - - // Show attribute values. - CCS::ModelType_var model = t->model(); - CCS::LocType_var location = t->location(); - os << "\tAsset number: " << t->asset_num() << endl; - os << "\tModel : " << model.in() << endl; - os << "\tLocation : " << location.in() << endl; - os << "\tTemperature : " << t->temperature() << endl; - - // If device is a thermostat, show nominal temperature. - if (!CORBA::is_nil(tmstat.in())) - os << "\tNominal temp: " << tmstat->get_nominal() << endl; - return os; -} - -//---------------------------------------------------------------- - -// Show the information in a BtData struct. - -static ostream & -operator<<(ostream &os, const CCS::Thermostat::BtData &btd) -{ - os << "CCS::Thermostat::BtData details:" << endl; - os << "\trequested : " << btd.requested << endl; - os << "\tmin_permitted: " << btd.min_permitted << endl; - os << "\tmax_permitted: " << btd.max_permitted << endl; - os << "\terror_msg : " << btd.error_msg << endl; - return os; -} - -//---------------------------------------------------------------- - -// Loop over the sequence of records in an EChange exception and -// show the details of each record. - -static ostream & -operator<<(ostream &os, const CCS::Controller::EChange &ec) -{ - for (CORBA::ULong i = 0; i < ec.errors.length(); i++) { - os << "Change failed:" << endl; - os << ec.errors[i].tmstat_ref.in(); // Overloaded << - os << ec.errors[i].info << endl; // Overloaded << - } - return os; -} - -//---------------------------------------------------------------- - -// Change the temperature of a thermostat. - -static void -set_temp(CCS::Thermostat_ptr tmstat, CCS::TempType new_temp) -{ - if (CORBA::is_nil(tmstat)) // Don't call via nil reference - return; - - CCS::AssetType anum = tmstat->asset_num(); - try { - cout << "Setting thermostat " << anum - << " to " << new_temp << " degrees." << endl; - CCS::TempType old_nominal = tmstat->set_nominal(new_temp); - cout << "Old nominal temperature was: " - << old_nominal << endl; - cout << "New nominal temperature is: " - << tmstat->get_nominal() << endl; - } catch (const CCS::Thermostat::BadTemp &bt) { - cerr << "Setting of nominal temperature failed." << endl; - cerr << bt.details << endl; // Overloaded << - } -} - -//---------------------------------------------------------------- - -int -main(int argc, char * argv[]) -{ - try { - // Initialize the ORB - CORBA::ORB_var orb = CORBA::ORB_init(argc, argv); - - // Check arguments - if (argc != 1) { - cerr << "Usage: client" << endl; - throw 0; - } - - // Get reference to initial naming context. - CosNaming::NamingContext_var inc - = resolve_init<CosNaming::NamingContext>( - orb.in(), "NameService" - ); - - // Look for controller in the Naming Service. - CosNaming::Name n; - n.length(2); - n[0].id = CORBA::string_dup("CCS"); - n[1].id = CORBA::string_dup("Controller"); - CCS::Controller_var ctrl; - try { - ctrl = resolve_name<CCS::Controller>(inc.in(), n); - } catch (const CosNaming::NamingContext::NotFound &) { - cerr << "No controller in Naming Service" << endl; - throw(0); - } - - // Get list of devices - CCS::Controller::ThermometerSeq_var list = ctrl->list(); - - // Show number of devices. - CORBA::ULong len = list->length(); - cout << "Controller has " << len << " device"; - if (len != 1) - cout << "s"; - cout << "." << endl; - - CCS::Thermometer_var t = ctrl->create_thermometer(27, "Room 1"); - CCS::Thermostat_var ts = ctrl->create_thermostat(28, "Room 2", 48); - CCS::Thermostat_var ts2 = ctrl->create_thermostat(30, "Room 3", 48); - CCS::Thermostat_var ts3 = ctrl->create_thermostat(32, "Room 3", 68); - CCS::Thermostat_var ts4 = ctrl->create_thermostat(34, "Room 3", 68); - CCS::Thermostat_var ts5 = ctrl->create_thermostat(36, "Room 3", 48); - cout << t->location() << endl; - cout << ts->location() << endl; - cout << ts2->location() << endl; - t->remove(); - - list = ctrl->list(); - // Show details for each device. - for (CORBA::ULong i = 0; i < list->length(); i++) - cout << list[i]; - cout << endl; - - // Change the location of first device in the list - CCS::AssetType anum = list[0]->asset_num(); - cout << "Changing location of device " - << anum << "." << endl; - list[0]->location("Earth"); - // Check that the location was updated - cout << "New details for device " - << anum << " are:" << endl; - cout << list[0] << endl; - - // Find first thermostat in list. - CCS::Thermostat_var tmstat; - for ( CORBA::ULong i = 0; - i < list->length() && CORBA::is_nil(tmstat.in()); - i++) { - tmstat = CCS::Thermostat::_narrow(list[i]); - } - - // Check that we found a thermostat on the list. - if (CORBA::is_nil(tmstat.in())) { - cout << "No thermostat devices in list." << endl; - } else { - // Set temperature of thermostat to - // 50 degrees (should work). - set_temp(tmstat.inout(), 50); - cout << endl; - - // Set temperature of thermostat to - // -10 degrees (should fail). - set_temp(tmstat.inout(), -10); - } - - // Look for device in Rooms Earth and HAL. This must - // locate at least one device because we earlier changed - // the location of the first device to Room Earth. - cout << "Looking for devices in Earth and HAL." << endl; - CCS::Controller::SearchSeq ss; - ss.length(2); - ss[0].key.loc(CORBA::string_dup("Earth")); - ss[1].key.loc(CORBA::string_dup("HAL")); - ctrl->find(ss); - - // Show the devices found in that room. - for (CORBA::ULong i = 0; i < ss.length(); i++) - cout << ss[i].device.in(); // Overloaded << - cout << endl; - - // Increase the temperature of all thermostats - // by 40 degrees. First, make a new list (tss) - // containing only thermostats. - cout << "Increasing thermostats by 40 degrees." << endl; - CCS::Controller::ThermostatSeq tss; - for (CORBA::ULong i = 0; i < list->length(); i++) { - tmstat = CCS::Thermostat::_narrow(list[i]); - if (CORBA::is_nil(tmstat.in())) - continue; // Skip thermometers - len = tss.length(); - tss.length(len + 1); - tss[len] = tmstat; - } - - // Try to change all thermostats. - try { - ctrl->change(tss, 40); - } catch (const CCS::Controller::EChange &ec) { - cerr << ec; // Overloaded << - } - } catch (const CORBA::Exception & e) { - cerr << "Uncaught CORBA exception: " << e << endl; - return 1; - } catch (...) { - return 1; - } - return 0; -} |