import os

def install_dir(env, il, sbase, tbase, dir):
	fulldir = os.path.join(sbase, dir)
	l = os.listdir(fulldir)
	instdir = os.path.join(tbase, dir)
	for item in l:
		if item[0] == '.' or item[-1] in '%~' or item == 'CVS':
			continue
		elif os.path.isdir(os.path.join(fulldir, item)):
			install_dir(env, il, sbase, tbase, os.path.join(dir, item))
		else:
			inst = env.Install(instdir, os.path.join(fulldir, item))
			il.append(inst)

def install_rlibfiles(env):
	buildrlib = env['RAD_BUILDRLIB']
	if buildrlib[0] == '#':
		buildrlib = buildrlib[1:]
	sbase = os.path.join(os.getcwd(), buildrlib)
	il = []
	install_dir(env, il, sbase, env['RAD_RLIBDIR'], '')
	env.Append(RAD_RLIBINSTALL=il)


def install_manfiles(env):
	buildman = env['RAD_BUILDMAN']
	if buildman[0] == '#':
		buildman = buildman[1:]
	sbase = os.path.join(os.getcwd(), buildman)
	il = []
	install_dir(env, il, sbase, env['RAD_MANDIR'], '')
	env.Append(RAD_MANINSTALL=il)


def install_cshscript(target, source, env):
	for t,s in map(None,target,source):
		sf = open(str(s), 'r')
		tf = open(str(t), 'w')
		tf.write(sf.read())
		os.chmod(str(t), 00755)