Monday, November 08, 2010 at 12:04 AM.

---

system.verbs.builtins.mainResponder.members.getHashedCookieString

on getHashedCookieString (adrGroup, memberKey, password, groupName, flExpireAtEndOfSession=false) {
	<<Create a new-style cookie string.
		<<04/10/00; 12:10:50 PM by PBS
		<<Changes:
			<<9/12/01; 3:45:16 PM by PBS
				<<New parameter: flExpireAtEndOfSession. If true, then any expires setting is over-ridden, and the cookie expires at end of session.
	
	local (s);
	s = string.innerCaseName (adrGroup^.cookieName) + "=";
	
	bundle { //create the value string
		local (t);
		new (tableType, @t);
		t.id = memberKey;
		local (hashString = mainResponder.members.getHash (password, groupName));
		t.h = hashString;
		local (argString = webserver.encodeArgs (@t));
		s = s + argString + "; "};
	
	if adrGroup^.cookieDomain != "" {
		s = s + "domain=" + adrGroup^.cookieDomain + "; "};
	if (not flExpireAtEndOfSession) and (sizeof (adrGroup^.cookieExpires) > 0) {
		s = s + "expires=" + adrGroup^.cookieExpires + "; "};
	s = s + "path=/";
	
	return (s)}

---

This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.