Main Page | Class Hierarchy | Alphabetical List | Class List | File List | Class Members | File Members

CModuleCommand.cpp

Go to the documentation of this file.
00001 /*
00002                     GNU GENERAL PUBLIC LICENSE
00003                        Version 2, June 1991
00004 
00005  Copyright (C) 1989, 1991 Free Software Foundation, Inc.
00006                        59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
00007  Everyone is permitted to copy and distribute verbatim copies
00008  of this license document, but changing it is not allowed.
00009 
00010                             Preamble
00011 
00012   The licenses for most software are designed to take away your
00013 freedom to share and change it.  By contrast, the GNU General Public
00014 License is intended to guarantee your freedom to share and change free
00015 software--to make sure the software is free for all its users.  This
00016 General Public License applies to most of the Free Software
00017 Foundation's software and to any other program whose authors commit to
00018 using it.  (Some other Free Software Foundation software is covered by
00019 the GNU Library General Public License instead.)  You can apply it to
00020 your programs, too.
00021 
00022   When we speak of free software, we are referring to freedom, not
00023 price.  Our General Public Licenses are designed to make sure that you
00024 have the freedom to distribute copies of free software (and charge for
00025 this service if you wish), that you receive source code or can get it
00026 if you want it, that you can change the software or use pieces of it
00027 in new free programs; and that you know you can do these things.
00028 
00029   To protect your rights, we need to make restrictions that forbid
00030 anyone to deny you these rights or to ask you to surrender the rights.
00031 These restrictions translate to certain responsibilities for you if you
00032 distribute copies of the software, or if you modify it.
00033 
00034   For example, if you distribute copies of such a program, whether
00035 gratis or for a fee, you must give the recipients all the rights that
00036 you have.  You must make sure that they, too, receive or can get the
00037 source code.  And you must show them these terms so they know their
00038 rights.
00039 
00040   We protect your rights with two steps: (1) copyright the software, and
00041 (2) offer you this license which gives you legal permission to copy,
00042 distribute and/or modify the software.
00043 
00044   Also, for each author's protection and ours, we want to make certain
00045 that everyone understands that there is no warranty for this free
00046 software.  If the software is modified by someone else and passed on, we
00047 want its recipients to know that what they have is not the original, so
00048 that any problems introduced by others will not reflect on the original
00049 authors' reputations.
00050 
00051   Finally, any free program is threatened constantly by software
00052 patents.  We wish to avoid the danger that redistributors of a free
00053 program will individually obtain patent licenses, in effect making the
00054 program proprietary.  To prevent this, we have made it clear that any
00055 patent must be licensed for everyone's free use or not licensed at all.
00056 
00057   The precise terms and conditions for copying, distribution and
00058 modification follow.
00059 
00060                     GNU GENERAL PUBLIC LICENSE
00061    TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
00062 
00063   0. This License applies to any program or other work which contains
00064 a notice placed by the copyright holder saying it may be distributed
00065 under the terms of this General Public License.  The "Program", below,
00066 refers to any such program or work, and a "work based on the Program"
00067 means either the Program or any derivative work under copyright law:
00068 that is to say, a work containing the Program or a portion of it,
00069 either verbatim or with modifications and/or translated into another
00070 language.  (Hereinafter, translation is included without limitation in
00071 the term "modification".)  Each licensee is addressed as "you".
00072 
00073 Activities other than copying, distribution and modification are not
00074 covered by this License; they are outside its scope.  The act of
00075 running the Program is not restricted, and the output from the Program
00076 is covered only if its contents constitute a work based on the
00077 Program (independent of having been made by running the Program).
00078 Whether that is true depends on what the Program does.
00079 
00080   1. You may copy and distribute verbatim copies of the Program's
00081 source code as you receive it, in any medium, provided that you
00082 conspicuously and appropriately publish on each copy an appropriate
00083 copyright notice and disclaimer of warranty; keep intact all the
00084 notices that refer to this License and to the absence of any warranty;
00085 and give any other recipients of the Program a copy of this License
00086 along with the Program.
00087 
00088 You may charge a fee for the physical act of transferring a copy, and
00089 you may at your option offer warranty protection in exchange for a fee.
00090 
00091   2. You may modify your copy or copies of the Program or any portion
00092 of it, thus forming a work based on the Program, and copy and
00093 distribute such modifications or work under the terms of Section 1
00094 above, provided that you also meet all of these conditions:
00095 
00096     a) You must cause the modified files to carry prominent notices
00097     stating that you changed the files and the date of any change.
00098 
00099     b) You must cause any work that you distribute or publish, that in
00100     whole or in part contains or is derived from the Program or any
00101     part thereof, to be licensed as a whole at no charge to all third
00102     parties under the terms of this License.
00103 
00104     c) If the modified program normally reads commands interactively
00105     when run, you must cause it, when started running for such
00106     interactive use in the most ordinary way, to print or display an
00107     announcement including an appropriate copyright notice and a
00108     notice that there is no warranty (or else, saying that you provide
00109     a warranty) and that users may redistribute the program under
00110     these conditions, and telling the user how to view a copy of this
00111     License.  (Exception: if the Program itself is interactive but
00112     does not normally print such an announcement, your work based on
00113     the Program is not required to print an announcement.)
00114 
00115 These requirements apply to the modified work as a whole.  If
00116 identifiable sections of that work are not derived from the Program,
00117 and can be reasonably considered independent and separate works in
00118 themselves, then this License, and its terms, do not apply to those
00119 sections when you distribute them as separate works.  But when you
00120 distribute the same sections as part of a whole which is a work based
00121 on the Program, the distribution of the whole must be on the terms of
00122 this License, whose permissions for other licensees extend to the
00123 entire whole, and thus to each and every part regardless of who wrote it.
00124 
00125 Thus, it is not the intent of this section to claim rights or contest
00126 your rights to work written entirely by you; rather, the intent is to
00127 exercise the right to control the distribution of derivative or
00128 collective works based on the Program.
00129 
00130 In addition, mere aggregation of another work not based on the Program
00131 with the Program (or with a work based on the Program) on a volume of
00132 a storage or distribution medium does not bring the other work under
00133 the scope of this License.
00134 
00135   3. You may copy and distribute the Program (or a work based on it,
00136 under Section 2) in object code or executable form under the terms of
00137 Sections 1 and 2 above provided that you also do one of the following:
00138 
00139     a) Accompany it with the complete corresponding machine-readable
00140     source code, which must be distributed under the terms of Sections
00141     1 and 2 above on a medium customarily used for software interchange; or,
00142 
00143     b) Accompany it with a written offer, valid for at least three
00144     years, to give any third party, for a charge no more than your
00145     cost of physically performing source distribution, a complete
00146     machine-readable copy of the corresponding source code, to be
00147     distributed under the terms of Sections 1 and 2 above on a medium
00148     customarily used for software interchange; or,
00149 
00150     c) Accompany it with the information you received as to the offer
00151     to distribute corresponding source code.  (This alternative is
00152     allowed only for noncommercial distribution and only if you
00153     received the program in object code or executable form with such
00154     an offer, in accord with Subsection b above.)
00155 
00156 The source code for a work means the preferred form of the work for
00157 making modifications to it.  For an executable work, complete source
00158 code means all the source code for all modules it contains, plus any
00159 associated interface definition files, plus the scripts used to
00160 control compilation and installation of the executable.  However, as a
00161 special exception, the source code distributed need not include
00162 anything that is normally distributed (in either source or binary
00163 form) with the major components (compiler, kernel, and so on) of the
00164 operating system on which the executable runs, unless that component
00165 itself accompanies the executable.
00166 
00167 If distribution of executable or object code is made by offering
00168 access to copy from a designated place, then offering equivalent
00169 access to copy the source code from the same place counts as
00170 distribution of the source code, even though third parties are not
00171 compelled to copy the source along with the object code.
00172 
00173   4. You may not copy, modify, sublicense, or distribute the Program
00174 except as expressly provided under this License.  Any attempt
00175 otherwise to copy, modify, sublicense or distribute the Program is
00176 void, and will automatically terminate your rights under this License.
00177 However, parties who have received copies, or rights, from you under
00178 this License will not have their licenses terminated so long as such
00179 parties remain in full compliance.
00180 
00181   5. You are not required to accept this License, since you have not
00182 signed it.  However, nothing else grants you permission to modify or
00183 distribute the Program or its derivative works.  These actions are
00184 prohibited by law if you do not accept this License.  Therefore, by
00185 modifying or distributing the Program (or any work based on the
00186 Program), you indicate your acceptance of this License to do so, and
00187 all its terms and conditions for copying, distributing or modifying
00188 the Program or works based on it.
00189 
00190   6. Each time you redistribute the Program (or any work based on the
00191 Program), the recipient automatically receives a license from the
00192 original licensor to copy, distribute or modify the Program subject to
00193 these terms and conditions.  You may not impose any further
00194 restrictions on the recipients' exercise of the rights granted herein.
00195 You are not responsible for enforcing compliance by third parties to
00196 this License.
00197 
00198   7. If, as a consequence of a court judgment or allegation of patent
00199 infringement or for any other reason (not limited to patent issues),
00200 conditions are imposed on you (whether by court order, agreement or
00201 otherwise) that contradict the conditions of this License, they do not
00202 excuse you from the conditions of this License.  If you cannot
00203 distribute so as to satisfy simultaneously your obligations under this
00204 License and any other pertinent obligations, then as a consequence you
00205 may not distribute the Program at all.  For example, if a patent
00206 license would not permit royalty-free redistribution of the Program by
00207 all those who receive copies directly or indirectly through you, then
00208 the only way you could satisfy both it and this License would be to
00209 refrain entirely from distribution of the Program.
00210 
00211 If any portion of this section is held invalid or unenforceable under
00212 any particular circumstance, the balance of the section is intended to
00213 apply and the section as a whole is intended to apply in other
00214 circumstances.
00215 
00216 It is not the purpose of this section to induce you to infringe any
00217 patents or other property right claims or to contest validity of any
00218 such claims; this section has the sole purpose of protecting the
00219 integrity of the free software distribution system, which is
00220 implemented by public license practices.  Many people have made
00221 generous contributions to the wide range of software distributed
00222 through that system in reliance on consistent application of that
00223 system; it is up to the author/donor to decide if he or she is willing
00224 to distribute software through any other system and a licensee cannot
00225 impose that choice.
00226 
00227 This section is intended to make thoroughly clear what is believed to
00228 be a consequence of the rest of this License.
00229 
00230   8. If the distribution and/or use of the Program is restricted in
00231 certain countries either by patents or by copyrighted interfaces, the
00232 original copyright holder who places the Program under this License
00233 may add an explicit geographical distribution limitation excluding
00234 those countries, so that distribution is permitted only in or among
00235 countries not thus excluded.  In such case, this License incorporates
00236 the limitation as if written in the body of this License.
00237 
00238   9. The Free Software Foundation may publish revised and/or new versions 
00239 of the General Public License from time to time.  Such new versions will 
00240 be similar in spirit to the present version, but may differ in detail to
00241  address new problems or concerns.
00242 
00243 Each version is given a distinguishing version number.  If the Program
00244 specifies a version number of this License which applies to it and "any
00245 later version", you have the option of following the terms and conditions 
00246 either of that version or of any later version published by the Free Software 
00247 Foundation.  If the Program does not specify a version number of this License,
00248  you may choose any version ever published by the Free Software Foundation.
00249 
00250   10. If you wish to incorporate parts of the Program into other free
00251 programs whose distribution conditions are different, write to the author to 
00252 ask for permission.  For software which is copyrighted by the Free Software 
00253 Foundation, write to the Free Software Foundation; we sometimes make 
00254 exceptions for this.  Our decision will be guided by the two goals of 
00255 preserving the free status of all derivatives of our free software and of 
00256 promoting the sharing and reuse of software generally.
00257 
00258                             NO WARRANTY
00259 
00260   11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR
00261 THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN 
00262 OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE 
00263 THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, 
00264 INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND 
00265 FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND 
00266 PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, 
00267 YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
00268 
00269   12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING 
00270 WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR 
00271 REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, 
00272 INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING 
00273 OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO 
00274 LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR 
00275 THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), 
00276 EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH 
00277 DAMAGES.
00278 
00279                      END OF TERMS AND CONDITIONS '
00280 */
00281 static const char* Copyright = "(C) Copyright Ron Fox 2002, All rights reserved";
00298 
00299 #include "CModuleCommand.h"  
00300 #include "CModuleCreator.h"
00301 #include "CReadableObject.h"
00302 #include "CReadOrder.h"
00303 #include <tcl.h>
00304 #include <algorithm>
00305 #include <assert.h>
00306 #include <TCLInterpreter.h>
00307 #include <TCLResult.h>
00308 
00309 
00310 
00314 CModuleCommand::CModuleCommand (CTCLInterpreter* pInterp,
00315                                 CDigitizerDictionary* pDictionary,
00316                                 const string&         rCommand) :
00317   CTCLProcessor(rCommand, pInterp),
00318   m_pModules(pDictionary)
00319 {
00320    Register();
00321 } 
00329  CModuleCommand::~CModuleCommand ( )
00330 {
00331  
00332 }
00333 
00334 // Functions for class CModuleCommand
00335 
00361 int 
00362 CModuleCommand::operator()(CTCLInterpreter& rInterp, 
00363                            CTCLResult& rResult, 
00364                            int nArgs, char** pArgs)  
00365 { 
00366    int status;
00367 
00368    // Skip over the 'module' string.
00369    nArgs--;
00370    pArgs++;
00371    if(nArgs <= 0) {
00372      status = TCL_ERROR;
00373      rResult = Usage();
00374    }
00375    else {
00376    
00377      string operation(*pArgs);        // First parameter.
00378      // operation is either one of the command switches or
00379      // it is the name of a module:
00380      
00381      if( operation == string("-list")) {  // list modules:
00382        nArgs--;
00383        pArgs++;    // point to next param.
00384        status = List(rInterp, rResult, nArgs, pArgs);
00385      }
00386      else if( operation == string("-delete")) { // Delete module
00387        nArgs--; 
00388        pArgs++;
00389        status = Delete(rInterp, rResult, nArgs, pArgs);
00390      }
00391      else if( operation == string("-types")) { // List types.
00392        nArgs--;
00393        pArgs++;
00394        status = ListTypes(rInterp, rResult, nArgs, pArgs);
00395      }
00396      else {                        // New module.
00397        status = Create(rInterp, rResult, nArgs, pArgs);
00398      }
00399      return status;
00400    }  
00401 }
00442 int 
00443 CModuleCommand::Create(CTCLInterpreter& rInterp, 
00444                        CTCLResult& rResult, 
00445                        int  nArgs, char** pArgs)  
00446 { 
00447    int status = TCL_OK;
00448  // Require the module name and type be present at least:
00449    
00450    if(nArgs < 2) {
00451       rResult = Usage();
00452       status  = TCL_ERROR;
00453    }
00454    else {
00455       string ModuleName(pArgs[0]);
00456       string Moduletype(pArgs[1]);
00457       
00458       // Determine if this is a duplicate module:
00459       
00460       if(DigitizerFind(ModuleName) != DigitizerEnd()) {
00461          rResult  = "Duplicate module name: ";
00462          rResult += ModuleName;
00463          status = TCL_ERROR;
00464       }
00465       else {
00466          // Locate the matching Creator:
00467         
00468         CreatorIterator i = FindCreator(Moduletype);
00469         if(i == CreatorEnd()) {
00470           rResult  = "Unable create module type: ";
00471           rResult += Moduletype;
00472           rResult += " does not have an associated creator";
00473           status = TCL_ERROR;
00474         }
00475         else {
00476           CReadableObject* pModule = (*i)->Create(rInterp,
00477                                                   rResult,
00478                                                   nArgs,
00479                                                   pArgs);
00480           if(! pModule) {
00481             rResult += "Unable to create module";
00482             status = TCL_ERROR;
00483           }
00484           else {
00485             m_pModules->DigitizerAdd(pModule);
00486           }
00487         }
00488       }
00489    }
00490    return status;
00491 }  
00492 
00527 int 
00528 CModuleCommand::List(CTCLInterpreter& rInterp, 
00529                      CTCLResult& rResult, 
00530                      int nArgs, char** pArgs)  
00531 { 
00532    int nStatus = TCL_OK;
00533    // Figure out the match
00534    // pattern.  If none is supplied, it's *.
00535    
00536    char* pPattern = "*";
00537    if(nArgs > 1) {
00538       rResult =  "Too many parameters: \n";
00539       rResult += Usage();
00540       nStatus = TCL_ERROR;
00541    }
00542    else {                      
00543       if(nArgs) {             // This is really exactly one parameter : pattern.
00544         pPattern = *pArgs;    // Update the pattern.
00545       }
00546          
00547       // Next iterate through the modules in the map
00548       // adding appropriate modules to the list>
00549       // Note that an empty list is an acceptable result.
00550       
00551       ListGatherer gather(rResult, pPattern);
00552       for_each(DigitizerBegin(), DigitizerEnd(),
00553                gather);
00554    }
00555    return nStatus;
00556 }  
00557 
00588 int 
00589 CModuleCommand::Delete(CTCLInterpreter& rInterp, 
00590                        CTCLResult& rResult, 
00591                        int nArgs, char** pArgs)  
00592 {
00593    int nStatus = TCL_OK;
00594    
00595    // first validate the syntax.  There should only be
00596    // one parameter and that will be a module name:
00597    
00598   if(nArgs != 1)  {
00599       rResult  = "Extra parameters following module -delete \n";
00600       rResult += Usage();
00601       nStatus  = TCL_ERROR;
00602    }
00603    else {
00604       string sName(*pArgs);            // Name to delete.
00605       CDigitizerDictionary::ModuleIterator p = DigitizerFind(sName);
00606       if(p == DigitizerEnd()) {
00607          nStatus  = TCL_ERROR;
00608          rResult  = sName;
00609          rResult += ": Module does not exist";
00610       }
00611       else {
00612 
00613          // Remove the module from the map and...
00614 
00615          CReadableObject* pModule = p->second;
00616          assert(pModule);       // Better be non-null!!
00617          m_pModules->Remove(p);
00618          pModule->OnDelete();   // This unlinks it from any reader.
00619          delete pModule;        // Destroy it.
00620       }
00621    }
00622    return nStatus;
00623 }
00624 
00654 int 
00655 CModuleCommand::ListTypes(CTCLInterpreter& rInterp, 
00656                           CTCLResult& rResult, 
00657                           int nArgs, char** pArgs)  
00658 { 
00659    int nStatus = TCL_OK;
00660 
00661    if(nArgs) {                 // No more params allowed.
00662       rResult  = "Extra parameters after module -types\n";
00663       rResult += Usage();
00664       nStatus = TCL_ERROR;
00665    }
00666    else {
00667       TypesGatherer gatherer(rResult);
00668       for_each(CreatorBegin(), CreatorEnd(),
00669                gatherer);
00670    }
00671    return nStatus;
00672 }  
00673 
00685 void 
00686 CModuleCommand::AddCreator(CModuleCreator* pCreator)  
00687 {
00688   if(pCreator) {
00689     m_Creators.push_back(pCreator);
00690   }
00691 }
00695 CModuleCommand::CreatorIterator 
00696 CModuleCommand::CreatorBegin()
00697 {
00698    return m_Creators.begin();
00699 }
00703 CModuleCommand::CreatorIterator 
00704 CModuleCommand::CreatorEnd()
00705 {
00706    return m_Creators.end();
00707 }
00711 int             
00712 CModuleCommand::CreatorSize()
00713 {
00714    return m_Creators.size();
00715 }
00720 CDigitizerDictionary::ModuleIterator 
00721 CModuleCommand::DigitizerBegin()
00722 {
00723    return m_pModules->DigitizerBegin();
00724 }
00729 CDigitizerDictionary::ModuleIterator 
00730 CModuleCommand::DigitizerEnd()
00731 {
00732    return m_pModules->DigitizerEnd();
00733 }
00737 int               
00738 CModuleCommand::DigitizerSize()
00739 {
00740    return m_pModules->DigitizerSize();
00741 }
00745 string 
00746 CModuleCommand::Usage()
00747 {
00748    string usage("Usage: \n");
00749    string cmd = getCommandName();
00750    usage += "\t\t Create a module: \n\n";
00751    usage += '\t';
00752    usage += cmd;
00753    usage += " name type ?config_params...? \n";
00754    usage += "\t\t List modules whose names match a pattern\n\n";
00755    usage += "\t";
00756    usage += cmd;
00757    usage += "  -list ?pattern?\n";
00758    usage += "\t\t Delete a module\n\n";
00759    usage += "\t";
00760    usage += cmd;
00761    usage += "  -delete name\n";
00762    usage += "\t\t List types of modules that can be created\n\n";
00763    usage += "\t";
00764    usage += cmd;
00765    usage += "  -types\n";
00766    
00767    return usage;
00768 }
00769 
00778 CModuleCommand::CreatorIterator
00779 CModuleCommand::FindCreator(const string& ModuleType)
00780 {
00781   CreatorIterator i = CreatorBegin();
00782   while (i != CreatorEnd()) {
00783     if((*i)->getModuleType() == ModuleType) {
00784       break;
00785     }
00786     i++;
00787   }
00788   return i;
00789 
00790 }
00791 //  Implementation of local classes:
00792 
00793 
00794 // ListGatherer:
00795 
00796 void 
00797 CModuleCommand::ListGatherer::operator()(pair<string,CReadableObject*>p)
00798 {
00799   string name((p.first));
00800   CReadableObject* pModule = p.second;
00801   assert(pModule);
00802   string type(pModule->getType());
00803   if(Tcl_StringMatch(name.c_str(), m_pMatch)) {
00804     string element(name);
00805     element += " ";
00806     element += type;
00807     m_rResult.AppendElement(element.c_str());
00808   }
00809 }
00810 //   TypesGatherer:
00811 
00812 void
00813 CModuleCommand::TypesGatherer::operator()(CModuleCreator* pModule)
00814 {
00815   assert(pModule);
00816   m_rResult += pModule->getModuleType();
00817   m_rResult += "\t-\t";
00818   m_rResult += pModule->Help();
00819   m_rResult += "\n";
00820 }

Generated on Fri Mar 12 13:04:04 2004 for Scripted Readout by doxygen 1.3.4