diff --git a/contrib/unace b/contrib/unace
new file mode 100644
index 00000000..359a4384
--- /dev/null
+++ b/contrib/unace
@@ -0,0 +1,26 @@
+# unace(1) completion by Guillaume Rousse <rousse@ccr.jussieu.fr>
+
+_unace() 
+{
+	local cur
+
+	COMPREPLY=()
+	cur=${COMP_WORDS[COMP_CWORD]}
+
+	case "$cur" in
+	    -*)
+		COMPREPLY=( $( compgen -W '-c -c- -f -f- -o -o- -p -y -y-' -- $cur ) )
+		;;
+	    *)
+		if [ $COMP_CWORD -eq 1 ]; then
+			COMPREPLY=( $( compgen -W 'e l t v x' -- $cur ) )
+		else
+			_filedir '@(ace|ACE)'
+		fi
+		;;
+	esac
+  
+	return 0
+
+}
+complete -F _unace -o default unace
diff --git a/contrib/unrar b/contrib/unrar
new file mode 100644
index 00000000..e6f5cb18
--- /dev/null
+++ b/contrib/unrar
@@ -0,0 +1,28 @@
+# unrar(1) completion by Guillaume Rousse <rousse@ccr.jussieu.fr>
+
+_unrar() 
+{
+	local cur
+
+	COMPREPLY=()
+	cur=${COMP_WORDS[COMP_CWORD]}
+
+	case "$cur" in
+	    -*)
+		COMPREPLY=( $( compgen -W '-ad -ap -av- -c- -cfg- -cl -cu \
+		-dh -ep -f -idp -ierr -inul -kb -o+ -o- -ow -p -p- -r -ta \
+		-tb -tn -to -u -v -ver -vp -x -x@ -y' -- $cur ) )
+		;;
+	    *)
+		if [ $COMP_CWORD -eq 1 ]; then
+			COMPREPLY=( $( compgen -W 'e l lt p t v vt x' -- $cur ) )
+		else
+			_filedir '@(rar|RAR)'
+		fi
+		;;
+	esac
+  
+	return 0
+
+}
+complete -F _unrar -o default unrar