2 * room listings and filters.
8 typedef enum __eRoomParamType {
14 HashList *GetWhoKnowsHash(StrBuf *Target, WCTemplputParams *TP)
19 HashList *Whok = NULL;
25 StrBuf_ServGetln(Line);
26 if (GetServerStatus(Line, &State) == 1)
28 Whok = NewHash(1, Flathash);
29 while(!Done && (StrBuf_ServGetln(Line) >= 0) )
30 if ( (StrLength(Line)==3) &&
31 !strcmp(ChrPtr(Line), "000"))
38 const char *Pos = NULL;
39 Token = NewStrBufPlain (NULL, StrLength(Line));
40 StrBufExtract_NextToken(Token, Line, &Pos, '|');
49 else if (State == 550)
50 AppendImportantMessage(_("Higher access is required to access this function."), -1);
58 void DeleteFloor(void *vFloor)
61 pFloor = (Floor*) vFloor;
62 FreeStrBuf(&pFloor->Name);
66 int SortFloorsByNameOrder(const void *vfloor1, const void *vfloor2)
68 Floor *f1 = (Floor*) GetSearchPayload(vfloor1);
69 Floor *f2 = (Floor*) GetSearchPayload(vfloor2);
71 /* prefer My floor over alpabetical sort */
72 if (f1->ID == VIRTUAL_MY_FLOOR)
74 if (f2->ID == VIRTUAL_MY_FLOOR)
77 return strcmp(ChrPtr(f1->Name), ChrPtr(f2->Name));
80 HashList *GetFloorListHash(StrBuf *Target, WCTemplputParams *TP)
86 HashList *floorsbyname;
97 if (WCC->Floors != NULL)
99 WCC->Floors = floors = NewHash(1, Flathash);
100 WCC->FloorsByName = floorsbyname = NewHash(1, NULL);
103 pFloor = (Floor*) malloc(sizeof(Floor));
104 pFloor->ID = VIRTUAL_MY_FLOOR;
105 pFloor->Name = NewStrBufPlain(_("My Folders"), -1);
108 Put(floors, IKEY(pFloor->ID), pFloor, DeleteFloor);
109 Put(floorsbyname, SKEY(pFloor->Name), pFloor, reference_free_handler);
111 serv_puts("LFLR"); /* get floors */
112 StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err); /* '100', we hope */
113 if (GetServerStatus(Buf, NULL) == 1)
115 while(!Done && StrBuf_ServGetln(Buf) >= 0)
116 if ( (StrLength(Buf)==3) &&
117 !strcmp(ChrPtr(Buf), "000"))
126 pFloor = (Floor*) malloc(sizeof(Floor));
127 pFloor->ID = StrBufExtractNext_int(Buf, &Pos, '|');
128 pFloor->Name = NewStrBufPlain(NULL, StrLength(Buf));
129 StrBufExtract_NextToken(pFloor->Name, Buf, &Pos, '|');
130 pFloor->NRooms = StrBufExtractNext_long(Buf, &Pos, '|');
132 Put(floors, IKEY(pFloor->ID), pFloor, DeleteFloor);
133 Put(floorsbyname, SKEY(pFloor->Name), pFloor, reference_free_handler);
138 /* now lets pre-sort them alphabeticaly. */
140 SortByPayload(floors, SortFloorsByNameOrder);
141 it = GetNewHashPos(floors, 0);
142 while ( GetNextHashPos(floors, it, &HKLen, &HashKey, &vFloor))
143 ((Floor*) vFloor)->AlphaN = i++;
145 SortByHashKeyStr(floors);
150 HashList *GetZappedRoomListHash(StrBuf *Target, WCTemplputParams *TP)
154 if (WCC->Floors == NULL)
155 GetFloorListHash(Target, TP);
156 serv_puts("LZRM -1");
157 return GetRoomListHash(Target, TP);
159 HashList *GetRoomListHashLKRA(StrBuf *Target, WCTemplputParams *TP)
163 if (WCC->Floors == NULL)
164 GetFloorListHash(Target, TP);
165 if (WCC->Rooms == NULL)
168 WCC->Rooms = GetRoomListHash(Target, TP);
173 HashList *GetRoomListHashLPRM(StrBuf *Target, WCTemplputParams *TP)
176 return GetRoomListHash(Target, TP);
180 void FlushIgnetCfgs(folder *room)
183 if (room->IgnetCfgs[maxRoomNetCfg] == (HashList*) StrBufNOTNULL)
185 for (i = ignet_push_share; i < maxRoomNetCfg; i++)
186 DeleteHash(&room->IgnetCfgs[i]);
188 memset(&room->IgnetCfgs, 0, sizeof(HashList *) * (maxRoomNetCfg + 1));
189 room->RoomAlias = NULL;
193 void FlushFolder(folder *room)
197 FreeStrBuf(&room->XAPass);
198 FreeStrBuf(&room->Directory);
199 FreeStrBuf(&room->RoomAide);
200 FreeStrBuf(&room->XInfoText);
201 room->XHaveInfoTextLoaded = 0;
203 FreeStrBuf(&room->name);
205 FlushIgnetCfgs(room);
207 if (room->RoomNameParts != NULL)
209 for (i=0; i < room->nRoomNameParts; i++)
210 FreeStrBuf(&room->RoomNameParts[i]);
211 free(room->RoomNameParts);
213 memset(room, 0, sizeof(folder));
216 void vDeleteFolder(void *vFolder)
220 room = (folder*) vFolder;
227 HashList *GetRoomListHash(StrBuf *Target, WCTemplputParams *TP)
237 WCTemplputParams SubTP;
240 rooms = NewHash(1, NULL);
241 StrBuf_ServGetln(Buf);
242 if (GetServerStatus(Buf, NULL) == 1)
244 while(!Done && (StrBuf_ServGetln(Buf) >= 0))
245 if ( (StrLength(Buf)==3) &&
246 !strcmp(ChrPtr(Buf), "000"))
253 room = (folder*) malloc (sizeof(folder));
254 memset(room, 0, sizeof(folder));
256 /* Load the base data from the server reply */
257 room->name = NewStrBufPlain(NULL, StrLength(Buf));
258 StrBufExtract_NextToken(room->name, Buf, &Pos, '|');
260 room->QRFlags = StrBufExtractNext_long(Buf, &Pos, '|');
261 room->floorid = StrBufExtractNext_int(Buf, &Pos, '|');
262 room->Order = StrBufExtractNext_long(Buf, &Pos, '|');
263 room->QRFlags2 = StrBufExtractNext_long(Buf, &Pos, '|');
265 room->RAFlags = StrBufExtractNext_long(Buf, &Pos, '|');
269 room->ACL = NewStrBufPlain(NULL, StrLength(Buf));
270 StrBufExtract_NextToken(room->ACL, Buf, &Pos, '|');
273 room->view = StrBufExtractNext_long(Buf, &Pos, '|');
274 room->defview = StrBufExtractNext_long(Buf, &Pos, '|');
275 room->lastchange = StrBufExtractNext_long(Buf, &Pos, '|');
277 /* Evaluate the Server sent data for later use */
278 /* find out, whether we are in a sub-room */
279 room->nRoomNameParts = StrBufNum_tokens(room->name, '\\');
280 if (room->nRoomNameParts > 1)
285 room->RoomNameParts = malloc(sizeof(StrBuf*) * (room->nRoomNameParts + 1));
286 memset(room->RoomNameParts, 0, sizeof(StrBuf*) * (room->nRoomNameParts + 1));
287 for (i=0; i < room->nRoomNameParts; i++)
289 room->RoomNameParts[i] = NewStrBuf();
290 StrBufExtract_NextToken(room->RoomNameParts[i],
291 room->name, &Pos, '\\');
295 /* Private mailboxes on the main floor get remapped to the personal folder */
296 if ((room->QRFlags & QR_MAILBOX) &&
297 (room->floorid == 0))
299 room->floorid = VIRTUAL_MY_FLOOR;
300 if ((room->nRoomNameParts == 1) &&
301 (StrLength(room->name) == 4) &&
302 (strcmp(ChrPtr(room->name), "Mail") == 0))
308 /* get a pointer to the floor we're on: */
309 GetHash(WCC->Floors, IKEY(room->floorid), &vFloor);
310 room->Floor = (const Floor*) vFloor;
314 /* now we know everything, remember it... */
315 Put(rooms, SKEY(room->name), room, vDeleteFolder);
319 SubTP.Filter.ContextType = CTX_ROOMS;
320 SortIt = RetrieveSort(&SubTP, NULL, 0, HKEY("fileunsorted"), 0);
322 SortByPayload(rooms, SortIt);
324 SortByPayload(rooms, SortRoomsByListOrder);
329 HashList *GetThisRoomMAlias(StrBuf *Target, WCTemplputParams *TP)
334 HashList *Aliases = NULL;
340 serv_puts("GNET "FILE_MAILALIAS);
342 StrBuf_ServGetln(Line);
343 if (GetServerStatus(Line, &State) == 1)
348 Aliases = NewHash(1, NULL);
349 while(!Done && (StrBuf_ServGetln(Line) >= 0))
350 if ( (StrLength(Line)==3) &&
351 !strcmp(ChrPtr(Line), "000"))
357 pComma = strchr(ChrPtr(Line), ',');
360 aliaslen = pComma - ChrPtr(Line);
361 locallen = StrLength(Line) - 1 - aliaslen;
362 if (locallen - 5 != StrLength(WCC->CurRoom.name))
364 if (strncmp(pComma + 1, "room_", 5) != 0)
367 if (strcasecmp(pComma + 6, ChrPtr(WCC->CurRoom.name)) != 0)
369 Token = NewStrBufPlain(ChrPtr(Line), aliaslen);
377 else if (State == 550)
378 AppendImportantMessage(_("Higher access is required to access this function."), -1);
386 void AppendPossibleAliasWithDomain(
387 HashList *PossibleAliases,
388 long *nPossibleAliases,
389 const HashList *Domains,
395 const StrBuf *OneDomain;
403 It = GetNewHashPos(Domains, 1);
404 n = *nPossibleAliases;
405 while (GetNextHashPos(Domains, It, &KLen, &Key, &pV))
407 OneDomain = (const StrBuf*) pV;
409 StrBufAppendBufPlain(Line, prefix, len, 0);
410 StrBufAppendBufPlain(Line, Alias, AliasLen, 0);
411 StrBufAppendBufPlain(Line, HKEY("@"), 0);
412 StrBufAppendBuf(Line, OneDomain, 0);
421 *nPossibleAliases = n;
424 HashList *GetThisRoomPossibleMAlias(StrBuf *Target, WCTemplputParams *TP)
431 HashList *PossibleAliases = NULL;
440 Domains = GetValidDomainNames(Target, TP);
443 if (GetCount(Domains) == 0) {
447 PossibleAliases = NewHash(1, NULL);
449 RoomName = NewStrBufDup(WCC->CurRoom.name);
450 StrBufAsciify(RoomName, '_');
451 StrBufReplaceChars(RoomName, ' ', '_');
453 AppendPossibleAliasWithDomain(PossibleAliases,
460 serv_puts("GNET "FILE_MAILALIAS);
461 StrBuf_ServGetln(Line);
462 if (GetServerStatus(Line, &State) == 1)
466 while(!Done && (StrBuf_ServGetln(Line) >= 0))
467 if ( (StrLength(Line)==3) &&
468 !strcmp(ChrPtr(Line), "000"))
474 pComma = strchr(ChrPtr(Line), ',');
477 aliaslen = pComma - ChrPtr(Line);
478 locallen = StrLength(Line) - 1 - aliaslen;
479 if (locallen - 5 != StrLength(WCC->CurRoom.name))
481 if (strncmp(pComma + 1, "room_", 5) != 0)
484 if (strcasecmp(pComma + 6, ChrPtr(WCC->CurRoom.name)) != 0)
486 pAt = strchr(ChrPtr(Line), '@');
487 if ((pAt == NULL) || (pAt > pComma))
489 AppendPossibleAliasWithDomain(PossibleAliases,
500 Token = NewStrBufPlain(ChrPtr(Line), aliaslen);
509 else if (State == 550)
510 AppendImportantMessage(_("Higher access is required to access this function."), -1);
511 DeleteHash(&Domains);
513 FreeStrBuf(&RoomName);
514 return PossibleAliases;
518 HashList *GetNetConfigHash(StrBuf *Target, WCTemplputParams *TP)
528 WantThisOne = GetTemplateTokenNumber(Target, TP, 5, -1);
529 if ((WantThisOne < 0) || (WantThisOne > maxRoomNetCfg))
531 if (WCC->CurRoom.IgnetCfgs[maxRoomNetCfg] == (HashList*) StrBufNOTNULL)
532 return WCC->CurRoom.IgnetCfgs[WantThisOne];
534 WCC->CurRoom.IgnetCfgs[maxRoomNetCfg] = (HashList*) StrBufNOTNULL;
538 StrBuf_ServGetln(Line);
539 if (GetServerStatus(Line, &State) == 1)
541 const char *Pos = NULL;
543 int HaveRoomMailAlias = 0;
545 while(!Done && (StrBuf_ServGetln(Line) >= 0))
547 if (StrLength(Line) == 0)
549 if ( (StrLength(Line)==3) &&
550 !strcmp(ChrPtr(Line), "000"))
556 StrBufExtract_NextToken(Token, Line, &Pos, '|');
557 PutTo = GetTokenDefine(SKEY(Token), -1);
558 if (PutTo == roommailalias)
560 if (HaveRoomMailAlias > 0)
561 continue; /* Only ONE alias possible! */
565 (PutTo < maxRoomNetCfg) &&
566 (Pos != StrBufNOTNULL))
571 if (WCC->CurRoom.IgnetCfgs[PutTo] == NULL)
574 WCC->CurRoom.IgnetCfgs[PutTo] = NewHash(1, NULL);
578 n = GetCount(WCC->CurRoom.IgnetCfgs[PutTo]);
580 SubH = NewHash(1, NULL);
581 Put(WCC->CurRoom.IgnetCfgs[PutTo],
585 n = 1; /* #0 is the type... */
586 while (Pos != StrBufNOTNULL) {
587 Content = NewStrBuf();
588 StrBufExtract_NextToken(Content, Line, &Pos, '|');
590 if ((PutTo == roommailalias) && n == 1)
591 WCC->CurRoom.RoomAlias = Content;
604 else if (State == 550)
605 AppendImportantMessage(_("Higher access is required to access this function."), -1);
610 return WCC->CurRoom.IgnetCfgs[WantThisOne];
613 /** Unused function that orders rooms by the listorder flag */
614 int SortRoomsByListOrder(const void *room1, const void *room2)
616 folder *r1 = (folder*) GetSearchPayload(room1);
617 folder *r2 = (folder*) GetSearchPayload(room2);
619 if (r1->Order == r2->Order) return 0;
620 if (r1->Order > r2->Order) return 1;
624 int CompareRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
626 folder *r1 = (folder*) GetSearchPayload(room1);
627 folder *r2 = (folder*) GetSearchPayload(room2);
629 if ((r1->Floor == NULL) ||
634 * are we on the same floor? else sort by floor.
636 if (r1->Floor != r2->Floor)
639 * the private rooms are first in any case.
641 if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
643 if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
646 * else decide alpaheticaly by floorname
648 return (r1->Floor->AlphaN > r2->Floor->AlphaN)? 1 : -1;
652 * if we have different levels of subdirectories,
653 * we want the toplevel to be first, regardless of sort
656 if (((r1->nRoomNameParts > 1) ||
657 (r2->nRoomNameParts > 1) )&&
658 (r1->nRoomNameParts != r2->nRoomNameParts))
661 int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
662 r2->nRoomNameParts : r1->nRoomNameParts;
664 for (i=0; i < nparts; i++)
666 ret = strcmp (ChrPtr(r1->name),
669 * Deltas in common parts? exit here.
676 * who's a subdirectory of whom?
678 if (r1->nRoomNameParts > r2->nRoomNameParts)
686 * else just sort alphabeticaly.
688 return strcmp (ChrPtr(r1->name),
692 int CompareRoomListByFloorRoomPrivFirstRev(const void *room1, const void *room2)
694 folder *r1 = (folder*) GetSearchPayload(room1);
695 folder *r2 = (folder*) GetSearchPayload(room2);
697 if ((r1->Floor == NULL) ||
702 * are we on the same floor? else sort by floor.
704 if (r2->Floor != r1->Floor)
707 * the private rooms are first in any case.
709 if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
711 if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
714 * else decide alpaheticaly by floorname
717 return (r1->Floor->AlphaN < r2->Floor->AlphaN)? 1 : -1;
721 * if we have different levels of subdirectories,
722 * we want the toplevel to be first, regardless of sort
725 if (((r1->nRoomNameParts > 1) ||
726 (r2->nRoomNameParts > 1) )&&
727 (r1->nRoomNameParts != r2->nRoomNameParts))
730 int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
731 r2->nRoomNameParts : r1->nRoomNameParts;
733 for (i=0; i < nparts; i++)
736 * special cases if one room is top-level...
738 if (r2->nRoomNameParts == 1)
739 ret = strcmp (ChrPtr(r2->name),
740 ChrPtr(r1->RoomNameParts[i]));
741 else if (r1->nRoomNameParts == 1)
742 ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
745 ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
746 ChrPtr(r1->RoomNameParts[i]));
748 * Deltas in common parts? exit here.
755 * who's a subdirectory of whom?
757 if (r1->nRoomNameParts > r2->nRoomNameParts)
763 return strcmp (ChrPtr(r2->name),
767 int GroupchangeRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
769 folder *r1 = (folder*) room1;
770 folder *r2 = (folder*) room2;
773 if ((r1->Floor == NULL) ||
777 if (r1->Floor == r2->Floor)
782 static int columns = 3;
783 int boxes_per_column = 0;
786 nf = GetCount(WCC->Floors);
787 while (nf % columns != 0) ++nf;
788 boxes_per_column = (nf / columns);
789 if (boxes_per_column < 1)
790 boxes_per_column = 1;
791 if (r1->Floor->AlphaN % boxes_per_column == 0)
799 int CompareRooms(const folder *room1, const folder *room2)
801 if ((room1 == NULL) || (room2 == NULL))
803 return CompareRoomListByFloorRoomPrivFirst(room1, room2);
806 int ConditionalThisRoomIsStrBufContextAlias(StrBuf *Target, WCTemplputParams *TP)
811 eRoomParamType ParamType;
813 ParamType = GetTemplateTokenNumber(Target, TP, 2, eNotSet);
814 GetTemplateTokenString(Target, TP, 3, &pVal, &len);
816 if (ParamType == eNotSet)
818 return StrLength(WCC->CurRoom.RoomAlias) == 0;
820 else if (ParamType == eDomain)
822 const StrBuf *CtxStr = (const StrBuf*) CTX(CTX_STRBUF);
828 if (StrLength(WCC->CurRoom.RoomAlias) == 0)
831 if (strncmp(ChrPtr(WCC->CurRoom.RoomAlias), "room_", 5) != 0)
834 pAt = strchr(ChrPtr(WCC->CurRoom.RoomAlias), '@');
837 return strcmp(pAt + 1, ChrPtr(CtxStr)) == 0;
839 else if (ParamType == eAlias)
841 const StrBuf *CtxStr = (const StrBuf*) CTX(CTX_STRBUF);
846 if (StrLength(WCC->CurRoom.RoomAlias) == 0)
849 return strcmp(ChrPtr(WCC->CurRoom.RoomAlias), ChrPtr(CtxStr)) == 0;
853 LogTemplateError(Target, "TokenParameter", 2, TP,
854 "Invalid paramtype; need one of [eNotSet|eDomain|eAlias]");
860 int ConditionalRoomIsRESTSubRoom(StrBuf *Target, WCTemplputParams *TP)
863 folder *Folder = (folder *)CTX(CTX_ROOMS);
873 /* list only folders relative to the current floor... */
874 if (Folder->Floor != WCC->CurrentFloor)
877 urlp = GetCount(WCC->Directory);
878 delta = Folder->nRoomNameParts - urlp + 1;
880 syslog(LOG_DEBUG, "\n->%s: %d - %ld ",
881 ChrPtr(Folder->name),
883 Folder->nRoomNameParts);
884 /* list only the floors which are in relation to the dav_depth header */
885 if (WCC->Hdr->HR.dav_depth != delta) {
886 syslog(LOG_DEBUG, "1\n");
891 it = GetNewHashPos(WCC->Directory, 0);
892 /* Fast forward the floorname we checked above... */
893 GetNextHashPos(WCC->Directory, it, &len, &Key, &vDir);
895 if (Folder->nRoomNameParts > 1) {
897 (i > Folder->nRoomNameParts) && (j > urlp);
900 if (!GetNextHashPos(WCC->Directory,
901 it, &len, &Key, &vDir) ||
906 syslog(LOG_DEBUG, "3\n");
909 Dir = (StrBuf*) vDir;
910 if (strcmp(ChrPtr(Folder->RoomNameParts[i]),
914 syslog(LOG_DEBUG, "4\n");
922 if (!GetNextHashPos(WCC->Directory,
923 it, &len, &Key, &vDir) ||
928 syslog(LOG_DEBUG, "5\n");
929 return WCC->Hdr->HR.dav_depth == 1;
932 Dir = (StrBuf*) vDir;
933 if (WCC->Hdr->HR.dav_depth == 0) {
934 return (strcmp(ChrPtr(Folder->name),
948 /* we duplicate this, just to be shure its already done. */
949 RegisterCTX(CTX_ROOMS);
950 RegisterCTX(CTX_FLOORS);
952 RegisterIterator("ITERATE:THISROOM:WHO_KNOWS", 0, NULL, GetWhoKnowsHash, NULL, DeleteHash, CTX_STRBUF, CTX_NONE, IT_NOFLAG);
953 RegisterIterator("ITERATE:THISROOM:GNET", 1, NULL, GetNetConfigHash, NULL, NULL, CTX_STRBUFARR, CTX_NONE, IT_NOFLAG);
954 RegisterIterator("ITERATE:THISROOM:MALIAS", 1, NULL, GetThisRoomMAlias, NULL, DeleteHash, CTX_STRBUF, CTX_NONE, IT_NOFLAG);
955 RegisterIterator("ITERATE:THISROOM:POSSIBLE:MALIAS", 1, NULL, GetThisRoomPossibleMAlias, NULL, DeleteHash, CTX_STRBUF, CTX_NONE, IT_NOFLAG);
957 RegisterIterator("LFLR", 0, NULL, GetFloorListHash, NULL, NULL, CTX_FLOORS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
958 RegisterIterator("LKRA", 0, NULL, GetRoomListHashLKRA, NULL, NULL, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
959 RegisterIterator("LZRM", 0, NULL, GetZappedRoomListHash, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
960 RegisterIterator("LPRM", 0, NULL, GetRoomListHashLPRM, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
963 REGISTERTokenParamDefine(eNotSet);
964 REGISTERTokenParamDefine(eDomain);
965 REGISTERTokenParamDefine(eAlias);
968 RegisterConditional("COND:ROOM:REST:ISSUBROOM", 0, ConditionalRoomIsRESTSubRoom, CTX_ROOMS);
970 RegisterConditional("COND:THISROOM:ISALIAS:CONTEXTSTR", 0, ConditionalThisRoomIsStrBufContextAlias, CTX_NONE);
972 RegisterSortFunc(HKEY("byfloorroom"),
974 CompareRoomListByFloorRoomPrivFirst,
975 CompareRoomListByFloorRoomPrivFirstRev,
976 GroupchangeRoomListByFloorRoomPrivFirst,