{
    # process all information-bay directories

    use esmith::AccountsDB;
    my $a = esmith::AccountsDB->open_ro;

    $OUT .= "";

    foreach my $ibay ($a->ibays)
    {
	my $key = $ibay->key;
	my $public = $ibay->prop('PublicAccess') || 'none';
	my $name = $ibay->prop('Name');

	#------------------------------------------
	# If public access is set to none, then force the share
	# to go directly to the files subdirectory for Mac. filesharing
	# Otherwise, have the share show all 3 subfolders to give
	# html content
	#------------------------------------------

	$OUT .= "# $name\n";
	$OUT .= "/home/e-smith/files/ibays/$key";
	if ($public eq 'none')
	{
	    $OUT .= "/files";
	}
        $OUT .= "\t\"$key\"\tcnidscheme:dbd\n";
    }
}
