Archlinux.fr [Forums]

Code : Tout sélectionner

 df -h
Sys. fich.     Taille Util. Dispo Uti% Monté sur
rootfs           7,4G  5,2G  1,8G  75% /
udev              10M     0   10M   0% /dev
/run              10M  212K  9,8M   3% /run
/dev/sda3        7,4G  5,2G  1,8G  75% /
shm              2,0G  240K  2,0G   1% /dev/shm
tmpfs            2,0G  8,0K  2,0G   1% /tmp
/dev/sda1         99M   18M   76M  20% /boot
/dev/sda4        458G   59G  377G  14% /home

Code : Tout sélectionner

#!/usr/bin/lua

require "posix_c"

keep_locales = {
	-- system locales
	"fr", "en", "fr_FR", "fr_FR.utf8", "fr_FR@euro",
	-- man pages
	"cat1", "cat2", "cat3", "cat3p", "cat4", "cat5", "cat6", "cat7", "cat8", "cat9", "catn",
	"man1", "man2", "man3", "man3p", "man4", "man5", "man6", "man7", "man8", "man9", "manm", "mann",
}

keep_slib = {
	-- glibc
	"libmcheck", "libbsd-compat", "libg", "librpcsvc",
	"libutil", "libresolv", "libnsl", "librt","libc",
	"libpthread_nonshared", "libm", "libBrokenLocale",
	"libcrypt", "libdl", "libc_nonshared", "libpthread",
	"libanl", "libieee", "libnsl",
	-- gcc
	"libmudflapth", "libgomp", "libmudflap", "libssp", "libssp_nonshared",
	"libsupc++", "libstdc++"
}

function cleanlocales (path)
	local entry, i

	-- Does this directory exist ?
	if posix.chdir (path) == nil then
		print(path.. " does not exist")
		return
	end

	-- decide to keep locale or not
	local keep = function (locale)
		for i=1,#keep_locales do
			if locale == keep_locales[i] then
				return true
			end
		end
		return false
	end

	for entry in posix.files (path) do
		if posix.stat(entry).type == "directory" and (entry ~= "." and entry ~= "..") then
			if not keep (entry) then
				print("removing ".. path .. entry)
				os.execute ("rm -rf ".. path..entry)
			end
		end
	end
end

function delete_staticlibs (path)
	local entry, i
	local size = 0

	-- Does this directory exist ?
	if posix.chdir (path) == nil then
		print(path.. " does not exist")
		return
	end

	local keep = function (locale)
		for i=1,#keep_slib do
			if locale == keep_slib[i] then
				return true
			end
		end
		return false
	end

	for entry in posix.files (path) do
		if posix.stat(entry).type ~= "directory" and string.sub(entry,-2) == ".a" then
			if not keep (string.sub(entry, 1, -3)) then
				print("delete "..entry)
				os.execute ("rm -f ".. path..entry)
--				size = size + posix.stat(entry).size
			end
		end
	end

--	print (size .. " bytes removed")
end


cleanlocales ("/usr/share/locale/")
cleanlocales ("/usr/share/man/")
cleanlocales ("/usr/lib/locale/")
cleanlocales ("/usr/share/wesnoth/translations/")

delete_staticlibs("/usr/lib/")