|
|
|
#include <unistd.h>
|
|
|
|
#include <sys/stat.h>
|
|
|
|
#include "buffer.h"
|
|
|
|
#include "strerr.h"
|
|
|
|
#include "error.h"
|
|
|
|
#include "open.h"
|
|
|
|
#include "readwrite.h"
|
|
|
|
#include "exit.h"
|
|
|
|
|
|
|
|
extern void hier();
|
|
|
|
|
|
|
|
#define FATAL "install: fatal: "
|
|
|
|
|
|
|
|
extern int fdsourcedir;
|
|
|
|
static buffer ssout;
|
|
|
|
static char outbuf[BUFFER_OUTSIZE];
|
|
|
|
|
|
|
|
void z(home,subdir,file,len,uid,gid,mode)
|
|
|
|
char *home;
|
|
|
|
char *subdir;
|
|
|
|
char *file;
|
|
|
|
int len;
|
|
|
|
int uid;
|
|
|
|
int gid;
|
|
|
|
int mode;
|
|
|
|
{
|
|
|
|
int fdout;
|
|
|
|
|
|
|
|
if (chdir(home) == -1)
|
|
|
|
strerr_die4sys(111,FATAL,"unable to switch to ",home,": ");
|
|
|
|
if (chdir(subdir) == -1)
|
|
|
|
strerr_die6sys(111,FATAL,"unable to switch to ",home,"/",subdir,": ");
|
|
|
|
|
|
|
|
fdout = open_trunc(file);
|
|
|
|
if (fdout == -1)
|
|
|
|
strerr_die6sys(111,FATAL,"unable to write .../",subdir,"/",file,": ");
|
|
|
|
buffer_init(&ssout,write,fdout,outbuf,sizeof outbuf);
|
|
|
|
|
|
|
|
while (len-- > 0)
|
|
|
|
if (buffer_put(&ssout,"",1) == -1)
|
|
|
|
strerr_die6sys(111,FATAL,"unable to write .../",subdir,"/",file,": ");
|
|
|
|
|
|
|
|
if (buffer_flush(&ssout) == -1)
|
|
|
|
strerr_die6sys(111,FATAL,"unable to write .../",subdir,"/",file,": ");
|
|
|
|
if (fsync(fdout) == -1)
|
|
|
|
strerr_die6sys(111,FATAL,"unable to write .../",subdir,"/",file,": ");
|
|
|
|
if (close(fdout) == -1) /* NFS silliness */
|
|
|
|
strerr_die6sys(111,FATAL,"unable to write .../",subdir,"/",file,": ");
|
|
|
|
|
|
|
|
if (chown(file,uid,gid) == -1)
|
|
|
|
strerr_die6sys(111,FATAL,"unable to chown .../",subdir,"/",file,": ");
|
|
|
|
if (chmod(file,mode) == -1)
|
|
|
|
strerr_die6sys(111,FATAL,"unable to chmod .../",subdir,"/",file,": ");
|
|
|
|
}
|
|
|
|
|
|
|
|
int32_t main()
|
|
|
|
{
|
|
|
|
fdsourcedir = open_read(".");
|
|
|
|
if (fdsourcedir == -1)
|
|
|
|
strerr_die2sys(111,FATAL,"unable to open current directory: ");
|
|
|
|
|
|
|
|
umask(077);
|
|
|
|
hier();
|
|
|
|
_exit(0);
|
|
|
|
}
|