2 * room listings and filters.
8 HashList *GetWhoKnowsHash(StrBuf *Target, WCTemplputParams *TP)
13 HashList *Whok = NULL;
19 StrBuf_ServGetln(Line);
20 if (GetServerStatus(Line, &State) == 1)
22 Whok = NewHash(1, Flathash);
23 while(!Done && (StrBuf_ServGetln(Line) >= 0) )
24 if ( (StrLength(Line)==3) &&
25 !strcmp(ChrPtr(Line), "000"))
32 const char *Pos = NULL;
33 Token = NewStrBufPlain (NULL, StrLength(Line));
34 StrBufExtract_NextToken(Token, Line, &Pos, '|');
43 else if (State == 550)
44 AppendImportantMessage(_("Higher access is required to access this function."), -1);
52 void DeleteFloor(void *vFloor)
55 pFloor = (Floor*) vFloor;
56 FreeStrBuf(&pFloor->Name);
60 int SortFloorsByNameOrder(const void *vfloor1, const void *vfloor2)
62 Floor *f1 = (Floor*) GetSearchPayload(vfloor1);
63 Floor *f2 = (Floor*) GetSearchPayload(vfloor2);
65 /* prefer My floor over alpabetical sort */
66 if (f1->ID == VIRTUAL_MY_FLOOR)
68 if (f2->ID == VIRTUAL_MY_FLOOR)
71 return strcmp(ChrPtr(f1->Name), ChrPtr(f2->Name));
74 HashList *GetFloorListHash(StrBuf *Target, WCTemplputParams *TP)
80 HashList *floorsbyname;
91 if (WCC->Floors != NULL)
93 WCC->Floors = floors = NewHash(1, Flathash);
94 WCC->FloorsByName = floorsbyname = NewHash(1, NULL);
97 pFloor = (Floor*) malloc(sizeof(Floor));
98 pFloor->ID = VIRTUAL_MY_FLOOR;
99 pFloor->Name = NewStrBufPlain(_("My Folders"), -1);
102 Put(floors, IKEY(pFloor->ID), pFloor, DeleteFloor);
103 Put(floorsbyname, SKEY(pFloor->Name), pFloor, reference_free_handler);
105 serv_puts("LFLR"); /* get floors */
106 StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err); /* '100', we hope */
107 if (GetServerStatus(Buf, NULL) == 1)
109 while(!Done && StrBuf_ServGetln(Buf) >= 0)
110 if ( (StrLength(Buf)==3) &&
111 !strcmp(ChrPtr(Buf), "000"))
120 pFloor = (Floor*) malloc(sizeof(Floor));
121 pFloor->ID = StrBufExtractNext_int(Buf, &Pos, '|');
122 pFloor->Name = NewStrBufPlain(NULL, StrLength(Buf));
123 StrBufExtract_NextToken(pFloor->Name, Buf, &Pos, '|');
124 pFloor->NRooms = StrBufExtractNext_long(Buf, &Pos, '|');
126 Put(floors, IKEY(pFloor->ID), pFloor, DeleteFloor);
127 Put(floorsbyname, SKEY(pFloor->Name), pFloor, reference_free_handler);
132 /* now lets pre-sort them alphabeticaly. */
134 SortByPayload(floors, SortFloorsByNameOrder);
135 it = GetNewHashPos(floors, 0);
136 while ( GetNextHashPos(floors, it, &HKLen, &HashKey, &vFloor))
137 ((Floor*) vFloor)->AlphaN = i++;
139 SortByHashKeyStr(floors);
144 HashList *GetZappedRoomListHash(StrBuf *Target, WCTemplputParams *TP)
148 if (WCC->Floors == NULL)
149 GetFloorListHash(Target, TP);
150 serv_puts("LZRM -1");
151 return GetRoomListHash(Target, TP);
153 HashList *GetRoomListHashLKRA(StrBuf *Target, WCTemplputParams *TP)
157 if (WCC->Floors == NULL)
158 GetFloorListHash(Target, TP);
159 if (WCC->Rooms == NULL)
162 WCC->Rooms = GetRoomListHash(Target, TP);
167 HashList *GetRoomListHashLPRM(StrBuf *Target, WCTemplputParams *TP)
170 return GetRoomListHash(Target, TP);
174 void FlushIgnetCfgs(folder *room)
177 if (room->IgnetCfgs[maxRoomNetCfg] == (HashList*) StrBufNOTNULL)
179 for (i = ignet_push_share; i < maxRoomNetCfg; i++)
180 DeleteHash(&room->IgnetCfgs[i]);
182 memset(&room->IgnetCfgs, 0, sizeof(HashList *) * (maxRoomNetCfg + 1));
186 void FlushFolder(folder *room)
190 FreeStrBuf(&room->XAPass);
191 FreeStrBuf(&room->Directory);
192 FreeStrBuf(&room->RoomAide);
193 FreeStrBuf(&room->XInfoText);
194 room->XHaveInfoTextLoaded = 0;
196 FreeStrBuf(&room->name);
198 FlushIgnetCfgs(room);
200 if (room->RoomNameParts != NULL)
202 for (i=0; i < room->nRoomNameParts; i++)
203 FreeStrBuf(&room->RoomNameParts[i]);
204 free(room->RoomNameParts);
206 memset(room, 0, sizeof(folder));
209 void vDeleteFolder(void *vFolder)
213 room = (folder*) vFolder;
220 HashList *GetRoomListHash(StrBuf *Target, WCTemplputParams *TP)
230 WCTemplputParams SubTP;
233 rooms = NewHash(1, NULL);
234 StrBuf_ServGetln(Buf);
235 if (GetServerStatus(Buf, NULL) == 1)
237 while(!Done && (StrBuf_ServGetln(Buf) >= 0))
238 if ( (StrLength(Buf)==3) &&
239 !strcmp(ChrPtr(Buf), "000"))
246 room = (folder*) malloc (sizeof(folder));
247 memset(room, 0, sizeof(folder));
249 /* Load the base data from the server reply */
250 room->name = NewStrBufPlain(NULL, StrLength(Buf));
251 StrBufExtract_NextToken(room->name, Buf, &Pos, '|');
253 room->QRFlags = StrBufExtractNext_long(Buf, &Pos, '|');
254 room->floorid = StrBufExtractNext_int(Buf, &Pos, '|');
255 room->Order = StrBufExtractNext_long(Buf, &Pos, '|');
256 room->QRFlags2 = StrBufExtractNext_long(Buf, &Pos, '|');
258 room->RAFlags = StrBufExtractNext_long(Buf, &Pos, '|');
262 room->ACL = NewStrBufPlain(NULL, StrLength(Buf));
263 StrBufExtract_NextToken(room->ACL, Buf, &Pos, '|');
266 room->view = StrBufExtractNext_long(Buf, &Pos, '|');
267 room->defview = StrBufExtractNext_long(Buf, &Pos, '|');
268 room->lastchange = StrBufExtractNext_long(Buf, &Pos, '|');
270 /* Evaluate the Server sent data for later use */
271 /* find out, whether we are in a sub-room */
272 room->nRoomNameParts = StrBufNum_tokens(room->name, '\\');
273 if (room->nRoomNameParts > 1)
278 room->RoomNameParts = malloc(sizeof(StrBuf*) * (room->nRoomNameParts + 1));
279 memset(room->RoomNameParts, 0, sizeof(StrBuf*) * (room->nRoomNameParts + 1));
280 for (i=0; i < room->nRoomNameParts; i++)
282 room->RoomNameParts[i] = NewStrBuf();
283 StrBufExtract_NextToken(room->RoomNameParts[i],
284 room->name, &Pos, '\\');
288 /* Private mailboxes on the main floor get remapped to the personal folder */
289 if ((room->QRFlags & QR_MAILBOX) &&
290 (room->floorid == 0))
292 room->floorid = VIRTUAL_MY_FLOOR;
293 if ((room->nRoomNameParts == 1) &&
294 (StrLength(room->name) == 4) &&
295 (strcmp(ChrPtr(room->name), "Mail") == 0))
301 /* get a pointer to the floor we're on: */
302 GetHash(WCC->Floors, IKEY(room->floorid), &vFloor);
303 room->Floor = (const Floor*) vFloor;
307 /* now we know everything, remember it... */
308 Put(rooms, SKEY(room->name), room, vDeleteFolder);
312 SubTP.Filter.ContextType = CTX_ROOMS;
313 SortIt = RetrieveSort(&SubTP, NULL, 0, HKEY("fileunsorted"), 0);
315 SortByPayload(rooms, SortIt);
317 SortByPayload(rooms, SortRoomsByListOrder);
322 HashList *GetNetConfigHash(StrBuf *Target, WCTemplputParams *TP)
332 WantThisOne = GetTemplateTokenNumber(Target, TP, 5, -1);
333 if ((WantThisOne < 0) || (WantThisOne > maxRoomNetCfg))
335 if (WCC->CurRoom.IgnetCfgs[maxRoomNetCfg] == (HashList*) StrBufNOTNULL)
336 return WCC->CurRoom.IgnetCfgs[WantThisOne];
338 WCC->CurRoom.IgnetCfgs[maxRoomNetCfg] = (HashList*) StrBufNOTNULL;
342 StrBuf_ServGetln(Line);
343 if (GetServerStatus(Line, &State) == 1)
345 const char *Pos = NULL;
348 while(!Done && (StrBuf_ServGetln(Line) >= 0))
349 if ( (StrLength(Line)==3) &&
350 !strcmp(ChrPtr(Line), "000"))
356 StrBufExtract_NextToken(Token, Line, &Pos, '|');
357 PutTo = GetTokenDefine(SKEY(Token), -1);
359 (PutTo < maxRoomNetCfg) &&
360 (Pos != StrBufNOTNULL))
365 if (WCC->CurRoom.IgnetCfgs[PutTo] == NULL)
368 WCC->CurRoom.IgnetCfgs[PutTo] = NewHash(1, NULL);
372 n = GetCount(WCC->CurRoom.IgnetCfgs[PutTo]);
374 SubH = NewHash(1, NULL);
375 Put(WCC->CurRoom.IgnetCfgs[PutTo],
379 n = 1; /* #0 is the type... */
380 while (Pos != StrBufNOTNULL) {
381 Content = NewStrBuf();
382 StrBufExtract_NextToken(Content, Line, &Pos, '|');
393 else if (State == 550)
394 AppendImportantMessage(_("Higher access is required to access this function."), -1);
397 return WCC->CurRoom.IgnetCfgs[WantThisOne];
400 /** Unused function that orders rooms by the listorder flag */
401 int SortRoomsByListOrder(const void *room1, const void *room2)
403 folder *r1 = (folder*) GetSearchPayload(room1);
404 folder *r2 = (folder*) GetSearchPayload(room2);
406 if (r1->Order == r2->Order) return 0;
407 if (r1->Order > r2->Order) return 1;
411 int CompareRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
413 folder *r1 = (folder*) GetSearchPayload(room1);
414 folder *r2 = (folder*) GetSearchPayload(room2);
416 if ((r1->Floor == NULL) ||
421 * are we on the same floor? else sort by floor.
423 if (r1->Floor != r2->Floor)
426 * the private rooms are first in any case.
428 if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
430 if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
433 * else decide alpaheticaly by floorname
435 return (r1->Floor->AlphaN > r2->Floor->AlphaN)? 1 : -1;
439 * if we have different levels of subdirectories,
440 * we want the toplevel to be first, regardless of sort
443 if (((r1->nRoomNameParts > 1) ||
444 (r2->nRoomNameParts > 1) )&&
445 (r1->nRoomNameParts != r2->nRoomNameParts))
448 int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
449 r2->nRoomNameParts : r1->nRoomNameParts;
451 for (i=0; i < nparts; i++)
453 ret = strcmp (ChrPtr(r1->name),
456 * Deltas in common parts? exit here.
463 * who's a subdirectory of whom?
465 if (r1->nRoomNameParts > r2->nRoomNameParts)
473 * else just sort alphabeticaly.
475 return strcmp (ChrPtr(r1->name),
479 int CompareRoomListByFloorRoomPrivFirstRev(const void *room1, const void *room2)
481 folder *r1 = (folder*) GetSearchPayload(room1);
482 folder *r2 = (folder*) GetSearchPayload(room2);
484 if ((r1->Floor == NULL) ||
489 * are we on the same floor? else sort by floor.
491 if (r2->Floor != r1->Floor)
494 * the private rooms are first in any case.
496 if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
498 if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
501 * else decide alpaheticaly by floorname
504 return (r1->Floor->AlphaN < r2->Floor->AlphaN)? 1 : -1;
508 * if we have different levels of subdirectories,
509 * we want the toplevel to be first, regardless of sort
512 if (((r1->nRoomNameParts > 1) ||
513 (r2->nRoomNameParts > 1) )&&
514 (r1->nRoomNameParts != r2->nRoomNameParts))
517 int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
518 r2->nRoomNameParts : r1->nRoomNameParts;
520 for (i=0; i < nparts; i++)
523 * special cases if one room is top-level...
525 if (r2->nRoomNameParts == 1)
526 ret = strcmp (ChrPtr(r2->name),
527 ChrPtr(r1->RoomNameParts[i]));
528 else if (r1->nRoomNameParts == 1)
529 ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
532 ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
533 ChrPtr(r1->RoomNameParts[i]));
535 * Deltas in common parts? exit here.
542 * who's a subdirectory of whom?
544 if (r1->nRoomNameParts > r2->nRoomNameParts)
550 return strcmp (ChrPtr(r2->name),
554 int GroupchangeRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
556 folder *r1 = (folder*) room1;
557 folder *r2 = (folder*) room2;
560 if ((r1->Floor == NULL) ||
564 if (r1->Floor == r2->Floor)
569 static int columns = 3;
570 int boxes_per_column = 0;
573 nf = GetCount(WCC->Floors);
574 while (nf % columns != 0) ++nf;
575 boxes_per_column = (nf / columns);
576 if (boxes_per_column < 1)
577 boxes_per_column = 1;
578 if (r1->Floor->AlphaN % boxes_per_column == 0)
586 int CompareRooms(const folder *room1, const folder *room2)
588 if ((room1 == NULL) || (room2 == NULL))
590 return CompareRoomListByFloorRoomPrivFirst(room1, room2);
593 int ConditionalRoomIsRESTSubRoom(StrBuf *Target, WCTemplputParams *TP)
596 folder *Folder = (folder *)CTX;
606 /* list only folders relative to the current floor... */
607 if (Folder->Floor != WCC->CurrentFloor)
610 urlp = GetCount(WCC->Directory);
611 delta = Folder->nRoomNameParts - urlp + 1;
613 syslog(0, "\n->%s: %d - %ld ",
614 ChrPtr(Folder->name),
616 Folder->nRoomNameParts);
617 /* list only the floors which are in relation to the dav_depth header */
618 if (WCC->Hdr->HR.dav_depth != delta) {
624 it = GetNewHashPos(WCC->Directory, 0);
625 /* Fast forward the floorname we checked above... */
626 GetNextHashPos(WCC->Directory, it, &len, &Key, &vDir);
628 if (Folder->nRoomNameParts > 1) {
630 (i > Folder->nRoomNameParts) && (j > urlp);
633 if (!GetNextHashPos(WCC->Directory,
634 it, &len, &Key, &vDir) ||
642 Dir = (StrBuf*) vDir;
643 if (strcmp(ChrPtr(Folder->RoomNameParts[i]),
655 if (!GetNextHashPos(WCC->Directory,
656 it, &len, &Key, &vDir) ||
662 return WCC->Hdr->HR.dav_depth == 1;
665 Dir = (StrBuf*) vDir;
666 if (WCC->Hdr->HR.dav_depth == 0) {
667 return (strcmp(ChrPtr(Folder->name),
682 RegisterIterator("ITERATE:THISROOM:WHO_KNOWS", 0, NULL, GetWhoKnowsHash, NULL, DeleteHash, CTX_STRBUF, CTX_NONE, IT_NOFLAG);
683 RegisterIterator("ITERATE:THISROOM:GNET", 1, NULL, GetNetConfigHash, NULL, NULL, CTX_STRBUFARR, CTX_NONE, IT_NOFLAG);
685 RegisterIterator("LFLR", 0, NULL, GetFloorListHash, NULL, NULL, CTX_FLOORS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
686 RegisterIterator("LKRA", 0, NULL, GetRoomListHashLKRA, NULL, NULL, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
687 RegisterIterator("LZRM", 0, NULL, GetZappedRoomListHash, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
688 RegisterIterator("LPRM", 0, NULL, GetRoomListHashLPRM, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
693 RegisterConditional(HKEY("COND:ROOM:REST:ISSUBROOM"), 0, ConditionalRoomIsRESTSubRoom, CTX_ROOMS);
695 RegisterSortFunc(HKEY("byfloorroom"),
697 CompareRoomListByFloorRoomPrivFirst,
698 CompareRoomListByFloorRoomPrivFirstRev,
699 GroupchangeRoomListByFloorRoomPrivFirst,