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