chiark / gitweb /
~mdw / disorder / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
tests for regsub()
[disorder] / lib / test.c
diff --git a/lib/test.c b/lib/test.c
index 61b63fd4a206ecd40423f49ac8bfaeec5fb49dd3..3173fd5b8ab8a9ff6ff01b11876ff6e8e63cbbb5 100644 (file)
--- a/lib/test.c
+++ b/lib/test.c
@@ -1,6 +1,6 @@
 /*
  * This file is part of DisOrder.
- * Copyright (C) 2005, 2007 Richard Kettlewell
+ * Copyright (C) 2005, 2007, 2008 Richard Kettlewell
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -37,6 +37,8 @@
 #include <sys/socket.h>
 #include <netdb.h>
 #include <netinet/in.h>
+#include <sys/un.h>
+#include <pcre.h>
 
 #include "mem.h"
 #include "log.h"
@@ -63,6 +65,7 @@
 #include "addr.h"
 #include "base64.h"
 #include "url.h"
+#include "regsub.h"
 
 static int tests, errors;
 static int fail_first;
@@ -297,35 +300,42 @@ static int test_multipart_callback(const char *s, void *u) {
 static void test_mime(void) {
   char *t, *n, *v;
   struct vector parts[1];
+  struct kvp *k;
 
   fprintf(stderr, "test_mime\n");
 
-  t = n = v = 0;
-  insist(!mime_content_type("text/plain", &t, &n, &v));
+  t = 0;
+  k = 0;
+  insist(!mime_content_type("text/plain", &t, &k));
   check_string(t, "text/plain");
-  insist(n == 0);
-  insist(v == 0);
+  insist(k == 0);
 
-  insist(mime_content_type("TEXT ((broken) comment", &t, &n, &v) < 0);
-  insist(mime_content_type("TEXT ((broken) comment\\", &t, &n, &v) < 0);
+  insist(mime_content_type("TEXT ((broken) comment", &t, &k) < 0);
+  insist(mime_content_type("TEXT ((broken) comment\\", &t, &k) < 0);
   
-  t = n = v = 0;
-  insist(!mime_content_type("TEXT ((nested)\\ comment) /plain", &t, &n, &v));
+  t = 0;
+  k = 0;
+  insist(!mime_content_type("TEXT ((nested)\\ comment) /plain", &t, &k));
   check_string(t, "text/plain");
-  insist(n == 0);
-  insist(v == 0);
+  insist(k == 0);
 
-  t = n = v = 0;
-  insist(!mime_content_type(" text/plain ; Charset=\"utf-\\8\"", &t, &n, &v));
+  t = 0;
+  k = 0;
+  insist(!mime_content_type(" text/plain ; Charset=\"utf-\\8\"", &t, &k));
   check_string(t, "text/plain");
-  check_string(n, "charset");
-  check_string(v, "utf-8");
+  insist(k != 0);
+  insist(k->next == 0);
+  check_string(k->name, "charset");
+  check_string(k->value, "utf-8");
 
-  t = n = v = 0;
-  insist(!mime_content_type("text/plain;charset = ISO-8859-1 ", &t, &n, &v));
+  t = 0;
+  k = 0;
+  insist(!mime_content_type("text/plain;charset = ISO-8859-1 ", &t, &k));
+  insist(k != 0);
+  insist(k->next == 0);
   check_string(t, "text/plain");
-  check_string(n, "charset");
-  check_string(v, "ISO-8859-1");
+  check_string(k->name, "charset");
+  check_string(k->value, "ISO-8859-1");
 
   t = n = v = 0;
   insist(!mime_rfc2388_content_disposition("form-data; name=\"field1\"", &t, &n, &v));
@@ -454,6 +464,16 @@ static void test_mime(void) {
   check_string(mime_qp("x =\r\ny"), "x y");
   check_string(mime_qp("x = \r\ny"), "x y");
 
+  check_string(mime_to_qp(""), "");
+  check_string(mime_to_qp("foobar\n"), "foobar\n");
+  check_string(mime_to_qp("foobar \n"), "foobar=20\n");
+  check_string(mime_to_qp("foobar\t\n"), "foobar=09\n"); 
+  check_string(mime_to_qp("foobar \t \n"), "foobar=20=09=20\n");
+  check_string(mime_to_qp(" foo=bar"), " foo=3Dbar\n");
+  check_string(mime_to_qp("copyright \xC2\xA9"), "copyright =C2=A9\n");
+  check_string(mime_to_qp("foo\nbar\nbaz\n"), "foo\nbar\nbaz\n");
+  check_string(mime_to_qp("wibble wobble wibble wobble wibble wobble wibble wobble wibble wobble wibble"), "wibble wobble wibble wobble wibble wobble wibble wobble wibble wobble wibb=\nle\n");
+ 
   /* from RFC2045 */
   check_string(mime_qp("Now's the time =\r\n"
 "for all folk to come=\r\n"
@@ -1099,6 +1119,17 @@ static void test_sink(void) {
   insist(inputline("tmpfile", fp, &l, '\n') == 0);
   check_string(l, "wibble: foobar");
   insist(inputline("tmpfile", fp, &l, '\n') == -1);
+
+  fp = tmpfile();
+  assert(fp != 0);
+  fprintf(fp, "foo\rbar\nwibble\r\n");
+  fprintf(fp, "second\n\rspong\r\n");
+  rewind(fp);
+  insist(inputline("tmpfile", fp, &l, CRLF) == 0);
+  check_string(l, "foo\rbar\nwibble");
+  insist(inputline("tmpfile", fp, &l, CRLF) == 0);
+  check_string(l, "second\n\rspong");
+  insist(inputline("tmpfile", fp, &l, CRLF) == -1);
   
   dynstr_init(d);
   s = sink_dynstr(d);
@@ -1359,7 +1390,9 @@ static void test_addr(void) {
   const char *s[2];
   struct addrinfo *ai;
   char *name;
-  const struct sockaddr_in *sin;
+  const struct sockaddr_in *sin4;
+  struct sockaddr_in s4;
+  struct sockaddr_un su;
 
   static const struct addrinfo pref = {
     AI_PASSIVE,
@@ -1383,10 +1416,10 @@ static void test_addr(void) {
   check_integer(ai->ai_socktype, SOCK_STREAM);
   check_integer(ai->ai_protocol, IPPROTO_TCP);
   check_integer(ai->ai_addrlen, sizeof(struct sockaddr_in));
-  sin = (const struct sockaddr_in *)ai->ai_addr;
-  check_integer(sin->sin_family, AF_INET);
-  check_integer(sin->sin_addr.s_addr, 0);
-  check_integer(ntohs(sin->sin_port), 25);
+  sin4 = (const struct sockaddr_in *)ai->ai_addr;
+  check_integer(sin4->sin_family, AF_INET);
+  check_integer(sin4->sin_addr.s_addr, 0);
+  check_integer(ntohs(sin4->sin_port), 25);
   check_string(name, "host * service smtp");
 
   a.n = 2;
@@ -1398,11 +1431,35 @@ static void test_addr(void) {
   check_integer(ai->ai_socktype, SOCK_STREAM);
   check_integer(ai->ai_protocol, IPPROTO_TCP);
   check_integer(ai->ai_addrlen, sizeof(struct sockaddr_in));
-  sin = (const struct sockaddr_in *)ai->ai_addr;
-  check_integer(sin->sin_family, AF_INET);
-  check_integer(ntohl(sin->sin_addr.s_addr), 0x7F000001);
-  check_integer(ntohs(sin->sin_port), 119);
+  sin4 = (const struct sockaddr_in *)ai->ai_addr;
+  check_integer(sin4->sin_family, AF_INET);
+  check_integer(ntohl(sin4->sin_addr.s_addr), 0x7F000001);
+  check_integer(ntohs(sin4->sin_port), 119);
   check_string(name, "host localhost service nntp");
+
+  memset(&s4, 0, sizeof s4);
+  s4.sin_family = AF_INET;
+  s4.sin_addr.s_addr = 0;
+  s4.sin_port = 0;
+  check_string(format_sockaddr((struct sockaddr *)&s4),
+               "0.0.0.0");
+  check_integer(multicast((struct sockaddr *)&s4), 0);
+  s4.sin_addr.s_addr = htonl(0x7F000001);
+  s4.sin_port = htons(1000);
+  check_string(format_sockaddr((struct sockaddr *)&s4),
+               "127.0.0.1 port 1000");
+  check_integer(multicast((struct sockaddr *)&s4), 0);
+  s4.sin_addr.s_addr = htonl(0xE0000001);
+  check_string(format_sockaddr((struct sockaddr *)&s4),
+               "224.0.0.1 port 1000");
+  check_integer(multicast((struct sockaddr *)&s4), 1);
+
+  memset(&su, 0, sizeof su);
+  su.sun_family = AF_UNIX;
+  strcpy(su.sun_path, "/wibble/wobble");
+  check_string(format_sockaddr((struct sockaddr *)&su),
+               "/wibble/wobble");
+  check_integer(multicast((struct sockaddr *)&su), 0);
 }
 
 static void test_url(void) {
@@ -1423,6 +1480,63 @@ static void test_url(void) {
   insist(p.port == 82);
   check_string(p.path, "/example/path");
   check_string(p.query, "+query+");
+
+  insist(parse_url("//www.example.com/example/path", &p) == 0);
+  insist(p.scheme == 0);
+  check_string(p.host, "www.example.com");
+  insist(p.port == -1);
+  check_string(p.path, "/example/path");
+  insist(p.query == 0);
+
+  insist(parse_url("http://www.example.com:100000/", &p) == -1);
+  insist(parse_url("http://www.example.com:1000000000000/", &p) == -1);
+  insist(parse_url("http://www.example.com/example%2zpath", &p) == -1);
+}
+
+static void test_regsub(void) {
+  pcre *re;
+  const char *errstr;
+  int erroffset;
+
+  printf("test_regsub\n");
+
+  check_integer(regsub_flags(""), 0);
+  check_integer(regsub_flags("g"), REGSUB_GLOBAL);
+  check_integer(regsub_flags("i"), REGSUB_CASE_INDEPENDENT);
+  check_integer(regsub_flags("gi"), REGSUB_GLOBAL|REGSUB_CASE_INDEPENDENT);
+  check_integer(regsub_flags("iiggxx"), REGSUB_GLOBAL|REGSUB_CASE_INDEPENDENT);
+  check_integer(regsub_compile_options(0), 0);
+  check_integer(regsub_compile_options(REGSUB_CASE_INDEPENDENT), PCRE_CASELESS);
+  check_integer(regsub_compile_options(REGSUB_GLOBAL|REGSUB_CASE_INDEPENDENT), PCRE_CASELESS);
+  check_integer(regsub_compile_options(REGSUB_GLOBAL), 0);
+
+  re = pcre_compile("foo", PCRE_UTF8, &errstr, &erroffset, 0);
+  assert(re != 0);
+  check_string(regsub(re, "wibble-foo-foo-bar", "spong", 0),
+               "wibble-spong-foo-bar");
+  check_string(regsub(re, "wibble-foo-foo-bar", "spong", REGSUB_GLOBAL),
+               "wibble-spong-spong-bar");
+  check_string(regsub(re, "wibble-x-x-bar", "spong", REGSUB_GLOBAL),
+               "wibble-x-x-bar");
+  insist(regsub(re, "wibble-x-x-bar", "spong", REGSUB_MUST_MATCH) == 0);
+
+  re = pcre_compile("a+", PCRE_UTF8, &errstr, &erroffset, 0);
+  assert(re != 0);
+  check_string(regsub(re, "baaaaa", "spong", 0),
+               "bspong");
+  check_string(regsub(re, "baaaaa", "spong", REGSUB_GLOBAL),
+               "bspong");
+  check_string(regsub(re, "baaaaa", "foo-$&-bar", 0),
+               "bfoo-aaaaa-bar");
+
+  re = pcre_compile("(a+)(b+)", PCRE_UTF8|PCRE_CASELESS, &errstr, &erroffset, 0);
+  assert(re != 0);
+  check_string(regsub(re, "foo-aaaabbb-bar", "spong", 0),
+               "foo-spong-bar");
+  check_string(regsub(re, "foo-aaaabbb-bar", "x:$2/$1:y", 0),
+               "foo-x:bbb/aaaa:y-bar");
+  check_string(regsub(re, "foo-aAaAbBb-bar", "x:$2$$$1:y", 0),
+               "foo-x:bBb$aAaA:y-bar");
 }
 
 int main(void) {
@@ -1492,6 +1606,7 @@ int main(void) {
   test_selection();
   test_hash();
   test_url();
+  test_regsub();
   fprintf(stderr,  "%d errors out of %d tests\n", errors, tests);
   return !!errors;
 }
Multi-user software jukebox -- https://www.greenend.org.uk/rjk/disorder/