1 ouyang.jian 1.1 //%2006////////////////////////////////////////////////////////////////////////
 2                 //
 3                 // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
 4                 // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems.
 5                 // Copyright (c) 2003 BMC Software; Hewlett-Packard Development Company, L.P.;
 6                 // IBM Corp.; EMC Corporation, The Open Group.
 7                 // Copyright (c) 2004 BMC Software; Hewlett-Packard Development Company, L.P.;
 8                 // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.
 9                 // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.;
10                 // EMC Corporation; VERITAS Software Corporation; The Open Group.
11                 // Copyright (c) 2006 Hewlett-Packard Development Company, L.P.; IBM Corp.;
12                 // EMC Corporation; Symantec Corporation; The Open Group.
13                 //
14                 // Permission is hereby granted, free of charge, to any person obtaining a copy
15                 // of this software and associated documentation files (the "Software"), to
16                 // deal in the Software without restriction, including without limitation the
17                 // rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
18                 // sell copies of the Software, and to permit persons to whom the Software is
19                 // furnished to do so, subject to the following conditions:
20                 // 
21                 // THE ABOVE COPYRIGHT NOTICE AND THIS PERMISSION NOTICE SHALL BE INCLUDED IN
22 ouyang.jian 1.1 // ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED
23                 // "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
24                 // LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
25                 // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
26                 // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
27                 // ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28                 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29                 //
30                 //==============================================================================
31                 //
32                 //%/////////////////////////////////////////////////////////////////////////////
33                 
34                 #include <Pegasus/Common/Mutex.h>
35                 #include <as400_protos.h>
36                 #include "Tracer.h"
37                 #include "PaseCcsid.h"
38                 
39                 PEGASUS_NAMESPACE_BEGIN
40                 
41                 Mutex PaseCcsid::_paseCcsidMutex;
42                 
43 ouyang.jian 1.1 PaseCcsid::PaseCcsid()
44                 {
45                     PaseCcsid(819, 1208);
46                 }
47                 
48                 PaseCcsid::PaseCcsid(int to, int back)
49                     : _to(to), _back(back)
50                 {
51                     _paseCcsidMutex.lock();
52                    if (_SETCCSID(_to) == -1)
53                    {

54 mike        1.1.12.1        PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL1,

55 ouyang.jian 1.1                     String("PaseCcsid::PaseCcsid: Can not change PASE CCSID."));
56                         }
57                      }
58                      
59                      PaseCcsid::~PaseCcsid()
60                      {
61                          if (_SETCCSID(_back) == -1)
62                          {

63 mike        1.1.12.1         PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL1,

64 ouyang.jian 1.1                      String("PaseCcsid::~PaseCcsid: Can not change PASE CCSID."));
65                          }
66                          _paseCcsidMutex.unlock();
67                      }
68                      
69                      PEGASUS_NAMESPACE_END
70