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