chiark / gitweb /
[PATCH] libsysfs 0.4.0 patch
[elogind.git] / libsysfs / sysfs_dir.c
1 /*
2  * sysfs_dir.c
3  *
4  * Directory utility functions for libsysfs
5  *
6  * Copyright (C) IBM Corp. 2003
7  *
8  *  This library is free software; you can redistribute it and/or
9  *  modify it under the terms of the GNU Lesser General Public
10  *  License as published by the Free Software Foundation; either
11  *  version 2.1 of the License, or (at your option) any later version.
12  *
13  *  This library is distributed in the hope that it will be useful,
14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16  *  Lesser General Public License for more details.
17  *
18  *  You should have received a copy of the GNU Lesser General Public
19  *  License along with this library; if not, write to the Free Software
20  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21  *
22  */
23 #include "libsysfs.h"
24 #include "sysfs.h"
25
26 /**
27  * sysfs_del_attribute: routine for dlist integration
28  */
29 static void sysfs_del_attribute(void *attr)
30 {
31         sysfs_close_attribute((struct sysfs_attribute *)attr);
32 }
33
34 /**
35  * sysfs_del_link: routine for dlist integration
36  */
37 static void sysfs_del_link(void *ln)
38 {
39         sysfs_close_link((struct sysfs_link *)ln);
40 }
41
42 /**
43  * sysfs_del_dir: routine for dlist integration
44  */
45 static void sysfs_del_directory(void *dir)
46 {
47         sysfs_close_directory((struct sysfs_directory *)dir);
48 }
49
50 /**
51  * dir_attribute_name_equal: compares dir attributes by name
52  * @a: attribute name for comparison
53  * @b: sysfs_attribute to be compared.
54  * returns 1 if a==b->name or 0 if not equal
55  */
56 static int dir_attribute_name_equal(void *a, void *b)
57 {
58         if (a == NULL || b == NULL)
59                 return 0;
60
61         if (strcmp(((unsigned char *)a), ((struct sysfs_attribute *)b)->name) 
62             == 0)
63                 return 1;
64         return 0;
65 }
66
67 /**
68  * dir_link_name_equal: compares dir links by name
69  * @a: link name for comparison
70  * @b: sysfs_link to be compared.
71  * returns 1 if a==b->name or 0 if not equal
72  */
73 static int dir_link_name_equal(void *a, void *b)
74 {
75         if (a == NULL || b == NULL)
76                 return 0;
77
78         if (strcmp(((unsigned char *)a), ((struct sysfs_link *)b)->name) 
79             == 0)
80                 return 1;
81         return 0;
82 }
83
84 /**
85  * dir_subdir_name_equal: compares subdirs by name
86  * @a: name of subdirectory to compare
87  * @b: sysfs_directory subdirectory to be compared
88  * returns 1 if a==b->name or 0 if not equal
89  */
90 static int dir_subdir_name_equal(void *a, void *b)
91 {
92         if (a == NULL || b == NULL)
93                 return 0;
94
95         if (strcmp(((unsigned char *)a), ((struct sysfs_directory *)b)->name)
96             == 0)
97                 return 1;
98         return 0;
99 }
100
101 /**
102  * sysfs_close_attribute: closes and cleans up attribute
103  * @sysattr: attribute to close.
104  */
105 void sysfs_close_attribute(struct sysfs_attribute *sysattr)
106 {
107         if (sysattr != NULL) {
108                 if (sysattr->value != NULL)
109                         free(sysattr->value);
110                 free(sysattr);
111         }
112 }
113
114 /**
115  * alloc_attribute: allocates and initializes attribute structure
116  * returns struct sysfs_attribute with success and NULL with error.
117  */
118 static struct sysfs_attribute *alloc_attribute(void)
119 {
120         return (struct sysfs_attribute *)
121                         calloc(1, sizeof(struct sysfs_attribute));
122 }
123
124 /**
125  * sysfs_open_attribute: creates sysfs_attribute structure
126  * @path: path to attribute.
127  * returns sysfs_attribute struct with success and NULL with error.
128  */
129 struct sysfs_attribute *sysfs_open_attribute(const unsigned char *path)
130 {
131         struct sysfs_attribute *sysattr = NULL;
132         struct stat fileinfo;
133         
134         if (path == NULL) {
135                 errno = EINVAL;
136                 return NULL;
137         }
138         sysattr = alloc_attribute();
139         if (sysattr == NULL) {
140                 dprintf("Error allocating attribute at %s\n", path);
141                 return NULL;
142         }
143         if (sysfs_get_name_from_path(path, sysattr->name, SYSFS_NAME_LEN) 
144             != 0) {
145                 dprintf("Error retrieving attribute name from path: %s\n", 
146                         path);
147                 sysfs_close_attribute(sysattr);
148                 return NULL;
149         }
150         strncpy(sysattr->path, path, SYSFS_PATH_MAX);
151         if ((stat(sysattr->path, &fileinfo)) != 0) {
152                 dprintf("Stat failed: No such attribute?\n");
153                 sysattr->method = 0;
154                 free(sysattr);
155                 sysattr = NULL;
156         } else {
157                 if (fileinfo.st_mode & S_IRUSR)
158                         sysattr->method |= SYSFS_METHOD_SHOW;
159                 if (fileinfo.st_mode & S_IWUSR)
160                         sysattr->method |= SYSFS_METHOD_STORE;
161         }
162
163         return sysattr;
164 }
165
166 /**
167  * sysfs_write_attribute: write value to the attribute
168  * @sysattr: attribute to write
169  * @new_value: value to write
170  * @len: length of "new_value"
171  * returns 0 with success and -1 with error.
172  */
173 int sysfs_write_attribute(struct sysfs_attribute *sysattr,
174                 const unsigned char *new_value, size_t len)
175 {
176         int fd;
177         int length;
178         
179         if (sysattr == NULL || new_value == NULL || len == 0) {
180                 errno = EINVAL;
181                 return -1;
182         }
183         
184         if (!(sysattr->method & SYSFS_METHOD_STORE)) {
185                 dprintf ("Store method not supported for attribute %s\n",
186                         sysattr->path);
187                 return -1;
188         }
189         if (sysattr->method & SYSFS_METHOD_SHOW) {
190                 /*
191                  * read attribute again to see if we can get an updated value 
192                  */
193                 if ((sysfs_read_attribute(sysattr)) != 0) {
194                         dprintf("Error reading attribute\n");
195                         return -1;
196                 }
197                 if ((strncmp(sysattr->value, new_value, sysattr->len)) == 0) {
198                         dprintf("Attribute %s already has the requested value %s\n",
199                                         sysattr->name, new_value);
200                         return 0;       
201                 }
202         }
203         /* 
204          * open O_WRONLY since some attributes have no "read" but only
205          * "write" permission 
206          */ 
207         if ((fd = open(sysattr->path, O_WRONLY)) < 0) {
208                 dprintf("Error reading attribute %s\n", sysattr->path);
209                 return -1;
210         }
211
212         length = write(fd, new_value, len);
213         if (length < 0) {
214                 dprintf("Error writing to the attribute %s - invalid value?\n",
215                         sysattr->name);
216                 close(fd);
217                 return -1;
218         } else if (length != len) {
219                 dprintf("Could not write %d bytes to attribute %s\n", 
220                                         len, sysattr->name);
221                 /* 
222                  * since we could not write user supplied number of bytes,
223                  * restore the old value if one available
224                  */
225                 if (sysattr->method & SYSFS_METHOD_SHOW) {
226                         length = write(fd, sysattr->value, sysattr->len);
227                         close(fd);
228                         return -1;
229                 }
230         }
231         
232         /*
233          * Validate length that has been copied. Alloc appropriate area
234          * in sysfs_attribute. Verify first if the attribute supports reading
235          * (show method). If it does not, do not bother
236          */ 
237         if (sysattr->method & SYSFS_METHOD_SHOW) {
238                 if (length != sysattr->len) {
239                         sysattr->value = (char *)realloc(sysattr->value, 
240                                                                 length);
241                         sysattr->len = length;
242                         strncpy(sysattr->value, new_value, length);
243                 } else {
244                         /*"length" of the new value is same as old one */ 
245                         strncpy(sysattr->value, new_value, length);
246                 }
247         }
248                         
249         close(fd);      
250         return 0;
251 }
252
253
254 /**
255  * sysfs_read_attribute: reads value from attribute
256  * @sysattr: attribute to read
257  * returns 0 with success and -1 with error.
258  */
259 int sysfs_read_attribute(struct sysfs_attribute *sysattr)
260 {
261         unsigned char *fbuf = NULL;
262         unsigned char *vbuf = NULL;
263         ssize_t length = 0;
264         long pgsize = 0;
265         int fd;
266
267         if (sysattr == NULL) {
268                 errno = EINVAL;
269                 return -1;
270         }
271         if (!(sysattr->method & SYSFS_METHOD_SHOW)) {
272                 dprintf("Show method not supported for attribute %s\n",
273                         sysattr->path);
274                 return -1;
275         }
276 #ifdef __KLIBC__
277         pgsize = 0x4000;
278 #else
279         pgsize = sysconf(_SC_PAGESIZE);
280 #endif
281         fbuf = (unsigned char *)calloc(1, pgsize+1);
282         if (fbuf == NULL) {
283                 dprintf("calloc failed\n");
284                 return -1;
285         }
286         if ((fd = open(sysattr->path, O_RDONLY)) < 0) {
287                 dprintf("Error reading attribute %s\n", sysattr->path);
288                 free(fbuf);
289                 return -1;
290         }
291         length = read(fd, fbuf, pgsize);
292         if (length < 0) {
293                 dprintf("Error reading from attribute %s\n", sysattr->path);
294                 close(fd);
295                 free(fbuf);
296                 return -1;
297         }
298         if (sysattr->len > 0) {
299                 if ((sysattr->len == length) && 
300                                 (!(strncmp(sysattr->value, fbuf, length)))) {
301                         close(fd);
302                         return 0;
303                 }
304                 free(sysattr->value);
305         }
306         sysattr->len = length;
307         close(fd);
308         vbuf = (unsigned char *)realloc(fbuf, length+1);
309         if (vbuf == NULL) {
310                 dprintf("realloc failed\n");
311                 free(fbuf);
312                 return -1;
313         }
314         sysattr->value = vbuf;
315
316         return 0;
317 }
318
319 /**
320  * sysfs_read_attribute_value: given path to attribute, return its value.
321  *      values can be up to a pagesize, if buffer is smaller the value will 
322  *      be truncated. 
323  * @attrpath: sysfs path to attribute
324  * @value: buffer to put value
325  * @vsize: size of value buffer
326  * returns 0 with success and -1 with error.
327  */
328 int sysfs_read_attribute_value(const unsigned char *attrpath, 
329                                         unsigned char *value, size_t vsize)
330 {
331         struct sysfs_attribute *attr = NULL;
332         size_t length = 0;
333
334         if (attrpath == NULL || value == NULL) {
335                 errno = EINVAL;
336                 return -1;
337         }
338
339         attr = sysfs_open_attribute(attrpath);
340         if (attr == NULL) {
341                 dprintf("Invalid attribute path %s\n", attrpath);
342                 errno = EINVAL;
343                 return -1;
344         }
345         if((sysfs_read_attribute(attr)) != 0 || attr->value == NULL) {
346                 dprintf("Error reading from attribute %s\n", attrpath);
347                 sysfs_close_attribute(attr);
348                 return -1;
349         }
350         length = strlen(attr->value);
351         if (length > vsize) 
352                 dprintf("Value length %d is larger than supplied buffer %d\n",
353                         length, vsize);
354         strncpy(value, attr->value, vsize);
355         sysfs_close_attribute(attr);
356
357         return 0;
358 }
359
360 /**
361  * sysfs_get_value_from_attrbutes: given a linked list of attributes and an 
362  *      attribute name, return its value
363  * @attr: attribute to search
364  * @name: name to look for
365  * returns unsigned char * value - could be NULL
366  */
367 unsigned char *sysfs_get_value_from_attributes(struct dlist *attr, 
368                                         const unsigned char *name)
369 {       
370         struct sysfs_attribute *cur = NULL;
371         
372         if (attr == NULL || name == NULL) {
373                 errno = EINVAL;
374                 return NULL;
375         }
376         dlist_for_each_data(attr, cur, struct sysfs_attribute) {
377                 if (strcmp(cur->name, name) == 0)
378                         return cur->value;
379         }
380         return NULL;
381 }
382
383 /**
384  * sysfs_close_link: closes and cleans up link.
385  * @ln: link to close.
386  */
387 void sysfs_close_link(struct sysfs_link *ln)
388 {
389         if (ln != NULL) 
390                 free(ln);
391 }
392
393 /**
394  * sysfs_close_directory: closes directory, cleans up attributes and links
395  * @sysdir: sysfs_directory to close
396  */
397 void sysfs_close_directory(struct sysfs_directory *sysdir)
398 {
399         if (sysdir != NULL) {
400                 if (sysdir->subdirs != NULL) 
401                         dlist_destroy(sysdir->subdirs);
402                 if (sysdir->links != NULL)
403                         dlist_destroy(sysdir->links);
404                 if (sysdir->attributes != NULL) 
405                         dlist_destroy(sysdir->attributes);
406                 free(sysdir);
407                 sysdir = NULL;
408         }
409 }
410
411 /**
412  * alloc_directory: allocates and initializes directory structure
413  * returns struct sysfs_directory with success or NULL with error.
414  */
415 static struct sysfs_directory *alloc_directory(void)
416 {
417         return (struct sysfs_directory *)
418                         calloc(1, sizeof(struct sysfs_directory));
419 }
420
421 /**
422  * alloc_link: allocates and initializes link structure
423  * returns struct sysfs_link with success or NULL with error.
424  */
425 static struct sysfs_link *alloc_link(void)
426 {
427         return (struct sysfs_link *)calloc(1, sizeof(struct sysfs_link));
428 }
429
430 /**
431  * sysfs_read_all_subdirs: calls sysfs_read_directory for all subdirs
432  * @sysdir: directory whose subdirs need reading.
433  * returns 0 with success and -1 with error.
434  */
435 int sysfs_read_all_subdirs(struct sysfs_directory *sysdir)
436 {
437         struct sysfs_directory *cursub = NULL;
438
439         if (sysdir == NULL) {
440                 errno = EINVAL;
441                 return -1;
442         }
443         if (sysdir->subdirs == NULL) 
444                 if ((sysfs_read_dir_subdirs(sysdir)) != 0) 
445                         return 0;
446         if (sysdir->subdirs != NULL) {
447                 dlist_for_each_data(sysdir->subdirs, cursub, 
448                                                 struct sysfs_directory) {
449                         if ((sysfs_read_dir_subdirs(cursub)) != 0) 
450                                 dprintf ("Error reading subdirectory %s\n",
451                                                 cursub->name);
452                 }
453         }
454         return 0;
455 }
456
457 /**
458  * sysfs_open_directory: opens a sysfs directory, creates dir struct, and
459  *              returns.
460  * @path: path of directory to open.
461  * returns: struct sysfs_directory * with success and NULL on error.
462  */
463 struct sysfs_directory *sysfs_open_directory(const unsigned char *path)
464 {
465         struct sysfs_directory *sdir = NULL;
466
467         if (path == NULL) {
468                 errno = EINVAL;
469                 return NULL;
470         }
471         sdir = alloc_directory();
472         if (sdir == NULL) {
473                 dprintf("Error allocating directory %s\n", path);
474                 return NULL;
475         }
476         if (sysfs_get_name_from_path(path, sdir->name, SYSFS_NAME_LEN) != 0) {
477                 dprintf("Error getting directory name from path: %s\n", path);
478                 sysfs_close_directory(sdir);
479                 return NULL;
480         }
481         strncpy(sdir->path, path, SYSFS_PATH_MAX);
482
483         return sdir;
484 }
485
486 /**
487  * sysfs_open_link: opens a sysfs link, creates struct, and returns
488  * @path: path of link to open.
489  * returns: struct sysfs_link * with success and NULL on error.
490  */
491 struct sysfs_link *sysfs_open_link(const unsigned char *linkpath)
492 {
493         struct sysfs_link *ln = NULL;
494
495         if (linkpath == NULL || strlen(linkpath) > SYSFS_PATH_MAX) {
496                 errno = EINVAL;
497                 return NULL;
498         }
499
500         ln = alloc_link();
501         if (ln == NULL) {
502                 dprintf("Error allocating link %s\n", linkpath);
503                 return NULL;
504         }
505         strcpy(ln->path, linkpath);
506         if ((sysfs_get_name_from_path(linkpath, ln->name, SYSFS_NAME_LEN)) != 0
507             || (sysfs_get_link(linkpath, ln->target, SYSFS_PATH_MAX)) != 0) {
508                 errno = EINVAL;
509                 dprintf("Invalid link path %s\n", linkpath);
510                 return NULL;
511         }
512
513         return ln;
514 }
515
516 /**
517  * sysfs_refresh_attributes: Refresh attributes list
518  * @attrlist: list of attributes to refresh
519  * Returns 0 on success, 1 on failure
520  */
521 int sysfs_refresh_attributes(struct dlist *attrlist)
522 {
523         struct sysfs_attribute *attr = NULL;
524
525         if (attrlist == NULL) {
526                 errno = EINVAL;
527                 return 1;
528         }
529         dlist_for_each_data(attrlist, attr, struct sysfs_attribute) {
530                 if (attr->method & SYSFS_METHOD_SHOW) {
531                         if ((sysfs_read_attribute(attr)) != 0) {
532                                 dprintf("Error reading attribute %s\n", 
533                                                                 attr->path);
534                                 if ((sysfs_path_is_file(attr->path)) != 0) {
535                                         dprintf("Attr %s no longer exists\n", 
536                                                                 attr->name);
537                                 }
538                         }
539                 } else {
540                         if ((sysfs_path_is_file(attr->path)) != 0) {
541                                 dprintf("Attr %s no longer exists\n", 
542                                                                 attr->name);
543                         }
544                 }
545         }
546         return 0;
547 }
548
549 /**
550  * add_attribute: open and add attribute at path to given directory
551  * @sysdir: directory to add attribute to
552  * @path: path to attribute
553  * returns 0 with success and -1 with error.
554  */
555 static int add_attribute(struct sysfs_directory *sysdir, 
556                                         const unsigned char *path)
557 {
558         struct sysfs_attribute *attr = NULL;
559
560         attr = sysfs_open_attribute(path);
561         if (attr == NULL) {
562                 dprintf("Error opening attribute %s\n", path);
563                 return -1;
564         }
565         if (attr->method & SYSFS_METHOD_SHOW) {
566                 if ((sysfs_read_attribute(attr)) != 0) {
567                         dprintf("Error reading attribute %s\n", path);
568                         sysfs_close_attribute(attr);
569                         return 0;
570                 }
571         }
572                                                 
573         if (sysdir->attributes == NULL) {
574                 sysdir->attributes = dlist_new_with_delete
575                         (sizeof(struct sysfs_attribute), sysfs_del_attribute);
576         }
577         dlist_unshift(sysdir->attributes, attr);
578
579         return 0;
580 }
581
582 /**
583  * add_subdirectory: open and add subdirectory at path to given directory
584  * @sysdir: directory to add subdir to
585  * @path: path to subdirectory
586  * returns 0 with success and -1 with error.
587  */
588 static int add_subdirectory(struct sysfs_directory *sysdir, 
589                                         const unsigned char *path)
590 {
591         struct sysfs_directory *subdir = NULL;
592
593         subdir = sysfs_open_directory(path);
594         if (subdir == NULL) {
595                 dprintf("Error opening directory %s\n", path);
596                 return -1;
597         }
598         if (sysdir->subdirs == NULL)
599                 sysdir->subdirs = dlist_new_with_delete
600                         (sizeof(struct sysfs_directory), sysfs_del_directory);
601         dlist_unshift(sysdir->subdirs, subdir);
602         return 0;
603 }
604
605 /**
606  * add_link: open and add link at path to given directory
607  * @sysdir: directory to add link to
608  * @path: path to link
609  * returns 0 with success and -1 with error.
610  */
611 static int add_link(struct sysfs_directory *sysdir, const unsigned char *path)
612 {
613         struct sysfs_link *ln = NULL;
614
615         ln = sysfs_open_link(path);
616         if (ln == NULL) {
617                 dprintf("Error opening link %s\n", path);
618                 return -1;
619         }
620         if (sysdir->links == NULL)
621                 sysdir->links = dlist_new_with_delete
622                                 (sizeof(struct sysfs_link), sysfs_del_link);
623         dlist_unshift(sysdir->links, ln);
624         return 0;
625 }
626
627 /**
628  * sysfs_read_dir_attributes: grabs attributes for the given directory
629  * @sysdir: sysfs directory to open
630  * returns 0 with success and -1 with error.
631  */
632 int sysfs_read_dir_attributes(struct sysfs_directory *sysdir)
633 {
634         DIR *dir = NULL;
635         struct dirent *dirent = NULL;
636         struct stat astats;
637         unsigned char file_path[SYSFS_PATH_MAX];
638         int retval = 0;
639
640         if (sysdir == NULL) {
641                 errno = EINVAL;
642                 return -1;
643         }
644         dir = opendir(sysdir->path);
645         if (dir == NULL) {
646                 dprintf("Error opening directory %s\n", sysdir->path);
647                 return -1;
648         }
649         while(((dirent = readdir(dir)) != NULL) && retval == 0) {
650                 if (0 == strcmp(dirent->d_name, "."))
651                          continue;
652                 if (0 == strcmp(dirent->d_name, ".."))
653                         continue;
654                 memset(file_path, 0, SYSFS_PATH_MAX);
655                 strncpy(file_path, sysdir->path, SYSFS_PATH_MAX);
656                 strcat(file_path, "/");
657                 strcat(file_path, dirent->d_name);
658                 if ((lstat(file_path, &astats)) != 0) {
659                         dprintf("stat failed\n");
660                         continue;
661                 }
662                 if (S_ISREG(astats.st_mode)) 
663                         retval = add_attribute(sysdir, file_path);
664         }
665         closedir(dir);
666         return(retval);
667 }
668
669 /**
670  * sysfs_read_dir_links: grabs links in a specific directory
671  * @sysdir: sysfs directory to read links
672  * returns 0 with success and -1 with error.
673  */
674 int sysfs_read_dir_links(struct sysfs_directory *sysdir)
675 {
676         DIR *dir = NULL;
677         struct dirent *dirent = NULL;
678         struct stat astats;
679         unsigned char file_path[SYSFS_PATH_MAX];
680         int retval = 0;
681
682         if (sysdir == NULL) {
683                 errno = EINVAL;
684                 return -1;
685         }
686         dir = opendir(sysdir->path);
687         if (dir == NULL) {
688                 dprintf("Error opening directory %s\n", sysdir->path);
689                 return -1;
690         }
691         while(((dirent = readdir(dir)) != NULL) && retval == 0) {
692                 if (0 == strcmp(dirent->d_name, "."))
693                          continue;
694                 if (0 == strcmp(dirent->d_name, ".."))
695                         continue;
696                 memset(file_path, 0, SYSFS_PATH_MAX);
697                 strncpy(file_path, sysdir->path, SYSFS_PATH_MAX);
698                 strcat(file_path, "/");
699                 strcat(file_path, dirent->d_name);
700                 if ((lstat(file_path, &astats)) != 0) {
701                         dprintf("stat failed\n");
702                         continue;
703                 }
704                 if (S_ISLNK(astats.st_mode)) {
705                         retval = add_link(sysdir, file_path);
706                         if (retval != 0)
707                                 break;
708                 }
709         }
710         closedir(dir);
711         return(retval);
712 }
713
714 /**
715  * sysfs_read_dir_subdirs: grabs subdirs in a specific directory
716  * @sysdir: sysfs directory to read links
717  * returns 0 with success and -1 with error.
718  */
719 int sysfs_read_dir_subdirs(struct sysfs_directory *sysdir)
720 {
721         DIR *dir = NULL;
722         struct dirent *dirent = NULL;
723         struct stat astats;
724         unsigned char file_path[SYSFS_PATH_MAX];
725         int retval = 0;
726
727         if (sysdir == NULL) {
728                 errno = EINVAL;
729                 return -1;
730         }
731         dir = opendir(sysdir->path);
732         if (dir == NULL) {
733                 dprintf("Error opening directory %s\n", sysdir->path);
734                 return -1;
735         }
736         while(((dirent = readdir(dir)) != NULL) && retval == 0) {
737                 if (0 == strcmp(dirent->d_name, "."))
738                          continue;
739                 if (0 == strcmp(dirent->d_name, ".."))
740                         continue;
741                 memset(file_path, 0, SYSFS_PATH_MAX);
742                 strncpy(file_path, sysdir->path, SYSFS_PATH_MAX);
743                 strcat(file_path, "/");
744                 strcat(file_path, dirent->d_name);
745                 if ((lstat(file_path, &astats)) != 0) {
746                         dprintf("stat failed\n");
747                         continue;
748                 }
749                 if (S_ISDIR(astats.st_mode))
750                         retval = add_subdirectory(sysdir, file_path);
751         }
752         closedir(dir);
753         return(retval);
754 }
755
756 /**
757  * sysfs_read_directory: grabs attributes, links, and subdirectories
758  * @sysdir: sysfs directory to open
759  * returns 0 with success and -1 with error.
760  */
761 int sysfs_read_directory(struct sysfs_directory *sysdir)
762 {
763         DIR *dir = NULL;
764         struct dirent *dirent = NULL;
765         struct stat astats;
766         unsigned char file_path[SYSFS_PATH_MAX];
767         int retval = 0;
768
769         if (sysdir == NULL) {
770                 errno = EINVAL;
771                 return -1;
772         }
773         dir = opendir(sysdir->path);
774         if (dir == NULL) {
775                 dprintf("Error opening directory %s\n", sysdir->path);
776                 return -1;
777         }
778         while(((dirent = readdir(dir)) != NULL) && retval == 0) {
779                 if (0 == strcmp(dirent->d_name, "."))
780                          continue;
781                 if (0 == strcmp(dirent->d_name, ".."))
782                         continue;
783                 memset(file_path, 0, SYSFS_PATH_MAX);
784                 strncpy(file_path, sysdir->path, SYSFS_PATH_MAX);
785                 strcat(file_path, "/");
786                 strcat(file_path, dirent->d_name);
787                 if ((lstat(file_path, &astats)) != 0) {
788                         dprintf("stat failed\n");
789                         continue;
790                 }
791                 if (S_ISDIR(astats.st_mode)) 
792                         retval = add_subdirectory(sysdir, file_path);
793
794                 else if (S_ISLNK(astats.st_mode))
795                         retval = add_link(sysdir, file_path);
796
797                 else if (S_ISREG(astats.st_mode))
798                         retval = add_attribute(sysdir, file_path);
799         }
800         closedir(dir);
801         return(retval);
802 }
803
804 /**
805  * sysfs_get_directory_attribute: retrieves attribute attrname from current
806  *      directory only
807  * @dir: directory to retrieve attribute from
808  * @attrname: name of attribute to look for
809  * returns sysfs_attribute if found and NULL if not found
810  */
811 struct sysfs_attribute *sysfs_get_directory_attribute
812                         (struct sysfs_directory *dir, unsigned char *attrname)
813 {
814         struct sysfs_attribute *attr = NULL;
815         unsigned char new_path[SYSFS_PATH_MAX];
816         
817         if (dir == NULL || attrname == NULL) {
818                 errno = EINVAL;
819                 return NULL;
820         }
821
822         if (dir->attributes == NULL) 
823                 if ((sysfs_read_dir_attributes(dir) != 0) 
824                     || (dir->attributes == NULL))
825                         return NULL;
826
827         attr = (struct sysfs_attribute *)dlist_find_custom
828                         (dir->attributes, attrname, dir_attribute_name_equal);
829         if (attr == NULL) {
830                 memset(new_path, 0, SYSFS_PATH_MAX);
831                 strcpy(new_path, dir->path);
832                 strcat(new_path, "/");
833                 strcat(new_path, attrname);
834                 if ((sysfs_path_is_file(new_path)) == 0) {
835                         if ((add_attribute(dir, new_path)) == 0) {
836                                 attr = (struct sysfs_attribute *)
837                                         dlist_find_custom(dir->attributes, 
838                                         attrname, dir_attribute_name_equal);
839                         }
840                 }
841         }
842         return attr;
843 }
844
845 /**
846  * sysfs_get_directory_link: retrieves link from one directory list
847  * @dir: directory to retrieve link from
848  * @linkname: name of link to look for
849  * returns reference to sysfs_link if found and NULL if not found
850  */
851 struct sysfs_link *sysfs_get_directory_link
852                         (struct sysfs_directory *dir, unsigned char *linkname)
853 {
854         if (dir == NULL || linkname == NULL) {
855                 errno = EINVAL;
856                 return NULL;
857         }
858         if (dir->links == NULL)
859                 if ((sysfs_read_dir_links(dir) != 0) || (dir->links == NULL))
860                         return NULL;
861
862         return (struct sysfs_link *)dlist_find_custom(dir->links,
863                 linkname, dir_link_name_equal);
864 }
865
866 /**
867  * sysfs_get_subdirectory: retrieves subdirectory by name.
868  * @dir: directory to search for subdirectory.
869  * @subname: subdirectory name to get.
870  * returns reference to subdirectory or NULL if not found
871  */
872 struct sysfs_directory *sysfs_get_subdirectory(struct sysfs_directory *dir,
873                                                 unsigned char *subname)
874 {
875         struct sysfs_directory *sub = NULL, *cursub = NULL;
876
877         if (dir == NULL || subname == NULL) {
878                 errno = EINVAL;
879                 return NULL;
880         }
881
882         if (dir->subdirs == NULL)
883                 if (sysfs_read_dir_subdirs(dir) != 0)
884                         return NULL;
885
886         sub = (struct sysfs_directory *)dlist_find_custom(dir->subdirs,
887                 subname, dir_subdir_name_equal);
888         if (sub != NULL) 
889                 return sub;
890
891         if (dir->subdirs != NULL) {
892                 dlist_for_each_data(dir->subdirs, cursub, 
893                                         struct sysfs_directory) {
894                         if (cursub->subdirs == NULL) {
895                                 if (sysfs_read_dir_subdirs(cursub) != 0)
896                                         continue;
897                                 if (cursub->subdirs == NULL)
898                                         continue;
899                         }
900                         sub = sysfs_get_subdirectory(cursub, subname);
901                         if (sub != NULL)
902                                 return sub;
903                 }
904         }
905         return NULL;
906 }
907
908 /**
909  * sysfs_get_subdirectory_link: looks through all subdirs for specific link.
910  * @dir: directory and subdirectories to search for link.
911  * @linkname: link name to get.
912  * returns reference to link or NULL if not found
913  */
914 struct sysfs_link *sysfs_get_subdirectory_link(struct sysfs_directory *dir,
915                                                 unsigned char *linkname)
916 {
917         struct sysfs_directory *cursub = NULL;
918         struct sysfs_link *ln = NULL;
919
920         if (dir == NULL || linkname == NULL) {
921                 errno = EINVAL;
922                 return NULL;
923         }
924
925         ln = sysfs_get_directory_link(dir, linkname);
926         if (ln != NULL)
927                 return ln;
928
929         if (dir->subdirs == NULL) 
930                 if (sysfs_read_dir_subdirs(dir) != 0)
931                         return NULL;
932
933         if (dir->subdirs != NULL) {
934                 dlist_for_each_data(dir->subdirs, cursub, 
935                                                 struct sysfs_directory) {
936                         ln = sysfs_get_subdirectory_link(cursub, linkname);
937                         if (ln != NULL)
938                                 return ln;
939                 }
940         }
941         return NULL;
942 }