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