haskell/stackage-server
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage-server.git synced 2026-01-20 16:01:55 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Add load tests for Haddock pages.

Browse Source
This commit is contained in:
Yghor Kerscher 2017-10-31 17:46:02 +01:00
parent 1e0019cee3
commit 7ab2d3f841
1 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
etc/load-testing/locustfile.py
View File

@ -71,6 +71,17 @@ class HoogleQueries(TaskSet):
def stop(self): def stop(self):
self.interrupt() self.interrupt()
class Haddock(TaskSet):
@task
def haddock(self):
_snapshot = select_snapshot()
_package = select_package()
self.client.get("/haddock/" \
+ _snapshot + "/" \
+ _package + "/" \
+ "doc-index-All.html" \
, name="/haddock/:snapshot/:package/doc-index-All.html")
@task @task
def stop(self): def stop(self):
self.interrupt() self.interrupt()
@ -134,6 +145,7 @@ class TopLevelPages(TaskSet):
class UserBehaviour(TaskSet): class UserBehaviour(TaskSet):
tasks = { tasks = {
Haddock : 10,
HoogleQueries : 5, HoogleQueries : 5,
PackageBrowser : 2, PackageBrowser : 2,
Documentation : 2, Documentation : 2,