1
  
2
  
3
  
4
  
5
  
6
  
7
  
8
  
9
  
10
  
11
  
12
  
13
  
14
  
15
  
16
  
17
  
18
  
19
  
20
  
21
  
22
  
23
  
24
  
25
  
26
  
27
  
28
  
29
  
30
  
31
  
32
  
33
  
34
  
35
  
36
  
37
  
38
  
39
  
40
  
41
  
42
  
43
  
44
  
45
  
46
  
47
  
48
  
49
  
50
  
51
  
52
  
53
  
54
  
55
  
56
  
57
  
58
  
59
  
60
  
61
  
62
  
63
  
64
  
65
  
66
  
67
  
68
  
69
  
70
  
71
  
72
  
73
  
74
  
75
  
76
  
77
  
78
  
79
  
80
  
81
  
82
  
83
  
84
  
85
  
86
  
87
  
88
  
/* 
 * $Id$ 
 * 
 * List the keys of a quotadb. 
 * 
 * Henrik Grubbström 1999-06-20 
 */ 
 
int main(int argc, array(string) argv) 
{ 
  Stdio.File cat = Stdio.File(); 
 
  array args = Getopt.find_all_options(argv, ({ 
    ({ "version", Getopt.NO_ARG, ({ "-v", "--version" }) }), 
    ({ "help", Getopt.NO_ARG, ({ "-h", "--help" }) }), 
  }), 1); 
 
  foreach(args, array arg) { 
    switch(arg[0]) { 
    case "help": 
      write(sprintf("Usage:\n" 
                    "\t%s [options] quotafile\n" 
                    "Options:\n" 
                    "\t-h, --help     Show usage information.\n" 
                    "\t-v, --version  Show version information.\n", 
                    argv[0])); 
      exit(0); 
      break; 
    case "version": 
      werror("$Id$\n"); 
      exit(0); 
      break; 
    } 
  } 
 
  argv = Getopt.get_args(argv, 1); 
 
  if (sizeof(argv) < 2) { 
    werror(sprintf("Too few arguments to %s\n", argv[0])); 
    exit(1); 
  } else if (sizeof(argv) > 2) { 
    werror(sprintf("Too many arguments to %s\n", argv[0])); 
    exit(1); 
  } 
 
  if (!cat->open(argv[1] + ".cat", "r")) { 
    werror(sprintf("Failed to open file %O\n", argv[1] + ".cat")); 
    exit(1); 
  } 
 
  string buf = ""; 
 
  while(1) { 
    int len; 
    string data = cat->read(8192); 
 
    if (data == "") { 
      // EOF 
      if (buf != "") { 
        werror(sprintf("File truncated. Expected %d bytes more data.\n", 
                       len - sizeof(buf))); 
        exit(1); 
      } 
      exit(0); 
    } 
    buf += data; 
 
    while(1) { 
      sscanf(buf[..3], "%4c", len); 
 
      if (len < 8) { 
        werror(sprintf("Bad entry length:%d\n", len)); 
        exit(1); 
      } 
      if (len > sizeof(buf)) { 
        // Need more data. 
        break; 
      } 
      // %4c len, %4c offset, %s key 
      data = buf[8..len-1]; 
      buf = buf[len..]; 
 
      write(data+"\n"); 
    } 
  } 
}