home *** CD-ROM | disk | FTP | other *** search
- #include "stlexam.h"
- #pragma hdrstop
- /**************************************************************************
- *
- * stocks.cpp - Example program of money_punct,num_put,time_put facets.
- *
- *
- ***************************************************************************
- *
- * (c) Copyright 1994, 1998 Rogue Wave Software, Inc.
- * ALL RIGHTS RESERVED
- *
- * The software and information contained herein are proprietary to, and
- * comprise valuable trade secrets of, Rogue Wave Software, Inc., which
- * intends to preserve as trade secrets such software and information.
- * This software is furnished pursuant to a written license agreement and
- * may be used, copied, transmitted, and stored only in accordance with
- * the terms of such license and with the inclusion of the above copyright
- * notice. This software and information or any other copies thereof may
- * not be provided or otherwise made available to any other person.
- *
- * Notwithstanding any other lease or license that may pertain to, or
- * accompany the delivery of, this computer software and information, the
- * rights of the Government regarding its use, reproduction and disclosure
- * are as set forth in Section 52.227-19 of the FARS Computer
- * Software-Restricted Rights clause.
- *
- * Use, duplication, or disclosure by the Government is subject to
- * restrictions as set forth in subparagraph (c)(1)(ii) of the Rights in
- * Technical Data and Computer Software clause at DFARS 252.227-7013.
- * Contractor/Manufacturer is Rogue Wave Software, Inc.,
- * P.O. Box 2328, Corvallis, Oregon 97339.
- *
- * This computer software and information is distributed with "restricted
- * rights." Use, duplication or disclosure is subject to restrictions as
- * set forth in NASA FAR SUP 18-52.227-79 (April 1985) "Commercial
- * Computer Software-Restricted Rights (April 1985)." If the Clause at
- * 18-52.227-74 "Rights in Data General" is specified in the contract,
- * then the "Alternate III" clause applies.
- *
- **************************************************************************/
-
- #include "stocks.h"
-
- locale::id StockXchange::id;
-
- #if defined(WIN32) || defined(_WIN32)
- #define US_LOCALE "us"
- #define UK_LOCALE "uk"
- #define GERMAN_LOCALE "deu"
- #define FRENCH_LOCALE "fra"
- #define JAPANESE_LOCALE "jpn"
- #else
- #define US_LOCALE "en_US"
- #define UK_LOCALE "en_UK"
- #define GERMAN_LOCALE "de"
- #define FRENCH_LOCALE "fr"
- #define JAPANESE_LOCALE "jp"
- #endif /* WIN32 */
-
- void StockXchange::localTime(ostream& os) const
- {
- struct tm timeb;
- memcpy(&timeb,tmb,sizeof(struct tm));
- char pat[] = "%b %d %X %p";
- const time_put<char,iter_type>& tp =
- #ifndef _RWSTD_NO_TEMPLATE_ON_RETURN_TYPE
- use_facet<time_put<char,iter_type> >(os.getloc());
- #else
- use_facet(os.getloc(),(time_put<char,iter_type>*)0);
- #endif
- iter_type begin(os);
- os<<"\t [";
- tp.put(begin,os,' ',&timeb,pat,pat+11);
- os<<"]"<<'\n';
- }
-
- void StockXchange::add(const string& name, double initPrice)
- {
- companyDatabase.push_front(new Company(name,initPrice));
- }
-
- bool StockXchange::put(ostream& os) const
- {
- locale loc = os.getloc();
- localTime(os); //display the local time
-
- const moneypunct<char,false>& mpunct =
- #ifndef _RWSTD_NO_TEMPLATE_ON_RETURN_TYPE
- use_facet<moneypunct<char,false> >(loc);
- #else
- use_facet(loc,(moneypunct<char,false>*)0);
- #endif
-
- const num_put<char,iter_type>& np =
- #ifndef _RWSTD_NO_TEMPLATE_ON_RETURN_TYPE
- use_facet<num_put<char,iter_type> >(loc);
- #else
- use_facet(loc,(num_put<char,iter_type>*)0);
- #endif
-
- os<<'\n';
- os<<"Company"<<"\t\t\t"<<"Initial Price"<<"\t"<<"Current Price"<<"\t"<<"Volume"<<endl;
- os<<"-------"<<"\t\t\t"<<"------------"<<"\t"<<"----------"<<"\t"<<"______"<<endl;
- os<<'\n';
-
- iter_type itbegin(os);//ostream-buf iterator
- database::const_iterator begin = companyDatabase.begin();
- database::const_iterator end = companyDatabase.end();
-
- while(begin<end)
- {
- Company *info = *begin++;
- info->updateStock();
- os<<info->companyName<<"\t\t";
- os<<mpunct.curr_symbol();
- np.put(itbegin,os,' ',info->offerPrice);
- os<<"\t\t";
- os<<mpunct.curr_symbol();
- np.put(itbegin,os,' ',info->stockPrice);
- os<<"\t\t";
- np.put(itbegin,os,' ',info->randomChange(info->stockPrice+10000));
- os<<'\n';
- }
- return 1;
-
- }
- ostream & operator<<(ostream& os, const StockXchange&)
- {
- locale loc = os.getloc();
- const StockXchange& se_facet =
- #ifndef _RWSTD_NO_TEMPLATE_ON_RETURN_TYPE
- use_facet<StockXchange >(loc);
- #else
- use_facet(loc,(StockXchange*)0);
- #endif
- se_facet.put(os);
- return os;
- }
-
-
- int main()
- {
- #ifndef _RWSTD_NO_NAMESPACE
- using namespace std;
- #endif
- #if defined(_MSC_VER)
- //to workaround a bug in msvc 5.0
- cin.rdbuf();
- #endif
- typedef pair<StockXchange*, locale> sl_pair;
- typedef deque<sl_pair*, allocator<sl_pair*> > Xchange;
- Xchange sXchange;
-
- ostream os(cout.rdbuf());
-
- //Add some hypothetical companies that went public.
- //("Company name" , "initial stock price")
-
- NewYorkStockXchange *nse = new NewYorkStockXchange;
- nse->add("Hyper Software",20.50);
- nse->add("Florida Fish",15.10);
- nse->add("Inka Inc",9.50);
- nse->add("Emory Chemicals",11.00);
-
- TokyoStockXchange* tse = new TokyoStockXchange;
- tse->add("Akiro Electronics",12.30);
-
- LondonStockXchange* lse = new LondonStockXchange;
- lse->add("Royal Beef",7.25);
- lse->add("Island Banks",34.00);
-
- FrankFurtStockXchange* fse = new FrankFurtStockXchange;
- fse->add("B\166rsen-Software",9.75);
- fse->add("M\174nchner R\174ck",19.75);
-
- ParisStockXchange* pse = new ParisStockXchange;
- pse->add("Wines Inc.",11.50);
- pse->add("Eiffel Co.",11.50);
-
- const char *p=setlocale(LC_ALL,UK_LOCALE);
- if (!p) cerr<<'\n'<<"Not a valid locale: UK_LOCALE"<<endl;
- else{
- os.imbue(locale(locale(UK_LOCALE),lse));
- sXchange.push_front(new sl_pair(pse,os.getloc()));
- os<<*lse;
- }
-
- p = setlocale(LC_ALL,US_LOCALE);
- if (!p) cerr<<'\n'<<"Not a valid locale: US_LOCALE"<<endl;
- else{
- os.imbue(locale(locale(US_LOCALE),nse));
- sXchange.push_front(new sl_pair(nse,os.getloc()));
- os<<*nse;
- }
-
- p = setlocale(LC_ALL,GERMAN_LOCALE);
- if (!p) cerr<<'\n'<<"Not a valid locale: GERMAN_LOCALE"<<endl;
- else{
- os.imbue(locale(locale(GERMAN_LOCALE),fse));
- sXchange.push_front(new sl_pair(fse,os.getloc()));
- os<<*fse;
- }
-
- p = setlocale(LC_ALL,FRENCH_LOCALE);
- if (!p) cerr<<'\n'<<"Not a valid locale: FRENCH_LOCALE"<<endl;
- else{
- os.imbue(locale(locale(FRENCH_LOCALE),pse));
- sXchange.push_front(new sl_pair(pse,os.getloc()));
- os<<*pse;
- }
-
- p = setlocale(LC_ALL,JAPANESE_LOCALE);
- if (!p) cerr<<'\n'<<"Not a valid locale: JAPANESE_LOCALE"<<endl;
- else{
- os.imbue(locale(locale(JAPANESE_LOCALE),tse));
- sXchange.push_front(new sl_pair(tse,os.getloc()));
- os<<*tse;
- }
-
- char q = 0;
- for(;;)
- {
- cout<<'\n'<<"Want to see another quote [enter 'q' to quit] ?";
- cin>>q;
- if(q!='q')
- {
- Xchange::const_iterator it_begin = sXchange.begin();
- Xchange::const_iterator it_end = sXchange.end();
- while(it_begin<it_end)
- {
- os.imbue((*it_begin)->second);
- os<<(*(*it_begin)->first);
- it_begin++;
- }
- } else break;
- }
- return 0;
- }
-
-
-
-
-
-
-