адресная книга для телефонов

От: <CGatePro_at_mx_ru>
Дата: Mon 28 Sep 2009 - 09:39:08 MSD

В результате пришлось писать самому.
Вот - может кому пригодиться.
Скрипт генерит xml ответ для телефонов Cisco. В моем случае берет записи из каталога AD, Посему фильтр по inetOrgPerson.
Запускать как wcgp скрипт.
Думаю, для Linksys адаптировать труда не составит.

entry main is     

  searchParams = NewDictionary();

  searchParams.limit = 30;
  searchParams.attributes = NewArray();
  searchParams.attributes[0] = "uid";
  searchParams.attributes[1] = "sn";
  searchParams.attributes[2] = "telephoneNumber";
  searchParams.attributes[3] = "sAMAccountName";
  searchParams.scope = "sub";

    found = DirectorySearch("$", "(objectClass=inetOrgPerson)", searchParams);

    if isDictionary(found) then
    header = "<CiscoIPPhoneDirectory>" + EOL() + " <Title>Phonebook</Title>" + EOL();

    footer = "</CiscoIPPhoneDirectory>";     body = "";
    index = 0; while index < Length(found) loop

      account = found.(found[index]).sn;
      telnum = found.(found[index]).telephoneNumber;
      name = found.(found[index]).sAMAccountName;
	body = body + "   <DirectoryEntry>" + EOL(); 
        body = body + "     <Name>" + name + "</Name>" + EOL();
        body = body + "     <Telephone>" + telnum + "</Telephone>" + EOL();
	body = body + "   </DirectoryEntry>" + EOL(); 
      index = index + 1;

    end loop;

   end if;

  SetHTTPResponseData(header + body + footer);   SetHTTPResponseType("text/xml; charset=UTF-8",""); end entry; Получено Mon Sep 28 05:37:22 2009