home *** CD-ROM | disk | FTP | other *** search
- /**
- * File:
- * proc_swaps.scr
- * Summary:
- * SCR Agent for reading /proc/swaps
- * Access:
- * read
- * Authors:
- * Johannes Buchhold <jbuch@suse.de>
- *
- * Example: /proc/swaps
- * Filename Type Size Used Priority
- * /dev/hda2 partition 136544 82256 -1
- *
- * ...
- **
- * Read(.proc.swaps)
- * ([ $["file":"/dev/hda2", "type": "partition", "size":"136544",
- * "used": "82256" , "priority": "-1"],
- *
- * ...
- * ])
- *
- * $Id: proc_partitions.scr 13018 2003-12-11 12:52:53Z jhumpol $
- *
- */
- .proc.partitions
-
- `ag_anyagent(
- `Description (
- (`File("/proc/partitions")), // real file name
- "major\n", // Comment
- false, // read-only
- (`List (
- `Tuple (
- `Separator ("\t "),
- `major (`Number()),
- `Separator ("\t "),
- `minor (`Number()),
- `Separator ("\t "),
- `size (`Number()),
- `Separator ("\t "),
- `name (`String("^\n\t ")),
- `Optional (`String("^\n"))
- ),
- "\n"
- ))
- )
- )
-