350 lines
6.5 KiB
C
350 lines
6.5 KiB
C
/*
|
|
* ----------------------------------------------------------------------------
|
|
* "THE BEER-WARE LICENSE" (Revision 42):
|
|
* <phk@login.dkuug.dk> wrote this file. As long as you retain this notice you
|
|
* can do whatever you want with this stuff. If we meet some day, and you think
|
|
* this stuff is worth it, you can buy me a beer in return. Poul-Henning Kamp
|
|
* ----------------------------------------------------------------------------
|
|
*
|
|
* $Id: utils.c,v 1.25 1994/11/07 04:53:23 phk Exp $
|
|
*
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <stdarg.h>
|
|
#include <unistd.h>
|
|
#include <string.h>
|
|
#include <dialog.h>
|
|
#include <errno.h>
|
|
|
|
#include <sys/file.h>
|
|
#include <sys/stat.h>
|
|
#include <sys/types.h>
|
|
#include <sys/wait.h>
|
|
#include <sys/param.h>
|
|
#include <sys/mount.h>
|
|
#include <sys/reboot.h>
|
|
#include <sys/dkbad.h>
|
|
#include <sys/disklabel.h>
|
|
|
|
#include "sysinstall.h"
|
|
|
|
void
|
|
strip_trailing_newlines(char *p)
|
|
{
|
|
int len = strlen(p);
|
|
while (len > 0 && p[len-1] == '\n')
|
|
p[--len] = '\0';
|
|
}
|
|
|
|
int strwidth(const char *p)
|
|
{
|
|
int i = 0, len;
|
|
const char *start, *s;
|
|
|
|
for (start = s = p; (s = strchr(s, '\n')) != NULL; start = ++s) {
|
|
len = s - start;
|
|
if (len > i)
|
|
i = len;
|
|
}
|
|
len = strlen(start);
|
|
if (len > i)
|
|
i = len;
|
|
return i;
|
|
}
|
|
|
|
int strheight(const char *p)
|
|
{
|
|
int i = 1;
|
|
const char *s;
|
|
|
|
for (s = p; (s = strchr(s, '\n')) != NULL; s++)
|
|
i++;
|
|
return i;
|
|
}
|
|
|
|
void
|
|
Debug(char *fmt, ...)
|
|
{
|
|
char *p;
|
|
va_list ap;
|
|
p = Malloc(2048);
|
|
va_start(ap,fmt);
|
|
vsnprintf(p, 2048, fmt, ap);
|
|
va_end(ap);
|
|
write(debug_fd,"Debug <",7);
|
|
write(debug_fd,p,strlen(p));
|
|
write(debug_fd,">\n\r",3);
|
|
free(p);
|
|
}
|
|
|
|
void
|
|
TellEm(char *fmt, ...)
|
|
{
|
|
char *p;
|
|
va_list ap;
|
|
p = Malloc(2048);
|
|
va_start(ap,fmt);
|
|
vsnprintf(p, 2048, fmt, ap);
|
|
va_end(ap);
|
|
strip_trailing_newlines(p);
|
|
write(debug_fd,"Progress <",10);
|
|
write(debug_fd,p,strlen(p));
|
|
write(debug_fd,">\n\r",3);
|
|
dialog_clear();
|
|
dialog_update();
|
|
dialog_msgbox("Progress", p, strheight(p)+2, strwidth(p)+4, 0);
|
|
free(p);
|
|
}
|
|
|
|
void
|
|
Fatal(char *fmt, ...)
|
|
{
|
|
char *p;
|
|
va_list ap;
|
|
p = Malloc(2048);
|
|
va_start(ap,fmt);
|
|
vsnprintf(p, 2048, fmt, ap);
|
|
va_end(ap);
|
|
strip_trailing_newlines(p);
|
|
if (dialog_active)
|
|
dialog_msgbox("Fatal", p, strheight(p)+4, strwidth(p)+4, 1);
|
|
else
|
|
fprintf(stderr, "Fatal -- %s\n", p);
|
|
free(p);
|
|
ExitSysinstall();
|
|
}
|
|
|
|
void
|
|
AskAbort(char *fmt, ...)
|
|
{
|
|
char *p;
|
|
va_list ap;
|
|
|
|
p = Malloc(2048);
|
|
va_start(ap,fmt);
|
|
vsnprintf(p, 2048, fmt, ap);
|
|
va_end(ap);
|
|
strcat(p, "\n\nDo you wish to abort the installation?");
|
|
if (!dialog_yesno("Abort", p, 15, 60)) {
|
|
dialog_clear();
|
|
Abort();
|
|
}
|
|
dialog_clear();
|
|
free(p);
|
|
}
|
|
|
|
void
|
|
Abort()
|
|
{
|
|
if (dialog_yesno("Exit sysinstall","\n\nAre you sure you want to quit?",
|
|
10, 40)) {
|
|
dialog_clear();
|
|
return;
|
|
}
|
|
ExitSysinstall();
|
|
}
|
|
|
|
void
|
|
ExitSysinstall()
|
|
{
|
|
if (dialog_active) {
|
|
clear();
|
|
dialog_update();
|
|
}
|
|
if (getpid() == 1) {
|
|
if (reboot(RB_AUTOBOOT) == -1)
|
|
if (dialog_active) {
|
|
clear();
|
|
dialog_msgbox(TITLE, "\n\nCan't reboot machine -- hit reset button",
|
|
5,30,0);
|
|
} else
|
|
fprintf(stderr, "Can't reboot the machine -- hit the reset button");
|
|
while(1);
|
|
} else {
|
|
if (dialog_active) {
|
|
end_dialog();
|
|
dialog_active = 0;
|
|
}
|
|
exit(0);
|
|
}
|
|
}
|
|
|
|
void *
|
|
Malloc(size_t size)
|
|
{
|
|
void *p = malloc(size);
|
|
if (!p) {
|
|
exit(7); /* XXX longjmp bad */
|
|
}
|
|
return p;
|
|
}
|
|
|
|
char *
|
|
StrAlloc(char *str)
|
|
{
|
|
char *p;
|
|
|
|
p = (char *)Malloc(strlen(str) + 1);
|
|
strcpy(p,str);
|
|
return p;
|
|
}
|
|
|
|
void
|
|
MountUfs(char *device, char *mountpoint, int do_mkdir, int flags)
|
|
{
|
|
struct ufs_args ufsargs;
|
|
char dbuf[90];
|
|
|
|
memset(&ufsargs,0,sizeof ufsargs);
|
|
|
|
if(do_mkdir && access(mountpoint,R_OK)) {
|
|
Mkdir(mountpoint);
|
|
}
|
|
|
|
strcpy(dbuf,"/dev/");
|
|
strcat(dbuf,device);
|
|
|
|
TellEm("mount %s %s",dbuf,mountpoint);
|
|
ufsargs.fspec = dbuf;
|
|
if (mount(MOUNT_UFS, mountpoint, flags, (caddr_t) &ufsargs) == -1) {
|
|
Fatal("Error mounting %s on %s : %s\n",
|
|
dbuf, mountpoint, strerror(errno));
|
|
}
|
|
}
|
|
|
|
void
|
|
Mkdir(char *ipath)
|
|
{
|
|
struct stat sb;
|
|
int final=0;
|
|
char *p,*path=StrAlloc(ipath);
|
|
|
|
Debug("mkdir(%s)",path);
|
|
p = path;
|
|
if (p[0] == '/') /* Skip leading '/'. */
|
|
++p;
|
|
for (;!final; ++p) {
|
|
if (p[0] == '\0' || (p[0] == '/' && p[1] == '\0'))
|
|
final++;
|
|
else if (p[0] != '/')
|
|
continue;
|
|
*p = '\0';
|
|
if (stat(path, &sb)) {
|
|
if (errno != ENOENT)
|
|
Fatal("Couldn't stat directory %s: %s\n",
|
|
path,strerror(errno));
|
|
Debug("mkdir(%s..)",path);
|
|
if (mkdir(path, S_IRWXU | S_IRWXG | S_IRWXO) < 0)
|
|
Fatal("Couldn't create directory %s: %s\n",
|
|
path,strerror(errno));
|
|
}
|
|
*p = '/';
|
|
}
|
|
free(path);
|
|
return;
|
|
}
|
|
|
|
void
|
|
Link(char *from, char *to)
|
|
{
|
|
TellEm("ln %s %s", from, to);
|
|
if (link(from, to) == -1)
|
|
Fatal("Couldn't create link: %s -> %s\n", from, to);
|
|
}
|
|
|
|
void
|
|
CopyFile(char *p1, char *p2)
|
|
{
|
|
char buf[BUFSIZ];
|
|
int fd1,fd2;
|
|
int i;
|
|
struct stat st;
|
|
|
|
TellEm("Copy %s to %s",p1,p2);
|
|
fd1 = open(p1,O_RDONLY);
|
|
if (fd1 < 0) Fatal("Couldn't open %s: %s\n",p1,strerror(errno));
|
|
fd2 = open(p2,O_TRUNC|O_CREAT|O_WRONLY,0200);
|
|
if (fd2 < 0) Fatal("Couldn't open %s: %s\n",p2,strerror(errno));
|
|
for(;;) {
|
|
i = read(fd1,buf,sizeof buf);
|
|
if (i > 0)
|
|
if (i != write(fd2,buf,i)) {
|
|
Fatal("Write errror on %s: %s\n",
|
|
p2,strerror(errno));
|
|
}
|
|
if (i != sizeof buf)
|
|
break;
|
|
}
|
|
fstat(fd1,&st);
|
|
fchmod(fd2,st.st_mode & 07777);
|
|
fchown(fd2,st.st_uid,st.st_gid);
|
|
close(fd1);
|
|
close(fd2);
|
|
}
|
|
|
|
u_long
|
|
PartMb(struct disklabel *lbl,int part)
|
|
{
|
|
u_long l;
|
|
l = 1024*1024/lbl->d_secsize;
|
|
return (lbl->d_partitions[part].p_size + l/2)/l;
|
|
}
|
|
|
|
void
|
|
CleanMount(int disk, int part)
|
|
{
|
|
int i = MP[disk][part];
|
|
if (Fmount[i]) {
|
|
free(Fmount[i]);
|
|
Fmount[i] = 0;
|
|
}
|
|
if (Fname[i]) {
|
|
free(Fname[i]);
|
|
Fname[i] = 0;
|
|
}
|
|
if (Ftype[i]) {
|
|
free(Ftype[i]);
|
|
Ftype[i] = 0;
|
|
}
|
|
MP[disk][part] = 0;
|
|
}
|
|
|
|
char *
|
|
SetMount(int disk, int part, char *path)
|
|
{
|
|
int k;
|
|
char buf[80];
|
|
|
|
CleanMount(disk,part);
|
|
for (k = 1; k < MAX_NO_FS; k++)
|
|
if (!Fmount[k])
|
|
break;
|
|
|
|
if (k >= MAX_NO_FS)
|
|
return "Maximum number of filesystems exceeded";
|
|
|
|
Fmount[k] = StrAlloc(path);
|
|
sprintf(buf, "%s%c", Dname[disk], part + 'a');
|
|
Fname[k] = StrAlloc(buf);
|
|
switch (Dlbl[disk]->d_partitions[part].p_fstype) {
|
|
case FS_BSDFFS:
|
|
Ftype[k] = StrAlloc("ufs");
|
|
break;
|
|
case FS_MSDOS:
|
|
Ftype[k] = StrAlloc("msdos");
|
|
break;
|
|
case FS_SWAP:
|
|
Ftype[k] = StrAlloc("swap");
|
|
break;
|
|
default:
|
|
CleanMount(disk,part);
|
|
return "Unknown filesystem-type";
|
|
}
|
|
Fsize[k] = (Dlbl[disk]->d_partitions[part].p_size+1024)/2048;
|
|
|
|
MP[disk][part] = k;
|
|
return NULL;
|
|
}
|