Althttpd

Check-in [f734ec8c16]
Login

Check-in [f734ec8c16]

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:In logview, add a bandwidth column to the CPU Hogs report.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | trunk
Files: files | file ages | folders
SHA3-256: f734ec8c16e15cae45c184507e99aeb94fae282ced0c48285eb7289afe90dff7
User & Date: drh 2024-04-23 20:21:25
Context
2024-04-23
20:21
In logview, add a bandwidth column to the CPU Hogs report. ... (Leaf check-in: f734ec8c16 user: drh tags: trunk)
08:14
Add xhtml mimetype, per forum request, and correct js mimetype from text/x-javascript to text/javascript. ... (check-in: d43c70d45b user: stephan tags: trunk)
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to logview.

︙︙
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206

207
208
209
210
211
212
213
214
215
216
217
218

219
220
221
222
223
224
225

proc cpu-users {} {
  set cnt 0
  wapp-trim {
    <h2>CPU Hogs</h2>
    <p>
    <table border="1" cellpadding="3" cellspacing="0">
    <tr>
    <th>IP address <th>Hits <th>CPU seconds
  }
  set ipx [wapp-param BASE_URL]/byip
  db eval {
    SELECT
      ip,
      count(*) as cnt,
      format('%12.2f',sum(t1+t2+t3+t4)*0.000001) as secs

      FROM log
    GROUP BY ip
    HAVING secs+0>1.0
    ORDER BY 3 DESC
    LIMIT 20;
  } {
     incr cnt
     wapp-trim {
       <tr>
       <td><a href='%html($ipx)?ip=%qp($ip)'>%html($ip)</a>
       <td align="right">%html($cnt)
       <td align="right">%html($secs)

    }
  }
  if {$cnt==0} {
    wapp-trim {
      <tr><td colspan=3><i>None</i>
    }
  }








|






|
>












>








192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227

proc cpu-users {} {
  set cnt 0
  wapp-trim {
    <h2>CPU Hogs</h2>
    <p>
    <table border="1" cellpadding="3" cellspacing="0">
    <tr>
    <th>IP address <th>Hits <th>CPU seconds <th>Bandwidth
  }
  set ipx [wapp-param BASE_URL]/byip
  db eval {
    SELECT
      ip,
      count(*) as cnt,
      format('%12.2f',sum(t1+t2+t3+t4)*0.000001) as secs,
      format('%,d',sum(nin+nOut)) AS io
      FROM log
    GROUP BY ip
    HAVING secs+0>1.0
    ORDER BY 3 DESC
    LIMIT 20;
  } {
     incr cnt
     wapp-trim {
       <tr>
       <td><a href='%html($ipx)?ip=%qp($ip)'>%html($ip)</a>
       <td align="right">%html($cnt)
       <td align="right">%html($secs)
       <td align="right">%html($io)
    }
  }
  if {$cnt==0} {
    wapp-trim {
      <tr><td colspan=3><i>None</i>
    }
  }
︙︙