datahike 0.7.1630

package/spec_tools.transform.js

@@ -0,0 +1,288 @@
+var $CLJS = require("./cljs_env");
+var $jscomp = $CLJS.$jscomp;
+var COMPILED = false;
+require("./cljs.core.js");
+require("./cljs.spec.alpha.js");
+require("./clojure.set.js");
+require("./clojure.edn.js");
+require("./spec_tools.parse.js");
+require("./spec_tools.impl.js");
+var environ=$CLJS.environ || ($CLJS.environ = {});
+var fress=$CLJS.fress || ($CLJS.fress = {});
+var datahike=$CLJS.datahike || ($CLJS.datahike = {});
+var clojure=$CLJS.clojure || ($CLJS.clojure = {});
+var hasch=$CLJS.hasch || ($CLJS.hasch = {});
+var tailrecursion=$CLJS.tailrecursion || ($CLJS.tailrecursion = {});
+var superv=$CLJS.superv || ($CLJS.superv = {});
+var geheimnis=$CLJS.geheimnis || ($CLJS.geheimnis = {});
+var is=$CLJS.is || ($CLJS.is = {});
+var cljs=$CLJS.cljs || ($CLJS.cljs = {});
+var cljs_node_io=$CLJS.cljs_node_io || ($CLJS.cljs_node_io = {});
+var goog=$CLJS.goog || ($CLJS.goog = {});
+var konserve=$CLJS.konserve || ($CLJS.konserve = {});
+var datalog=$CLJS.datalog || ($CLJS.datalog = {});
+var spec_tools=$CLJS.spec_tools || ($CLJS.spec_tools = {});
+var taoensso=$CLJS.taoensso || ($CLJS.taoensso = {});
+var incognito=$CLJS.incognito || ($CLJS.incognito = {});
+var medley=$CLJS.medley || ($CLJS.medley = {});
+var me=$CLJS.me || ($CLJS.me = {});
+
+$CLJS.SHADOW_ENV.setLoaded("spec_tools.transform.js");
+
+goog.provide('spec_tools.transform');
+spec_tools.transform.keyword__GT_string = (function spec_tools$transform$keyword__GT_string(_,x){
+if((x instanceof cljs.core.Keyword)){
+return spec_tools.impl.qualified_name(x);
+} else {
+return x;
+}
+});
+spec_tools.transform.keyword_or_string__GT_ = (function spec_tools$transform$keyword_or_string__GT_(f){
+return (function (spec,x){
+if((x instanceof cljs.core.Keyword)){
+var G__125752 = spec;
+var G__125753 = spec_tools.transform.keyword__GT_string(spec,x);
+return (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(G__125752,G__125753) : f.call(null, G__125752,G__125753));
+} else {
+if(typeof x === 'string'){
+return (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(spec,x) : f.call(null, spec,x));
+} else {
+return x;
+
+}
+}
+});
+});
+spec_tools.transform.keyword__GT_ = (function spec_tools$transform$keyword__GT_(f){
+return (function (spec,x){
+if((x instanceof cljs.core.Keyword)){
+var G__125758 = spec;
+var G__125759 = spec_tools.transform.keyword__GT_string(spec,x);
+return (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(G__125758,G__125759) : f.call(null, G__125758,G__125759));
+} else {
+return x;
+
+}
+});
+});
+spec_tools.transform.number__GT_string = (function spec_tools$transform$number__GT_string(_,x){
+if(typeof x === 'number'){
+return cljs.core.str.cljs$core$IFn$_invoke$arity$1(x);
+} else {
+return x;
+}
+});
+spec_tools.transform.number_or_string__GT_ = (function spec_tools$transform$number_or_string__GT_(f){
+return (function (spec,x){
+if(typeof x === 'number'){
+var G__125763 = spec;
+var G__125764 = spec_tools.transform.number__GT_string(spec,x);
+return (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(G__125763,G__125764) : f.call(null, G__125763,G__125764));
+} else {
+if(typeof x === 'string'){
+return (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(spec,x) : f.call(null, spec,x));
+} else {
+return x;
+
+}
+}
+});
+});
+spec_tools.transform.string__GT_long = (function spec_tools$transform$string__GT_long(_,x){
+if(typeof x === 'string'){
+try{var x_SINGLEQUOTE_ = parseInt(x,(10));
+if(cljs.core.truth_(isNaN(x_SINGLEQUOTE_))){
+return x;
+} else {
+return x_SINGLEQUOTE_;
+}
+}catch (e125776){if((e125776 instanceof Error)){
+var ___$1 = e125776;
+return x;
+} else {
+throw e125776;
+
+}
+}} else {
+return x;
+}
+});
+spec_tools.transform.string__GT_double = (function spec_tools$transform$string__GT_double(_,x){
+if(typeof x === 'string'){
+try{var x_SINGLEQUOTE_ = parseFloat(x);
+if(cljs.core.truth_(isNaN(x_SINGLEQUOTE_))){
+return x;
+} else {
+return x_SINGLEQUOTE_;
+}
+}catch (e125778){if((e125778 instanceof Error)){
+var ___$1 = e125778;
+return x;
+} else {
+throw e125778;
+
+}
+}} else {
+return x;
+}
+});
+spec_tools.transform.string__GT_keyword = (function spec_tools$transform$string__GT_keyword(_,x){
+if(typeof x === 'string'){
+return cljs.core.keyword.cljs$core$IFn$_invoke$arity$1(x);
+} else {
+return x;
+}
+});
+spec_tools.transform.string__GT_boolean = (function spec_tools$transform$string__GT_boolean(_,x){
+if(typeof x === 'string'){
+if(cljs.core._EQ_.cljs$core$IFn$_invoke$arity$2("true",x)){
+return true;
+} else {
+if(cljs.core._EQ_.cljs$core$IFn$_invoke$arity$2("false",x)){
+return false;
+} else {
+return x;
+
+}
+}
+} else {
+return x;
+}
+});
+spec_tools.transform.string__GT_uri = (function spec_tools$transform$string__GT_uri(_,x){
+if(typeof x === 'string'){
+try{return goog.Uri.parse(x);
+}catch (e125785){if((e125785 instanceof Error)){
+var ___$1 = e125785;
+return x;
+} else {
+throw e125785;
+
+}
+}} else {
+return x;
+}
+});
+spec_tools.transform.string__GT_uuid = (function spec_tools$transform$string__GT_uuid(_,x){
+if(typeof x === 'string'){
+try{if(cljs.core.truth_(cljs.core.re_find(/^[0-9a-f]{8}-[0-9a-f]{4}-[1-5][0-9a-f]{3}-[89ab][0-9a-f]{3}-[0-9a-f]{12}$/,x))){
+return cljs.core.uuid(x);
+} else {
+return x;
+}
+}catch (e125798){if((e125798 instanceof Error)){
+var ___$1 = e125798;
+return x;
+} else {
+throw e125798;
+
+}
+}} else {
+return x;
+}
+});
+spec_tools.transform.string__GT_date = (function spec_tools$transform$string__GT_date(_,x){
+if(typeof x === 'string'){
+try{return (new Date(goog.date.UtcDateTime.fromIsoString(x).getTime()));
+}catch (e125799){if((e125799 instanceof Error)){
+var ___$1 = e125799;
+return x;
+} else {
+throw e125799;
+
+}
+}} else {
+return x;
+}
+});
+spec_tools.transform.date__GT_string = (function spec_tools$transform$date__GT_string(_,x){
+if(cljs.core.inst_QMARK_(x)){
+try{return x.toISOString();
+}catch (e125804){if((e125804 instanceof Error)){
+var ___$1 = e125804;
+return x;
+} else {
+throw e125804;
+
+}
+}} else {
+return x;
+}
+});
+spec_tools.transform.string__GT_symbol = (function spec_tools$transform$string__GT_symbol(_,x){
+if(typeof x === 'string'){
+return cljs.core.symbol.cljs$core$IFn$_invoke$arity$1(x);
+} else {
+return x;
+}
+});
+spec_tools.transform.string__GT_nil = (function spec_tools$transform$string__GT_nil(_,x){
+if(cljs.core._EQ_.cljs$core$IFn$_invoke$arity$2("",x)){
+return null;
+} else {
+return x;
+}
+});
+spec_tools.transform.any__GT_string = (function spec_tools$transform$any__GT_string(_,x){
+if((!((x == null)))){
+return cljs.core.str.cljs$core$IFn$_invoke$arity$1(x);
+} else {
+return null;
+}
+});
+spec_tools.transform.number__GT_double = (function spec_tools$transform$number__GT_double(_,x){
+if(typeof x === 'number'){
+return x;
+} else {
+return x;
+}
+});
+spec_tools.transform.any__GT_any = (function spec_tools$transform$any__GT_any(_,x){
+return x;
+});
+spec_tools.transform.strip_extra_keys = (function spec_tools$transform$strip_extra_keys(p__125806,x){
+var map__125807 = p__125806;
+var map__125807__$1 = cljs.core.__destructure_map(map__125807);
+var keys = cljs.core.get.cljs$core$IFn$_invoke$arity$2(map__125807__$1,new cljs.core.Keyword("spec-tools.parse","keys","spec-tools.parse/keys",1331815460));
+if(cljs.core.truth_((function (){var and__5000__auto__ = keys;
+if(cljs.core.truth_(and__5000__auto__)){
+return cljs.core.map_QMARK_(x);
+} else {
+return and__5000__auto__;
+}
+})())){
+return cljs.core.select_keys(x,keys);
+} else {
+return x;
+}
+});
+spec_tools.transform.fail_on_extra_keys = (function spec_tools$transform$fail_on_extra_keys(p__125808,x){
+var map__125809 = p__125808;
+var map__125809__$1 = cljs.core.__destructure_map(map__125809);
+var keys = cljs.core.get.cljs$core$IFn$_invoke$arity$2(map__125809__$1,new cljs.core.Keyword("spec-tools.parse","keys","spec-tools.parse/keys",1331815460));
+if(((cljs.core.map_QMARK_(x)) && ((!(clojure.set.subset_QMARK_(cljs.core.set(cljs.core.keys(x)),keys)))))){
+return new cljs.core.Keyword("cljs.spec.alpha","invalid","cljs.spec.alpha/invalid",-1220295119);
+} else {
+return x;
+}
+});
+spec_tools.transform.strip_extra_values = (function spec_tools$transform$strip_extra_values(p__125811,x){
+var map__125812 = p__125811;
+var map__125812__$1 = cljs.core.__destructure_map(map__125812);
+var items = cljs.core.get.cljs$core$IFn$_invoke$arity$2(map__125812__$1,new cljs.core.Keyword("spec-tools.parse","items","spec-tools.parse/items",1255627600));
+var size = cljs.core.count(items);
+if(((cljs.core.vector_QMARK_(x)) && ((cljs.core.count(x) > size)))){
+return cljs.core.subvec.cljs$core$IFn$_invoke$arity$3(x,(0),size);
+} else {
+return x;
+}
+});
+spec_tools.transform.json_type_decoders = cljs.core.merge.cljs$core$IFn$_invoke$arity$variadic(cljs.core.prim_seq.cljs$core$IFn$_invoke$arity$2([new cljs.core.PersistentArrayMap(null, 8, [new cljs.core.Keyword(null,"keyword","keyword",811389747),spec_tools.transform.string__GT_keyword,new cljs.core.Keyword(null,"uuid","uuid",-2145095719),spec_tools.transform.keyword_or_string__GT_(spec_tools.transform.string__GT_uuid),new cljs.core.Keyword(null,"date","date",-1463434462),spec_tools.transform.keyword_or_string__GT_(spec_tools.transform.string__GT_date),new cljs.core.Keyword(null,"symbol","symbol",-1038572696),spec_tools.transform.keyword_or_string__GT_(spec_tools.transform.string__GT_symbol),new cljs.core.Keyword(null,"long","long",-171452093),spec_tools.transform.keyword__GT_(spec_tools.transform.string__GT_long),new cljs.core.Keyword(null,"double","double",884886883),spec_tools.transform.keyword__GT_(spec_tools.transform.string__GT_double),new cljs.core.Keyword(null,"boolean","boolean",-1919418404),spec_tools.transform.keyword__GT_(spec_tools.transform.string__GT_boolean),new cljs.core.Keyword(null,"string","string",-1989541586),spec_tools.transform.keyword__GT_string], null)], 0));
+spec_tools.transform.string_type_decoders = cljs.core.merge.cljs$core$IFn$_invoke$arity$variadic(cljs.core.prim_seq.cljs$core$IFn$_invoke$arity$2([spec_tools.transform.json_type_decoders,new cljs.core.PersistentArrayMap(null, 3, [new cljs.core.Keyword(null,"long","long",-171452093),spec_tools.transform.keyword_or_string__GT_(spec_tools.transform.string__GT_long),new cljs.core.Keyword(null,"double","double",884886883),spec_tools.transform.keyword_or_string__GT_(spec_tools.transform.string__GT_double),new cljs.core.Keyword(null,"boolean","boolean",-1919418404),spec_tools.transform.keyword_or_string__GT_(spec_tools.transform.string__GT_boolean)], null)], 0));
+spec_tools.transform.strip_extra_keys_type_decoders = new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"map","map",1371690461),spec_tools.transform.strip_extra_keys], null);
+spec_tools.transform.fail_on_extra_keys_type_decoders = new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"map","map",1371690461),spec_tools.transform.fail_on_extra_keys], null);
+spec_tools.transform.strip_extra_values_type_decoders = new cljs.core.PersistentArrayMap(null, 1, [new cljs.core.Keyword(null,"tuple","tuple",-472667284),spec_tools.transform.strip_extra_values], null);
+spec_tools.transform.json_type_encoders = cljs.core.PersistentHashMap.fromArrays([new cljs.core.Keyword(null,"date","date",-1463434462),new cljs.core.Keyword(null,"symbol","symbol",-1038572696),new cljs.core.Keyword(null,"vector","vector",1902966158),new cljs.core.Keyword(null,"keyword","keyword",811389747),new cljs.core.Keyword(null,"bigdec","bigdec",1019443956),new cljs.core.Keyword(null,"uri","uri",-774711847),new cljs.core.Keyword(null,"uuid","uuid",-2145095719),new cljs.core.Keyword(null,"set","set",304602554),new cljs.core.Keyword(null,"map","map",1371690461)],[spec_tools.transform.date__GT_string,spec_tools.transform.any__GT_string,spec_tools.transform.any__GT_any,spec_tools.transform.keyword__GT_string,spec_tools.transform.any__GT_string,spec_tools.transform.any__GT_string,spec_tools.transform.any__GT_string,spec_tools.transform.any__GT_any,spec_tools.transform.any__GT_any]);
+spec_tools.transform.string_type_encoders = cljs.core.merge.cljs$core$IFn$_invoke$arity$variadic(cljs.core.prim_seq.cljs$core$IFn$_invoke$arity$2([spec_tools.transform.json_type_encoders,new cljs.core.PersistentArrayMap(null, 2, [new cljs.core.Keyword(null,"long","long",-171452093),spec_tools.transform.any__GT_string,new cljs.core.Keyword(null,"double","double",884886883),spec_tools.transform.any__GT_string], null)], 0));
+
+//# sourceMappingURL=spec_tools.transform.js.map

