-/*
- * room listings and filters.
- */
-
-#include "webcit.h"
-#include "webserver.h"
-
-typedef enum __eRoomParamType {
- eNotSet,
- eDomain,
- eAlias
-}eRoomParamType;
-
-HashList *GetWhoKnowsHash(StrBuf *Target, WCTemplputParams *TP)
-{
- StrBuf *Line;
- StrBuf *Token;
- long State;
- HashList *Whok = NULL;
- int Done = 0;
- int n = 0;
-
- serv_puts("WHOK");
- Line = NewStrBuf();
- StrBuf_ServGetln(Line);
- if (GetServerStatus(Line, &State) == 1)
- {
- Whok = NewHash(1, Flathash);
- while(!Done && (StrBuf_ServGetln(Line) >= 0) )
- if ( (StrLength(Line)==3) &&
- !strcmp(ChrPtr(Line), "000"))
- {
- Done = 1;
- }
- else
- {
-
- const char *Pos = NULL;
- Token = NewStrBufPlain (NULL, StrLength(Line));
- StrBufExtract_NextToken(Token, Line, &Pos, '|');
-
- Put(Whok,
- IKEY(n),
- Token,
- HFreeStrBuf);
- n++;
- }
- }
- else if (State == 550)
- AppendImportantMessage(_("Higher access is required to access this function."), -1);
-
-
- FreeStrBuf(&Line);
- return Whok;
-}
-
-
-void DeleteFloor(void *vFloor)
-{
- Floor *pFloor;
- pFloor = (Floor*) vFloor;
- FreeStrBuf(&pFloor->Name);
- free(pFloor);
-}
-
-int SortFloorsByNameOrder(const void *vfloor1, const void *vfloor2)
-{
- Floor *f1 = (Floor*) GetSearchPayload(vfloor1);
- Floor *f2 = (Floor*) GetSearchPayload(vfloor2);
-
- /* prefer My floor over alpabetical sort */
- if (f1->ID == VIRTUAL_MY_FLOOR)
- return 1;
- if (f2->ID == VIRTUAL_MY_FLOOR)
- return -1;
-
- return strcmp(ChrPtr(f1->Name), ChrPtr(f2->Name));
-}
-
-HashList *GetFloorListHash(StrBuf *Target, WCTemplputParams *TP)
-{
- int Done = 0;
- const char *Err;
- StrBuf *Buf;
- HashList *floors;
- HashList *floorsbyname;
- HashPos *it;
- Floor *pFloor;
- void *vFloor;
- const char *Pos;
- int i;
- wcsession *WCC = WC;
- const char *HashKey;
- long HKLen;
-
-
- if (WCC->Floors != NULL)
- return WCC->Floors;
- WCC->Floors = floors = NewHash(1, Flathash);
- WCC->FloorsByName = floorsbyname = NewHash(1, NULL);
- Buf = NewStrBuf();
-
- pFloor = (Floor*) malloc(sizeof(Floor));
- pFloor->ID = VIRTUAL_MY_FLOOR;
- pFloor->Name = NewStrBufPlain(_("My Folders"), -1);
- pFloor->NRooms = 0;
-
- Put(floors, IKEY(pFloor->ID), pFloor, DeleteFloor);
- Put(floorsbyname, SKEY(pFloor->Name), pFloor, reference_free_handler);
-
- serv_puts("LFLR"); /* get floors */
- StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err); /* '100', we hope */
- if (GetServerStatus(Buf, NULL) == 1)
- {
- while(!Done && StrBuf_ServGetln(Buf) >= 0)
- if ( (StrLength(Buf)==3) &&
- !strcmp(ChrPtr(Buf), "000"))
- {
- Done = 1;
- }
- else
- {
-
- Pos = NULL;
-
- pFloor = (Floor*) malloc(sizeof(Floor));
- pFloor->ID = StrBufExtractNext_int(Buf, &Pos, '|');
- pFloor->Name = NewStrBufPlain(NULL, StrLength(Buf));
- StrBufExtract_NextToken(pFloor->Name, Buf, &Pos, '|');
- pFloor->NRooms = StrBufExtractNext_long(Buf, &Pos, '|');
-
- Put(floors, IKEY(pFloor->ID), pFloor, DeleteFloor);
- Put(floorsbyname, SKEY(pFloor->Name), pFloor, reference_free_handler);
- }
- }
- FreeStrBuf(&Buf);
-
- /* now lets pre-sort them alphabeticaly. */
- i = 1;
- SortByPayload(floors, SortFloorsByNameOrder);
- it = GetNewHashPos(floors, 0);
- while ( GetNextHashPos(floors, it, &HKLen, &HashKey, &vFloor))
- ((Floor*) vFloor)->AlphaN = i++;
- DeleteHashPos(&it);
- SortByHashKeyStr(floors);
-
- return floors;
-}
-
-HashList *GetZappedRoomListHash(StrBuf *Target, WCTemplputParams *TP)
-{
- wcsession *WCC = WC;
-
- if (WCC->Floors == NULL)
- GetFloorListHash(Target, TP);
- serv_puts("LZRM -1");
- return GetRoomListHash(Target, TP);
-}
-HashList *GetRoomListHashLKRA(StrBuf *Target, WCTemplputParams *TP)
-{
- wcsession *WCC = WC;
-
- if (WCC->Floors == NULL)
- GetFloorListHash(Target, TP);
- if (WCC->Rooms == NULL)
- {
- serv_puts("LKRA");
- WCC->Rooms = GetRoomListHash(Target, TP);
- }
- return WCC->Rooms;
-}
-
-HashList *GetRoomListHashLPRM(StrBuf *Target, WCTemplputParams *TP)
-{
- serv_puts("LPRM");
- return GetRoomListHash(Target, TP);
-}
-
-
-void FlushIgnetCfgs(folder *room)
-{
- int i;
- if (room->IgnetCfgs[maxRoomNetCfg] == (HashList*) StrBufNOTNULL)
- {
- for (i = ignet_push_share; i < maxRoomNetCfg; i++)
- DeleteHash(&room->IgnetCfgs[i]);
- }
- memset(&room->IgnetCfgs, 0, sizeof(HashList *) * (maxRoomNetCfg + 1));
- room->RoomAlias = NULL;
-
-}
-
-void FlushFolder(folder *room)
-{
- int i;
-
- FreeStrBuf(&room->XAPass);
- FreeStrBuf(&room->Directory);
- FreeStrBuf(&room->RoomAide);
- FreeStrBuf(&room->XInfoText);
- room->XHaveInfoTextLoaded = 0;
-
- FreeStrBuf(&room->name);
-
- FlushIgnetCfgs(room);
-
- if (room->RoomNameParts != NULL)
- {
- for (i=0; i < room->nRoomNameParts; i++)
- FreeStrBuf(&room->RoomNameParts[i]);
- free(room->RoomNameParts);
- }
- memset(room, 0, sizeof(folder));
-}
-
-void vDeleteFolder(void *vFolder)
-{
- folder *room;
-
- room = (folder*) vFolder;
- FlushFolder(room);
-
- free(room);
-}
-
-
-HashList *GetRoomListHash(StrBuf *Target, WCTemplputParams *TP)
-{
- int Done = 0;
- HashList *rooms;
- folder *room;
- StrBuf *Buf;
- const char *Pos;
- void *vFloor;
- wcsession *WCC = WC;
- CompareFunc SortIt;
- WCTemplputParams SubTP;
-
- Buf = NewStrBuf();
- rooms = NewHash(1, NULL);
- StrBuf_ServGetln(Buf);
- if (GetServerStatus(Buf, NULL) == 1)
- {
- while(!Done && (StrBuf_ServGetln(Buf) >= 0))
- if ( (StrLength(Buf)==3) &&
- !strcmp(ChrPtr(Buf), "000"))
- {
- Done = 1;
- }
- else
- {
- Pos = NULL;
- room = (folder*) malloc (sizeof(folder));
- memset(room, 0, sizeof(folder));
-
- /* Load the base data from the server reply */
- room->name = NewStrBufPlain(NULL, StrLength(Buf));
- StrBufExtract_NextToken(room->name, Buf, &Pos, '|');
-
- room->QRFlags = StrBufExtractNext_long(Buf, &Pos, '|');
- room->floorid = StrBufExtractNext_int(Buf, &Pos, '|');
- room->Order = StrBufExtractNext_long(Buf, &Pos, '|');
- room->QRFlags2 = StrBufExtractNext_long(Buf, &Pos, '|');
-
- room->RAFlags = StrBufExtractNext_long(Buf, &Pos, '|');
-
-/*
- ACWHUT?
- room->ACL = NewStrBufPlain(NULL, StrLength(Buf));
- StrBufExtract_NextToken(room->ACL, Buf, &Pos, '|');
-*/
-
- room->view = StrBufExtractNext_long(Buf, &Pos, '|');
- room->defview = StrBufExtractNext_long(Buf, &Pos, '|');
- room->lastchange = StrBufExtractNext_long(Buf, &Pos, '|');
-
- /* Evaluate the Server sent data for later use */
- /* find out, whether we are in a sub-room */
- room->nRoomNameParts = StrBufNum_tokens(room->name, '\\');
- if (room->nRoomNameParts > 1)
- {
- int i;
-
- Pos = NULL;
- room->RoomNameParts = malloc(sizeof(StrBuf*) * (room->nRoomNameParts + 1));
- memset(room->RoomNameParts, 0, sizeof(StrBuf*) * (room->nRoomNameParts + 1));
- for (i=0; i < room->nRoomNameParts; i++)
- {
- room->RoomNameParts[i] = NewStrBuf();
- StrBufExtract_NextToken(room->RoomNameParts[i],
- room->name, &Pos, '\\');
- }
- }
-
- /* Private mailboxes on the main floor get remapped to the personal folder */
- if ((room->QRFlags & QR_MAILBOX) &&
- (room->floorid == 0))
- {
- room->floorid = VIRTUAL_MY_FLOOR;
- if ((room->nRoomNameParts == 1) &&
- (StrLength(room->name) == 4) &&
- (strcmp(ChrPtr(room->name), "Mail") == 0))
- {
- room->is_inbox = 1;
- }
-
- }
- /* get a pointer to the floor we're on: */
- GetHash(WCC->Floors, IKEY(room->floorid), &vFloor);
- room->Floor = (const Floor*) vFloor;
-
-
-
- /* now we know everything, remember it... */
- Put(rooms, SKEY(room->name), room, vDeleteFolder);
- }
- }
-
- SubTP.Filter.ContextType = CTX_ROOMS;
- SortIt = RetrieveSort(&SubTP, NULL, 0, HKEY("fileunsorted"), 0);
- if (SortIt != NULL)
- SortByPayload(rooms, SortIt);
- else
- SortByPayload(rooms, SortRoomsByListOrder);
- FreeStrBuf(&Buf);
- return rooms;
-}
-
-HashList *GetThisRoomMAlias(StrBuf *Target, WCTemplputParams *TP)
-{
- wcsession *WCC = WC;
- StrBuf *Line;
- StrBuf *Token;
- HashList *Aliases = NULL;
- const char *pComma;
- long aliaslen;
- long locallen;
- long State;
-
- serv_puts("GNET "FILE_MAILALIAS);
- Line = NewStrBuf();
- StrBuf_ServGetln(Line);
- if (GetServerStatus(Line, &State) == 1)
- {
- int Done = 0;
- int n = 0;
-
- Aliases = NewHash(1, NULL);
- while(!Done && (StrBuf_ServGetln(Line) >= 0))
- if ( (StrLength(Line)==3) &&
- !strcmp(ChrPtr(Line), "000"))
- {
- Done = 1;
- }
- else
- {
- pComma = strchr(ChrPtr(Line), ',');
- if (pComma == NULL)
- continue;
- aliaslen = pComma - ChrPtr(Line);
- locallen = StrLength(Line) - 1 - aliaslen;
- if (locallen - 5 != StrLength(WCC->CurRoom.name))
- continue;
- if (strncmp(pComma + 1, "room_", 5) != 0)
- continue;
-
- if (strcasecmp(pComma + 6, ChrPtr(WCC->CurRoom.name)) != 0)
- continue;
- Token = NewStrBufPlain(ChrPtr(Line), aliaslen);
- Put(Aliases,
- IKEY(n),
- Token,
- HFreeStrBuf);
- n++;
- }
- }
- else if (State == 550)
- AppendImportantMessage(_("Higher access is required to access this function."), -1);
-
- FreeStrBuf(&Line);
-
- return Aliases;
-}
-
-
-void AppendPossibleAliasWithDomain(
- HashList *PossibleAliases,
- long *nPossibleAliases,
- const HashList *Domains,
- const char *prefix,
- long len,
- const char* Alias,
- long AliasLen)
-{
- const StrBuf *OneDomain;
- StrBuf *Line;
- HashPos *It = NULL;
- const char *Key;
- long KLen;
- void *pV;
- int n;
-
- It = GetNewHashPos(Domains, 1);
- n = *nPossibleAliases;
- while (GetNextHashPos(Domains, It, &KLen, &Key, &pV))
- {
- OneDomain = (const StrBuf*) pV;
- Line = NewStrBuf();
- StrBufAppendBufPlain(Line, prefix, len, 0);
- StrBufAppendBufPlain(Line, Alias, AliasLen, 0);
- StrBufAppendBufPlain(Line, HKEY("@"), 0);
- StrBufAppendBuf(Line, OneDomain, 0);
-
- Put(PossibleAliases,
- IKEY(n),
- Line,
- HFreeStrBuf);
- n++;
- }
- DeleteHashPos(&It);
- *nPossibleAliases = n;
-}
-
-HashList *GetThisRoomPossibleMAlias(StrBuf *Target, WCTemplputParams *TP)
-{
- wcsession *WCC = WC;
- HashList *Domains;
- StrBuf *Line;
- StrBuf *Token;
- StrBuf *RoomName;
- HashList *PossibleAliases = NULL;
-
- const char *pComma;
- const char *pAt;
- long aliaslen;
- long locallen;
- long State;
- long n = 0;
-
- Domains = GetValidDomainNames(Target, TP);
- if (Domains == NULL)
- return NULL;
- if (GetCount(Domains) == 0) {
- DeleteHash(&Domains);
- return NULL;
- }
- PossibleAliases = NewHash(1, NULL);
- Line = NewStrBuf();
- RoomName = NewStrBufDup(WCC->CurRoom.name);
- StrBufAsciify(RoomName, '_');
- StrBufReplaceChars(RoomName, ' ', '_');
-
- AppendPossibleAliasWithDomain(PossibleAliases,
- &n,
- Domains,
- HKEY("room_"),
- SKEY(RoomName));
-
-
- serv_puts("GNET "FILE_MAILALIAS);
- StrBuf_ServGetln(Line);
- if (GetServerStatus(Line, &State) == 1)
- {
- int Done = 0;
-
- while(!Done && (StrBuf_ServGetln(Line) >= 0))
- if ( (StrLength(Line)==3) &&
- !strcmp(ChrPtr(Line), "000"))
- {
- Done = 1;
- }
- else
- {
- pComma = strchr(ChrPtr(Line), ',');
- if (pComma == NULL)
- continue;
- aliaslen = pComma - ChrPtr(Line);
- locallen = StrLength(Line) - 1 - aliaslen;
- if (locallen - 5 != StrLength(WCC->CurRoom.name))
- continue;
- if (strncmp(pComma + 1, "room_", 5) != 0)
- continue;
-
- if (strcasecmp(pComma + 6, ChrPtr(WCC->CurRoom.name)) != 0)
- continue;
- pAt = strchr(ChrPtr(Line), '@');
- if ((pAt == NULL) || (pAt > pComma))
- {
- AppendPossibleAliasWithDomain(PossibleAliases,
- &n,
- Domains,
- HKEY(""),
- ChrPtr(Line),
- aliaslen);
- n++;
- }
- else
- {
-
- Token = NewStrBufPlain(ChrPtr(Line), aliaslen);
- Put(PossibleAliases,
- IKEY(n),
- Token,
- HFreeStrBuf);
- n++;
- }
- }
- }
- else if (State == 550)
- AppendImportantMessage(_("Higher access is required to access this function."), -1);
- DeleteHash(&Domains);
- FreeStrBuf(&Line);
- FreeStrBuf(&RoomName);
- return PossibleAliases;
-}
-
-
-HashList *GetNetConfigHash(StrBuf *Target, WCTemplputParams *TP)
-{
- wcsession *WCC = WC;
- StrBuf *Line;
- StrBuf *Token;
- StrBuf *Content;
- long WantThisOne;
- long PutTo;
- long State;
-
- WantThisOne = GetTemplateTokenNumber(Target, TP, 5, -1);
- if ((WantThisOne < 0) || (WantThisOne > maxRoomNetCfg))
- return NULL;
- if (WCC->CurRoom.IgnetCfgs[maxRoomNetCfg] == (HashList*) StrBufNOTNULL)
- return WCC->CurRoom.IgnetCfgs[WantThisOne];
-
- WCC->CurRoom.IgnetCfgs[maxRoomNetCfg] = (HashList*) StrBufNOTNULL;
- serv_puts("GNET");
- Line = NewStrBuf();
- Token = NewStrBuf();
- StrBuf_ServGetln(Line);
- if (GetServerStatus(Line, &State) == 1)
- {
- const char *Pos = NULL;
- int Done = 0;
- int HaveRoomMailAlias = 0;
-
- while(!Done && (StrBuf_ServGetln(Line) >= 0))
- {
- if (StrLength(Line) == 0)
- continue;
- if ( (StrLength(Line)==3) &&
- !strcmp(ChrPtr(Line), "000"))
- {
- Done = 1;
- }
- else
- {
- StrBufExtract_NextToken(Token, Line, &Pos, '|');
- PutTo = GetTokenDefine(SKEY(Token), -1);
- if (PutTo == roommailalias)
- {
- if (HaveRoomMailAlias > 0)
- continue; /* Only ONE alias possible! */
- HaveRoomMailAlias++;
- }
- if ((PutTo >= 0) &&
- (PutTo < maxRoomNetCfg) &&
- (Pos != StrBufNOTNULL))
- {
- int n;
- HashList *SubH;
-
- if (WCC->CurRoom.IgnetCfgs[PutTo] == NULL)
- {
- n = 0;
- WCC->CurRoom.IgnetCfgs[PutTo] = NewHash(1, NULL);
- }
- else
- {
- n = GetCount(WCC->CurRoom.IgnetCfgs[PutTo]);
- }
- SubH = NewHash(1, NULL);
- Put(WCC->CurRoom.IgnetCfgs[PutTo],
- IKEY(n),
- SubH,
- HDeleteHash);
- n = 1; /* #0 is the type... */
- while (Pos != StrBufNOTNULL) {
- Content = NewStrBuf();
- StrBufExtract_NextToken(Content, Line, &Pos, '|');
-
- if ((PutTo == roommailalias) && n == 1)
- WCC->CurRoom.RoomAlias = Content;
-
- Put(SubH,
- IKEY(n),
- Content,
- HFreeStrBuf);
- n++;
- }
- }
- Pos = NULL;
- }
- }
- }
- else if (State == 550)
- AppendImportantMessage(_("Higher access is required to access this function."), -1);
-
- FreeStrBuf(&Line);
- FreeStrBuf(&Token);
-
- return WCC->CurRoom.IgnetCfgs[WantThisOne];
-}
-
-/** Unused function that orders rooms by the listorder flag */
-int SortRoomsByListOrder(const void *room1, const void *room2)
-{
- folder *r1 = (folder*) GetSearchPayload(room1);
- folder *r2 = (folder*) GetSearchPayload(room2);
-
- if (r1->Order == r2->Order) return 0;
- if (r1->Order > r2->Order) return 1;
- return -1;
-}
-
-int CompareRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
-{
- folder *r1 = (folder*) GetSearchPayload(room1);
- folder *r2 = (folder*) GetSearchPayload(room2);
-
- if ((r1->Floor == NULL) ||
- (r2->Floor == NULL))
- return 0;
-
- /**
- * are we on the same floor? else sort by floor.
- */
- if (r1->Floor != r2->Floor)
- {
- /**
- * the private rooms are first in any case.
- */
- if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
- return -1;
- if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
- return 1;
- /**
- * else decide alpaheticaly by floorname
- */
- return (r1->Floor->AlphaN > r2->Floor->AlphaN)? 1 : -1;
- }
-
- /**
- * if we have different levels of subdirectories,
- * we want the toplevel to be first, regardless of sort
- * sequence.
- */
- if (((r1->nRoomNameParts > 1) ||
- (r2->nRoomNameParts > 1) )&&
- (r1->nRoomNameParts != r2->nRoomNameParts))
- {
- int i, ret;
- int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
- r2->nRoomNameParts : r1->nRoomNameParts;
-
- for (i=0; i < nparts; i++)
- {
- ret = strcmp (ChrPtr(r1->name),
- ChrPtr(r2->name));
- /**
- * Deltas in common parts? exit here.
- */
- if (ret != 0)
- return ret;
- }
-
- /**
- * who's a subdirectory of whom?
- */
- if (r1->nRoomNameParts > r2->nRoomNameParts)
- return 1;
- else
- return -1;
-
- }
-
- /**
- * else just sort alphabeticaly.
- */
- return strcmp (ChrPtr(r1->name),
- ChrPtr(r2->name));
-}
-
-int CompareRoomListByFloorRoomPrivFirstRev(const void *room1, const void *room2)
-{
- folder *r1 = (folder*) GetSearchPayload(room1);
- folder *r2 = (folder*) GetSearchPayload(room2);
-
- if ((r1->Floor == NULL) ||
- (r2->Floor == NULL))
- return 0;
-
- /**
- * are we on the same floor? else sort by floor.
- */
- if (r2->Floor != r1->Floor)
- {
- /**
- * the private rooms are first in any case.
- */
- if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
- return -1;
- if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
- return 1;
- /**
- * else decide alpaheticaly by floorname
- */
-
- return (r1->Floor->AlphaN < r2->Floor->AlphaN)? 1 : -1;
- }
-
- /**
- * if we have different levels of subdirectories,
- * we want the toplevel to be first, regardless of sort
- * sequence.
- */
- if (((r1->nRoomNameParts > 1) ||
- (r2->nRoomNameParts > 1) )&&
- (r1->nRoomNameParts != r2->nRoomNameParts))
- {
- int i, ret;
- int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
- r2->nRoomNameParts : r1->nRoomNameParts;
-
- for (i=0; i < nparts; i++)
- {
- /**
- * special cases if one room is top-level...
- */
- if (r2->nRoomNameParts == 1)
- ret = strcmp (ChrPtr(r2->name),
- ChrPtr(r1->RoomNameParts[i]));
- else if (r1->nRoomNameParts == 1)
- ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
- ChrPtr(r1->name));
- else
- ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
- ChrPtr(r1->RoomNameParts[i]));
- /**
- * Deltas in common parts? exit here.
- */
- if (ret != 0)
- return ret;
- }
-
- /**
- * who's a subdirectory of whom?
- */
- if (r1->nRoomNameParts > r2->nRoomNameParts)
- return 1;
- else
- return -1;
- }
-
- return strcmp (ChrPtr(r2->name),
- ChrPtr(r1->name));
-}
-
-int GroupchangeRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
-{
- folder *r1 = (folder*) room1;
- folder *r2 = (folder*) room2;
-
-
- if ((r1->Floor == NULL) ||
- (r2->Floor == NULL))
- return 0;
-
- if (r1->Floor == r2->Floor)
- return 0;
- else
- {
- wcsession *WCC = WC;
- static int columns = 3;
- int boxes_per_column = 0;
- int nf;
-
- nf = GetCount(WCC->Floors);
- while (nf % columns != 0) ++nf;
- boxes_per_column = (nf / columns);
- if (boxes_per_column < 1)
- boxes_per_column = 1;
- if (r1->Floor->AlphaN % boxes_per_column == 0)
- return 2;
- else
- return 1;
- }
-}
-
-
-int CompareRooms(const folder *room1, const folder *room2)
-{
- if ((room1 == NULL) || (room2 == NULL))
- return -1;
- return CompareRoomListByFloorRoomPrivFirst(room1, room2);
-}
-
-int ConditionalThisRoomIsStrBufContextAlias(StrBuf *Target, WCTemplputParams *TP)
-{
- wcsession *WCC = WC;
- const char *pVal;
- long len;
- eRoomParamType ParamType;
-
- ParamType = GetTemplateTokenNumber(Target, TP, 2, eNotSet);
- GetTemplateTokenString(Target, TP, 3, &pVal, &len);
-
- if (ParamType == eNotSet)
- {
- return StrLength(WCC->CurRoom.RoomAlias) == 0;
- }
- else if (ParamType == eDomain)
- {
- const StrBuf *CtxStr = (const StrBuf*) CTX(CTX_STRBUF);
- const char *pAt;
-
- if (CtxStr == NULL)
- return 0;
-
- if (StrLength(WCC->CurRoom.RoomAlias) == 0)
- return 0;
-
- if (strncmp(ChrPtr(WCC->CurRoom.RoomAlias), "room_", 5) != 0)
- return 0;
-
- pAt = strchr(ChrPtr(WCC->CurRoom.RoomAlias), '@');
- if (pAt == NULL)
- return 0;
- return strcmp(pAt + 1, ChrPtr(CtxStr)) == 0;
- }
- else if (ParamType == eAlias)
- {
- const StrBuf *CtxStr = (const StrBuf*) CTX(CTX_STRBUF);
-
- if (CtxStr == NULL)
- return 0;
-
- if (StrLength(WCC->CurRoom.RoomAlias) == 0)
- return 0;
-
- return strcmp(ChrPtr(WCC->CurRoom.RoomAlias), ChrPtr(CtxStr)) == 0;
- }
- else
- {
- LogTemplateError(Target, "TokenParameter", 2, TP,
- "Invalid paramtype; need one of [eNotSet|eDomain|eAlias]");
- return 0;
- }
-
-}
-
-int ConditionalRoomIsRESTSubRoom(StrBuf *Target, WCTemplputParams *TP)
-{
- wcsession *WCC = WC;
- folder *Folder = (folder *)CTX(CTX_ROOMS);
- HashPos *it;
- StrBuf * Dir;
- void *vDir;
- long len;
- const char *Key;
- int i, j, urlp;
- int delta;
-
-
- /* list only folders relative to the current floor... */
- if (Folder->Floor != WCC->CurrentFloor)
- return 0;
-
- urlp = GetCount(WCC->Directory);
- delta = Folder->nRoomNameParts - urlp + 1;
-
- syslog(LOG_DEBUG, "\n->%s: %d - %ld ",
- ChrPtr(Folder->name),
- urlp,
- Folder->nRoomNameParts);
- /* list only the floors which are in relation to the dav_depth header */
- if (WCC->Hdr->HR.dav_depth != delta) {
- syslog(LOG_DEBUG, "1\n");
- return 0;
- }
-
-
- it = GetNewHashPos(WCC->Directory, 0);
- /* Fast forward the floorname we checked above... */
- GetNextHashPos(WCC->Directory, it, &len, &Key, &vDir);
-
- if (Folder->nRoomNameParts > 1) {
- for (i = 0, j = 1;
- (i > Folder->nRoomNameParts) && (j > urlp);
- i++, j++)
- {
- if (!GetNextHashPos(WCC->Directory,
- it, &len, &Key, &vDir) ||
- (vDir == NULL))
- {
- DeleteHashPos(&it);
-
- syslog(LOG_DEBUG, "3\n");
- return 0;
- }
- Dir = (StrBuf*) vDir;
- if (strcmp(ChrPtr(Folder->RoomNameParts[i]),
- ChrPtr(Dir)) != 0)
- {
- DeleteHashPos(&it);
- syslog(LOG_DEBUG, "4\n");
- return 0;
- }
- }
- DeleteHashPos(&it);
- return 1;
- }
- else {
- if (!GetNextHashPos(WCC->Directory,
- it, &len, &Key, &vDir) ||
- (vDir == NULL))
- {
- DeleteHashPos(&it);
-
- syslog(LOG_DEBUG, "5\n");
- return WCC->Hdr->HR.dav_depth == 1;
- }
- DeleteHashPos(&it);
- Dir = (StrBuf*) vDir;
- if (WCC->Hdr->HR.dav_depth == 0) {
- return (strcmp(ChrPtr(Folder->name),
- ChrPtr(Dir))
- == 0);
-
- }
- return 0;
- }
-}
-
-
-void
-InitModule_ROOMLIST
-(void)
-{
- /* we duplicate this, just to be shure its already done. */
- RegisterCTX(CTX_ROOMS);
- RegisterCTX(CTX_FLOORS);
-
- RegisterIterator("ITERATE:THISROOM:WHO_KNOWS", 0, NULL, GetWhoKnowsHash, NULL, DeleteHash, CTX_STRBUF, CTX_NONE, IT_NOFLAG);
- RegisterIterator("ITERATE:THISROOM:GNET", 1, NULL, GetNetConfigHash, NULL, NULL, CTX_STRBUFARR, CTX_NONE, IT_NOFLAG);
- RegisterIterator("ITERATE:THISROOM:MALIAS", 1, NULL, GetThisRoomMAlias, NULL, DeleteHash, CTX_STRBUF, CTX_NONE, IT_NOFLAG);
- RegisterIterator("ITERATE:THISROOM:POSSIBLE:MALIAS", 1, NULL, GetThisRoomPossibleMAlias, NULL, DeleteHash, CTX_STRBUF, CTX_NONE, IT_NOFLAG);
-
- RegisterIterator("LFLR", 0, NULL, GetFloorListHash, NULL, NULL, CTX_FLOORS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
- RegisterIterator("LKRA", 0, NULL, GetRoomListHashLKRA, NULL, NULL, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
- RegisterIterator("LZRM", 0, NULL, GetZappedRoomListHash, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
- RegisterIterator("LPRM", 0, NULL, GetRoomListHashLPRM, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
-
-
- REGISTERTokenParamDefine(eNotSet);
- REGISTERTokenParamDefine(eDomain);
- REGISTERTokenParamDefine(eAlias);
-
-
- RegisterConditional("COND:ROOM:REST:ISSUBROOM", 0, ConditionalRoomIsRESTSubRoom, CTX_ROOMS);
-
- RegisterConditional("COND:THISROOM:ISALIAS:CONTEXTSTR", 0, ConditionalThisRoomIsStrBufContextAlias, CTX_NONE);
-
- RegisterSortFunc(HKEY("byfloorroom"),
- NULL, 0,
- CompareRoomListByFloorRoomPrivFirst,
- CompareRoomListByFloorRoomPrivFirstRev,
- GroupchangeRoomListByFloorRoomPrivFirst,
- CTX_ROOMS);
-
-}