Don't save anything that's too large, or doesn't look at least a little bit like Haskell

I've seen a few situations where people are using CodeWorld to upload and share arbitrary files. Obviously, this isn't the intended use of the platform. To fix this, I should really build a filter that rejects source that just doesn't look anything like Haskell. It's still important to allow code with errors, but if it looks like HTML or binary data, it shouldn't be saved.

At the same time, anything over a reasonable size (say, 500K? but I can look at what's there and find the right threshold) should be rejected.

この issue にはファイル、テスト、エントリーポイントが記載されていません。まず CodeWorld のアップロードおよび保存のパスを特定し、次に送信されたソースが現在どのように保存されているかを調べてください。エラーを含むコードを許容しつつ、何を Haskell らしいものとみなすかを定義し、既存のアップロードから妥当なサイズのしきい値を決め、サイズが大きすぎるもの、HTML のようなもの、バイナリの送信が拒否されることを確認してください。

索引モデルが issue の本文から書いたものです。