home *** CD-ROM | disk | FTP | other *** search
- /**
- * File:
- * run_swapon_s.scr
- * Summary:
- * SCR Agent for reading the result from "/sbin/swapon -s"
- * Access:
- * read-only
- * Authors:
- * Unknown <yast2-hacker@suse.de>
- * See:
- * anyagent
- * libscr
- * man swapon(8)
- * man swapoff(8)
- * man mkswap(8)
- * Example:
- * Read(.run.swapon_s)
- * ($["/sda2":" partition\t265064\t2632\t-1"])
- *
- * $Id: run_swapon_s.scr 13018 2003-12-11 12:52:53Z jhumpol $
- *
- * Returns a <b>map</b> of swap partitions. The key is the device file
- * (minus /dev), the value is the remaining information as string.
- */
- .run.swapon_s
-
- `ag_anyagent(
- `Description (
- (`Run("/sbin/swapon -s")),
- "\n", // Comment
- true, // read-only
- (`Tuple (
- `Choice (
- [ "/dev", `Sequence (`Name(`String("^ \t")), `Value(`String("^\n"))) ],
- [ "", `String("^\n") ]
- ),
- `Continue ("\n")
- ))
- )
- )
-