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