{
    # process all information-bay directories

    use esmith::AccountsDB;
    my $adb = esmith::AccountsDB->open_ro();

    my $result = "";

    foreach my $ibay ($adb->ibays)
    {
	my %properties = $ibay->props;
	my $key = $ibay->key;
	$result .= "\n";
	$result .= "[$key]\n";
	$result .= "comment = $properties{'Name'}\n";
    if (defined($properties{'RecycleBin'}) && $properties{'RecycleBin'} eq 'enabled') {
        $result .= "vfs object = recycle:repository recycle:keeptree recycle:versions recycle:touch recycle:exclude recycle:exclude_dir\n";
        $result .= "  recycle:repository=Recycle Bin\n";
        $result .= "  recycle:keeptree=True\n";
        if(defined($properties{'KeepVersions'}) && $properties{'KeepVersions'} eq 'disabled') {
            $result .= "  recycle:versions=False\n";
        } else {
            $result .= "  recycle:versions=True\n";
        }
        $result .= "  recycle:touch=True\n";
        $result .= "  recycle:exclude=*.tmp|*.temp|*.o|*.obj|~\$*\n";
        $result .= "  recycle:exclude_dir=/tmp|/temp|/cache\n";
    }


	#---------------------------------------
	# If no public access, have the share go directly to the files
	# subdirectory (for easier drive mappings)
	# Otherwise, have the share mapping show all three subfolders
	#---------------------------------------

	if ($properties{'PublicAccess'} eq 'none')
	{
	    $result .= "path = /home/e-smith/files/ibays/$key/files\n";
	}
	else
	{
	    $result .= "path = /home/e-smith/files/ibays/$key\n";
	}

	$result .= "read only = no\n";
	$result .= "writable = yes\n";
	$result .= "printable = no\n";

	# Make the defaults really stupid
	my $fmode = "0000";

	if ($properties{'UserAccess'})
	{
	    #----------------------------------------
	    # e-smith 4.0
	    #----------------------------------------

	    if ($properties{'UserAccess'} eq 'wr-admin-rd-group')
	    {
		$fmode = "0640";
	    }
	    elsif ($properties{'UserAccess'} eq 'wr-group-rd-group')
	    {
		$fmode = "0660";
	    }
	    elsif ($properties{'UserAccess'} eq 'wr-group-rd-everyone')
	    {
		$fmode = "0664";
	    }
	    $result .= "inherit permissions = yes\n";
	}
	else
	{
	    #----------------------------------------
	    # e-smith 3.0
	    #----------------------------------------

	    my $dmode;
	    if ($properties{'WriteAccess'} eq 'admin')
	    {
		$fmode = "0640";
		$dmode = "0750";
	    }
	    else
	    {
		$fmode = "0660";
		$dmode = "0770";
	    }
	    $result .= "directory mode = $dmode\n";
	}
	$result .= "create mode = $fmode\n";
    }

    return $result;
}
