#!/usr/bin/perl
open(IN,"linux/kernel/Makefile") || (die "$!");
open(OUT,">linux/kernel/Makefile.new") || (die "$!");
while(<IN>) {
	s/(\s*O_OBJS\s*=)/$1 setuid_syscalls.o/o;
	print OUT $_;
	}
close(IN);
close(OUT);
rename("linux/kernel/Makefile","linux/kernel/Makefile.old") || die "$!";
rename("linux/kernel/Makefile.new","linux/kernel/Makefile") || die "$!";
open(IN,"linux/fs/Makefile") || (die "$!");
open(OUT,">linux/fs/Makefile.new") || (die "$!");
while(<IN>) {
	s/(\s*O_OBJS\s*=)/$1 setuid_filter.o/o;
	print OUT $_;
	}
close(IN);
close(OUT);
rename("linux/fs/Makefile","linux/fs/Makefile.old") || die "$!";
rename("linux/fs/Makefile.new","linux/fs/Makefile") || die "$!";
