webcit/roomlist.c

   1 /*
   2  * $Id$
   3  * room listings and filters.
   4  */
   5
   6 #include "webcit.h"
   7 #include "webserver.h"
   8
   9
  10 void DeleteFloor(void *vFloor)
  11 {
  12         Floor *pFloor;
  13         pFloor = (Floor*) vFloor;
  14         FreeStrBuf(&pFloor->Name);
  15         free(pFloor);
  16 }
  17
  18 int SortFloorsByNameOrder(const void *vfloor1, const void *vfloor2)
  19 {
  20         Floor *f1 = (Floor*) GetSearchPayload(vfloor1);
  21         Floor *f2 = (Floor*) GetSearchPayload(vfloor2);
  22
  23         /* prefer My floor over alpabetical sort */
  24         if (f1->ID == VIRTUAL_MY_FLOOR)
  25                 return 1;
  26         if (f2->ID == VIRTUAL_MY_FLOOR)
  27                 return -1;
  28
  29         return strcmp(ChrPtr(f1->Name), ChrPtr(f2->Name));
  30 }
  31
  32 HashList *GetFloorListHash(StrBuf *Target, WCTemplputParams *TP)
  33 {
  34         int Done = 0;
  35         const char *Err;
  36         StrBuf *Buf;
  37         HashList *floors;
  38         HashList *floorsbyname;
  39         HashPos *it;
  40         Floor *pFloor;
  41         void *vFloor;
  42         const char *Pos;
  43         int i;
  44         wcsession *WCC = WC;
  45         const char *HashKey;
  46         long HKLen;
  47
  48
  49         if (WCC->Floors != NULL)
  50                 return WCC->Floors;
  51         WCC->Floors = floors = NewHash(1, Flathash);
  52         WCC->FloorsByName = floorsbyname = NewHash(1, NULL);
  53         Buf = NewStrBuf();
  54
  55         pFloor = (Floor*) malloc(sizeof(Floor));
  56         pFloor->ID = VIRTUAL_MY_FLOOR;
  57         pFloor->Name = NewStrBufPlain(_("My Folders"), -1);
  58         pFloor->NRooms = 0;
  59
  60         Put(floors, IKEY(pFloor->ID), pFloor, DeleteFloor);
  61         Put(floorsbyname, SKEY(pFloor->Name), pFloor, reference_free_handler);
  62
  63         serv_puts("LFLR"); /* get floors */
  64         StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err); /* '100', we hope */
  65         if (GetServerStatus(Buf, NULL) == 1)
  66         {
  67                 while(!Done && StrBuf_ServGetln(Buf))
  68                         if ( (StrLength(Buf)==3) &&
  69                              !strcmp(ChrPtr(Buf), "000"))
  70                         {
  71                                 Done = 1;
  72                         }
  73                         else
  74                         {
  75
  76                                 Pos = NULL;
  77
  78                                 pFloor = (Floor*) malloc(sizeof(Floor));
  79                                 pFloor->ID = StrBufExtractNext_int(Buf, &Pos, '|');
  80                                 pFloor->Name = NewStrBufPlain(NULL, StrLength(Buf));
  81                                 StrBufExtract_NextToken(pFloor->Name, Buf, &Pos, '|');
  82                                 pFloor->NRooms = StrBufExtractNext_long(Buf, &Pos, '|');
  83
  84                                 Put(floors, IKEY(pFloor->ID), pFloor, DeleteFloor);
  85                                 Put(floorsbyname, SKEY(pFloor->Name), pFloor, reference_free_handler);
  86                         }
  87         }
  88         FreeStrBuf(&Buf);
  89
  90         /* now lets pre-sort them alphabeticaly. */
  91         i = 1;
  92         SortByPayload(floors, SortFloorsByNameOrder);
  93         it = GetNewHashPos(floors, 0);
  94         while ( GetNextHashPos(floors, it, &HKLen, &HashKey, &vFloor))
  95                 ((Floor*) vFloor)->AlphaN = i++;
  96         DeleteHashPos(&it);
  97         SortByHashKeyStr(floors);
  98
  99         return floors;
 100 }
 101
 102 void tmplput_FLOOR_ID(StrBuf *Target, WCTemplputParams *TP)
 103 {
 104         Floor *myFloor = (Floor *)CTX;
 105
 106         StrBufAppendPrintf(Target, "%d", myFloor->ID);
 107 }
 108
 109 void tmplput_FLOOR_NAME(StrBuf *Target, WCTemplputParams *TP)
 110 {
 111         Floor *myFloor = (Floor *)CTX;
 112
 113         StrBufAppendTemplate(Target, TP, myFloor->Name, 0);
 114 }
 115
 116 void tmplput_FLOOR_NROOMS(StrBuf *Target, WCTemplputParams *TP)
 117 {
 118         Floor *myFloor = (Floor *)CTX;
 119
 120         StrBufAppendPrintf(Target, "%d", myFloor->NRooms);
 121 }
 122 HashList *GetRoomListHashLKRA(StrBuf *Target, WCTemplputParams *TP)
 123 {
 124         wcsession *WCC = WC;
 125
 126         if (WCC->Floors == NULL)
 127                 GetFloorListHash(Target, TP);
 128         if (WCC->Rooms == NULL)
 129         {
 130                 serv_puts("LKRA");
 131                 WCC->Rooms =  GetRoomListHash(Target, TP);
 132         }
 133         return WCC->Rooms;
 134 }
 135
 136 HashList *GetZappedRoomListHash(StrBuf *Target, WCTemplputParams *TP)
 137 {
 138         wcsession *WCC = WC;
 139
 140         if (WCC->Floors == NULL)
 141                 GetFloorListHash(Target, TP);
 142         serv_puts("LZRM -1");
 143         return GetRoomListHash(Target, TP);
 144 }
 145
 146 void FlushFolder(folder *room)
 147 {
 148         int i;
 149
 150         FreeStrBuf(&room->XAPass);
 151         FreeStrBuf(&room->Directory);
 152         FreeStrBuf(&room->RoomAide);
 153         FreeStrBuf(&room->XInfoText);
 154
 155         FreeStrBuf(&room->name);
 156         if (room->IgnetCfgs[0] == (HashList*) StrBufNOTNULL)
 157         {
 158                 room->IgnetCfgs[0] = NULL;
 159                 for (i = ignet_push_share; i < maxRoomNetCfg; i++)
 160                         DeleteHash(&room->IgnetCfgs[i]);
 161         }
 162         if (room->RoomNameParts != NULL)
 163         {
 164                 for (i=0; i < room->nRoomNameParts; i++)
 165                         FreeStrBuf(&room->RoomNameParts[i]);
 166                 free(room->RoomNameParts);
 167         }
 168 }
 169
 170 void vDeleteFolder(void *vFolder)
 171 {
 172         folder *room;
 173
 174         room = (folder*) vFolder;
 175         FlushFolder(room);
 176
 177         free(room);
 178 }
 179
 180
 181 HashList *GetRoomListHash(StrBuf *Target, WCTemplputParams *TP)
 182 {
 183         int Done = 0;
 184         HashList *rooms;
 185         folder *room;
 186         StrBuf *Buf;
 187         const char *Pos;
 188         void *vFloor;
 189         wcsession *WCC = WC;
 190         CompareFunc SortIt;
 191         WCTemplputParams SubTP;
 192
 193         Buf = NewStrBuf();
 194         rooms = NewHash(1, NULL);
 195         StrBuf_ServGetln(Buf);
 196         if (GetServerStatus(Buf, NULL) == 1)
 197         {
 198                 while(!Done && StrBuf_ServGetln(Buf))
 199                         if ( (StrLength(Buf)==3) &&
 200                              !strcmp(ChrPtr(Buf), "000"))
 201                         {
 202                                 Done = 1;
 203                         }
 204                         else
 205                         {
 206                                 Pos = NULL;
 207                                 room = (folder*) malloc (sizeof(folder));
 208                                 memset(room, 0, sizeof(folder));
 209
 210                                 /* Load the base data from the server reply */
 211                                 room->name = NewStrBufPlain(NULL, StrLength(Buf));
 212                                 StrBufExtract_NextToken(room->name, Buf, &Pos, '|');
 213
 214                                 room->QRFlags = StrBufExtractNext_long(Buf, &Pos, '|');
 215                                 room->floorid = StrBufExtractNext_int(Buf, &Pos, '|');
 216                                 room->listorder = StrBufExtractNext_long(Buf, &Pos, '|');
 217                                 room->QRFlags2 = StrBufExtractNext_long(Buf, &Pos, '|');
 218
 219                                 room->RAFlags = StrBufExtractNext_long(Buf, &Pos, '|');
 220
 221 /*
 222   ACWHUT?
 223   room->ACL = NewStrBufPlain(NULL, StrLength(Buf));
 224   StrBufExtract_NextToken(room->ACL, Buf, &Pos, '|');
 225 */
 226
 227                                 room->view = StrBufExtractNext_long(Buf, &Pos, '|');
 228                                 room->defview = StrBufExtractNext_long(Buf, &Pos, '|');
 229                                 room->lastchange = StrBufExtractNext_long(Buf, &Pos, '|');
 230
 231                                 /* Evaluate the Server sent data for later use */
 232                                 /* find out, whether we are in a sub-room */
 233                                 room->nRoomNameParts = StrBufNum_tokens(room->name, '\\');
 234                                 if (room->nRoomNameParts > 1)
 235                                 {
 236                                         int i;
 237
 238                                         Pos = NULL;
 239                                         room->RoomNameParts = malloc(sizeof(StrBuf*) * (room->nRoomNameParts + 1));
 240                                         memset(room->RoomNameParts, 0, sizeof(StrBuf*) * (room->nRoomNameParts + 1));
 241                                         for (i=0; i < room->nRoomNameParts; i++)
 242                                         {
 243                                                 room->RoomNameParts[i] = NewStrBuf();
 244                                                 StrBufExtract_NextToken(room->RoomNameParts[i],
 245                                                                         room->name, &Pos, '\\');
 246                                         }
 247                                 }
 248
 249                                 /* Private mailboxes on the main floor get remapped to the personal folder */
 250                                 if ((room->QRFlags & QR_MAILBOX) &&
 251                                     (room->floorid == 0))
 252                                 {
 253                                         room->floorid = VIRTUAL_MY_FLOOR;
 254                                         if ((room->nRoomNameParts == 1) &&
 255                                             (StrLength(room->name) == 4) &&
 256                                             (strcmp(ChrPtr(room->name), "Mail") == 0))
 257                                         {
 258                                                 room->is_inbox = 1;
 259                                         }
 260
 261                                 }
 262                                 /* get a pointer to the floor we're on: */
 263                                 GetHash(WCC->Floors, IKEY(room->floorid), &vFloor);
 264                                 room->Floor = (const Floor*) vFloor;
 265
 266
 267
 268                                 /* now we know everything, remember it... */
 269                                 Put(rooms, SKEY(room->name), room, vDeleteFolder);
 270                         }
 271         }
 272
 273         SubTP.Filter.ContextType = CTX_ROOMS;
 274         SortIt = RetrieveSort(&SubTP, NULL, 0, HKEY("fileunsorted"), 0);
 275         if (SortIt != NULL)
 276                 SortByPayload(rooms, SortIt);
 277         else
 278                 SortByPayload(rooms, SortRoomsByListOrder);
 279         FreeStrBuf(&Buf);
 280         return rooms;
 281 }
 282
 283 HashList *GetNetConfigHash(StrBuf *Target, WCTemplputParams *TP)
 284 {
 285         wcsession *WCC = WC;
 286         StrBuf *Line;
 287         StrBuf *Token;
 288         StrBuf *Content;
 289         long WantThisOne;
 290         long PutTo;
 291         long State;
 292
 293         WantThisOne = GetTemplateTokenNumber(Target, TP, 5, 0);
 294         if (WantThisOne == 0)
 295                 return NULL;
 296         if (WCC->CurRoom.IgnetCfgs[0] == (HashList*) StrBufNOTNULL)
 297                 return WCC->CurRoom.IgnetCfgs[WantThisOne];
 298
 299         WCC->CurRoom.IgnetCfgs[0] = (HashList*) StrBufNOTNULL;
 300         serv_puts("GNET");
 301         Line = NewStrBuf();
 302         Token = NewStrBuf();
 303         StrBuf_ServGetln(Line);
 304         if (GetServerStatus(Line, &State) == 1)
 305         {
 306                 const char *Pos = NULL;
 307                 StrBuf_ServGetln(Line);
 308                 StrBufExtract_NextToken(Token, Line, &Pos, '|');
 309                 PutTo = GetTokenDefine(SKEY(Token), -1);
 310                 if ((PutTo > 0) &&
 311                     (PutTo < maxRoomNetCfg) &&
 312                     (Pos != StrBufNOTNULL))
 313                 {
 314                         int n;
 315                         HashList *SubH;
 316
 317                         if (WCC->CurRoom.IgnetCfgs[PutTo] == NULL)
 318                                 WCC->CurRoom.IgnetCfgs[PutTo] = NewHash(1, NULL);
 319                         SubH = NewHash(1, NULL);
 320                         n = GetCount(WCC->CurRoom.IgnetCfgs[PutTo]) + 1;
 321                         Put(WCC->CurRoom.IgnetCfgs[PutTo],
 322                             IKEY(n),
 323                             SubH,
 324                             HDeleteHash);
 325                         while (Pos != StrBufNOTNULL) {
 326                                 Content = NewStrBuf();
 327                                 StrBufExtract_NextToken(Content, Line, &Pos, '|');
 328                                 Put(SubH,
 329                                     IKEY(n),
 330                                     Content,
 331                                     HFreeStrBuf);
 332                                 n++;
 333                         }
 334                 }
 335         }
 336         else if (State == 550)
 337                 StrBufAppendBufPlain(WCC->ImportantMsg,
 338                                      _("Higher access is required to access this function."), -1, 0);
 339
 340
 341         return WCC->CurRoom.IgnetCfgs[WantThisOne];
 342 }
 343
 344 /** Unused function that orders rooms by the listorder flag */
 345 int SortRoomsByListOrder(const void *room1, const void *room2)
 346 {
 347         folder *r1 = (folder*) GetSearchPayload(room1);
 348         folder *r2 = (folder*) GetSearchPayload(room2);
 349
 350         if (r1->listorder == r2->listorder) return 0;
 351         if (r1->listorder > r2->listorder) return 1;
 352         return -1;
 353 }
 354
 355 int CompareRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
 356 {
 357         folder *r1 = (folder*) GetSearchPayload(room1);
 358         folder *r2 = (folder*) GetSearchPayload(room2);
 359
 360         if ((r1->Floor == NULL)  ||
 361             (r2->Floor == NULL))
 362                 return 0;
 363
 364         /**
 365          * are we on the same floor? else sort by floor.
 366          */
 367         if (r1->Floor != r2->Floor)
 368         {
 369                 /**
 370                  * the private rooms are first in any case.
 371                  */
 372                 if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
 373                         return -1;
 374                 if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
 375                         return 1;
 376                 /**
 377                  * else decide alpaheticaly by floorname
 378                  */
 379                 return (r1->Floor->AlphaN > r2->Floor->AlphaN)? 1 : -1;
 380         }
 381
 382         /**
 383          * if we have different levels of subdirectories,
 384          * we want the toplevel to be first, regardless of sort
 385          * sequence.
 386          */
 387         if (((r1->nRoomNameParts > 1) ||
 388             (r2->nRoomNameParts > 1)    )&&
 389             (r1->nRoomNameParts != r2->nRoomNameParts))
 390         {
 391                 int i, ret;
 392                 int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
 393                         r2->nRoomNameParts : r1->nRoomNameParts;
 394
 395                 for (i=0; i < nparts; i++)
 396                 {
 397                         ret = strcmp (ChrPtr(r1->name),
 398                                       ChrPtr(r2->name));
 399                         /**
 400                          * Deltas in common parts? exit here.
 401                          */
 402                         if (ret != 0)
 403                                 return ret;
 404                 }
 405
 406                 /**
 407                  * who's a subdirectory of whom?
 408                  */
 409                 if (r1->nRoomNameParts > r2->nRoomNameParts)
 410                         return 1;
 411                 else
 412                         return -1;
 413
 414         }
 415
 416         /**
 417          * else just sort alphabeticaly.
 418          */
 419         return strcmp (ChrPtr(r1->name),
 420                        ChrPtr(r2->name));
 421 }
 422
 423 int CompareRoomListByFloorRoomPrivFirstRev(const void *room1, const void *room2)
 424 {
 425         folder *r1 = (folder*) GetSearchPayload(room1);
 426         folder *r2 = (folder*) GetSearchPayload(room2);
 427
 428         if ((r1->Floor == NULL)  ||
 429             (r2->Floor == NULL))
 430                 return 0;
 431
 432         /**
 433          * are we on the same floor? else sort by floor.
 434          */
 435         if (r2->Floor != r1->Floor)
 436         {
 437                 /**
 438                  * the private rooms are first in any case.
 439                  */
 440                 if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
 441                         return -1;
 442                 if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
 443                         return 1;
 444                 /**
 445                  * else decide alpaheticaly by floorname
 446                  */
 447
 448                 return (r1->Floor->AlphaN < r2->Floor->AlphaN)? 1 : -1;
 449         }
 450
 451         /**
 452          * if we have different levels of subdirectories,
 453          * we want the toplevel to be first, regardless of sort
 454          * sequence.
 455          */
 456         if (((r1->nRoomNameParts > 1) ||
 457             (r2->nRoomNameParts > 1)    )&&
 458             (r1->nRoomNameParts != r2->nRoomNameParts))
 459         {
 460                 int i, ret;
 461                 int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
 462                         r2->nRoomNameParts : r1->nRoomNameParts;
 463
 464                 for (i=0; i < nparts; i++)
 465                 {
 466                         /**
 467                          * special cases if one room is top-level...
 468                          */
 469                         if (r2->nRoomNameParts == 1)
 470                                 ret = strcmp (ChrPtr(r2->name),
 471                                               ChrPtr(r1->RoomNameParts[i]));
 472                         else if (r1->nRoomNameParts == 1)
 473                                 ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
 474                                               ChrPtr(r1->name));
 475                         else
 476                                 ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
 477                                               ChrPtr(r1->RoomNameParts[i]));
 478                         /**
 479                          * Deltas in common parts? exit here.
 480                          */
 481                         if (ret != 0)
 482                                 return ret;
 483                 }
 484
 485                 /**
 486                  * who's a subdirectory of whom?
 487                  */
 488                 if (r1->nRoomNameParts > r2->nRoomNameParts)
 489                         return 1;
 490                 else
 491                         return -1;
 492         }
 493
 494         return strcmp (ChrPtr(r2->name),
 495                        ChrPtr(r1->name));
 496 }
 497
 498 int GroupchangeRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
 499 {
 500         folder *r1 = (folder*) room1;
 501         folder *r2 = (folder*) room2;
 502
 503
 504         if ((r1->Floor == NULL)  ||
 505             (r2->Floor == NULL))
 506                 return 0;
 507
 508         if (r1->Floor == r2->Floor)
 509                 return 0;
 510         else
 511         {
 512                 wcsession *WCC = WC;
 513                 static int columns = 3;
 514                 int boxes_per_column = 0;
 515                 int nf;
 516
 517                 nf = GetCount(WCC->Floors);
 518                 while (nf % columns != 0) ++nf;
 519                 boxes_per_column = (nf / columns);
 520                 if (boxes_per_column < 1)
 521                         boxes_per_column = 1;
 522                 if (r1->Floor->AlphaN % boxes_per_column == 0)
 523                         return 2;
 524                 else
 525                         return 1;
 526         }
 527 }
 528
 529
 530 int CompareRooms(const folder *room1, const folder *room2)
 531 {
 532         if ((room1 == NULL) || (room2 == NULL))
 533                 return -1;
 534         return CompareRoomListByFloorRoomPrivFirst(room1, room2);
 535 }
 536
 537
 538
 539 void tmplput_ROOM_NAME(StrBuf *Target, WCTemplputParams *TP)
 540 {
 541         folder *Folder = (folder *)CTX;
 542
 543         if (Folder == NULL)
 544         {
 545                 wcsession *WCC = WC;
 546
 547                 if (WCC == NULL)
 548                         return;
 549                 Folder = &WCC->CurRoom;
 550         }
 551         StrBufAppendTemplate(Target, TP, Folder->name, 0);
 552 }
 553 void tmplput_ROOM_BASENAME(StrBuf *Target, WCTemplputParams *TP)
 554 {
 555         folder *room = (folder *)CTX;
 556
 557         if (room->nRoomNameParts > 1)
 558                 StrBufAppendTemplate(Target, TP,
 559                                       room->RoomNameParts[room->nRoomNameParts - 1], 0);
 560         else
 561                 StrBufAppendTemplate(Target, TP, room->name, 0);
 562 }
 563 void tmplput_ROOM_LEVEL_N_TIMES(StrBuf *Target, WCTemplputParams *TP)
 564 {
 565         folder *room = (folder *)CTX;
 566         int i;
 567         const char *AppendMe;
 568         long AppendMeLen;
 569
 570
 571         if (room->nRoomNameParts > 1)
 572         {
 573                 GetTemplateTokenString(Target, TP, 0, &AppendMe, &AppendMeLen);
 574                 for (i = 0; i < room->nRoomNameParts; i++)
 575                         StrBufAppendBufPlain(Target, AppendMe, AppendMeLen, 0);
 576         }
 577 }
 578
 579 void tmplput_ROOM_ACL(StrBuf *Target, WCTemplputParams *TP)
 580 {
 581         folder *Folder = (folder *)CTX;
 582
 583         StrBufAppendPrintf(Target, "%ld", Folder->RAFlags, 0);
 584 }
 585
 586
 587 void tmplput_ROOM_QRFLAGS(StrBuf *Target, WCTemplputParams *TP)
 588 {
 589         folder *Folder = (folder *)CTX;
 590         StrBufAppendPrintf(Target, "%d", Folder->QRFlags);
 591 }
 592
 593 void tmplput_ROOM_RAFLAGS(StrBuf *Target, WCTemplputParams *TP)
 594 {
 595         folder *Folder = (folder *)(TP->Context);
 596         StrBufAppendPrintf(Target, "%d", Folder->RAFlags);
 597 }
 598
 599
 600 void tmplput_ROOM_FLOORID(StrBuf *Target, WCTemplputParams *TP)
 601 {
 602         folder *Folder = (folder *)CTX;
 603         StrBufAppendPrintf(Target, "%d", Folder->floorid);
 604 }
 605
 606 void tmplput_ROOM_LISTORDER(StrBuf *Target, WCTemplputParams *TP)
 607 {
 608         folder *Folder = (folder *)CTX;
 609         StrBufAppendPrintf(Target, "%d", Folder->listorder);
 610 }
 611 void tmplput_ROOM_VIEW(StrBuf *Target, WCTemplputParams *TP)
 612 {
 613         folder *Folder = (folder *)CTX;
 614         StrBufAppendPrintf(Target, "%d", Folder->view);
 615 }
 616 void tmplput_ROOM_DEFVIEW(StrBuf *Target, WCTemplputParams *TP)
 617 {
 618         folder *Folder = (folder *)CTX;
 619         StrBufAppendPrintf(Target, "%d", Folder->defview);
 620 }
 621 void tmplput_ROOM_LASTCHANGE(StrBuf *Target, WCTemplputParams *TP)
 622 {
 623         folder *Folder = (folder *)CTX;
 624         StrBufAppendPrintf(Target, "%d", Folder->lastchange);
 625 }
 626 void tmplput_ROOM_FLOOR_ID(StrBuf *Target, WCTemplputParams *TP)
 627 {
 628         folder *Folder = (folder *)CTX;
 629         const Floor *pFloor = Folder->Floor;
 630
 631         if (pFloor == NULL)
 632                 return;
 633
 634         StrBufAppendPrintf(Target, "%d", pFloor->ID);
 635 }
 636
 637 void tmplput_ROOM_FLOOR_NAME(StrBuf *Target, WCTemplputParams *TP)
 638 {
 639         folder *Folder = (folder *)CTX;
 640         const Floor *pFloor = Folder->Floor;
 641
 642         if (pFloor == NULL)
 643                 return;
 644
 645         StrBufAppendTemplate(Target, TP, pFloor->Name, 0);
 646 }
 647
 648 void tmplput_ROOM_FLOOR_NROOMS(StrBuf *Target, WCTemplputParams *TP)
 649 {
 650         folder *Folder = (folder *)CTX;
 651         const Floor *pFloor = Folder->Floor;
 652
 653         if (pFloor == NULL)
 654                 return;
 655         StrBufAppendPrintf(Target, "%d", pFloor->NRooms);
 656 }
 657
 658
 659
 660
 661 int ConditionalRoomIsInbox(StrBuf *Target, WCTemplputParams *TP)
 662 {
 663         folder *Folder = (folder *)CTX;
 664         return Folder->is_inbox;
 665 }
 666
 667 void tmplput_ROOM_COLLECTIONTYPE(StrBuf *Target, WCTemplputParams *TP)
 668 {
 669         folder *Folder = (folder *)CTX;
 670
 671         switch(Folder->view) {
 672         case VIEW_CALENDAR:
 673                 StrBufAppendBufPlain(Target, HKEY("vevent"), 0);
 674                 break;
 675         case VIEW_TASKS:
 676                 StrBufAppendBufPlain(Target, HKEY("vtodo"), 0);
 677                 break;
 678         case VIEW_ADDRESSBOOK:
 679                 StrBufAppendBufPlain(Target, HKEY("vcard"), 0);
 680                 break;
 681         case VIEW_NOTES:
 682                 StrBufAppendBufPlain(Target, HKEY("vnotes"), 0);
 683                 break;
 684         case VIEW_JOURNAL:
 685                 StrBufAppendBufPlain(Target, HKEY("vjournal"), 0);
 686                 break;
 687         case VIEW_WIKI:
 688                 StrBufAppendBufPlain(Target, HKEY("wiki"), 0);
 689                 break;
 690         }
 691 }
 692
 693
 694
 695
 696 int ConditionalRoomHasGroupdavContent(StrBuf *Target, WCTemplputParams *TP)
 697 {
 698         folder *Folder = (folder *)CTX;
 699
 700         lprintf(0, "-> %s: %ld\n", ChrPtr(Folder->name), Folder->view);
 701
 702         return ((Folder->view == VIEW_CALENDAR) ||
 703                 (Folder->view == VIEW_TASKS) ||
 704                 (Folder->view == VIEW_ADDRESSBOOK) ||
 705                 (Folder->view == VIEW_NOTES) ||
 706                 (Folder->view == VIEW_JOURNAL) );
 707 }
 708
 709
 710
 711 int ConditionalFloorIsRESTSubFloor(StrBuf *Target, WCTemplputParams *TP)
 712 {
 713         wcsession  *WCC = WC;
 714         Floor *MyFloor = (Floor *)CTX;
 715         /** if we have dav_depth the client just wants the subfloors */
 716         if ((WCC->Hdr->HR.dav_depth == 1) &&
 717             (GetCount(WCC->Directory) == 0))
 718                 return 1;
 719         return WCC->CurrentFloor == MyFloor;
 720 }
 721
 722 int ConditionalFloorIsVirtual(StrBuf *Target, WCTemplputParams *TP)
 723 {
 724         Floor *MyFloor = (Floor *)CTX;
 725
 726         return MyFloor->ID == VIRTUAL_MY_FLOOR;
 727 }
 728
 729 int ConditionalFloorIsSUBROOM(StrBuf *Target, WCTemplputParams *TP)
 730 {
 731         wcsession  *WCC = WC;
 732         Floor *MyFloor = (Floor *)CTX;
 733
 734         return WCC->CurRoom.floorid == MyFloor->ID;
 735 }
 736
 737
 738 int ConditionalRoomIsRESTSubRoom(StrBuf *Target, WCTemplputParams *TP)
 739 {
 740         wcsession  *WCC = WC;
 741         folder     *Folder = (folder *)CTX;
 742         HashPos    *it;
 743         StrBuf     * Dir;
 744         void       *vDir;
 745         long        len;
 746         const char *Key;
 747         int i, j, urlp;
 748         int delta;
 749
 750
 751         /* list only folders relative to the current floor... */
 752         if (Folder->Floor != WCC->CurrentFloor)
 753                 return 0;
 754
 755         urlp = GetCount(WCC->Directory);
 756         delta = Folder->nRoomNameParts - urlp + 1;
 757
 758         lprintf(0, "\n->%s: %ld - %ld ", ChrPtr(Folder->name), urlp,
 759                 Folder->nRoomNameParts);
 760         /* list only the floors which are in relation to the dav_depth header */
 761         if (WCC->Hdr->HR.dav_depth != delta) {
 762                 lprintf(0, "1\n");
 763                 return 0;
 764         }
 765
 766
 767         it = GetNewHashPos(WCC->Directory, 0);
 768         /* Fast forward the floorname we checked above... */
 769         GetNextHashPos(WCC->Directory, it, &len, &Key, &vDir);
 770
 771         if (Folder->nRoomNameParts > 1) {
 772                 for (i = 0, j = 1;
 773                      (i > Folder->nRoomNameParts) && (j > urlp);
 774                      i++, j++)
 775                 {
 776                         if (!GetNextHashPos(WCC->Directory,
 777                                             it, &len, &Key, &vDir) ||
 778                             (vDir == NULL))
 779                         {
 780                                 DeleteHashPos(&it);
 781
 782                                 lprintf(0, "3\n");
 783                                 return 0;
 784                         }
 785                         Dir = (StrBuf*) vDir;
 786                         if (strcmp(ChrPtr(Folder->RoomNameParts[i]),
 787                                    ChrPtr(Dir)) != 0)
 788                         {
 789                                 DeleteHashPos(&it);
 790                                 lprintf(0, "4\n");
 791                                 return 0;
 792                         }
 793                 }
 794                 DeleteHashPos(&it);
 795                 return 1;
 796         }
 797         else {
 798                 if (!GetNextHashPos(WCC->Directory,
 799                                     it, &len, &Key, &vDir) ||
 800                     (vDir == NULL))
 801                 {
 802                         DeleteHashPos(&it);
 803
 804                         lprintf(0, "5\n");
 805                         return WCC->Hdr->HR.dav_depth == 1;
 806                 }
 807                 DeleteHashPos(&it);
 808                 Dir = (StrBuf*) vDir;
 809                 if (WCC->Hdr->HR.dav_depth == 0) {
 810                         return (strcmp(ChrPtr(Folder->name),
 811                                        ChrPtr(Dir))
 812                                 == 0);
 813
 814                 }
 815                 return 0;
 816         }
 817 }
 818
 819
 820 void jsonRoomFlr(void)
 821 {
 822         /* Send as our own (application/json) content type */
 823         hprintf("HTTP/1.1 200 OK\r\n");
 824         hprintf("Content-type: application/json; charset=utf-8\r\n");
 825         hprintf("Server: %s / %s\r\n", PACKAGE_STRING, ChrPtr(WC->serv_info->serv_software));
 826         hprintf("Connection: close\r\n");
 827         hprintf("Pragma: no-cache\r\nCache-Control: no-store\r\nExpires:-1\r\n");
 828         begin_burst();
 829         DoTemplate(HKEY("json_roomflr"),NULL,&NoCtx);
 830         end_burst();
 831 }
 832
 833 #define POP3_HOST 0
 834 #define POP3_USERNAME 1
 835 #define POP3_PASSWORD 2
 836 #define POP3_KEEP 3
 837 #define POP3_INTERVAL 4
 838
 839 void
 840 InitModule_ROOMLIST
 841 (void)
 842 {
 843
 844         REGISTERTokenParamDefine(POP3_HOST);
 845         REGISTERTokenParamDefine(POP3_USERNAME);
 846         REGISTERTokenParamDefine(POP3_PASSWORD);
 847         REGISTERTokenParamDefine(POP3_KEEP);
 848         REGISTERTokenParamDefine(POP3_INTERVAL);
 849
 850
 851         WebcitAddUrlHandler(HKEY("json_roomflr"), "", 0, jsonRoomFlr, 0);
 852
 853
 854         RegisterNamespace("FLOOR:ID", 0, 0, tmplput_FLOOR_ID, NULL, CTX_FLOORS);
 855         RegisterNamespace("FLOOR:NAME", 0, 1, tmplput_FLOOR_NAME, NULL, CTX_FLOORS);
 856         RegisterNamespace("FLOOR:NROOMS", 0, 0, tmplput_FLOOR_NROOMS, NULL, CTX_FLOORS);
 857         RegisterConditional(HKEY("COND:FLOOR:ISSUBROOM"), 0, ConditionalFloorIsSUBROOM, CTX_FLOORS);
 858         RegisterConditional(HKEY("COND:FLOOR:ISVIRTUAL"), 0, ConditionalFloorIsVirtual, CTX_FLOORS);
 859         RegisterConditional(HKEY("COND:ROOM:REST:ISSUBFLOOR"), 0, ConditionalFloorIsRESTSubFloor, CTX_FLOORS);
 860
 861         RegisterIterator("ITERATE:THISROOM:GNET", 1, NULL, GetNetConfigHash, NULL, NULL, CTX_STRBUFARR, CTX_NONE, IT_NOFLAG);
 862
 863         RegisterIterator("LFLR", 0, NULL, GetFloorListHash, NULL, NULL, CTX_FLOORS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
 864
 865         RegisterIterator("LKRA", 0, NULL, GetRoomListHashLKRA, NULL, NULL, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
 866         RegisterIterator("LZRM", 0, NULL, GetZappedRoomListHash, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
 867
 868
 869         RegisterNamespace("ROOM:INFO:FLOORID", 0, 1, tmplput_ROOM_FLOORID, NULL, CTX_ROOMS);
 870         RegisterNamespace("ROOM:INFO:NAME", 0, 1, tmplput_ROOM_NAME, NULL, CTX_ROOMS);
 871         RegisterNamespace("ROOM:INFO:PRINT_NAME", 0, 1, tmplput_ROOM_NAME, NULL, CTX_NONE);
 872         RegisterNamespace("ROOM:INFO:BASENAME", 0, 1, tmplput_ROOM_BASENAME, NULL, CTX_ROOMS);
 873         RegisterNamespace("ROOM:INFO:LEVELNTIMES", 1, 2, tmplput_ROOM_LEVEL_N_TIMES, NULL, CTX_ROOMS);
 874
 875         RegisterNamespace("ROOM:INFO:ACL", 0, 1, tmplput_ROOM_ACL, NULL, CTX_ROOMS);
 876         RegisterNamespace("ROOM:INFO:QRFLAGS", 0, 1, tmplput_ROOM_QRFLAGS, NULL, CTX_ROOMS);
 877         RegisterNamespace("ROOM:INFO:RAFLAGS", 0, 1, tmplput_ROOM_RAFLAGS, NULL, CTX_ROOMS);
 878         RegisterNamespace("ROOM:INFO:LISTORDER", 0, 1, tmplput_ROOM_LISTORDER, NULL, CTX_ROOMS);
 879         RegisterNamespace("ROOM:INFO:VIEW", 0, 1, tmplput_ROOM_VIEW, NULL, CTX_ROOMS);
 880         RegisterNamespace("ROOM:INFO:DEFVIEW", 0, 1, tmplput_ROOM_DEFVIEW, NULL, CTX_ROOMS);
 881         RegisterNamespace("ROOM:INFO:LASTCHANGE", 0, 1, tmplput_ROOM_LASTCHANGE, NULL, CTX_ROOMS);
 882         RegisterNamespace("ROOM:INFO:COLLECTIONTYPE", 0, 1, tmplput_ROOM_COLLECTIONTYPE, NULL, CTX_ROOMS);
 883         RegisterNamespace("ROOM:INFO:FLOOR:ID", 0, 0, tmplput_ROOM_FLOOR_ID, NULL, CTX_ROOMS);
 884         RegisterNamespace("ROOM:INFO:FLOOR:NAME", 0, 1, tmplput_ROOM_FLOOR_NAME, NULL, CTX_ROOMS);
 885         RegisterNamespace("ROOM:INFO:FLOOR:NROOMS", 0, 0, tmplput_ROOM_FLOOR_NROOMS, NULL, CTX_ROOMS);
 886
 887         RegisterConditional(HKEY("COND:ROOM:REST:ISSUBROOM"), 0, ConditionalRoomIsRESTSubRoom, CTX_ROOMS);
 888
 889         RegisterConditional(HKEY("COND:ROOM:INFO:IS_INBOX"), 0, ConditionalRoomIsInbox, CTX_ROOMS);
 890         RegisterConditional(HKEY("COND:ROOM:GROUPDAV_CONTENT"), 0, ConditionalRoomHasGroupdavContent, CTX_ROOMS);
 891
 892
 893
 894         RegisterSortFunc(HKEY("byfloorroom"),
 895                          NULL, 0,
 896                          CompareRoomListByFloorRoomPrivFirst,
 897                          CompareRoomListByFloorRoomPrivFirstRev,
 898                          GroupchangeRoomListByFloorRoomPrivFirst,
 899                          CTX_ROOMS);
 900
 901 }