| """Load / save to libwww-perl (LWP) format files. |
| |
| Actually, the format is slightly extended from that used by LWP's |
| (libwww-perl's) HTTP::Cookies, to avoid losing some RFC 2965 information |
| not recorded by LWP. |
| |
| It uses the version string "2.0", though really there isn't an LWP Cookies |
| 2.0 format. This indicates that there is extra information in here |
| (domain_dot and # port_spec) while still being compatible with |
| libwww-perl, I hope. |
| |
| """ |
| |
| import time, re, logging |
| from cookielib import (reraise_unmasked_exceptions, FileCookieJar, Cookie, |
| MISSING_FILENAME_TEXT, join_header_words, split_header_words, |
| iso2time, time2isoz) |
| |
| def lwp_cookie_str(cookie): |
| """Return string representation of Cookie in an the LWP cookie file format. |
| |
| Actually, the format is extended a bit -- see module docstring. |
| |
| """ |
| h = [(cookie.name, cookie.value), |
| ("path", cookie.path), |
| ("domain", cookie.domain)] |
| if cookie.port is not None: h.append(("port", cookie.port)) |
| if cookie.path_specified: h.append(("path_spec", None)) |
| if cookie.port_specified: h.append(("port_spec", None)) |
| if cookie.domain_initial_dot: h.append(("domain_dot", None)) |
| if cookie.secure: h.append(("secure", None)) |
| if cookie.expires: h.append(("expires", |
| time2isoz(float(cookie.expires)))) |
| if cookie.discard: h.append(("discard", None)) |
| if cookie.comment: h.append(("comment", cookie.comment)) |
| if cookie.comment_url: h.append(("commenturl", cookie.comment_url)) |
| |
| keys = cookie._rest.keys() |
| keys.sort() |
| for k in keys: |
| h.append((k, str(cookie._rest[k]))) |
| |
| h.append(("version", str(cookie.version))) |
| |
| return join_header_words([h]) |
| |
| class LWPCookieJar(FileCookieJar): |
| """ |
| The LWPCookieJar saves a sequence of"Set-Cookie3" lines. |
| "Set-Cookie3" is the format used by the libwww-perl libary, not known |
| to be compatible with any browser, but which is easy to read and |
| doesn't lose information about RFC 2965 cookies. |
| |
| Additional methods |
| |
| as_lwp_str(ignore_discard=True, ignore_expired=True) |
| |
| """ |
| |
| def as_lwp_str(self, ignore_discard=True, ignore_expires=True): |
| """Return cookies as a string of "\n"-separated "Set-Cookie3" headers. |
| |
| ignore_discard and ignore_expires: see docstring for FileCookieJar.save |
| |
| """ |
| now = time.time() |
| r = [] |
| for cookie in self: |
| if not ignore_discard and cookie.discard: |
| continue |
| if not ignore_expires and cookie.is_expired(now): |
| continue |
| r.append("Set-Cookie3: %s" % lwp_cookie_str(cookie)) |
| return "\n".join(r+[""]) |
| |
| def save(self, filename=None, ignore_discard=False, ignore_expires=False): |
| if filename is None: |
| if self.filename is not None: filename = self.filename |
| else: raise ValueError(MISSING_FILENAME_TEXT) |
| |
| f = open(filename, "w") |
| try: |
| # There really isn't an LWP Cookies 2.0 format, but this indicates |
| # that there is extra information in here (domain_dot and |
| # port_spec) while still being compatible with libwww-perl, I hope. |
| f.write("#LWP-Cookies-2.0\n") |
| f.write(self.as_lwp_str(ignore_discard, ignore_expires)) |
| finally: |
| f.close() |
| |
| def _really_load(self, f, filename, ignore_discard, ignore_expires): |
| magic = f.readline() |
| if not re.search(self.magic_re, magic): |
| msg = "%s does not seem to contain cookies" % filename |
| raise IOError(msg) |
| |
| now = time.time() |
| |
| header = "Set-Cookie3:" |
| boolean_attrs = ("port_spec", "path_spec", "domain_dot", |
| "secure", "discard") |
| value_attrs = ("version", |
| "port", "path", "domain", |
| "expires", |
| "comment", "commenturl") |
| |
| try: |
| while 1: |
| line = f.readline() |
| if line == "": break |
| if not line.startswith(header): |
| continue |
| line = line[len(header):].strip() |
| |
| for data in split_header_words([line]): |
| name, value = data[0] |
| # name and value are an exception here, since a plain "foo" |
| # (with no "=", unlike "bar=foo") means a cookie with no |
| # name and value "foo". With all other cookie-attributes, |
| # the situation is reversed: "foo" means an attribute named |
| # "foo" with no value! |
| if value is None: |
| name, value = value, name |
| standard = {} |
| rest = {} |
| for k in boolean_attrs: |
| standard[k] = False |
| for k, v in data[1:]: |
| if k is not None: |
| lc = k.lower() |
| else: |
| lc = None |
| # don't lose case distinction for unknown fields |
| if (lc in value_attrs) or (lc in boolean_attrs): |
| k = lc |
| if k in boolean_attrs: |
| if v is None: v = True |
| standard[k] = v |
| elif k in value_attrs: |
| standard[k] = v |
| else: |
| rest[k] = v |
| |
| h = standard.get |
| expires = h("expires") |
| discard = h("discard") |
| if expires is not None: |
| expires = iso2time(expires) |
| if expires is None: |
| discard = True |
| domain = h("domain") |
| domain_specified = domain.startswith(".") |
| c = Cookie(h("version"), name, value, |
| h("port"), h("port_spec"), |
| domain, domain_specified, h("domain_dot"), |
| h("path"), h("path_spec"), |
| h("secure"), |
| expires, |
| discard, |
| h("comment"), |
| h("commenturl"), |
| rest) |
| if not ignore_discard and c.discard: |
| continue |
| if not ignore_expires and c.is_expired(now): |
| continue |
| self.set_cookie(c) |
| except: |
| reraise_unmasked_exceptions((IOError,)) |
| raise IOError("invalid Set-Cookie3 format file %s" % filename) |