summaryrefslogtreecommitdiffstats
path: root/perl-install/c/stuff.xs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-01-15 21:18:00 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-01-15 21:18:00 +0000
commitb62b2f3dc75d15d570344656f950502afeb2dc8d (patch)
tree21437772d3da2b4743788d70cf97e25887d5197a /perl-install/c/stuff.xs.pm
parent936db376c2f856166a9cbb52268bb751ac2745d8 (diff)
downloaddrakx-backup-do-not-use-b62b2f3dc75d15d570344656f950502afeb2dc8d.tar
drakx-backup-do-not-use-b62b2f3dc75d15d570344656f950502afeb2dc8d.tar.gz
drakx-backup-do-not-use-b62b2f3dc75d15d570344656f950502afeb2dc8d.tar.bz2
drakx-backup-do-not-use-b62b2f3dc75d15d570344656f950502afeb2dc8d.tar.xz
drakx-backup-do-not-use-b62b2f3dc75d15d570344656f950502afeb2dc8d.zip
encrypted filesystem handling:
- using losetup - add "Options" for partitions in diskdrake (expert mode)
Diffstat (limited to 'perl-install/c/stuff.xs.pm')
-rw-r--r--perl-install/c/stuff.xs.pm42
1 files changed, 0 insertions, 42 deletions
diff --git a/perl-install/c/stuff.xs.pm b/perl-install/c/stuff.xs.pm
index b57b471e2..59d8fe232 100644
--- a/perl-install/c/stuff.xs.pm
+++ b/perl-install/c/stuff.xs.pm
@@ -413,48 +413,6 @@ kernel_version()
RETVAL
int
-set_loop(dev_fd, file)
- int dev_fd
- char *file
- CODE:
- RETVAL = 0;
-{
- struct loop_info loopinfo;
- int file_fd = open(file, O_RDWR);
-
- if (file_fd < 0) return;
-
- memset(&loopinfo, 0, sizeof(loopinfo));
- strncpy(loopinfo.lo_name, file, LO_NAME_SIZE);
- loopinfo.lo_name[LO_NAME_SIZE - 1] = 0;
-
- if (ioctl(dev_fd, LOOP_SET_FD, file_fd) < 0) return;
- if (ioctl(dev_fd, LOOP_SET_STATUS, &loopinfo) < 0) {
- ioctl(dev_fd, LOOP_CLR_FD, 0);
- return;
- }
- close(file_fd);
- RETVAL = 1;
-}
- OUTPUT:
- RETVAL
-
-int
-del_loop(device)
- char *device
- CODE:
- RETVAL = 0;
-{
- int fd;
- if ((fd = open(device, O_RDONLY)) < 0) return;
- if (ioctl(fd, LOOP_CLR_FD, 0) < 0) return;
- close(fd);
- RETVAL = 1;
-}
- OUTPUT:
- RETVAL
-
-int
prom_open()
void