package/spec_tools.transform.js.map

@@ -0,0 +1 @@
+{"version":3,"sources":["spec_tools/transform.cljc"],"mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;AAqBA,0CAAA,1CAAMA,4FAAiBC,EAAEC;AAAzB,AACE,GAAI,cAAAC,bAAUD;AACZ,OAACE,+BAAoBF;;AACrBA;;;AAEJ,8CAAA,9CAAMG,oGAAqBC;AAA3B,AACE,kBAAKC,KAAKL;AAAV,AACE,GACE,cAAAC,bAAUD;AAAG,IAAAM,YAAGD;IAAHE,YAAQ,AAACT,wCAAgBO,KAAKL;AAA9B,AAAA,0EAAAM,UAAAC,0BAAAD,UAAAC,hHAACH,kCAAAA,uDAAAA;;AADhB,GAEE,OAASJ;AAAG,QAACI,kCAAAA,0CAAAA,VAAEC,uBAAAA,lBAAKL,uBAAAA;;AAFtB,AAGQA;;;;;;AAEZ,oCAAA,pCAAMQ,gFAAWJ;AAAjB,AACE,kBAAKC,KAAKL;AAAV,AACE,GACE,cAAAC,bAAUD;AAAG,IAAAS,YAAGJ;IAAHK,YAAQ,AAACZ,wCAAgBO,KAAKL;AAA9B,AAAA,0EAAAS,UAAAC,0BAAAD,UAAAC,hHAACN,kCAAAA,uDAAAA;;AADhB,AAEQJ;;;;;AAKZ,yCAAA,zCAAMW,0FAAgBZ,EAAEC;AAAxB,AACE,GAAI,OAASA;AACX,mDAAKA;;AACLA;;;AAEJ,6CAAA,7CAAMY,kGAAoBR;AAA1B,AACE,kBAAKC,KAAKL;AAAV,AACE,GACE,OAASA;AAAG,IAAAa,YAAGR;IAAHS,YAAQ,AAACH,uCAAeN,KAAKL;AAA7B,AAAA,0EAAAa,UAAAC,0BAAAD,UAAAC,hHAACV,kCAAAA,uDAAAA;;AADf,GAEE,OAASJ;AAAG,QAACI,kCAAAA,0CAAAA,VAAEC,uBAAAA,lBAAKL,uBAAAA;;AAFtB,AAGQA;;;;;;AAKZ,uCAAA,vCAAMe,sFAAchB,EAAEC;AAAtB,AACE,GAAI,OAASA;AACX,IAAA,AAEW,IAAMiB,iBAAG,WAAA,XAACC,SAAYlB;AAAtB,AACE,oBAAI,AAACmB,MAASF;AAAIjB;;AAAEiB;;iBAHjC,GAAA,CAAAD,mBAIkCI;AAJlC,YAAAJ,RAI4CjB;AAJ5C,AAI8CC;;AAJ9C,AAAA,MAAAgB;;;;AAKAhB;;;AAEJ,yCAAA,zCAAMqB,0FAAgBtB,EAAEC;AAAxB,AACE,GAAI,OAASA;AACX,IAAA,AAEW,IAAMiB,iBAAG,AAACM,WAAcvB;AAAxB,AACE,oBAAI,AAACmB,MAASF;AAAIjB;;AAAEiB;;iBAHjC,GAAA,CAAAK,mBAIkCF;AAJlC,YAAAE,RAI4CvB;AAJ5C,AAI8CC;;AAJ9C,AAAA,MAAAsB;;;;AAKAtB;;;AAEJ,0CAAA,1CAAMwB,4FAAiBzB,EAAEC;AAAzB,AACE,GAAI,OAASA;AACX,OAACyB,gDAAQzB;;AACTA;;;AAEJ,0CAAA,1CAAM0B,4FAAiB3B,EAAEC;AAAzB,AACE,GAAI,OAASA;AACX,GACE,6CAAA,7CAAC2B,oDAAS3B;AADZ;;AAAA,GAEE,6CAAA,7CAAC2B,qDAAU3B;AAFb;;AAAA,AAGQA;;;;;AACRA;;;AAqBJ,sCAAA,tCAAM4B,oFAAa7B,EAAEC;AAArB,AACE,GAAI,OAASA;AACX,IAAA,AAGW,OAAC8B,eAAe9B;iBAH3B,GAAA,CAAA6B,mBAIkCT;AAJlC,YAAAS,RAI4C9B;AAJ5C,AAI8CC;;AAJ9C,AAAA,MAAA6B;;;;AAKA7B;;;AAEJ,uCAAA,vCAAM+B,sFAAchC,EAAEC;AAAtB,AACE,GAAI,OAASA;AACX,IAAA,AAGW,oBAAI,kBAAA,lBAACiC,8FAAqFjC;AACxF,OAACkC,eAAKlC;;AACNA;;iBALb,GAAA,CAAAgC,mBAMkCZ;AANlC,YAAAY,RAM4CjC;AAN5C,AAM8CC;;AAN9C,AAAA,MAAAgC;;;;AAOAhC;;;AAUJ,uCAAA,vCAAMmC,sFAAcpC,EAAEC;AAAtB,AACE,GAAI,OAASA;AACX,IAAA,AAEW,YAAAqC,KAAU,AAAU,AAACC,oCAAoCtC;iBAFpE,GAAA,CAAAoC,mBAGkChB;AAHlC,YAAAgB,RAG4CrC;AAH5C,AAG8CC;;AAH9C,AAAA,MAAAoC;;;;AAIApC;;;AAOJ,uCAAA,vCAAMuC,sFAAcxC,EAAEC;AAAtB,AACE,GAAI,AAACwC,sBAAMxC;AACT,IAAA,AAEW,OAAcA;iBAFzB,GAAA,CAAAyC,mBAGkCrB;AAHlC,YAAAqB,RAG4C1C;AAH5C,AAG8CC;;AAH9C,AAAA,MAAAyC;;;;AAIAzC;;;AAEJ,yCAAA,zCAAM0C,0FAAgB3C,EAAEC;AAAxB,AACE,GAAI,OAASA;AACX,OAAC2C,+CAAO3C;;AACRA;;;AAEJ,sCAAA,tCAAM4C,oFAAa7C,EAAEC;AAArB,AACE,GAAI,6CAAA,7CAAC2B,gDAAK3B;AAAV;;AAEEA;;;AAEJ,sCAAA,tCAAM6C,oFAAa9C,EAAEC;AAArB,AACE,GAAA,GAAQ,MAAA,LAAMA;AACZ,mDAAKA;;AADP;;;AAGF,yCAAA,zCAAM8C,0FAAgB/C,EAAEC;AAAxB,AACE,GAAI,OAASA;AACHA;;AACRA;;;AAEJ,mCAAA,nCAAM+C,8EAAUhD,EAAEC;AAAlB,AAAqBA;;AAMrB,wCAAA,gDAAAgD,xFAAMK,kGAAyCrD;AAA/C,AAAA,IAAAiD,cAAAD;IAAAC,kBAAA,AAAAC,4BAAAD;IAAAE,OAAA,AAAAC,4CAAAH,gBAAA;AAAA,AACE,oBAAI,iBAAAK,oBAAKH;AAAL,AAAA,oBAAAG;AAAU,OAACC,qBAAKvD;;AAAhBsD;;;AACF,OAACE,sBAAYxD,EAAEmD;;AACfnD;;;AAGJ,0CAAA,kDAAAyD,5FAAME,sGAA2C3D;AAAjD,AAAA,IAAA0D,cAAAD;IAAAC,kBAAA,AAAAR,4BAAAQ;IAAAP,OAAA,AAAAC,4CAAAM,gBAAA;AAAA,AACE,GAAI,EAAK,AAACH,qBAAKvD,QAAG,GAAK,AAAC4D,uDAAgB5D,fAAE,AAAC6D,dAAmB,AAACC,iCAAMX;AAArE;;AAEEnD;;;AAMJ,0CAAA,kDAAA+D,5FAAMG,sGAA4ClE;AAAlD,AAAA,IAAAgE,cAAAD;IAAAC,kBAAA,AAAAd,4BAAAc;IAAAC,QAAA,AAAAb,4CAAAY,gBAAA;AAAA,AACE,IAAMG,OAAK,AAACC,gBAAMH;AAAlB,AACE,GAAI,EAAK,AAACI,wBAAQrE,QAAG,CAAG,AAACoE,gBAAMpE,KAAGmE;AAChC,wDAAA,jDAACG,+CAAOtE,MAAImE;;AACZnE;;;AAMN,AAAKuE,0CACH,uGAAA,2CAAA,kGAAA,wIAAA,wIAAA,8IAAA,6HAAA,kIAAA,uIAAA,xhCAACC,4MACWhD,8FACH,AAACrB,4CAAoB4B,4FACrB,AAAC5B,4CAAoBgC,gGACnB,AAAChC,4CAAoBuC,6FACvB,AAAClC,kCAAUO,8FACT,AAACP,kCAAUa,oGACV,AAACb,kCAAUkB,mGACZ5B;AAMb,AAAK2E,4CACH,+IAAA,2CAAA,uIAAA,4IAAA,7cAACD,uGACCD,wIACO,AAACpE,4CAAoBY,8FACnB,AAACZ,4CAAoBkB,oGACpB,AAAClB,4CAAoBuB;AAEnC,sDAAA,2CAAA,jGAAKgD,oJACGrB;AAER,wDAAA,2CAAA,nGAAKsB,sJACGhB;AAER,wDAAA,2CAAA,nGAAKiB,0JACKV;AAMV,0CAAA,wCAAA,sDAAA,0DAAA,yDAAA,0DAAA,yDAAA,mDAAA,sDAAA,kDAAA,zgBAAKW,wqBACO/E,rEACD+C,qLACFA,pCACDA,pCACGA,lJACFN,+RACDQ,jCACAA,rLACGA;AAGX,AAAK+B,4CACH,+IAAA,2CAAA,yFAAA,nRAACN,uGACCK,wIACOhC,4FACEA","names":["spec-tools.transform/keyword->string","_","x","cljs.core/Keyword","spec-tools.impl/qualified-name","spec-tools.transform/keyword-or-string->","f","spec","G__125752","G__125753","spec-tools.transform/keyword->","G__125758","G__125759","spec-tools.transform/number->string","spec-tools.transform/number-or-string->","G__125763","G__125764","spec-tools.transform/string->long","e125776","x'","js/parseInt","js/isNaN","js/Error","spec-tools.transform/string->double","e125778","js/parseFloat","spec-tools.transform/string->keyword","cljs.core.keyword","spec-tools.transform/string->boolean","cljs.core._EQ_","spec-tools.transform/string->uri","e125785","js/goog.Uri.parse","spec-tools.transform/string->uuid","e125798","cljs.core/re-find","cljs.core/uuid","spec-tools.transform/string->date","e125799","js/Date","js/goog.date.UtcDateTime.fromIsoString","spec-tools.transform/date->string","cljs.core/inst?","e125804","spec-tools.transform/string->symbol","cljs.core.symbol","spec-tools.transform/string->nil","spec-tools.transform/any->string","spec-tools.transform/number->double","spec-tools.transform/any->any","p__125806","map__125807","cljs.core/--destructure-map","keys","cljs.core.get","spec-tools.transform/strip-extra-keys","and__5000__auto__","cljs.core/map?","cljs.core/select-keys","p__125808","map__125809","spec-tools.transform/fail-on-extra-keys","clojure.set/subset?","cljs.core/keys","cljs.core/set","p__125811","map__125812","items","spec-tools.transform/strip-extra-values","size","cljs.core/count","cljs.core/vector?","cljs.core.subvec","spec-tools.transform/json-type-decoders","cljs.core.merge","spec-tools.transform/string-type-decoders","spec-tools.transform/strip-extra-keys-type-decoders","spec-tools.transform/fail-on-extra-keys-type-decoders","spec-tools.transform/strip-extra-values-type-decoders","spec-tools.transform/json-type-encoders","spec-tools.transform/string-type-encoders"],"sourcesContent":["(ns spec-tools.transform\n  #?(:cljs (:refer-clojure :exclude [Inst Keyword UUID]))\n  (:require [clojure.spec.alpha :as s]\n            #?@(:cljs [[goog.date.UtcDateTime]\n                       [goog.date.Date]\n                       [goog.Uri]])\n            [clojure.set :as set]\n            [clojure.edn :as edn]\n            [spec-tools.parse :as parse]\n            [spec-tools.impl :as impl])\n  #?(:clj\n     (:import (java.util Date UUID)\n              (java.time Instant ZoneId)\n              (java.net URI)\n              (java.time.format DateTimeFormatter DateTimeFormatterBuilder)\n              (java.time.temporal ChronoField))))\n\n;;\n;; Keywords\n;;\n\n(defn keyword->string [_ x]\n  (if (keyword? x)\n    (impl/qualified-name x)\n    x))\n\n(defn keyword-or-string-> [f]\n  (fn [spec x]\n    (cond\n      (keyword? x) (f spec (keyword->string spec x))\n      (string? x) (f spec x)\n      :else x)))\n\n(defn keyword-> [f]\n  (fn [spec x]\n    (cond\n      (keyword? x) (f spec (keyword->string spec x))\n      :else x)))\n\n;; Numbers\n;;\n\n(defn number->string [_ x]\n  (if (number? x)\n    (str x)\n    x))\n\n(defn number-or-string-> [f]\n  (fn [spec x]\n    (cond\n      (number? x) (f spec (number->string spec x))\n      (string? x) (f spec x)\n      :else x)))\n;;\n;; Strings\n;;\n\n(defn string->long [_ x]\n  (if (string? x)\n    (try\n      #?(:clj  (Long/parseLong x)\n         :cljs (let [x' (js/parseInt x 10)]\n                 (if (js/isNaN x') x x')))\n      (catch #?(:clj Exception, :cljs js/Error) _ x))\n    x))\n\n(defn string->double [_ x]\n  (if (string? x)\n    (try\n      #?(:clj  (Double/parseDouble x)\n         :cljs (let [x' (js/parseFloat x)]\n                 (if (js/isNaN x') x x')))\n      (catch #?(:clj Exception, :cljs js/Error) _ x))\n    x))\n\n(defn string->keyword [_ x]\n  (if (string? x)\n    (keyword x)\n    x))\n\n(defn string->boolean [_ x]\n  (if (string? x)\n    (cond\n      (= \"true\" x) true\n      (= \"false\" x) false\n      :else x)\n    x))\n\n#?(:clj\n   (defn string->decimal [_ x]\n     (if (string? x)\n       (try\n         (BigDecimal. ^String x)\n         (catch Exception _ x))\n       x)))\n\n#?(:clj\n   (defn string->ratio [_ x]\n     (if (string? x)\n       (try\n         (let [parsed-x (edn/read-string ^String x)]\n           (if (ratio? parsed-x)\n             parsed-x\n             x))\n         (catch Exception _ x))\n       x)))\n\n(defn string->uri [_ x]\n  (if (string? x)\n    (try\n      #?(:clj  (URI/create x)\n         ;; https://stackoverflow.com/questions/11528249/uri-validation-in-javascript\n         :cljs (goog.Uri.parse x))\n      (catch #?(:clj Exception, :cljs js/Error) _ x))\n    x))\n\n(defn string->uuid [_ x]\n  (if (string? x)\n    (try\n      #?(:clj  (UUID/fromString x)\n         ;; http://stackoverflow.com/questions/7905929/how-to-test-valid-uuid-guid\n         :cljs (if (re-find #\"^[0-9a-f]{8}-[0-9a-f]{4}-[1-5][0-9a-f]{3}-[89ab][0-9a-f]{3}-[0-9a-f]{12}$\" x)\n                 (uuid x)\n                 x))\n      (catch #?(:clj Exception, :cljs js/Error) _ x))\n    x))\n\n#?(:clj\n   (def ^DateTimeFormatter +string->date-format+\n     (-> (DateTimeFormatterBuilder.)\n         (.appendPattern \"yyyy-MM-dd['T'HH:mm:ss[.SSS][XXXX][XXXXX]]\")\n         (.parseDefaulting ChronoField/HOUR_OF_DAY 0)\n         (.parseDefaulting ChronoField/OFFSET_SECONDS 0)\n         (.toFormatter))))\n\n(defn string->date [_ x]\n  (if (string? x)\n    (try\n      #?(:clj  (Date/from (Instant/from (.parse +string->date-format+ x)))\n         :cljs (js/Date. (.getTime (goog.date.UtcDateTime.fromIsoString x))))\n      (catch #?(:clj Exception, :cljs js/Error) _ x))\n    x))\n\n#?(:clj\n   (def ^DateTimeFormatter +date->string-format+\n     (-> (DateTimeFormatter/ofPattern \"yyyy-MM-dd'T'HH:mm:ss.SSSXXX\")\n         (.withZone (ZoneId/of \"UTC\")))))\n\n(defn date->string [_ x]\n  (if (inst? x)\n    (try\n      #?(:clj  (.format +date->string-format+ (Instant/ofEpochMilli (inst-ms x)))\n         :cljs (.toISOString x))\n      (catch #?(:clj Exception, :cljs js/Error) _ x))\n    x))\n\n(defn string->symbol [_ x]\n  (if (string? x)\n    (symbol x)\n    x))\n\n(defn string->nil [_ x]\n  (if (= \"\" x)\n    nil\n    x))\n\n(defn any->string [_ x]\n  (if-not (nil? x)\n    (str x)))\n\n(defn number->double [_ x]\n  (if (number? x)\n    (double x)\n    x))\n\n(defn any->any [_ x] x)\n\n;;\n;; Maps\n;;\n\n(defn strip-extra-keys [{:keys [::parse/keys]} x]\n  (if (and keys (map? x))\n    (select-keys x keys)\n    x))\n\n;; TODO: remove this as it couples transformation & validation?\n(defn fail-on-extra-keys [{:keys [::parse/keys]} x]\n  (if (and (map? x) (not (set/subset? (-> x (clojure.core/keys) (set)) keys)))\n    ::s/invalid\n    x))\n\n;;\n;; Tuples\n;;\n\n(defn strip-extra-values [{:keys [::parse/items]} x]\n  (let [size (count items)]\n    (if (and (vector? x) (> (count x) size))\n      (subvec x 0 size)\n      x)))\n\n;;\n;; type decoders\n;;\n\n(def json-type-decoders\n  (merge\n    {:keyword string->keyword\n     :uuid (keyword-or-string-> string->uuid)\n     :date (keyword-or-string-> string->date)\n     :symbol (keyword-or-string-> string->symbol)\n     :long (keyword-> string->long)\n     :double (keyword-> string->double)\n     :boolean (keyword-> string->boolean)\n     :string keyword->string}\n    #?(:clj\n       {:uri string->uri\n        :bigdec (number-or-string-> string->decimal)\n        :ratio string->ratio})))\n\n(def string-type-decoders\n  (merge\n    json-type-decoders\n    {:long (keyword-or-string-> string->long)\n     :double (keyword-or-string-> string->double)\n     :boolean (keyword-or-string-> string->boolean)}))\n\n(def strip-extra-keys-type-decoders\n  {:map strip-extra-keys})\n\n(def fail-on-extra-keys-type-decoders\n  {:map fail-on-extra-keys})\n\n(def strip-extra-values-type-decoders\n  {:tuple strip-extra-values})\n\n;;\n;; type encoders\n;;\n\n(def json-type-encoders\n  {:keyword keyword->string\n   :symbol any->string\n   :uuid any->string\n   :uri any->string\n   :bigdec any->string\n   :date date->string\n   :map any->any\n   :set any->any\n   :vector any->any\n   #?@(:clj [:ratio number->double])})\n\n(def string-type-encoders\n  (merge\n    json-type-encoders\n    {:long any->string\n     :double any->string}))\n"],"x_google_ignoreList":[0]}