(file) Return to DirWindows.cpp CVS log (file) (dir) Up to [Pegasus] / pegasus / src / Pegasus / Common

 1 karl  1.16 //%2005////////////////////////////////////////////////////////////////////////
 2 mike  1.7  //
 3 karl  1.15 // 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 karl  1.11 // IBM Corp.; EMC Corporation, The Open Group.
 7 karl  1.15 // Copyright (c) 2004 BMC Software; Hewlett-Packard Development Company, L.P.;
 8            // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.
 9 karl  1.16 // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.;
10            // EMC Corporation; VERITAS Software Corporation; The Open Group.
11 mike  1.7  //
12            // Permission is hereby granted, free of charge, to any person obtaining a copy
13 kumpf 1.8  // of this software and associated documentation files (the "Software"), to
14            // deal in the Software without restriction, including without limitation the
15            // rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
16 mike  1.7  // sell copies of the Software, and to permit persons to whom the Software is
17            // furnished to do so, subject to the following conditions:
18            // 
19 kumpf 1.8  // THE ABOVE COPYRIGHT NOTICE AND THIS PERMISSION NOTICE SHALL BE INCLUDED IN
20 mike  1.7  // ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED
21            // "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
22 kumpf 1.8  // LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
23            // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
24            // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
25 mike  1.7  // ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26            // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27            //
28            //==============================================================================
29            //
30            // Author: Mike Brasher (mbrasher@bmc.com)
31            //
32 a.arora 1.13 // Modified By: Amit K Arora, IBM (amita@in.ibm.com)
33 mike    1.7  //
34              //%/////////////////////////////////////////////////////////////////////////////
35              
36              #include "Dir.h"
37 kumpf   1.9  #include "InternalException.h"
38 mike    1.7  
39              PEGASUS_NAMESPACE_BEGIN
40              
41              #include <direct.h>
42              
43              
44 a.arora 1.14 Dir::Dir(const String& path)
45 mike    1.7  {
46 a.arora 1.14     _dirRep.file = _findfirst((path+"/*").getCString(), &_dirRep.findData);
47 mike    1.7  
48 a.arora 1.14     if (_dirRep.file == -1)
49 mike    1.7      {
50              	_more = false;
51              	throw CannotOpenDirectory(path);
52                  }
53                  else
54              	_more = true;
55              }
56              
57              Dir::~Dir()
58              {
59 a.arora 1.14     if (_dirRep.file != -1)
60              	_findclose(_dirRep.file);
61 mike    1.7  
62              }
63              
64              const char* Dir::getName() const
65              {
66 a.arora 1.14     return _dirRep.findData.name;
67 mike    1.7  }
68              
69              void Dir::next()
70              {
71                  if (!_more)
72              	return;
73              
74 a.arora 1.14     _more = _findnext(_dirRep.file, &_dirRep.findData) == 0;
75 mike    1.7  }
76              
77              PEGASUS_NAMESPACE_END

No CVS admin address has been configured
Powered by
ViewCVS 0.9.2