From 609f52d3842a10f381f3af4ec831ad35a7712cc5 Mon Sep 17 00:00:00 2001 From: jarnaldich Date: Wed, 13 Apr 2011 14:53:38 +0200 Subject: [PATCH] backup --- MakErlFile.erl | 7 +++++++ bootstrap | 2 +- ebin/makerl.beam | Bin 2904 -> 2916 bytes makerl | Bin 19664 -> 21448 bytes src/directory_hook.erl | 36 ++++++++++++++++++++++++++++++++++++ src/group_hook.erl | 21 +++++++++++++++++++++ src/makerl.erl | 1 + 7 files changed, 66 insertions(+), 1 deletion(-) create mode 100644 src/directory_hook.erl create mode 100644 src/group_hook.erl diff --git a/MakErlFile.erl b/MakErlFile.erl index 918833e..b442422 100644 --- a/MakErlFile.erl +++ b/MakErlFile.erl @@ -5,3 +5,10 @@ {rule, app, [{template, "src/makerl.app.src"}, {target, "ebin/makerl.app"}]}. + +%% Create OTP Structure +{task, directory, "ebin", [], []}. +{task, directory, "src", [], []}. +{task, directory, "priv", [], []}. +{task, group, "otp", ["ebin", "src", "priv"], []}. + diff --git a/bootstrap b/bootstrap index a8ab56e..8bcb82c 100644 --- a/bootstrap +++ b/bootstrap @@ -28,7 +28,7 @@ main(Args) -> true = code:add_path("ebin"), - Files = load_files("*", "ebin"), + Files = load_files("*", "ebin") ++ load_files("*", "etc"), case zip:create("mem", Files, [memory]) of diff --git a/ebin/makerl.beam b/ebin/makerl.beam index 44c29e9399d258e78da936f68fe0aa476df21542..151fd6e7cf43d370f07029d4a96c5411c2d2b56a 100644 GIT binary patch delta 142 zcwW09_C$=s%|FPHfq^?_BZmYB3wt|j@MaZ`Vy2{n%{dGV3@jN;DGcoS1tppJdBq?B zCXfJIerZWcW>GeSM3$9)Kv8~HYH~?xv3_o1c4|?Meri%?9!M2qW;TN~HU*h^$vLGd WsgvJwX|VGoawZBVT1}SWwgCVn!YT#; delta 130 zcwT!Vc0-KA%|FPHfq^?+(vpt+P=>Y^m>6TQG7Nil-krGh48I-*TO`tf-`ooBzGrfMfqeDX?|ug}ueUH_=#PBJ4P$u%be+iy#9h%fj$lcEKT^z8&L~~}DAJ_O zw?xhB(h{A<+`92QhNs#F(LTHp)t4jql7-nJ%icJVUUT*1VH3KlH^{2vYeuSlnZS_& z)z_qH4FYX!Fts@HG_0IL%U5t}aaSX*%t~dJQwyLJj3+>0t%a};#(U-H$E4q&R z`Ca1zgx~a88E{#IY!GLUYj1KcY3dJ>12XNsSIlUhDarL{By&E$UKkx)@rZUW713ih zEPZ7}4XnXcBoijXen)$O(G|S1bg4Kga-M;^_hTbl_ZC#ct~A&1vV&;GC$ zCpF|oDwti4bIDH2Mc2(I6K!51-C;Z4$YTi4jS+Dx0nq8_YXNvqfCX*-WA6@u$CW#5$qqg( zhKW@@mQ15}q6S!%43~4rn-<-p!|QY!Gccni)|GZ5X}D(?G0zDpw4wea7i%Kf8m6Sx z*x7xyW3JK%e-9tIGb=5587B5|wbb-&%u}1b)A(i$3VoXr?+M%@7uLWOKbA0rhZX*; zKMNT?M5e*e@6cxB#SUVB@TBlllUsge6;nNhIMWgj$Js&vaVRf~K@tk;Dw(=Eb=66+ z828{oTkiazNp=mr-ecYmd;N=hRBy^?FOzMMR38aFmYGsaQQ5KHso&_*zHU#qcn2nF@%6pd3C>RB~0O@U|WSw`W`CyS=gpY_!ulbJX8(=}toVzkzkv z$C}95-vT}ij|^|sA7uLY7CRh$`Z@;z)IAQCOP3Uc(Lfn$jOk@URobFqhkdQNbs_0B z-7S5svHDN$-L?XiZ}RkY#UgWRtYQ2_<2FTC%-uVYbqcua${p!jVxa`5B^IGhp%n6- zZucLyeb|8d(Y&*LsQCIu!WE4-qVM`0Ik(d(dYNqBCb>_EhM%vJGoUcTu$$lc@)RlNjf$Pj=25M-r&=|L zwSGjE$cO`@N$G=rG6uM#17j{MdZ#qRW6j+n#(mnP6#c5-uL9iZUAMBi=d*R>|8eUG zb0E1gb&{*Ifu~g?Ohqg}o@SWD{{B8e5P@jr9mA0ui`-tC9X4ITIpmC{YyUtNT`E#l zY(=&Ehbq!@m|cn}JV2&*LZ==&b})+ayvUOsaaYT)h|9i{mzfMxGwI-5&}!xFT`{~P z9P!RffeD>$?%=Jfm)ZzPQ{X7g({XyR%1@+ZSp~sUC`rDacZrjHA+%$+2twLH7+xa> zOTLYfQ(%p~k-J-v-epu_+?t}wU1XjVI2RF@Pz)sY=g?TFDBQ~Glzj|eJ$Ox8Ktl33 z)q~zcdy2$1kna`|Yu;x8#5l^5y%$AdpK>?P*99HSboaUocNkxXbMrWNk*ZUS8*MO& zy*gKZfvmbVtg}c9(SKQ$57JaFMoUUV0>!^6!IQ!dr5#Mr39U0771mr^RPBis$$_Ns z(Wx+qil&t9c2*c(eHu$m=f|m}u4;H>c&g}OO^T2R*)1&7<7yDpo^;2Cft45 zj0F85$&;BNuH6~roTERN(Hmb|$>#p``3wO^FoF4lKz~T{F0>5{j({3R>xSWthtKmG zHdQRtQ*E{Iro8xM5K*+PPA2uhSiB+Fn??_!LECy7KUI~m%A$BrdS0??i?03shIAKB zIeV0AICOjUD5^nqbAyGxz6~tNLD3Y}sDQ?uZ>r?|$Q+(T0PS(rSFGaNUBF4Aw+LFK zMjl1Ya73_6GB7N=X@-Xs>GuV}iI=G4V`M9z{L@<|&Md2&liY&Ph@G9LDxK_%qo!r> zpv)%7yV~d(o7MtZAk^ZWU$Yc1ATGY|Qb<7coHFVr{IJ0(K1z){QvUZwxg&E^JM7w7Tbv6&ZCW#foPxZx9)=Q+u+vlK9 zBNiN#jt?JO;Ha?>34Md7I55b&?$+32sXU=a_B||!w91UAsQw!!L-i(CslqYeB2Hea ztLrDaMiVF!Z&|I0-{DpYV?c)1lodK41-|jPB_Uu^<`T~FuqmBNPg!EnJQ2XTU!zDS%x-c};u@?z$S7Go+0w>LK1zk{oh^mDU z%LeS>lX2xP2ulv?>BrVg__aws7iXIMIe%Mxd^T$3dP>cHP!T{mj+hBLrWZ`>Hi(R< z_kwI9B91ITb2VXjQOF?rZL|r!7<_QmS%U?KvU`A6DT6wI2lYxci%_}#5rhbd8#+IE zhSc3F8O_Kf9v#1s2~=5S_0IWZwUVRwWB1Emy^r$Gj7V1%Cg+-f2T$GD9?mj?OR$YN z^)2z}PrwGU7X!^Vbk73g^KpdP(jm4v&*E+DDP_K-9NMp0jKp^vpy%7obj-*E|6! zcg@G5o1;sF0o`fA$dsJQ;Y_3Sxyu<%$_x&sRLp$qm=A4TujV)Qr@SW`Z6~)@dtT7_ z=V8dkzdjI7Lix4y-$%bP2R-zqysZ)C-+;D)PSaZpNNHtEOB~DyNV@pC4M%YX$_@$( zWBOmko(#Ti9}_!!lInVPz;9x7eJtzE;Z9HPXembbWT7;wVP;3YU24WN6Z3ebf#(FK zXQC6lgbBSL{3QA9+DVh2ME)zsx6b>Mh4;wNgXP+%U%F3{kMPk#XH`7Q9vNu!(?nRq z^lr$Qq+a71^vtRm|SI;U_WOXBQw%|_s8M6%3m zM&p!<&B%4t_|t-RV&HB?D*cgf{*{4y8h6FN4Cx886(5@&CtCFGuM-}d7mL32oQ!+7 z_PU*Cb&FANx^o6Ckl_h$f9yvurYl)yQ(Up1_Y!JqH_ShRLDe{0uGJwg61s~>2%~m~ z;=aITMbV>kJiQG!?^{m7de`kSU*<*VS&U;O4yPtUqFsnHnWw2Gj~D0f`5foN9PXcd z4jN_ieJyFQWisS^^YvY5C5GQ?^)~GJfY-KIgX!sq$O8@Z@jAodYUIhZ+wS_VqV7{P ziq^|{QBfn*WEtVVA3C)qb+Wxv-sY3InE#5gH&f}f1l}4|LcHbe-g`Z(=U8t%i)izb z1zf{rKG;p7UKqMFGx^U%+somvLuZ?Oa|k}W>5T_wo4wOcul+E59#Rw@XE(Pme7R zkV{kFXV%GbpQwvx(?bn8@;i7gO3Pw9; z=4s;33g{l+9gyq33&^Wk?{a(9HcD`;U5LpiR4j0pl5yzU)yj)Y92LWVb|9dXaF;(( zC4EST%hA?Lf;<1w!$MC|2|Ep=riU_4o{fSfvfs#mPbMA-Mf}Vt8K8|njY+YQpNV9Z zB;n7Js!EtrSZ@Fh%FIYf2u!llnu1%ig#z*)<+ zO?`Ix*~pVX_V;3oXJQ|`G7FVb<1P;c+%hoNLQbG%E|^u#z(UMe4h5uN)V@p+RAU}j zTgJuvOheyv+nx%)r#Y9dh-b&s(y=Em=VhOY#W-{ZwZrYM>3|WMXu{`=m_$!(JeLKD z-0%`WG^7bh#>t~Al?*zgy)G~(`+jONVjXp!)mBbmH-05%$RD(5c$yy}NSK72p_ z9sJvgOJ-$?pct?{I_!s!{XCrb;Vw3=+PbI@dha_0wBC2Ydbrh;b^7>}78XH(CJYBe z1JDrsKRzC;3_Z{Oq?N_bTePx-+~4Y50Kfr$KDOk4t$zQ-{BPn0WoD2FRs59l#dF?c zY7Ix_y;|+ssErlmYx?&Pxc#qBi0*hJ4dVk$t>Afr@C?vi}n34>@DW_SQVD@ z^~zM3L9G|#yHyya|5m;H!c6o0S1t3WD=S#83cmOYFvvOeRT%TFR)K#f#&8ts&mI1m zLjPK=UN9aFV?3uxgE51apz*b^i-tci*PTv1Q?MQlfdPQzH;lVD03cCrc1VQlU(W*- z<>yj}^{Ww!ruq#Dm5vusWoQ2}DL*BCcM%VJ09cU_{x*qHHXf-;f4-$hs?6w%N&w&n zcXhbuVr66J>gMA0*ERo)*1c{e?B^1S>8A6eg03k#qv`B{_QXU-d+(QjYd&3fDqXx1$OjiweAAin zD3;_h!cN4>Sqj6k@H$@xIu_S>KGPqI9p1+$0>>Y9A`T!Iz{g@qn)7&vbRfINei$`W z`zX&jnE~Ke(ms@rKp;9=d*$es(}Tk~MX^HlBBqqMc<9$5vO^CK5A%>q$7hN1^V}ne z@WdO}ugh%2J(?6klgks0Wgy6sk2Uth0T++*PZm_o2X`yn7 z7M3n!Qzy5~+(IEon78&#J%~@5m6b*8oft8s8w(5JGS&PK&HCTGVZ9}Z^C9{6Y3~=H z19QVS-C{G^RMsNorAnG~S%k&KxxVZZ-@Isdo(j`LuqSefq7aJ*tsW~bkoLm2_L4-m zYkXH0xHEop=Ku!#&xR@O&@?7>ltUK#0K!S`wYOG3r@D4V&<7q_CGgq#bGJ<}ZO{A-OYk2Du1 zW0qpvlhewzYx&?Q%L{nbw5lHos=ZcUr<@;3u#)Qg7{bG54NaB^5lCxN^Gcf@;&s*A zQC`~M<{Ov&{-IjxhG}>i1GIF+7tW0{yvncB)EGjB*Is5h)Jxxn$5?b7v54W}+#XCsY_i z>uu@_S+h#4eXUm4hxGuD(*KjSD?M!1NGr*lnsV()rr8_0I>X|E38?5-aCg*`+Akg2 z?bpi9Fr#$Qi^vQsHNsg1tsP_-ihH^Dcf!Nv#{VF)?$IN^s?wVKprA zEVH)DqwX12Q=?b8e*BQh3tv357=wvogGxIx=&VRf%3rpnwaYWjG9gFwIU1Fq><~lY zdS-@B+QW4Jh$oFrf$SBmT~!x6s%!_nC8b8i-q46Ul6q{;pZdT0K5NuEPa*_eB;YRp z63Rx(0DkA>3HbwWXf7|X439|RyZtFa8TKuxHb%YEzWg6k6OI|g-E4?JfT75on5G`< zD|%f=e_z%$L>-%=vx3}EBdgbA^HD)Am`6zzCP3JxZqs%t%&4$M-Rpdm%ZrCv3!eai zVCoo)5v;qD?fU2$a7)D=&6XgoRHUlT`m6+^M(5I@oz=9d8M88Lb9EW%nF!gF<1@XZ z$S-lzF04BL+gqKAdOz@+k?hXo_od0d>2-kGZob(EiNir?u(D1!OiR40FM)YIedp|= z)0gy4%gKB@1v@ZQoY%F>)-FuF2#^F7(ih6qQxx;sXDBnIIndc(i3 zVRs1+8N{V$F`+1%ilJqLL6QSf>EeJQm4RlJQ_@Mc&ajXEY{$}^mfWPzTBbCTqT*B4 zNVcx^fevp_{niS?vmO@d`0W1{tEZbZ8dzaZAK}ZV4UY>V*jXx%2|konH%%W?SR60X z2tebuH^PH;NQ&}=+Wy+$z25PbLDhqlw90+|i$yX53wIyv;#zW0_Yp;bJNH}0mja5u z3wl(2CdS=$~9$-*?BrTAL}f7;7nt95%@XfnvVtHeII*8U5{p0uO0;a6(<~&fpU~KJ9^Y>~h zsFoKMEj#!Dx;pc2wIIU3`QGLPM~C=>;TqgZ_-CihmCJ?isM(Uw?vIqRuFGb+T2ZH$ z9zP57OB3WLsCi+LJCy7UDyn|^A}zJdXHl|i8BN`qteCx=lCHkfP=Jracq4enAR0f{ z9cX?(^J5l#_UEbw1OqCr41LX{;YF!1&c#F>zT3j;eR!0 zS8o>)b?%LdH&=~MMX=0U;qGB3LLbLf#M!=Gao-wKo%4`(&0GfA{Yy5}JucJ)Vr~S_BK5#?nc@D&Fg7sztYS(idf|7NL`%)x@PW#XwmoCSHHL^ULfMPGBm{{Vv z0tuB4;u<6C>8X!{puhLxUC@pq!-Zh2Kkew?mcGe*duEtiPV=oiL*8w)MbCgWkpDu- zoJiJxuJ-EHi%656)|ao^3^hdaP4Ew-gQ8#RpAA4cjR6hv*s$T5az<%Er|XvZSZ_|5 zkND`s>$!Js$BSKTWtT1zpO$wMnD26|hs-s3nrQtl{kPY}h7R5{YW+HIZFVU2re&Z4eV#+6Ugd}Wn z`%D~G`5t0irx5Tp63O(+uSZ1|PMHy%hg-FWXJ=0pU6BL;cO=RQiopKgLC!t@cvs8^DGcc$~EJm&sHS`YjTsi&Df5A2hEJ%!A}DKa7gdJ|HyCdJ`&(M pY&XaR0OwD&jL +%%% Description : +%%% +%%% Created : 25 Mar 2011 by <> +%%%------------------------------------------------------------------- +-module(directory_hook). +-export([get_status/3, + build/3]). + +-include("makerl.hrl"). + +-spec get_status(string(), [string()], options_type()) -> status_type(). +get_status(Target, [], Options) -> + Root = options:unsafe_get(Options, '*root*'), + Rebased = filestuff:rebase(Target, Root), + ?DEBUG("[Directory GetStatus] ~p~n", [Rebased]), + case filelib:is_dir(Rebased) of + true -> fulfilled; + _ -> unfulfilled + end. + +%% If it executes, is because get_status was false --> file did not exist. +%% it is an error. +-spec build(string(), [string()], options_type()) -> build_result(). +build(Target, [], Options) -> + Root = options:unsafe_get(Options, '*root*'), + Rebased = filename:absname(filestuff:rebase(Target, Root)), + ?DEBUG("[Directory Build] ~p~n", [Rebased]), +%% os:cmd("mkdir " ++ filename:nativename(Rebased)), + case filelib:ensure_dir(Rebased) of + ok -> {ok, Target}; + Error -> Error + end. + diff --git a/src/group_hook.erl b/src/group_hook.erl new file mode 100644 index 0000000..d300d45 --- /dev/null +++ b/src/group_hook.erl @@ -0,0 +1,21 @@ +%%%------------------------------------------------------------------- +%%% File : group_hook.erl +%%% Author : <> +%%% Description : Virtual (empty) task hook. Just to group file names. +%%% +%%% Created : 25 Mar 2011 by <> +%%%------------------------------------------------------------------- +-module(group_hook). +-export([get_status/3, + build/3]). + +-include("makerl.hrl"). + +-spec get_status(string(), [string()], options_type()) -> status_type(). +get_status(_, [], _) -> unfulfilled. + +%% If it executes, is because get_status was false --> file did not exist. +%% it is an error. +-spec build(string(), [string()], options_type()) -> build_result(). +build(Target, [], _) -> {ok, Target}. + diff --git a/src/makerl.erl b/src/makerl.erl index 31b437d..32e9078 100644 --- a/src/makerl.erl +++ b/src/makerl.erl @@ -65,6 +65,7 @@ unsafe_main(Args) -> -spec init() -> ok. init() -> +%% io:format("~p~n", [escript:script_name()]), ok = application:load(makerl), task_registry:start_link(), %% This is per-execution, in the future... makerl_log:init(), -- 2.11.4.GIT