amq_basic_11.pal

<?xml?>
<pal
    script = "amq_pal_gen"
    desc   = "the server MUST implement at least 2 priority levels"
    >
    This test sends two messages with increasing priority. It then waits
    for 5 seconds before consuming. The expected result is to get the
    messages in reversed order (i.e. higher priority first).

    <include filename = "amq_test_base.pal" />
    <session>
        <set name = "returning_id" value = "null" />
        <queue_declare queue = "myqueue" />
        <basic_content message_id = "id1" priority = "0" />
        <basic_publish exchange = "" routing_key = "myqueue" immediate = "0" mandatory = "1" />
        <basic_content message_id = "id2" priority = "5" />
        <basic_publish exchange = "" routing_key = "myqueue"  immediate = "0" mandatory = "1" />
        <sleep timeout = "2000" />
        <basic_consume queue = "myqueue" />
        <wait timeout = "3000" />
        <basic_arrived>
            <if name = "returning_id" test = "eq" value = "null">
                <set name = "returning_id" value = "$message_id" />
            </if>
        </basic_arrived>
        <empty>
            <abort>Messages did not come back, this is bad!</abort>
        </empty>
        <assert name = "returning_id" value = "id2" />
    </session>
</pal>