initial commit of libopkele - OpenID support library

1 files changed, 138 insertions, 0 deletions

diff --git a/lib/util.cc b/lib/util.cc
new file mode 100644
index 0000000..1e7335c
--- a/dev/null
+++ b/lib/util.cc
@@ -0,0 +1,138 @@
+#include <errno.h>
+#include <cassert>
+#include <vector>
+#include <string>
+#include <mimetic/mimetic.h>
+#include <curl/curl.h>
+#include "opkele/util.h"
+#include "opkele/exception.h"
+
+namespace opkele {
+    using namespace std;
+
+    namespace util {
+
+        /*
+         * big numerics
+         */
+
+        BIGNUM *base64_to_bignum(const string& b64) {
+            vector<unsigned char> bin;
+            mimetic::Base64::Decoder b;
+            mimetic::decode(
+                    b64.begin(),b64.end(), b,
+                    back_insert_iterator<vector<unsigned char> >(bin) );
+            BIGNUM *rv = BN_bin2bn(&(bin.front()),bin.size(),0);
+            if(!rv)
+                throw failed_conversion(OPKELE_CP_ "failed to BN_bin2bn()");
+            return rv;
+        }
+
+        BIGNUM *dec_to_bignum(const string& dec) {
+            BIGNUM *rv = 0;
+            if(!BN_dec2bn(&rv,dec.c_str()))
+                throw failed_conversion(OPKELE_CP_ "failed to BN_dec2bn()");
+            return rv;
+        }
+
+        string bignum_to_base64(const BIGNUM *bn) {
+            vector<unsigned char> bin(BN_num_bytes(bn));
+            int l = BN_bn2bin(bn,&(bin.front()));
+            string rv;
+            mimetic::Base64::Encoder b(0);
+            mimetic::encode(
+                    bin.begin(),bin.begin()+l, b,
+                    back_insert_iterator<string>(rv) );
+            return rv;
+        }
+
+        /*
+         * w3c times
+         */
+
+        string time_to_w3c(time_t t) {
+            struct tm tm_t;
+            if(!gmtime_r(&t,&tm_t))
+                throw failed_conversion(OPKELE_CP_ "failed to BN_dec2bn()");
+            char rv[25];
+            if(!strftime(rv,sizeof(rv)-1,"%Y-%m-%dT%H:%M:%SZ",&tm_t))
+                throw failed_conversion(OPKELE_CP_ "failed to strftime()");
+            return rv;
+        }
+
+        time_t w3c_to_time(const string& w) {
+            struct tm tm_t;
+            memset(&tm_t,0,sizeof(tm_t));
+            if(
+                    sscanf(
+                        w.c_str(),
+                        "%04d-%02d-%02dT%02d:%02d:%02dZ",
+                        &tm_t.tm_year,&tm_t.tm_mon,&tm_t.tm_mday,
+                        &tm_t.tm_hour,&tm_t.tm_min,&tm_t.tm_sec
+                    ) != 6 )
+                throw failed_conversion(OPKELE_CP_ "failed to sscanf()");
+            tm_t.tm_mon--;
+            tm_t.tm_year-=1900;
+            time_t rv = mktime(&tm_t);
+            if(rv==(time_t)-1)
+                throw failed_conversion(OPKELE_CP_ "failed to mktime()");
+            return rv;
+        }
+
+        /*
+         *
+         */
+
+        string canonicalize_url(const string& url) {
+            string rv = url;
+            // strip leading and trailing spaces
+            string::size_type i = rv.find_first_not_of(" \t\r\n");
+            if(i==string::npos)
+                throw bad_input(OPKELE_CP_ "empty URL");
+            if(i)
+                rv.erase(0,i);
+            i = rv.find_last_not_of(" \t\r\n");
+            assert(i!=string::npos);
+            if(i<(rv.length()-1))
+                rv.erase(i+1);
+            // add missing http://
+            i = rv.find("://");
+            if(i==string::npos) { // primitive. but do we need more?
+                rv.insert(0,"http://");
+                i = sizeof("http://")-1;
+            }else{
+                i += sizeof("://")-1;
+            }
+            if(rv.find('/',i)==string::npos)
+                rv += '/';
+            return rv;
+        }
+
+        string url_encode(const string& str) {
+            char * t = curl_escape(str.c_str(),str.length());
+            if(!t)
+                throw failed_conversion(OPKELE_CP_ "failed to curl_escape()");
+            string rv(t);
+            curl_free(t);
+            return rv;
+        }
+
+        string long_to_string(long l) {
+            char rv[32];
+            int r=snprintf(rv,sizeof(rv),"%ld",l);
+            if(r<0 || r>=sizeof(rv))
+                throw failed_conversion(OPKELE_CP_ "failed to snprintf()");
+            return rv;
+        }
+
+        long string_to_long(const string& s) {
+            char *endptr = 0;
+            long rv = strtol(s.c_str(),&endptr,10);
+            if((!endptr) || endptr==s.c_str())
+                throw failed_conversion(OPKELE_CP_ "failed to strtol()");
+            return rv;
+        }
+
+    }
+
+}