Subversion Repositories DevTools

Rev

Rev 6879 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6879 Rev 7063
Line 270... Line 270...
270
                <!--#include file="messages/_msg_inline.asp"-->
270
                <!--#include file="messages/_msg_inline.asp"-->
271
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
271
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
272
                <table width="100%" border="0" cellspacing="2" cellpadding="0">
272
                <table width="100%" border="0" cellspacing="2" cellpadding="0">
273
                   <%
273
                   <%
274
                   Dim bInactiveMachine : bInactiveMachine = false
274
                   Dim bInactiveMachine : bInactiveMachine = false
275
                   Dim indefinitelyPaused : indefinitelyPaused = Indefinitely_Paused()
-
 
276
                   ' Insert a warning into the page if the build daemons are indefintely paused.
-
 
277
                   If indefinitelyPaused Then %>
-
 
278
                      <tr>
-
 
279
                         <span class='err_alert'>
-
 
280
                            <font size='2'><b>WARNING: Build Daemons are all stopped - please contact an administrator</b></font>
-
 
281
                         </span>
-
 
282
                      </tr>
-
 
283
                   <%End If
-
 
284
                   %>
275
                   %>
285
                   <td width="9%" valign="top"></td>
276
                   <td width="9%" valign="top"></td>
286
                   <thead>
277
                   <thead>
287
                      <th>Daemon Host</th>
278
                      <th>Daemon Host</th>
288
                      <th>Machine Type</th>
279
                      <th>Machine Type</th>
Line 356... Line 347...
356
                      %>
347
                      %>
357
                      <tr class=border>
348
                      <tr class=border>
358
                         <td><%=rsQry("display_name")%></td>
349
                         <td><%=rsQry("display_name")%></td>
359
                         <td><%=rsQry("gbe_value")%></td>
350
                         <td><%=rsQry("gbe_value")%></td>
360
                         <td><%=Get_Daemon_Mode(daemonMode)%></td>
351
                         <td><%=Get_Daemon_Mode(daemonMode)%></td>
361
                         <td><%=Get_Run_Level(currentRunLevel, indefinitelyPaused, daemonState, bActive)%></td>
352
                         <td><%=Get_Run_Level(currentRunLevel, IndefPause, daemonState, bActive)%></td>
362
                         <td><%=Get_Package_Name(pkgName,parRtagId,pkgPvid, daemonState, bActive)%></td>
353
                         <td><%=Get_Package_Name(pkgName,parRtagId,pkgPvid, daemonState, bActive)%></td>
363
                         <td><%=estDuration%></td>
354
                         <td><%=estDuration%></td>
364
                         <td><%=lastChange%></td>
355
                         <td><%=lastChange%></td>
365
                         <td>
356
                         <td>
366
                            <%
357
                            <%
367
                            If NOT indefinitelyPaused  Then
358
                            If NOT IndefPause  Then
368
                                If bActive = "U" Then
359
                                If bActive = "U" Then
369
                                ElseIf bActive = "N" Then
360
                                ElseIf bActive = "N" Then
370
                                    Call Action_Buttons ( "Daemon Unavailable" )
361
                                    Call Action_Buttons ( "Daemon Unavailable" )
371
                                ElseIf daemonState = 0 Then
362
                                ElseIf daemonState = 0 Then
372
                                    Call Action_Buttons_State ( "Daemon Pause", canControl )
363
                                    Call Action_Buttons_State ( "Daemon Pause", canControl )
Line 395... Line 386...
395
                        </a>
386
                        </a>
396
                     <%End If%>
387
                     <%End If%>
397
                     </td>
388
                     </td>
398
                     <td>
389
                     <td>
399
                     <%
390
                     <%
400
                       If (rsQry.RecordCount > 0) AND NOT indefinitelyPaused Then
391
                       If (rsQry.RecordCount > 0) AND NOT IndefPause Then
401
                           Call Action_Buttons_State ( "Daemon Control All", objAccessControl.UserLogedIn AND canControl )
392
                           Call Action_Buttons_State ( "Daemon Control All", objAccessControl.UserLogedIn AND canControl )
402
                       Else
393
                       Else
403
                         %>&nbsp<%
394
                         %>&nbsp<%
404
                       End If
395
                       End If
405
                     %>
396
                     %>