#!/bin/sh

. /lib/partman/definitions.sh

for dev in $DEVICES/*; do
    [ -d "$dev" ] || continue
    cd $dev
    partitions=
    open_dialog PARTITIONS
    while { read_line num id size type fs path name; [ "$id" ]; }; do
	[ "$fs" != free ] || continue
        partitions="$partitions $id,$num"
    done
    close_dialog
    
    for part in $partitions; do
        id=${part%,*}
        num=${part#*,}
	[ -f $id/method -a ! -f $id/format \
	    -a -f $id/acting_filesystem ] || continue
	filesystem=$(cat $id/acting_filesystem)
	case $filesystem in
	    ext2|fat16|fat32)
		log "Check the file system in $dev/$id"
		template=partman-basicfilesystems/progress_checking
                RET=''
                db_metaget  partman/filesystem_short/"$filesystem" description || RET=''
                [ "$RET" ] || RET="$filesystem"
		db_subst $template TYPE "$RET"
		db_subst $template PARTITION "$num"
		db_subst $template DEVICE $(humandev $(cat device))
		name_progress_bar $template
		open_dialog CHECK_FILE_SYSTEM $id
		read_line status
		close_dialog
		if [ "$status" != good ]; then
		    db_subst partman-basicfilesystems/check_failed TYPE "$filesystem"
		    db_subst partman-basicfilesystems/check_failed PARTITION "$num"
		    db_subst partman-basicfilesystems/check_failed DEVICE $(humandev $(cat device))
		    db_set partman-basicfilesystems/check_failed 'true'
		    db_input critical partman-basicfilesystems/check_failed || true
		    db_go || true
		    db_get partman-basicfilesystems/check_failed
		    if [ "$RET" = 'true' ]; then
			exit 1
		    fi
		fi
		;;
	esac
    done
done
