1 karl  1.15 //%2004////////////////////////////////////////////////////////////////////////

 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 mike  1.7  //
10            // Permission is hereby granted, free of charge, to any person obtaining a copy

11 kumpf 1.8  // of this software and associated documentation files (the "Software"), to
12            // deal in the Software without restriction, including without limitation the
13            // rights to use, copy, modify, merge, publish, distribute, sublicense, and/or

14 mike  1.7  // sell copies of the Software, and to permit persons to whom the Software is
15            // furnished to do so, subject to the following conditions:
16            // 

17 kumpf 1.8  // THE ABOVE COPYRIGHT NOTICE AND THIS PERMISSION NOTICE SHALL BE INCLUDED IN

18 mike  1.7  // ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED
19            // "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT

20 kumpf 1.8  // LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
21            // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
22            // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN

23 mike  1.7  // ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
24            // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
25            //
26            //==============================================================================
27            //
28            // Author: Mike Brasher (mbrasher@bmc.com)
29            //

30 a.arora 1.13 // Modified By: Amit K Arora, IBM (amita@in.ibm.com)

31 mike    1.7  //
32              //%/////////////////////////////////////////////////////////////////////////////
33              
34              #include "Dir.h"

35 kumpf   1.9  #include "InternalException.h"

36 mike    1.7  
37              PEGASUS_NAMESPACE_BEGIN
38              
39              #include <direct.h>
40              
41              

42 a.arora 1.14 Dir::Dir(const String& path)

43 mike    1.7  {

44 a.arora 1.14     _dirRep.file = _findfirst((path+"/*").getCString(), &_dirRep.findData);

45 mike    1.7  

46 a.arora 1.14     if (_dirRep.file == -1)

47 mike    1.7      {
48              	_more = false;
49              	throw CannotOpenDirectory(path);
50                  }
51                  else
52              	_more = true;
53              }
54              
55              Dir::~Dir()
56              {

57 a.arora 1.14     if (_dirRep.file != -1)
58              	_findclose(_dirRep.file);

59 mike    1.7  
60              }
61              
62              const char* Dir::getName() const
63              {

64 a.arora 1.14     return _dirRep.findData.name;

65 mike    1.7  }
66              
67              void Dir::next()
68              {
69                  if (!_more)
70              	return;
71              

72 a.arora 1.14     _more = _findnext(_dirRep.file, &_dirRep.findData) == 0;

73 mike    1.7  }
74              
75              PEGASUS_NAMESPACE_END