OSDN Git Service

Add Go frontend, libgo library, and Go testsuite.
[pf3gnuchains/gcc-fork.git] / libgo / go / os / dir.go
1 // Copyright 2009 The Go Authors. All rights reserved.
2 // Use of this source code is governed by a BSD-style
3 // license that can be found in the LICENSE file.
4
5 package os
6
7 import (
8         "syscall"
9         "unsafe"
10 )
11
12 func libc_dup(fd int) int __asm__ ("dup")
13 func libc_opendir(*byte) *syscall.DIR __asm__ ("opendir")
14 func libc_readdir_r(*syscall.DIR, *syscall.Dirent, **syscall.Dirent) int __asm__ ("readdir_r")
15 func libc_closedir(*syscall.DIR) int __asm__ ("closedir")
16
17 // FIXME: pathconf returns long, not int.
18 func libc_pathconf(*byte, int) int __asm__ ("pathconf")
19
20 func clen(n []byte) int {
21         for i := 0; i < len(n); i++ {
22                 if n[i] == 0 {
23                         return i
24                 }
25         }
26         return len(n)
27 }
28
29 var elen int;
30
31 // Negative count means read until EOF.
32 func (file *File) Readdirnames(count int) (names []string, err Error) {
33         if elen == 0 {
34                 var dummy syscall.Dirent;
35                 elen = (unsafe.Offsetof(dummy.Name) +
36                         libc_pathconf(syscall.StringBytePtr(file.name), syscall.PC_NAME_MAX) +
37                         1);
38         }
39
40         if file.dirinfo == nil {
41                 file.dirinfo = new(dirInfo)
42                 file.dirinfo.buf = make([]byte, elen)
43                 file.dirinfo.dir = libc_opendir(syscall.StringBytePtr(file.name))
44         }
45
46         entry_dirent := unsafe.Pointer(&file.dirinfo.buf[0]).(*syscall.Dirent)
47
48         size := count
49         if size < 0 {
50                 size = 100
51         }
52         names = make([]string, 0, size) // Empty with room to grow.
53
54         dir := file.dirinfo.dir
55         if dir == nil {
56                 return names, NewSyscallError("opendir", syscall.GetErrno())
57         }       
58
59         for count != 0 {
60                 var result *syscall.Dirent
61                 i := libc_readdir_r(dir, entry_dirent, &result)
62                 if result == nil {
63                         break
64                 }
65                 var name = string(result.Name[0:clen(result.Name[0:])])
66                 if name == "." || name == ".." {        // Useless names
67                         continue
68                 }
69                 count--
70                 names = append(names, name)
71         }
72         return names, nil
73 }