Keep thread names under 15 characters

lib/puma/cluster/worker.rb

@@ -34,7 +34,7 @@ def run
         Signal.trap "SIGCHLD", "DEFAULT"
 
        Thread.new do
-          Puma.set_thread_name "worker check pipe"
+          Puma.set_thread_name "wrkr check"
           @check_pipe.wait_readable
           log "! Detected parent died, dying"
           exit! 1
@@ -76,7 +76,7 @@ def run
           end
 
           Thread.new do
-            Puma.set_thread_name "worker fork pipe"
+            Puma.set_thread_name "wrkr fork"
             while (idx = @fork_pipe.gets)
               idx = idx.to_i
               if idx == -1 # stop server
@@ -114,7 +114,7 @@ def run
         while restart_server.pop
           server_thread = server.run
           stat_thread ||= Thread.new(@worker_write) do |io|
-            Puma.set_thread_name "stat payload"
+            Puma.set_thread_name "stat pld"
             base_payload = "p#{Process.pid}"
 
             while true

lib/puma/plugin.rb

@@ -64,7 +64,7 @@ def add_background(blk)
     def fire_background
       @background.each_with_index do |b, i|
         Thread.new do
-          Puma.set_thread_name "plugin background #{i}"
+          Puma.set_thread_name "plgn bg #{i}"
           b.call
         end
       end

lib/puma/runner.rb

@@ -69,7 +69,7 @@ def start_control
 
       control.binder.parse [str], self, 'Starting control server'
 
-      control.run thread_name: 'control'
+      control.run thread_name: 'ctl'
       @control = control
     end
 

lib/puma/server.rb

@@ -220,7 +220,7 @@ def pool_capacity
     # up in the background to handle requests. Otherwise requests
     # are handled synchronously.
     #
-    def run(background=true, thread_name: 'server')
+    def run(background=true, thread_name: 'srv')
       BasicSocket.do_not_reverse_lookup = true
 
       @events.fire :state, :booting

lib/puma/thread_pool.rb

@@ -102,7 +102,7 @@ def spawn_thread
       @spawned += 1
 
       th = Thread.new(@spawned) do |spawned|
-        Puma.set_thread_name '%s threadpool %03i' % [@name, spawned]
+        Puma.set_thread_name '%s tp %03i' % [@name, spawned]
         todo  = @todo
         block = @block
         mutex = @mutex

test/test_integration_cluster.rb

@@ -159,7 +159,7 @@ def test_worker_timeout
 on_worker_boot do
   Thread.new do
     sleep 1
-    Thread.list.find {|t| t.name == 'puma stat payload'}.kill
+    Thread.list.find {|t| t.name == 'puma stat pld'}.kill
   end
 end
 RUBY

test/test_thread_pool.rb

@@ -59,7 +59,7 @@ def test_thread_name
     thread_name = nil
     pool = mutex_pool(0, 1) {thread_name = Thread.current.name}
     pool << 1
-    assert_equal('puma test threadpool 001', thread_name)
+    assert_equal('puma test tp 001', thread_name)
   end
 
   def test_converts_pool_sizes