src/WINNT/afsapplib/al_browse.cpp

   1 /*
   2  * Copyright 2000, International Business Machines Corporation and others.
   3  * All Rights Reserved.
   4  *
   5  * This software has been released under the terms of the IBM Public
   6  * License.  For details, see the LICENSE file in the top-level source
   7  * directory or online at http://www.openafs.org/dl/license10.html
   8  */
   9
  10 #include <winsock2.h>
  11 #include <ws2tcpip.h>
  12
  13 extern "C" {
  14 #include <afs/param.h>
  15 #include <afs/stds.h>
  16 }
  17
  18 #include <WINNT/afsapplib.h>
  19 #include "al_dynlink.h"
  20 #include <WINNT/TaAfsAdmSvrClient.h>
  21
  22
  23 /*
  24  * DEFINITIONS ________________________________________________________________
  25  *
  26  */
  27
  28 #define cxICON              19            // size of an ACL entry icon
  29
  30 #define cyICON              16            // size of an ACL entry icon
  31
  32 #define clrTRANSPARENT      RGB(0,255,0)  // background color on ACL entry icons
  33
  34
  35 /*
  36  * BROWSE DIALOG ______________________________________________________________
  37  *
  38  */
  39
  40 typedef struct BROWSEDIALOGPARAMS {
  41    TCHAR szCell[ cchRESOURCE ];
  42    TCHAR szNamed[ cchRESOURCE ];
  43    BOOL fThisCellOnly;
  44    HIMAGELIST hImages;
  45
  46    BROWSETYPE bt;       // for what entry type do we browse?
  47
  48    HWND hDlg;
  49    HANDLE hThread;
  50    BOOL fCanStopThreadEasily;
  51    BOOL fShouldStopThread;
  52    BOOL fThreadActive;
  53    TCHAR szThreadCell[ cchRESOURCE ];
  54
  55    int idsTitle;
  56    int idsPrompt;
  57    int idsNone;
  58
  59    LPCELLLIST lpcl;
  60    UINT_PTR hCreds;
  61 } BROWSEDIALOGPARAMS, *LPBROWSEDIALOGPARAMS;
  62
  63
  64 HRESULT CALLBACK DlgProc_Browse (HWND hDlg, UINT msg, WPARAM wp, LPARAM lp);
  65 void DlgProc_Browse_OnInitDialog (HWND hDlg, BROWSEDIALOGPARAMS *pbdp);
  66 void DlgProc_Browse_OnNone (HWND hDlg, BROWSEDIALOGPARAMS *pbdp);
  67 void DlgProc_Browse_SelectedEntry (HWND hDlg, BROWSEDIALOGPARAMS *pbdp);
  68 void DlgProc_Browse_UpdateCellText (BROWSEDIALOGPARAMS *pbdp, LPTSTR pszCell);
  69
  70 BOOL DlgProc_Browse_StartSearch (BROWSEDIALOGPARAMS *pbdp, BOOL fCloseDlgIfFail);
  71 void DlgProc_Browse_StopSearch (BROWSEDIALOGPARAMS *pbdp);
  72 DWORD _stdcall DlgProc_Browse_ThreadProc (LPARAM lp);
  73
  74 void EnumeratePrincipalsRemotely (LPBROWSEDIALOGPARAMS pbdp, UINT_PTR idClient);
  75 void EnumeratePrincipalsLocally (LPBROWSEDIALOGPARAMS pbdp);
  76
  77
  78 /*
  79  *** ShowBrowseDialog
  80  *
  81  * This function presents a dialog which allows the user to select a user
  82  * or group from a list.
  83  *
  84  */
  85
  86 BOOL AfsAppLib_ShowBrowseDialog (LPBROWSEDLG_PARAMS lpp)
  87 {
  88    BROWSEDIALOGPARAMS *pbdp;
  89    BOOL rc = FALSE;
  90
  91    if ((pbdp = New (BROWSEDIALOGPARAMS)) != NULL)
  92    {
  93       memset (pbdp, 0x00, sizeof(BROWSEDIALOGPARAMS));
  94       lstrcpy (pbdp->szNamed, lpp->szNamed);
  95       lstrcpy (pbdp->szCell, lpp->szCell);
  96       pbdp->lpcl = lpp->lpcl;
  97       pbdp->bt = lpp->bt;
  98       pbdp->idsTitle = lpp->idsTitle;
  99       pbdp->idsPrompt = lpp->idsPrompt;
 100       pbdp->idsNone = lpp->idsNone;
 101       pbdp->hCreds = lpp->hCreds;
 102
 103       switch (pbdp->bt)
 104       {
 105          case btLOCAL_USER:
 106          case btLOCAL_GROUP:
 107             pbdp->fThisCellOnly = TRUE;
 108             break;
 109
 110          case btANY_USER:
 111          case btANY_GROUP:
 112             pbdp->fThisCellOnly = FALSE;
 113             break;
 114       }
 115
 116       if (ModalDialogParam (IDD_APPLIB_BROWSE, lpp->hParent, (DLGPROC)DlgProc_Browse, (LPARAM)pbdp) == IDOK)
 117       {
 118          lstrcpy (lpp->szCell, pbdp->szCell);
 119          lstrcpy (lpp->szNamed, pbdp->szNamed);
 120          rc = TRUE;
 121       }
 122
 123       Delete (pbdp);
 124    }
 125
 126    return rc;
 127 }
 128
 129
 130 /*
 131  *** DlgProc_Browse
 132  *
 133  * This is the dialog proc for the Browse Cell dialog.
 134  *
 135  */
 136
 137 #define WM_FOUNDNAME   (WM_USER +100)
 138 #define WM_THREADSTART (WM_USER +101)
 139 #define WM_THREADDONE  (WM_USER +102)
 140
 141 HRESULT CALLBACK DlgProc_Browse (HWND hDlg, UINT msg, WPARAM wp, LPARAM lp)
 142 {
 143    BROWSEDIALOGPARAMS *pbdp;
 144
 145    if (AfsAppLib_HandleHelp (IDD_APPLIB_BROWSE, hDlg, msg, wp, lp))
 146    {
 147       return FALSE;
 148    }
 149
 150    if (msg == WM_INITDIALOG)
 151    {
 152       SetWindowLongPtr (hDlg, DWLP_USER, lp);
 153    }
 154
 155    if ((pbdp = (BROWSEDIALOGPARAMS *)GetWindowLongPtr (hDlg, DWLP_USER)) != NULL)
 156    {
 157       switch (msg)
 158       {
 159          case WM_INITDIALOG:
 160             DlgProc_Browse_OnInitDialog (hDlg, pbdp);
 161             break;
 162
 163          case WM_NOTIFY:
 164             switch (((LPNMHDR)lp)->code)
 165             {
 166                case LVN_ITEMCHANGED:
 167                   if ( ((LPNM_LISTVIEW)lp)->uNewState & LVIS_SELECTED )
 168                   {
 169                      DlgProc_Browse_SelectedEntry (hDlg, pbdp);
 170                   }
 171                   break;
 172
 173                case NM_DBLCLK:
 174                   PostMessage (hDlg, WM_COMMAND, MAKELONG(IDC_BROWSE_SELECT,BN_CLICKED), (LPARAM)GetDlgItem(hDlg,IDC_BROWSE_SELECT));
 175                   break;
 176             }
 177             break;
 178
 179          case WM_DESTROY:
 180             DlgProc_Browse_StopSearch (pbdp);
 181
 182             if (pbdp->hImages != NULL)
 183             {
 184                ListView_SetImageList (GetDlgItem (hDlg, IDC_BROWSE_LIST), 0, 0);
 185                ImageList_Destroy (pbdp->hImages);
 186             }
 187             break;
 188
 189          case WM_FOUNDNAME:
 190          {
 191             LPTSTR pszName = (LPTSTR)lp;
 192             if (pszName != NULL)
 193             {
 194                HWND hList = GetDlgItem (hDlg, IDC_BROWSE_LIST);
 195                LV_AddItem (hList, 1, INDEX_SORT, 0, 0, pszName);
 196                FreeString (pszName);
 197             }
 198             break;
 199          }
 200
 201          case WM_THREADSTART:
 202          {
 203             TCHAR szText[ cchRESOURCE ];
 204             GetString (szText, IDS_BROWSE_WAITING);
 205             SetDlgItemText (pbdp->hDlg, IDC_BROWSE_STATUS, szText);
 206             break;
 207          }
 208
 209          case WM_THREADDONE:
 210          {
 211             SetDlgItemText (pbdp->hDlg, IDC_BROWSE_STATUS, TEXT(""));
 212             break;
 213          }
 214
 215          case WM_COMMAND:
 216             switch (LOWORD(wp))
 217             {
 218                case IDCANCEL:
 219                   EndDialog (hDlg, LOWORD(wp));
 220                   break;
 221
 222                case IDC_BROWSE_SELECT:
 223                   if ( (GetDlgItem (pbdp->hDlg, IDC_BROWSE_NONE) != NULL) &&
 224                        (IsDlgButtonChecked (pbdp->hDlg, IDC_BROWSE_NONE)) )
 225                   {
 226                      pbdp->szCell[0] = TEXT('\0');
 227                      pbdp->szNamed[0] = TEXT('\0');
 228                   }
 229                   else
 230                   {
 231                      GetDlgItemText (hDlg, IDC_BROWSE_CELL,  pbdp->szCell,  cchNAME);
 232                      GetDlgItemText (hDlg, IDC_BROWSE_NAMED, pbdp->szNamed, cchRESOURCE);
 233                   }
 234                   EndDialog (hDlg, IDOK);
 235                   break;
 236
 237                case IDC_BROWSE_CELL:
 238                   if (HIWORD(wp) == CBN_SELCHANGE)
 239                   {
 240                      GetDlgItemText (hDlg, IDC_BROWSE_CELL, pbdp->szCell, cchNAME);
 241                      DlgProc_Browse_StartSearch (pbdp, FALSE);
 242                   }
 243                   break;
 244
 245                case IDC_BROWSE_RESTART:
 246                   GetDlgItemText (hDlg, IDC_BROWSE_CELL, pbdp->szCell, cchNAME);
 247                   DlgProc_Browse_StartSearch (pbdp, FALSE);
 248                   PostMessage (hDlg, WM_NEXTDLGCTL, (WPARAM)GetDlgItem (hDlg, IDC_BROWSE_NAMED), (LPARAM)TRUE);
 249                   break;
 250
 251                case IDC_BROWSE_NAMED:
 252                   if (HIWORD(wp) == EN_UPDATE)  // has the user hit Enter here?
 253                   {
 254                      TCHAR szTest[ cchRESOURCE ];
 255
 256                      GetDlgItemText (hDlg, IDC_BROWSE_NAMED, szTest, cchRESOURCE);
 257
 258                      if ( (lstrlen (szTest) > 0) &&
 259                           (szTest[ lstrlen(szTest)-1 ] == TEXT('\n')) )
 260                      {
 261                         szTest[ lstrlen(szTest)-1 ] = TEXT('\0');
 262
 263                         if ( (lstrlen (szTest) > 0) &&
 264                              (szTest[ lstrlen(szTest)-1 ] == TEXT('\r')) )
 265                         {
 266                            szTest[ lstrlen(szTest)-1 ] = TEXT('\0');
 267                         }
 268
 269                         SetDlgItemText (hDlg, IDC_BROWSE_NAMED, szTest);
 270                         PostMessage (hDlg, WM_COMMAND, MAKELONG(IDC_BROWSE_SELECT,BN_CLICKED), (LPARAM)GetDlgItem(hDlg,IDC_BROWSE_SELECT));
 271                      }
 272                   }
 273                   break;
 274
 275                case IDC_BROWSE_NONE:
 276                   DlgProc_Browse_OnNone (hDlg, pbdp);
 277                   break;
 278             }
 279             break;
 280       }
 281    }
 282
 283    return FALSE;
 284 }
 285
 286
 287 /*
 288  *** DlgProc_Browse_OnInitDialog
 289  *
 290  * The WM_INITDIALOG handler for the Browse dialog.  This routine fills
 291  * in the dialog with any starting parameters, and kicks off a new
 292  * searching thread for the given cell.
 293  *
 294  */
 295
 296 void DlgProc_Browse_OnInitDialog (HWND hDlg, BROWSEDIALOGPARAMS *pbdp)
 297 {
 298    TCHAR szText[ cchRESOURCE ];
 299    LPTSTR psz;
 300
 301    pbdp->hDlg = hDlg;
 302
 303    // We'll need an imagelist, if we want icons in the listview.
 304    // This looks difficult but it's not--tis just a matter of selecting
 305    // an appropriate bitmap.
 306    //
 307    if ((pbdp->hImages = ImageList_Create (cxICON, cyICON, ILC_COLOR4 | ILC_MASK, 1, 1)) != 0)
 308    {
 309       HBITMAP bmp;
 310
 311       if (pbdp->bt == btLOCAL_USER)
 312       {
 313          bmp = LoadBitmap (APPLIB_HINST, MAKEINTRESOURCE( IDB_LOCAL_USER ));
 314       }
 315       else if (pbdp->bt == btANY_USER)
 316       {
 317          bmp = LoadBitmap (APPLIB_HINST, MAKEINTRESOURCE( IDB_FOREIGN_USER ));
 318       }
 319       else if (pbdp->bt == btLOCAL_GROUP)
 320       {
 321          bmp = LoadBitmap (APPLIB_HINST, MAKEINTRESOURCE( IDB_LOCAL_GROUP ));
 322       }
 323       else if (pbdp->bt == btANY_GROUP)
 324       {
 325          bmp = LoadBitmap (APPLIB_HINST, MAKEINTRESOURCE( IDB_FOREIGN_GROUP ));
 326       }
 327
 328       if (bmp != NULL)
 329       {
 330          ImageList_AddMasked (pbdp->hImages, bmp, clrTRANSPARENT);
 331          DeleteObject (bmp);
 332       }
 333
 334       ListView_SetImageList (GetDlgItem (hDlg, IDC_BROWSE_LIST), pbdp->hImages, LVSIL_SMALL);
 335    }
 336
 337    // There's a default pushbutton on this dialog, so that hitting
 338    // RETURN when you're in the Cell combobox will restart the search
 339    // (a default pushbutton always gets called when RETURN is hit,
 340    // unless your control traps it).  But the user doesn't want to *see*
 341    // that thing, so move it way off the dialog's client area.
 342    //
 343    RECT r;
 344    GetWindowRect (GetDlgItem (hDlg, IDC_BROWSE_RESTART), &r);
 345    SetWindowPos (GetDlgItem (hDlg, IDC_BROWSE_RESTART), NULL,
 346                  0 - (r.right-r.left), 0 - (r.bottom-r.top), 0, 0,
 347                  SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
 348
 349    // Fill in the choices underneath IDC_BROWSE_CELL.  Can the
 350    // user enter a new cell name?
 351    //
 352    if (pbdp->fThisCellOnly)
 353    {
 354       EnableWindow (GetDlgItem (hDlg, IDC_BROWSE_CELL), FALSE);
 355    }
 356    else
 357    {
 358       CB_StartChange (GetDlgItem (hDlg, IDC_BROWSE_CELL));
 359
 360       if (!pbdp->lpcl)
 361       {
 362          TCHAR szDefCell[ cchNAME ];
 363          if (AfsAppLib_GetLocalCell (szDefCell) && *szDefCell)
 364          {
 365             CB_AddItem (GetDlgItem (hDlg, IDC_BROWSE_CELL), szDefCell, 1);
 366          }
 367       }
 368       else for (size_t ii = 0; ii < pbdp->lpcl->nCells; ++ii)
 369       {
 370          CB_AddItem (GetDlgItem (hDlg, IDC_BROWSE_CELL), pbdp->lpcl->aCells[ii], 1+ii);
 371       }
 372
 373       CB_EndChange (GetDlgItem (hDlg, IDC_BROWSE_CELL), 1);
 374    }
 375
 376    // Select various texts to display in the dialog
 377    //
 378    psz = FormatString (TEXT("%1"), TEXT("%m"), pbdp->idsTitle);
 379    SetWindowText (hDlg, psz);
 380    FreeString (psz);
 381    GetString (szText, pbdp->idsPrompt);
 382    SetDlgItemText (hDlg, IDC_BROWSE_TYPE, szText);
 383
 384    // If the caller wants us to display a "[X] No Group" checkbox, do so
 385    // by creating a checkbox right underneath the IDC_BROWSE_NAMED edit
 386    // control--note that we'll have to hide IDC_BROWSE_STATUS if that's
 387    // the case.
 388    //
 389    if (pbdp->idsNone != 0)
 390    {
 391       ShowWindow (GetDlgItem (pbdp->hDlg, IDC_BROWSE_STATUS), FALSE);
 392
 393       RECT rr;
 394       GetRectInParent (GetDlgItem (pbdp->hDlg, IDC_BROWSE_NAMED), &rr);
 395
 396       LONG cy;
 397       cy = rr.bottom -rr.top;
 398       rr.top += cy +3;
 399       rr.bottom = rr.top +cy;
 400
 401       GetString (szText, pbdp->idsNone);
 402       CreateWindow ("Button", szText, WS_CHILD | BS_AUTOCHECKBOX,
 403                     rr.left, rr.top, rr.right-rr.left, rr.bottom-rr.top,
 404                     pbdp->hDlg, (HMENU)IDC_BROWSE_NONE, APPLIB_HINST, 0);
 405
 406       HFONT hf = (HFONT)GetStockObject (DEFAULT_GUI_FONT);
 407       SendMessage (GetDlgItem (pbdp->hDlg, IDC_BROWSE_NONE), WM_SETFONT, (WPARAM)hf, FALSE);
 408       ShowWindow (GetDlgItem (pbdp->hDlg, IDC_BROWSE_NONE), TRUE);
 409
 410       if (pbdp->szNamed[0] == TEXT('\0'))
 411          CheckDlgButton (pbdp->hDlg, IDC_BROWSE_NONE, TRUE);
 412       else
 413          CheckDlgButton (pbdp->hDlg, IDC_BROWSE_NONE, FALSE);
 414
 415       DlgProc_Browse_OnNone (pbdp->hDlg, pbdp);
 416    }
 417
 418    SetDlgItemText (hDlg, IDC_BROWSE_CELL,  pbdp->szCell);
 419    SetDlgItemText (hDlg, IDC_BROWSE_NAMED, pbdp->szNamed);
 420
 421    // Start looking for users/groups
 422    //
 423    DlgProc_Browse_StartSearch (pbdp, TRUE);
 424 }
 425
 426
 427 /*
 428  *** DlgProc_Browse_OnNone
 429  *
 430  * This routine is called whenever the user checks or unchecks the
 431  * "[X] None" checkbox (which we may not even be displaying)
 432  *
 433  */
 434
 435 void DlgProc_Browse_OnNone (HWND hDlg, BROWSEDIALOGPARAMS *pbdp)
 436 {
 437    if (GetDlgItem (pbdp->hDlg, IDC_BROWSE_NONE) != NULL)
 438    {
 439       BOOL fNone = IsDlgButtonChecked (pbdp->hDlg, IDC_BROWSE_NONE);
 440
 441       EnableWindow (GetDlgItem (hDlg, IDC_BROWSE_CELL),  !fNone && !pbdp->fThisCellOnly);
 442       EnableWindow (GetDlgItem (hDlg, IDC_BROWSE_NAMED), !fNone);
 443       EnableWindow (GetDlgItem (hDlg, IDC_BROWSE_LIST),  !fNone);
 444
 445       DlgProc_Browse_SelectedEntry (hDlg, pbdp);
 446    }
 447 }
 448
 449
 450 /*
 451  *** DlgProc_Browse_SelectedEntry
 452  *
 453  * This routine is called whenever the user selects a new entry within
 454  * the Browse dialog's listview
 455  *
 456  */
 457
 458 void DlgProc_Browse_SelectedEntry (HWND hDlg, BROWSEDIALOGPARAMS *pbdp)
 459 {
 460    if ( (GetDlgItem (pbdp->hDlg, IDC_BROWSE_NONE) != NULL) &&
 461         (IsDlgButtonChecked (pbdp->hDlg, IDC_BROWSE_NONE)) )
 462    {
 463       pbdp->szNamed[0] = TEXT('\0');
 464    }
 465    else
 466    {
 467       HWND hList = GetDlgItem (hDlg, IDC_BROWSE_LIST);
 468       short idxSelected = LV_GetSelected (hList);
 469
 470       if (idxSelected == -1)
 471          pbdp->szNamed[0] = TEXT('\0');
 472       else
 473          LV_GetItemText (hList, idxSelected, 0, pbdp->szNamed);
 474
 475       SetDlgItemText (hDlg, IDC_BROWSE_NAMED, pbdp->szNamed);
 476    }
 477 }
 478
 479
 480 /*
 481  *** DlgProc_Browse_UpdateCellText
 482  *
 483  * This routine places the given cell name in the browse dialog.
 484  *
 485  */
 486
 487 void DlgProc_Browse_UpdateCellText (BROWSEDIALOGPARAMS *pbdp, LPTSTR pszCell)
 488 {
 489    SetDlgItemText (pbdp->hDlg, IDC_BROWSE_CELL, pbdp->szCell);
 490 }
 491
 492
 493 /*
 494  *** DlgProc_Browse_StartSearch
 495  *
 496  * This routine initiates a thread which enumerates all users/groups within
 497  * the given cell, posting messages to describe what it finds to the Browse
 498  * dialog's DLGPROC.
 499  *
 500  */
 501
 502 BOOL DlgProc_Browse_StartSearch (BROWSEDIALOGPARAMS *pbdp, BOOL fCloseDlgIfFail)
 503 {
 504    DWORD dwThreadID;
 505
 506    // Can't start a new search until the old search terminates.
 507    //
 508    DlgProc_Browse_StopSearch (pbdp);
 509
 510    // Then make sure that we have a valid cell to query--if not, it may
 511    // be grounds to terminate the entire browse dialog.
 512    //
 513    lstrcpy (pbdp->szThreadCell, pbdp->szCell);
 514
 515    if (!pbdp->szCell[0])
 516    {
 517       AfsAppLib_GetLocalCell (pbdp->szCell);
 518
 519       lstrcpy (pbdp->szThreadCell, pbdp->szCell);
 520
 521       DlgProc_Browse_UpdateCellText (pbdp, pbdp->szThreadCell);
 522    }
 523
 524    if (!pbdp->szCell[0])
 525    {
 526       if (fCloseDlgIfFail)
 527          EndDialog (pbdp->hDlg, IDCANCEL);
 528
 529       MessageBeep (MB_ICONHAND);
 530       Message (MB_ICONHAND, IDS_BROWSE_BADCELL_TITLE, IDS_BROWSE_BADCELL_DESC);
 531
 532       if (!fCloseDlgIfFail)
 533          PostMessage (pbdp->hDlg, WM_NEXTDLGCTL, (WPARAM)GetDlgItem (pbdp->hDlg, IDC_BROWSE_CELL), (LPARAM)TRUE);
 534       return FALSE;
 535    }
 536
 537    // Great--we can do the search.  Start a thread to do so.
 538    //
 539    pbdp->fCanStopThreadEasily = FALSE;
 540    pbdp->fShouldStopThread = FALSE;
 541    pbdp->fThreadActive = FALSE;
 542
 543    ListView_DeleteAllItems (GetDlgItem (pbdp->hDlg, IDC_BROWSE_LIST));
 544
 545    pbdp->hThread = CreateThread (NULL, 0,
 546                                  (LPTHREAD_START_ROUTINE)DlgProc_Browse_ThreadProc,
 547                                  pbdp, 0, &dwThreadID);
 548
 549    return (pbdp->hThread == 0) ? FALSE : TRUE;
 550 }
 551
 552
 553 /*
 554  *** DlgProc_Browse_StopSearch
 555  *
 556  * This routine signals the search thread to stop, and will not return
 557  * until it does.
 558  *
 559  */
 560
 561 void DlgProc_Browse_StopSearch (BROWSEDIALOGPARAMS *pbdp)
 562 {
 563    if (pbdp->fThreadActive)
 564    {
 565       if (pbdp->fCanStopThreadEasily)
 566       {
 567          pbdp->fShouldStopThread = TRUE;
 568
 569          WaitForSingleObject (pbdp->hThread, INFINITE);
 570       }
 571       else
 572       {
 573          TerminateThread (pbdp->hThread, 0);
 574          pbdp->fThreadActive = FALSE;
 575       }
 576    }
 577
 578    SetDlgItemText (pbdp->hDlg, IDC_BROWSE_STATUS, TEXT(""));
 579 }
 580
 581
 582 /*
 583  *** DlgProc_Browse_ThreadProc
 584  *
 585  * The worker thread for the Browse dialog; this routine enumerates all
 586  * users or groups on the given cell, posting a WM_FOUNDNAME message to
 587  * the Browse dialog after every successful find.  Note that LPARAM on
 588  * such messages points to a string which should be freed with FreeString()
 589  * when no longer needed.
 590  *
 591  */
 592
 593 DWORD _stdcall DlgProc_Browse_ThreadProc (LPARAM lp)
 594 {
 595    BROWSEDIALOGPARAMS *pbdp;
 596
 597    if ((pbdp = (BROWSEDIALOGPARAMS *)lp) != NULL)
 598    {
 599       pbdp->fThreadActive = TRUE;
 600
 601       PostMessage (pbdp->hDlg, WM_THREADSTART, 0, 0);
 602
 603       UINT_PTR idClient;
 604       if ((idClient = AfsAppLib_GetAdminServerClientID()) != 0)
 605       {
 606          EnumeratePrincipalsRemotely (pbdp, idClient);
 607       }
 608       else
 609       {
 610          if (OpenClientLibrary())
 611          {
 612             if (OpenKasLibrary())
 613             {
 614                EnumeratePrincipalsLocally (pbdp);
 615                CloseKasLibrary();
 616             }
 617
 618             CloseClientLibrary();
 619          }
 620       }
 621
 622       pbdp->fThreadActive = FALSE;
 623
 624       PostMessage (pbdp->hDlg, WM_THREADDONE, 0, 0);
 625    }
 626
 627    return 0;
 628 }
 629
 630
 631 void EnumeratePrincipalsLocally (LPBROWSEDIALOGPARAMS pbdp)
 632 {
 633    ULONG status;
 634
 635    char szCellA[ MAX_PATH ];
 636    CopyStringToAnsi (szCellA, pbdp->szCell);
 637
 638    PVOID hCell;
 639    if (afsclient_CellOpen (szCellA, (PVOID)pbdp->hCreds, &hCell, (afs_status_p)&status))
 640    {
 641       // Enumerate the principals recognized by KAS.
 642       //
 643       PVOID hEnum;
 644       if (kas_PrincipalGetBegin (hCell, NULL, &hEnum, (afs_status_p)&status))
 645       {
 646          pbdp->fCanStopThreadEasily = TRUE;
 647
 648          while (!pbdp->fShouldStopThread)
 649          {
 650             kas_identity_t who;
 651             if (!kas_PrincipalGetNext (hEnum, &who, (afs_status_p)&status))
 652                break;
 653
 654             LPTSTR pszName;
 655             if ((pszName = CloneAnsi ((LPSTR)who.principal)) == NULL)
 656                break;
 657
 658             PostMessage (pbdp->hDlg, WM_FOUNDNAME, 0, (LPARAM)pszName);
 659             // pszName freed by DlgProc_Browse when it receives the message
 660          }
 661
 662          kas_PrincipalGetDone (hEnum, (afs_status_p)&status);
 663       }
 664
 665       afsclient_CellClose (hCell, (afs_status_p)&status);
 666    }
 667 }
 668
 669
 670 void EnumeratePrincipalsRemotely (LPBROWSEDIALOGPARAMS pbdp, UINT_PTR idClient)
 671 {
 672    ULONG status;
 673
 674    // Open the relevant cell
 675    //
 676    ASID idCell;
 677    if (asc_CellOpen (idClient, (PVOID)pbdp->hCreds, pbdp->szThreadCell, AFSADMSVR_SCOPE_USERS, &idCell, &status))
 678    {
 679       // Obtain a list of ASIDs from the admin server, each representing
 680       // a principal which we want to show.
 681       //
 682       LPASIDLIST pAsidList;
 683       if (asc_ObjectFindMultiple (idClient, idCell, TYPE_USER, NULL, NULL, &pAsidList, &status))
 684       {
 685          if (pAsidList)
 686          {
 687             // Obtain rudimentary properties (e.g., their names) for these ASIDs
 688             //
 689             LPASOBJPROPLIST pPropList;
 690             if (asc_ObjectPropertiesGetMultiple (idClient, GET_RUDIMENTARY_DATA, idCell, pAsidList, &pPropList, &status))
 691             {
 692                if (pPropList)
 693                {
 694                   // Use the information in {pPropList} to populate the display
 695                   //
 696                   for (size_t iEntry = 0; iEntry < pPropList->cEntries; ++iEntry)
 697                   {
 698                      LPTSTR pszName;
 699                      if ((pszName = CloneString (pPropList->aEntries[ iEntry ].ObjectProperties.szName)) != NULL)
 700                      {
 701                         PostMessage (pbdp->hDlg, WM_FOUNDNAME, 0, (LPARAM)pszName);
 702                         // pszName freed by DlgProc_Browse when it receives the message
 703                      }
 704                   }
 705
 706                   asc_ObjPropListFree (&pPropList);
 707                }
 708             }
 709
 710             asc_AsidListFree (&pAsidList);
 711          }
 712       }
 713
 714       asc_CellClose (idClient, idCell, &status);
 715    }
 716 }
 717