Changeset ea3648

Timestamp:

02/22/08 20:05:15 (4 years ago)

Author:

Tomash Brechko <tomash.brechko@…>

Branches:

master, ketama-compat

Children:

34f10e

Parents:

4767f2

git-author:

Tomash Brechko <tomash.brechko@…> (02/22/08 20:05:15)

git-committer:

Tomash Brechko <tomash.brechko@…> (02/22/08 20:05:15)

Message:

Add 'namespace' method.

Files:

• Changes (modified) (1 diff)
• Fast.xs (modified) (1 diff)
• MANIFEST (modified) (1 diff)
• lib/Cache/Memcached/Fast.pm (modified) (1 diff)
• src/client.c (modified) (1 diff)
• src/client.h (modified) (1 diff)
• t/namespace.t (added)

Changes

@@ -1 +1 @@
 Revision history for Perl extension Cache::Memcached::Fast.
+
+
+0.09  ???
+        - ???
+
+        Add method 'namespace' to get and/or set the namespace prefix.
+        This is handy when you "lease" C::M::F object for different
+        parts of your application that do unrelated things.
 
 

Fast.xs

@@ -1230 +1230 @@
     OUTPUT:
         RETVAL
+
+
+SV *
+namespace(memd, ...)
+        Cache_Memcached_Fast *  memd
+    PROTOTYPE: $;$
+    PREINIT:
+        const char *ns;
+        size_t len;
+    CODE:
+        ns = client_get_prefix(memd->c, &len);
+        RETVAL = newSVpv(ns, len);
+        if (items > 1)
+          {
+            ns = SvPV(ST(1), len);
+            if (client_set_prefix(memd->c, ns, len) != MEMCACHED_SUCCESS)
+              croak("Not enough memory");
+          }
+    OUTPUT:
+        RETVAL

MANIFEST

@@ -15 +15 @@
 t/encoding.t
 t/key_ref.t
+t/namespace.t
 t/nowait.t
 t/serialize.t

lib/Cache/Memcached/Fast.pm

@@ -558 +558 @@
 
 
+=item C<namespace>
+
+  $memd->namespace();
+  $memd->namespace($string);
+
+Get and/or set the namespace prefix.
+
+I<Return:> scalar, the namespace prefix that was in effect before the
+call.
+
+=cut
+
+# See Fast.xs.
+
+
 =item C<set>
 

src/client.c

@@ -507 +507 @@
 
 
+const char *
+client_get_prefix(struct client *c, size_t *ns_len)
+{
+  *ns_len = c->prefix_len - 1;
+
+  return (c->prefix + 1);
+}
+
+
 static inline
 ssize_t

src/client.h

@@ -115 +115 @@
 
 extern
+const char *
+client_get_prefix(struct client *c, size_t *ns_len);
+
+extern
 void
 client_set_connect_timeout(struct client *c, int to);