<%!

struct icm_service_info_type
{
  string protocol;
  string service;
  string hostname;
  boolean bind_to_host;
  int keep_alive;
  int proc_timeout;
  boolean active;
  boolean ext_bind;
  int	  smtp_tls;
  int     verify_client;
  int     virt_host_idx;
  string  aclfile;
  string  authmechanisms;
  string  authusers;
};

%>

<%
  int serv_count, servno;
  int nr, rc;
  string browser, fld, is_checked, op, opstr;
  string prot, serv, host;
  struct icm_service_info_type icm_serv_info[];
  string tls_string;

  browser = __icm_get_browser_type();
  serv_count = __icm_get_serv_info(icm_serv_info);
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
  <head>
    <link rel=stylesheet type="text/css" href="../public/css/controls_<%=browser%>.css">
    <link rel=stylesheet type="text/css" href="../public/css/sapbsp.css">
    <title> Active Services </title>
  </head>

  <body class="sapBdy">
    <table border=0 cellspacing=1 cellpadding=0 class="sapTbvAlt">
      <tr>
        <td class="sapTbvCellAlt" Colspan=11>
          <b><i>Active Services</i></b>
        </td>
        <td class="sapTbvCellAlt" align="right">
          <a href="javascript:parent.frames['main'].location.reload()" class="sapBtnEmph"><nobr>Refresh</nobr></a>
        </td>
      </tr>
      <tr>
        <td class="sapTbvCellAlt" width=10>
          <i>Active</i>
        </td>
        <td class="sapTbvCellAlt" width=100>
          <i>Protocol</i>
        </td>
        <td class="sapTbvCellAlt" width=100>
          <i>Services / Port</i>
        </td>
        <td class="sapTbvCellAlt" width=200>
          <i>Hostname / Port</i>
        </td>
        <td class="sapTbvCellAlt" width=80>
          <i>Keep Alive</i>
        </td>
        <td class="sapTbvCellAlt" width=80>
          <i>Proc Timeout</i>
        </td>
        <td class="sapTbvCellAlt" width=80>
          <i>Bind to host</i>
        </td>
        <td class="sapTbvCellAlt" width=80>
          <i>Ext Bind</i>
        </td>
        <td class="sapTbvCellAlt" width=80>
          <i>SMTP over TLS</i>
        </td>
        <td class="sapTbvCellAlt" width=255>
          <i>ACL file</i>
        </td>
        <td class="sapTbvCellAlt" width=100>
	  <i>Authmechanisms</i>
	</td>
	<td class="sapTbvCellAlt" width=100>
	  <i>Authusers</i>
        </td>
      </tr>
<%
	for (nr = 0; nr < serv_count; nr++)
	{
%>
      <tr>
<% if (icm_serv_info[nr].active) { %>
        <td class="sapTbvCellStd"><img src="../public/icons/s_s_okay.gif"></td>
<% } else { %>
        <td class="sapTbvCellStd">&nbsp;</td>
<% } %>
        <td class="sapTbvCellStd"><%= icm_serv_info[nr].protocol %></td>
        <td class="sapTbvCellStd"><%= icm_serv_info[nr].service %></td>
        <td class="sapTbvCellStd"><%= icm_serv_info[nr].hostname %></td>
        <td class="sapTbvCellStd"><%= icm_serv_info[nr].keep_alive %></td>
        <td class="sapTbvCellStd"><%= icm_serv_info[nr].proc_timeout %></td>
<% if (icm_serv_info[nr].bind_to_host) { %>
        <td class="sapTbvCellStd"><img src="../public/icons/s_s_okay.gif"></td>
<% } else { %>
        <td class="sapTbvCellStd">&nbsp;</td>
<% } %>
<% if (icm_serv_info[nr].ext_bind) { %>
        <td class="sapTbvCellStd"><img src="../public/icons/s_s_okay.gif"></td>
<% } else { %>
        <td class="sapTbvCellStd">&nbsp;</td>
<% } %>
        <td class="sapTbvCellStd"><%= icm_serv_info[nr].aclfile %></td>
<% if (icm_serv_info[nr].protocol == "SMTP")
	tls_string = icm_serv_info[nr].smtp_tls;
    else
	tls_string = "-";
%>
        <td class="sapTbvCellStd" align="center"><%= tls_string %></td>
        <td class="sapTbvCellStd"></td>
        <td class="sapTbvCellStd"><%= icm_serv_info[nr].authmechanisms %></td>
        <td class="sapTbvCellStd"><%= icm_serv_info[nr].authusers %></td>
      </tr>
      <%
	}
      %>
    </table>
  </body>
</html>
