From 95917976016f2285235f2556bfc888c9e7834ed6 Mon Sep 17 00:00:00 2001 From: augusto Date: Fri, 19 Jun 1998 15:12:50 +0000 Subject: [PATCH] Patch level :03.063 Files correlati : Ricompilazione Demo : [ ] Commento : suddivisione del support di installazione su dischetti tradotti i messaggi in inglese a Diaslogasktext corretta la cancellazione della winsock.dll :sse si rileva la presenza del TCP-IP; aggiunti messaggi di prompt in caso di mancanza di TCP che inibiscono l'installazione del server di chiavi e dell'uso del server di chiavi git-svn-id: svn://10.65.10.50/trunk@6770 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- support/interni/_isres.dll | Bin 92672 -> 92672 bytes support/interni/_setup.lib | Bin 34959 -> 35126 bytes support/interni/src/aga/declare.rul | 19 +- support/interni/src/aga/setup.lst | 26 +- support/interni/src/aga/setup.rul | 81 +++++-- support/interni/src/aga/setup1.rul | 354 +++++++++++++++++++--------- support/interni/src/aga/setup2.rul | 110 ++++++--- support/interni/src/aga/setup3.rul | 25 +- support/interni/src/aga/setup4.rul | 50 ++++ 9 files changed, 480 insertions(+), 185 deletions(-) diff --git a/support/interni/_isres.dll b/support/interni/_isres.dll index b10b046ed5b43e0dc961758fd1cf25c592ccfa7c..291c0f244e2190cb58e340802988f8f056afb6ab 100755 GIT binary patch delta 2015 zcmcgtO^6&t6n;I)&aRWqge>bCB1kc7c0yPu{u~0UM3&u%i;#?TK-h>_)BR?)pu1|e zs(KE&^bqjqLFOQyJVe2x?0|bxJP830MshO;kGXhRJ$RAzRrSv9%o^~AAbshss($Z# z-}}B-{RdP12UA~m=E`fCu__&Ab01E9^y190bncBWg4c!{-+q7QycW@xz!;fGSXV1! zM5Jvvn7iU5FbjqtTJ9j!!nW!pg4cX( zgULL)TnBRX%S}NO-y=_!m8&k z0D78zBGn3+5qWnHHcH1xtw06t!DT>NCsMB~$sRE+Qje1HR*PP^yv>;@vYISUlDe;( z#l)tN4h&TuXPOfbmT)S(D>&^I#5XFHCh->?K+(i!B3h_jtzDPtDD>kayJH1?HCIpB z6;x{swyVGFJUq1!*um`HD^G9wvdcx;OQ8U`1Dk`JdpClG!DoB*^TMGOF{NeE7P217 z4!vpQcKC4b*MDmm^yzBd;vo^;9`Zdc2}SM$N<#e6=*#7hI& z8tI9crjAxttwrg1FJIGIX`J1VZAI?!Yt!p0#{A*TEeIf zIUvU4rd$dmOzhjPkK{ghryn7tA&dmMfm`JS=P^0SX+>EG zm1{Z;p5icBheijHVo0atG>z7(oP2s1rSPH5RFBMikgqXD`zKEhtJAbYng27Ge~a?J zLd*TkJY>N0IKuXSK+FGKi=QwwfZ^wlZUuvW^@ZK)dhqKr`IQYP7cUKR>q@0kzhLT> zijyZz5@WH!SU5gbXqf0ky?%G%zavRmwZcY0u+ChZ9#2H4U3g;+iO{s SZoEY^=wz^a;=SOHQ-1=w9KNpr delta 1755 zcmc&#&u<$=6n^WF*ma8YqqI<2LL=1F2t_Uh2_z#G(zpmKC|Pi%N(CV%yKm!B$20Ei ztex~?D*|pHAs>1|LV^QF6ieg;;)I06fmS_mfFu7vK!OVjZ*~(Wg+CzLgS|8JzIpF^ z-}iR#aB}c)^6Sm{l8+|Vic4|#F1LKtp8t4qlzZy+uRJzteE-wTxmCn4X6r3vtGH!Z zUBtJCSAM?QUt0nA0h;gvl;8{ic>Z9Ss{kdy%aDif;5qnk0wCw__!4=HOsE)*WtNbX zLkbCLF~wsGVU;zabSn}PW2P0oh&VmN0<{tix@KQA8j`a67&Ay3svKaU-$TU9DM+5(ArtxYJdD zA{E7;3?EJ80bbh~esF&-fBkYAH~j2=FdUSsyANgx{Z(z*4W*OKR#scH!vll@yn(U{ zZCFYP^MD?I;5hu^a4GjFhef*ZN4Nq=%fz8W#SGQ)#$tz>(!|Xs5}B@0)@zC3=f9NS ztQL#wngv=}p%SV;5+=4RGKd+Y$I;XbdlG>Y#nd5n$j#bHb#$jR?d|?LeZh-{XZK$` z@23S!Wd&Sr3V6iPyomfZ>fRqu_Sf8a4oUoh)n>a^ELIlcO0gJf8l_GuxFup+Wvs5*woX`&t4sjn z5I6ERFg2{j@YPQo-m#d*$7<{dI+aV8z8WFT+rA3OIub1j(XgHo^oO)%DIKKA&JNXQ zw>#(rJ08J3L322pTogR;g_s{gdTX{gE diff --git a/support/interni/_setup.lib b/support/interni/_setup.lib index 488ce7fb1c20c91239e9ca12d7757b5e2faadbda..53234a41bee9ad1d70ee4c5348d30b7defad15e3 100755 GIT binary patch delta 18600 zcmZ_0byyT%_&z+#(z$fY(xNm-!!9YMlp-P0C0zm%vq(ypgn*=2fPm5X0AEs%!xVkoVcHJ?q?E`aH^AWq^QkoV`U&Xz<&o62;{T@CEngT z@3xa;|0fLie{Mir6abLi20?&~Ti1sq#pWbkqDqMHJunrBZbnK<3Aq!YE=c}j-e@Do z%u#1Cq)^go{1D_~8TtZ1wXo-%Q6NKjjEiV8uX66I=8Z3e3Yq_+ zX~kK4OLI>(N;_X)bu;8j9I6$q?x7#{76m}H27o(wKwhH0-C&lCXJ;xzF^q^BW;fpr zN$LOxSY#|G%QN3_Ihs*Ij0F_mBQ5n;`?US$#8k+I+wi}rzf;|nlWLRbPQU@YsTQx! zDWdIWCYObYwNYwz=%CF}l}x3hW9zl(mQo;YCsD@%7Ul15EKER)HC?JBDp)VW8FUwfG4#_ za37&6h9dBR6&Ak|(Yt!$K72-1YvF_XHP$rbz)y?XTKjTsL)x6s7nP5ZKVXI4x8?f~ zx8T6P5&+&N4f?nT_9*L$$|+B_aW*5DWFpkZK~%a>=robh6HK;Ie4p8`*JW7n=NT6! zcA0`7gIuA|O6DO1hG{lMos*z7++l5`0r`u7k&Plbig56VL(!h2vBfW-OxT%h#wN{n-9g&RbyCl5%gElxKmN- zWSQRedIkpc(SO&Efi_T#f=0B#J z8R{q2-7v$iG{ARSkK?SvMdfFY+Ut#M!WTP>|B_pJ!+{Ew$ksJaF!%m!LBP(qu^`R& zDB%#ko_F8taeSZ2WHE~VMy5Uo;4Gd-)dh5Xs*q|q(Me4@wP_)y5UA-mtq~3XobtfX z9dA>dJp=r-3mGG!0}8XX@b!F-d{L+~4gz@~jno{ih(0;zJy^w--%$tr8V*J!Mp=Yt$K%Rfq9$vpCDg z_cWNLp!9C*Jgt&y?e4y`w zV&1ZLZo8L%mCPGSD(8+F*WY{r;|HIi>4orWxd3&70j&8ES%Zls%`X4O-}yUl3_}kt z3q#9MoJ(#%qtB7A^!YDR=ps%c#Rt{MK|pOdqK@!yp#{1R{t5^GlD+m))-KF~v3k23 z@yy5s1dx~Zk$Kl?-BBP&RClLT4C`ZPnMm=ofi9Bb%D&>AVh1i=j7$gJgioN=>(|PC za{EIx-Fq~OzR{LY(mc)+tkX_1(lxrZxR`P?cB7lrV&^5Y_~@kcQn||_T(p+sg}GuY zw;@`X{^P1b)}~z9Mwnrl!#mtQxY;4>H|i;9*g>UAF!4*E^#0-+GL6DKO(WY!@#U2> z5|uf3e?}r=W0_5j@VO6G@f<;jfgETU9#GKQtB_)r&JpAo#kB>h4Xim0MiGnX1DOf2 z%7+x*SocGUSS(5eu}{!{kI3SbqB83la+j?d^ZSaezpW>irlX%QD!|c+sJ&I}7<}1w zM8IEx!_mfkM=o1D)3ama>%(X=24M?v-C>+nmW7N5@cBtT&Mwj{N#Cs3(HjH(jT$Qv zk28Oe0g60vIpQ|GC|C-?Y9GLLl9$c6x=zLlvz__uh41pWwY0v{P9w`m)^onrapumP zn?`>rgOt~|_$*Ps#Z*R9M;l}wA4rYw%GzCezfNeG;NUG@+U%8+BCpG%9s0!U;S&wJ zLG$Y^uwuuFw7DWvg14i z5&;w$u!KeefCi()E1+@K%LfO3WT?Z6q;#G=#k15>%aCxNql6p05OvF~ObBSf0`%-NyjdTZ`F3~pqb$xc(X4YupK&A(iU>#pgaKiGRLcpK z3oRkF$hV(mHm|8Y{3Lq%d2;8UuzVPxCSU?)gJ@L<&a$*gUC=M`A5TTxeJ4irz)72M zj;FfdSs7vKebs}a{F&&Nb(OkhAK2VYMd}0#8eM5Xe=1F>#=l@Jw3TOIR*J8p>UfjS?B#m;)atXW^4<0qkWDDOR9+!YR?K#FoUPlfY7LtdBkv8|{mHRl zmz-nyEr&=yyf=lzD4NuRor{n*=k$eM(i~mLbQ+K4Ij8Mx(W7UhbaHM(^iB3Jk4dCu ze7^CyFg>BI#wYV%?odzW6fCyMd>yc}M*^q-ekM4e(@W6ySzd)e2+qMl>C?r-RGu2= zhzh@F$x*#onhSYk^)ca?}5R@L| zRCBoC1K(p%K0Lp~(?r58t$#yJ$GMm+MFAus&j5Gz=|=t{1u(J;>6GQ5}=+#h}*TzM+2w8gjsKo`V?kb(2C&|=POmC)b@K3MH5RTufFnR+-VyZF$A@K8)kxCc? zvFX#qHU2JlOVR2mjO|i2gL!<~j^IP!-iPZ!$$W!iGoPXL%HR07&y9NZxcal@lqo`M z9u$I}AMT#Av>N}l(%Vjz*Y5Fkr)Rd^9OjF0d^2liX;nZzQ{BBR6X&EoEKQwgU(B3B zQ}$-kr7g3b+TXKf!sWq$0ISWsVM9r3BZI-X`QgTM6pF)F=zVl>olXB-#D`{H|9j0s zf(2E%Zz`nU-VCmXB57`WbShgoG{ZdvTCfGW5PKE#6HpuVnf5+Rrfb`1>*WBLDaYJ) z`?5v7w_DbBKMV-PJolCzfAi%ZKPhXSrgHKgsmi!iSl;SzTiC8zfL8E4y@_S}tQst9 zMRYk1{$>N_ucxnLk_w3$S$XbR74*v5ah0h_Tfp%PbCvz5x*M+1NeX^(DHLum5H$p z!~jS2h4V&Bi8~LkGy`Bn3s8n2b#W$8gHr*k!+z5|Vs(Od7_ zeUsKxr41&&m~ndga=5Lo<_JvsJvDLDU)meamVCu*Qm|T7k;Q|sEIS-9DJ>DTaeHK< z@%Z_%a_j^vVLh!auXEt6sUX4JXU_r#L1n7DDywVMAk@TFz8`|Tdd#!@v1yrnQ~zXr zXO^FFAf!#AL8$~sIN9qhpCMR~e8#nV<1VXiQ6hhCwM8}uFY#G?^_xL5dMI1?)vm-K zS!NC6On1&r+fH5Tc-uT<9pv%Rh_%5aUt(cd%>BBJ3`MSkZ-fY~PmReC!kFZR>cXcF z)4RWa`gBjBIV&Fr*kSGyE~}`Xjg%JWFZEZK>X%YrABxT(Sg2 z!EDXXO?rI7+oDr^!Z^Vbbq*OLd)Un(DQdl!`nn8x&y6T-ORZ4n=tfYNKi}_7FZa3|#dMXd( zEoS|!-qVYm68=u?m;H85>~E4&-YbPxGOhVV$A*g1RI>3-ckoL%_Qa2NSmXmcQXW@= zVySM!y6)Q6&Dt{|)Z~Ncs@hBcq!fCg3tk1%#@Y075|hBdJj4~Z!spcx1H&!e9|3n@ zt~DPYeu`lY%UD5eBW@%Zl_iIA8h(_9TNd2=p77{*QmSHs$I1D@^G6*Ou_E3%{&111 z*k(s+9yb#i#|w~H(*HO=qQAIh4iih1_5I-<_q(h}ySmb4yir|Zuf=Lt{f1>f0Dh^u z6+`st+5GT@8btCTlrT@4DLczg^rZ$m=12B#rIo`H3P6eQK`^YaLq~n@roJg`&|c`} zDBX(3VcbgR*1sO67caKj%6{exOyfVv{P^O_^RM%9Q|23B9pI>vJ?;MYyBCM&{U75x z=SZ-S8#H<`8)liJmhgfST}NR(^H@@Zrh=N3hX-CfxYua5`%=dZHC4%Y6QCX|-}Y?a z+YGT)b;%g(h`Q|PxkS>ZXOx}Mp5Kg5$8#*B$)anhXtXO7r>LII@)q>$2QF{xl)Qz9 z#xSgYU*@+5DL+3F-+|C^H#)8m?JyQgJ%&vs7h5s3b}fx`6m`H-Oddj7R&v<%rLx)d z8FIi;uMOWL#m`G4zwXxK{i{=YRcuXa7Skl`O?$vx>u%ACp^k{l7PahNl`rkBwG}85 zGj2behudW0C07ATX{PWgJ^j}EU&8Ck4Mg2H!zkN9LkOCvH*GMD9_F@JOD3fttc8<| zao6i2I-lnJ7DIxltWdDbdV;U>zK*WDhRL7$(seO#X43t9DQicr?mDyDM^y3?o*VC) zCDor+JX(W&zle&OjH8Ykx(ZSLb~jV!enqD{etMMauKf=vKZ;W~>01Tr<$UeYxJ9VS zF@t6xL~@U5)`UOzb9ZL_D|Z@N5Sg z$4bV@A7KB;x|txC-tysCw&*M6l{gJ+U*n9g@yP@`W>4SUSl!z$?H^j0HeoWDDASvo z?`=1|@6)Hq*l3XW&alfx2_xspXo|;3etUs`4P!8xm$XAt*M+dkGs(=svxzY-%aoCu zs&+*#cdKV+@cfo&7Z{1{%qG*DdKY2RNEhK)PIbMo!xniCZ3qm~A_rV8P;$9Uy}lpC zN9>&_dV!n$d6A$4(hVFK@)BpXy&}Uk6Qgs9WGA@WjK`P~QIhiDGT?bR_hMF@2L$Bc z(;@3cyyM{cC!`D&{LBX|dSuu*ihj!>kug$y%pm6Yr^mRkzG~~CA|Q1$VjSe0@#-~_ zfF{k$gcl|D;f8~9q2RgJ>|MK zgZ%5!XfBJi7aBD&uK)Q?wwDXar52+~$xEICv}YapgzGZrY&$Cji_z z>w00Ym}F4wLTbN=Rkhi3*HT@aTLbXFZL4HRSdHS>;_Az+D}^Yr09>TA-MTpXEJC~l zfrY!18qCZ=PbxITUMYl>d|jss93!BE6sTuN`$yn9;;a#MTYi0KGGz_6#UuAh`RV-F zd2Z5xTK`?kpsul&=08&ol@;qg+Zl824XZ39x&Ta7Se6{RFza)3?G{+#NF?+EK1n>A zyKAqXBAisv{)LfZQDH=mVpUY0@9h>*Qlj~4$Xqn!Vo^m&%*IOamPbTg(-52Fm<5&_ zPddogGm~HZso&S@{}3kpz6<=b-nL*m#1;ITQtLgmsaYBtdj~Wl2E5wOoBgTDk)tF6 z98sTdYU*q_#J%nQ$Nw?x8g7cm;xM%0S$`SVu98Gu&3Igq*s$eu&uy){#^^kY_ z=-!M$Rnd{CCfFzIC^PADX4n5zc+E+=7d4Iw_ zx+>XeQ@7O_D7aeXS z^}CWH1YiYXhS>GBXd1Xj9;mGd@2h6j6k@)Y@7P%Hy2kQQrKa8i;19n+Hh)1MtbXdD zff=;bX3DNAKV}jG$b*r~+G$6`Y}Dt?H&sDXWve_jPRz7nWj#W5isZf7{?N8?t;UNt z-ol)6xV0?vrnveaakR=kSB$FSb=#D_vMUkU3~Gb!lIErFvsVj8sa*UU7Bw#4)hTXF z>@ugN1&Dp7OOOh~`WXn=8_VfF?YyH{nZ|wxAkPK2@wxho;nvGz8cwl4cc1-bZs>nt zPotTj`Mt2BQR1Wh0?+u~kLtdb9pBQ2vv|IU-a6x$xQb&n*NpxA4Uv_=^6c{v@!=a5 z067fm07MVPt+2=bXkj=m_RaiPM*m}A&$SISHe$w_Uwq%FU(B4s?14Addq2#E%rC@#WI)}r zI$6A0_+Q!kmvLWk=Ln*^W?(aoD8zI^sGiH8@XNQC3D<}Ft>7$plKV6Bh>7(``NgEIHmXi#n1BNxK=K@PQAxM4es5xJb(E zir?yw8DWl-s1iacH(vtygCCuFF1WM!8S*Kcsg`0>qgg+vMyjXcWWI1q`FjZG24n&b zz_97`|F&KeHQxb-I}Z148({BXZE8s0z%hgAH7TI9V(wG|EV%WVr(*ewN5(0B4ls5 zKWqA49uD^Q%M;~1vH^r~h669!nn8kpzf)3ug+Fqb)?~Q|1ho$X!??f^#<_0XHkQ0B zoQzfc`MyVh>yd==AhW1X=depg8wC;q5Ci-;ByLe~xQNBrXNdK~eu@?gN@e^(Ij+Zc z>HGjM&fr@bZ7jiXA`Wccbwc=F9yfIh#V&y$NTKE(0w@h%SkhT-B2j0MR7Bn-H1mv# z@bs+`gDd2$O`)Y;gn$h~%5b2t7j%%CiRpC{+PyAi_Bx=%Vm4@pA1aVK1fZ1nsxSW_ z0GBJ?8H{BR2)TmHl8uQ4i zq3p;luhPro4GK6foMk8nC1aL;DGMZOD|c)NUF)Pt^pU@Q4?u91{2o8vSUZq!-js7` z&fQT!B}YdM{m9OEoK7treX$F|b3TNvuVrj)1`T>&YqtIQbJ3PSSM3QjdnIO&Cv>hW zu%38L3h@1N`q1vCahVAsKE0q>g1gqs9sBC$l=Aarixk{%8R|RPYIhUbp2&_lk*luP zIo`L$oc(J*Hz$=qe2Tb(?QiCv*!Y=h#2S|v{USanUOG_-G3{kcp0oiz$Y+b+IJkIb zT+LS4`&-HLbwT&`2#DQ}q0Dv#D{{*JfKKnHV00W5C+lQ5nu$1gL9jJSHHUKPq76HeN zf(aLB(lX?^DDQwl=_9X!0;P9+1*Ht(qu5z?WVx2bX%c@ zS&IpIbo{MGjnpuAtD3}V6Wx6DSGjy0AS_k*3x*Tu{-g=pYF-aMg~{CrSunctMB9gL zVShuf(C2QIOvpV*PShf;vq|StvO>Esd+l0+R@FVtCPm42h%BA&&uR#)b!3;W8Y4Ug+pgb3$c8CMXa!s!!{$V;~OkLng- zv1`E}s2-@KW{9dr5FVaWB7~OWu^cLq7ILgpkx5o2K{kEBpV6tNH^OAc&2xL8OJ>XEEs|ZL^*nR6ggdabDH%5mq7?hj~!V8*i77b{p0N$QDpdh2ImK9`P^#>Ggs!2h}x^a~H6>4n9}8?JqC zwy<$c8|mw2aNJcky(=9sj?ubE2xLOWW)P3DTVkeBG^8FHnGz;&vFj~g;mdjG>!NyNyzqwO6X8^oxq`J8^jVsAS#=x9r(eG(b-;Ntau%LBZPAhaxYfF2=`h;mLF&gy`x?gcVg)t2y z#Opj6)g0kZ^1xsxzd{vu8#tJie?6pa6^5_0!Nxo|jCY;iLuNUQ=ubrqT|2(%Cegx9!im~9S+z|Y;3N)8oYOBeVN_IzpJ*EQ%affCrpp0frnG-D-UarYx<%&tyFv?mj$i^y$rN>gy-)`E z6@U=M`u#jimn7^Eu>{4~@|^d9&d|v=YRttAnr#9(hGoJKUT=Zg&?M~nhrmmZ>jM@Z zObS^CMj4v%>%up2Z>aS=1^X6%8IuzM%!LMy|VIEl#2BuMTGY=gntPzK>HBFyCm zK@ekm%mG_Xt~30;>2j{DPnqkS&OIy4pBq}H86+AZ7CgJ9x3)LFfD2{$ae}CzptNv? zQetu%3VZ+7oBA5GOc>_AL@P92;B%m53+qWIe4GgX1aBeg_V=9cm4y&u3Cuv}A;HP@ z@p+EjA?!;oPRg}haLNd~?X@wOhwl2>4&Ai(BFNm5Ljrx{s#y6;ZTC?(;b(aHAKa}U@5o@SZG5h zN5Q>8HyoE6Yn=W275fS|ZV2_;mi;d`tAV-M%-0M#qiD4NE;o~WCWBl5Oo;MmyLpzr zgZ%^osD6FU&6^DDHnCR}DJ7>$RPvyX3!@3Pxp_MH=KHk>_9IIAdDGu$5wPs0*;{j$ z`uc-422zX_f~TDbwO!h$JF3jp?6+1lXJDDaybATLB4IU_1A1~km+O@aS;yg%AJn+VCnKBFe zDz^L$<^lGYLR1N>#Vd|E48Y%FZ$q@`UY_r;S)oCdwFI=#0@P^eTb3~9`R%+nlXF9e ze)=+JZX1)h2ZCQPxR?t0&L zm~*9VgzExpE$k{`Zh^xa!@0{_u2GBS{P&40>>4p0>>^;Vfi()I-cSG_ydp9|b4HzX{J#kJKSduPge@kZ&)a@sZ-Md; zaq7!OF-)u5PHQ_t4h=>7{;HXh&Y(CzyieHgxJhkBn_|2W5MctvF)Z)oZ!Gxc_d_5K zYjBrh3ft}pl+*A1@UbQbBIdBN8929Wr~Q0dR<0%Atkxz;PsM(+6QZh94 z)n`6HSakY^R%36mGyDl+b*5&4?O>^$;&x&nS!2IOl(-XO5>LP=7e_Z3cWWQehNI_8dbaud8RO$ zOLu^oi(IBacjEN0`N3wpFi3BP^J5|ihf1wFh%TkT@6TZELU-JBVr!elBJ`V_7_V1E zcni@|-VE1Jkw=Ke>d)RnXp#8qI_dD$p$125&G{<5;!qfP#cThav{M|H-Bn1xnJsqe z+G6)bn`wJM;?M7O5%!(huK~N@+4@HmErGBC`GBofw3IgH5tNQP;DEFP(|SYExT+u( zO1?Y|brL?K$eWr(pw?Mz68=F6v0mv1ZoX%jnw+kV1GJ06h;A(gpSxZQ-8!(hI1;@7 zyFn1GG6PzA&Y{?g7w?5Tx7_5HPKWw@Hr|)j1y`)L`6+z;(-hc0M1M4d?z-tXrI$JF zK=XGTSRJkGUq&+gki5!eIGF&qbV$c9K89j6(Z?3#=8Pxl5eV*XNX^yII>qzkD+)zL z2G^UjwqFakV_R^08P@VEyDF_7x#6^O#{6togHN;%4!v9CDS+}?9Beh(Hu~36ed%&c z-g4u(w|%EJqlQsyVfJ@Z2+0sL;QRIi{@s`@U+DKW0-zvhqpfg!84e!4%9G=vAX{tb z3(Zemmr`K3#wRy2nr8@GBV+j?+$f-r&s_DEO|)Cfl>o2cv}El;)h#I#do9Jb}k1;oqC* zAWlTn>7lshIf$lC1i<%z#zFy6;;JtVgzAqQE+n}`EE>>Q7m5am;>5d%5+`enAXL|M z_mRu<%XsQX0@1+R>v(!4cI<6XLC_}-x_<(+N=frnI9xWr+W)#SY{yc=4=-b=D=XY8 zaJcpaUZ8MAV`cps!wCZLP@KW;Q}LX^4>`!3u9t*l-Ra{%KeNRUr`Ap2`D%?f=O{C3 zb75jv_;joa)i=$CrR$<-!;D{grR(Ndz@BBct_dXS#%QNo`lsC1yS7+q`H@|se+pxo zq`zgaxdq+z(bS?OUH}k7-RhNM7{AhasKdsiTm6Lta)%H|%`#2qy`g1Of_KjtLcj_Lkg%isJ9QoWo{?Z3qM{rn(t zqlE4|VXL6awd^tXn-6^4Z29<^vlP6uq%JlnlwRykYjetqAZH_Y7iXQl%!f;*BLUU~ z2XmNp&C2}Z(?YVm&;^|9D8!LzV`5xD41J}C+o6)gy1<*nIR6;9O^TadnDebP!Nf<6 zs#KM4Yt%V%eyLI`S%NWKHYp3Y4_9j(7H(5q(y4ZL20nz{%5$mv_C0P}&E{4#*+X&m ztlRjNZ-v$VC$*Bq)}#N;F)_{~g7AM!B7>=+WiTjCz6%IRR1j{`2VggxWb(Er0quep zK0EQ!04umf;9anQ(dblfNBem{?j!LNuCitibq0wVu~PlAdz;cZ9Pss=Zyo5MyZgI1*%%4ESLnaF zk5XCDdjWpr0R&!{DV2STv*!^$6FD6T?eneKR`=PaYHjbpB$Qa4+m zWefSD<5-RZyy6cTmv3=MZH^?Y=6I<#XP|3ucP$67y4leC?@a+5MK!F!{P2h7sZ^T& zVTG{%*K<`%p^ts1-2tio#6k9aQvo1hZ*c=WKjrn&O}K#yLDo+xYH|OCP$1hus-Fay z*8@750gJML6oT)c20Hcjs}FwwFGKzbZV_)q_Nbx=j?b~hBR zv51kxh%*e=&soG?kF-Wr9=ItjPjfXl0Nu?c)#L(ug<6V^(RpAp=niSbXpo>5%WoyM zO+fh^n;LKqV|UnPyKq59NqoE@2CrM0IwUkCQ-!O7fQ6?noW+_`Rg-2IjpsM1(swtIkD& zD~=Jc0aPHvq(J)vS~yNf9&Xth&)q;m3LqT+ahD>cc=+BzC#vM0oHsHKt#EQm>n6Rj6?6) zS_nAP$^65uz<_`}O3rN?h2s1aJ7r>>DeH=iJ>9%$4{~`LC09ZRI8eg#gUJ3eea{tk z7VG@nRU1g!(nae32mf(~h_{$pX;Sh{Q83fqQMw29v|X>#r^iNjWvcvVRzZD}m4E4BlJ3?z>wD@&sRN_SYG;3EoSU9w zV%&p@HPqdb@qyVTSN)mwkB$a4zep0Ld`7Dk(_Tr(S?s7~OsLt&CryX-m}(9;3Ouwm zGxPs<(m>tmvL$3xhY-|@riqB1o0O~kIShC1v4L)-v1E*a#6&leKKm-Xq){T4tKhIp zhzp7P-|;Gqm`=o)I2OhSz)@`o?VxU2;1q|H5JucW`I-4Bz81{fhyEZ@6PhaLu{VOVDyzQ0ua= z5rgdiVp>>rETKd`d(Wjv%xTr^y-_gqzFgk7U-+Gvnx9EN46%wS#pF{(z5^qrw2Ah5 z3{vhJAKQ4!c6PQyj@AcfWz&jF!So7Id(I+MRE%!#M*X0=xGlT52SD z^=%4=Op+%M^dfDlsp!T*6RdUeHl*W~^6#6Tx*X}0Xms>;3U}@9_qyr#*rA&6{PCx} zO;Q^dz=5zn*S=rB?naVXZ!8Bg9aX;`je5uCy0PAN=kKGD!e`msO0UXKP7+%_eLZ#= zoGFgWQPwa$c-A?o*3D@4J69nVX-dk9?l#@yVD4yZ@R5C;Rlx$Q5I0?gG*iJ`s=J zS8{MAR>>vA#q#GCJ&n_sFe;gI^>b)2<*Sj%dC-0zaQq@m)IF<-4@d&=g$7$n2WMAJ zrnD%ZBx;FIu~(^dA)TESpL*(#OTYfAdg>0>&gG?xFg=j(=`%j>wl`@n1x%mLWhI=y`ed2hx7x=2`2xWOya5iH5wlp+$Zm}W z;b#&2kzLu+j??dD8Dmsx=&D!%SL?=(l|!{rep3IHR|gt1)P1$F8lM@dI^weGuTREZ z0e<&Dh;GjZLB0U*)cFcPQJfi>3ST)|525+1S)TcUMG}Ob@7UI@wYQcvWz96TzZG`2 zS32e?&4Fq;b=QSTxM%&QI>z*RZF-iSyWNFi zu=jAA;sMz94|^v$3NbNz87S%o899uOXIbv}@pJW*5slOHI7iY^<0eZglUhxisk-a_ z=&o-6#gb-M(Qih#C-swKRGRlw_;K(%E#w}+cHp3s+qMBU~#>wS9QRP?2&n0d(+ z$+Ld?_m}$P=Ji&;#`@{&G0U{azwLgJo~3`!5RwFsRV$lOzXMw{h4OE>`Pa1`Go;=_ zh9~1ovBY9R%ZUIM;4_fQ!wB|n7i>1-0i-})qwM|r7jSO;QLBtGS_f8LpygCgiSTtQ z(Ps{9)B1|M1pudnAaU^{b^4C?8G#Qq_Xri0@iPX)bZjd4#A>9SF*n!rUPx9394LSS zl|-eEU(|o+xYmZP6*pA4NW>DNgmH_Jgm|Y@w6`Q5FUWmdT^G`KqJEpz8|!Q&C`Y1M zQyf5J$(dv~jr5)VQ!=*ASHiDkmkq~TdV^DE>Rd*Rs90Q~X|H3E5B{aL`yYS*+$^Py zO$3zmBgkgYR?(aRuJlOQ90IA|8^#VEcaUW@G8)uvD&QZ~0K8_c6o>aAElv zax3T(=*9E?dY(z#kcYP7sJyKU@@?yPxwW5jWp*cUiI&p!;PHoSlXjzU3BY>+00;I+2hPXCWRZ|th|xIY3Q?H}v9TO{Q7UFRIv)(zz>>M+ z+**q4dF}2XY8BJkNykL2L7st(pNcb68&$04om7=}hfY>MV=1F}ZB}ZM-G2Udla>!0 z4k7K3TcwQ>w(3yeh-H?yME3tJqqt+`HOi%MZ4i=h%W_qVclk^!<=CcQzO{(+S*kw7 zw&^3K?5v6_YzO7Bw8IZ6qwJYtrxMpSU+l!{-7AN*5CiK#chILc&<2@E^sVLTnU5C` z_**YBtofFG@_QkZv`T%qhBpx($w6YQ{aDoU+u_FehbOwp1TX)lEb6#8 zqOPw$Qd=&L>zm-G6q9+ibwhLxF9R~?<2p{rUoy!q`xLvHd>hCxu=LQBvq4eFq7wCf=GKc@iFU9aR1qLMRcgzY{5Tk4OT%xeZ}@m zAP54vC$2p>zsO_Y$0AdGT$w5O{Zh44WI! zC^lbq_cPgSP$;vE*T~7cJ~L%H;0%Wg0B`Z#V(kpwdkCS%W}q*M{C#DF=1Y3ys=on2 z$6Qn3%6w&nr7_lrN=GP(&Bg!ZDlcU}B@hQy2|8{4KCr87m?E0t2w^QyN3MpwDg5|Pa zz0ooqPET}I(3yu156!fIMxf=m*ZV#!k;kZ7r=nr5)uW6wn;wb?f%D1l?L%k(Edit_Vs}r zao0gqV$2r{YUaCm!^ZM=5bnvFVJX5cy;m>4+^f4zzpwn%4|LA-d%d!i!R58@9Uf8G z>P6()o{QGj@&gX)SU0(KrABeQsCqPVB&yK;D^ri;r7GNuYx?c>RcUX^Z`r z|K0LsEHOWz3qeYwywre|zTOXTcxN}?eOzuu?E*h2Bk*&%v2{!jXg#7?A>zUmo>6df zC5CB0t;n-Qt-o;(WRzP5>Md10e1eN|K|(E(npIU>Oz;HeeN#Pdcc!)G-g)%t@+}?2lmwUCJwjMD%g_+LxIz|IaZ*cUREKh6-d zA06}XlCYSo?$dl<(T;_xS!vM;{Y$(w)15?N)*I(i>Hx;?xSzoIKw~GVi<$pb0kqoG zX1CcZLwZma0ZDD6Ci}g4#Qn=fO3xk}Zsvb_=K1`~-hc-Y)QFA9Tr61vZkf??G2FVT z=T4#zv^7ZL419(#Xr{Y6fw4mpn^8-E$dDS$DZ_3K%t}Kbd>cHeke5!R?FIApw%virlhO1t`7N!;-RG zPzxU(G~p7%3CkOg29yb3gmM9L`c=m4osD>e7YKZQdhMqN_my~V%_vpchKT~Ub!w*| zEriH^@EtuA5WoRAV1$~BuU(X$PsvYgqv1EW~C1=&v(`7x6-fQ_e*<;`k7`(*zPFBlfdAWf@hs! z9#Eynj8bmvMGwsH)q41Rbcu7FHm0?lY?OwAm9F2oNT+_)X&yCb*cn9D(G|eV@ri&$ zC&m!h5yy_9O&Nn5^LNs=tMQwe{tZhy{RNv16`$US0nCh}YTOjrmC?Gj@_`S5hpW$J z!ludDSQSJz$O!BGS#r02bDs3S9HhA)^WyP1s&S2cub*~3NXmYyZ2kSWKh;Xz@*RDE z<{%|Jd_02p9d(MN_j$#IKrtXb%UB~J75{TD4`9#;l<*1s(X{>LSsj;QK4dtlNUFGg zO~H2j(~F}oONoavNg;Q>Gh=JuJ63mo^!P&{IH9;=s5Odv$+*R7K zvKXA54zlBnLB0K=1(UJ#s-8r}ru@A(&g)f%IrMzJyX)=hl5Lst>H`kfD+x{05QBta z_?L@k8}f5UPybHf ztuSzCXW-t98B=$JFo3inY~IWr9zG*10Oa}!k7`>eYU|96q*`{L3 z5yQn%v~rZee*@RU;mdBa4>DXVM(bmV35(c8quFkP&Lo-wsuUG8irY$=ut9C^q^;pI z3U0IP)>Pfb*(oE}NT(PIF=fiQH4wC{(6s^OTHJ5}8+>Yc@7RzntwbfvfE2`Q3Ys)! z8{`562&h$9)74zlC8iDBB(u+_@78c`=<pLp8-sJ9-=lmR zCgibN5N8~f%$&4CNcS64((X;0Ild9rbcq}`Z+?u%eIGd}GbW9hv?ICI29ldl<^;&} z!R|pu<_$|ikgct^@m+K?KkhQ_v8B2dwA?|hl(S8*5NDehuU2=BT2{y4<_7*Q^IL3e z#kH;9l6ehl$WECZAQ$1qclh$9I59*Af0rOopiDX8BEpoh^;-30ofr@uG+uVX=-vC3 z5%6RwknaWJRHZ`B9l6oPj~oC4=Z)LZXT$X4H$af7BR7UW2$meOpCnL^GH$J>+j>*y z3|fI~E|?RL(8GJbai$Di4Q)V}UJv4xyDPVlo^A@%^Nmv&ZH?b zhvkIQ7?;1o05F}L`8JNc#{-a5oyHWjb;X7Z2&oO--HdGqz{YaxS60f%nVU~DT)=?Y zh4YPNuLyt`0GO0HThnC%PTndwgNAO?=?akWQ~*SboJFGL6Ka4=?K}W*e*gfAoHu0Z zjG^n=<7%1wzlQRc%ZRH3$sbt>BbO!)1pov9P>~b1Y86HYAOQh#1VPsSq5NSo2&nz5 zmH?1I7;XXf!al&dF$W(33>fe~=E#39?E9}9b1+LY5#hk0J9hxw~%!0}vfbxUL#pdCy&R+fz zwD~ojgYtt2guD0mgZhI25umyK0X%>Z-X8!&fNCue78}I>I6%;UM4)W08*>L9(DXyq zDMSbW9WDik{?@AdaX;n3doe4zlFI|p{6KK;5W;wM3hqVN}$?dOVe-Q8o01+ROzCWt#AV2)e0pULo{{#6y@Q?oBe;(Fme`P!bK=6@( ze**vu0000000000lktZ)5KuM%0KOOi0Q@Nc08}K1Op`c>DGbv^006o|007e@0%enJ Fh$4muW!C@z delta 18317 zcmZs?bzBr*^glei3+&P<9ZN__gOuPdr64T|DBU0_Au7r&-Hn8Rpdwfx-AE%Ktlu(u>(^m&xJ6AuoSA7A6j0=V%P@$UJO{$lYk2i~d(U2J71`>Ec$= z)QFia0C+IfPtov^olNrf?W>|-5N@YlJ;E0 zY5sMj0&^tX#&lGYD~cm=U(?XKc@jc<4*U&UEIdeNn~;0?Jv>i1*=^VsZ^HmZQm+d< zQls46?J+YkKbBXTaMRc2oeuZuX{ooyoH5XoDtMP-&KqtGD^a4Oa_%l8jw!epFuM&5 zQ&|5TNx~7iVzh%l%p@?%NNN_iA~7y#0N zw|0??VBT)TRV{iVz?saKrK&4vl1|koywSi55Gg|=n`7M}r4pEg6ISsW?8Q86r=C2A z8z4 zo2X|rr!MxGSOnEy%ju)Yv_;<$18AreM9d6hQr`h)oGflv$$2-K;+lg**U3c4(zf0% zJ5kq(!j6Ry+AlanP9i|DC!=|wbQR`v8_$cH7WDH*Dbee_&<&{C0}yB{jL=3QQdDqRjXxx_O)t!F{x* zuE+UtH2i*C`6-laD%{yXMv_}lg(7l`@>`lBHh7K>DEm`n$4vwe{Zkjz^SvX*lMMrA z2Uvx}ykK3(fp=<70IzeKdFYy<1i^vk1}x;9X6l?nTD642%x^LGnusWncV4bG_)^=x zy{ReGJYgggQv4#(g`BX6X+vI=kM*E!;V~K9o9y_P`;f$_9P{K*Fm(=v$K)&w{|6}EatS|zU9r)T?@>Jx$B*)>&rRn zqk7Gx;!dzbV)4^R+h*Zwwo&gwTxZipuIzZDe@2M^o%u|G*cMuJS8=!-fJC& zzdnC>J4h&)C0GTWVczkcy{t5z8>vZl;eA>4y2>5*y2HXehQnmD5&jmQJI%gRd7h&_0su_PkKdM zcZ{S~;TODr()HoiTC=+fl|?mFel^;S6=m|7mpzsV4hzj|L@5Q00Tf$Ap)^6ffF{sP zg7XSQ1Gsz&wi|%uR;?n8=Gm7*syvkJ)>&}LRbCx7dAFGM3`L*S1{cJ;zRBdt>{?26 z3cnjjs)$hSWm7_vw^K6(I+%}O;earJMkFGzbwT*v&!42KNmlbV3-9R;y)K@BH(=s4 z?fAF-J*DIZ4O5SQIgonL563E7%+&aqP;r_t0D`kf%PeRU)&-xV#3e3Nb!PzvfbxSo z`^cyNfc%n!UO<8hx9CryvcJ4}pJ8tp*Ha>%%J z=IK^cPyDDVJuE#k^Q>+yKHv3+W3K=uqYc9e0v^XHr(yiD(~Q>`%qq7tNb0keV4~y5 zH1CPrHzJ}4ztxe5Neb3|S&zu#G(pkKnQE$e$*AMQ6GU?Wz%2nU>9-`(yofJ&{LRVv zRj3xCtRv^e{!h2PFS@2jHs1j70G2qyncJC@DdoLRy;wc52X%FDDgq1-lRTxn`%C`x z6Ma%$(xMg72(O``3yto7{_SIzM-0|oJEa7lB;_$&aLtAMP4!C5jCAE`7<*3LpHx}O z&tzsH;YyEf`MPPDjLLKx8~u)n0Ukg}G^pu%W!bgCu{12~>B)%j&eJB0B;4hl zW>+J@Vx|t2d6~tE-~Q>B&I?=_c)5}_DD1k4gpodN>Qf#Tzv-aZdcB-RCFS|W!uXD5tkC+m6CW`wHmROTSEI>XYS}|=U^YeR)hrX!(1d== zSay4$)4mFt>~ci+B(%bGYMNm~2eM%bMrk3WUzbFec(usEc^?}GT3j4zP437+k44dM z&il#0a=M0C9fxbn?<=ZhZl%h)WAaEu4L#c3Np zL-T4DV7z+ZC*`XbmaErkEyyKV&DnN~Z_Yvu@mY*RJ4P3;_wu*afs48UjD7@q2#>)L*}jb-a_(qq2ygl#3fcQV#} zu|IJB(EN_8&35b*AaJ@`Dzw4SWjNaLYRab( zLz4%5Mp+V0{b>TVS`*zxRq%x@BRSbYq1y%V=6vKYZ#FcLfQ2vLa$Ej%?YP~PU?oyx`f`vmu1t-po*aJv ztAk3l_c8V`H!v&qZPrTv^!P}tgyE~v9|eCkd(cDjX8})(`Tv@BGS~GhC1yPAoUI^D zkrU04c@dV?aB86DXf)>mc82zWqrAt-J$-8BQ^vb+7r`(EFEhDM7LS#H#PfFt9ihLj zc{;y%kIQ-wBN}9Oy3h*5VPFt$3lrvp-iP^0= z>3qC!aAZ#@{>|6MWMYuf9r3yM?zekl_qRJYzU`aiWO(%4Yt}{;Xlq|R0M`ox@|uQ{ zF(Tp~ttDFTZ+}A(rXot+3$vJ`$4E)&>1m9d{Aa|TR2IrLyN$;Zl=(V2=f5ofaVM5E zGhT~#&gb|Skk$3;3(8KT_RrVn>-`cPBpqg?WCde+Zc*2^=!X{lZ$3U07*S7b(V*Bf zd7M^``py6P5Qw3hsn`uYqyUZB1tQ(Fj3i^{7IvI%@7hLc6}<=McKfM?*e}o6e$2nx z{Trv~-#gA$4Aa3!=G-@aNro49STfgOyByF*EB|aCOR_MAW~z z;OI~ON^N6iI?w)^#h9|B%~y-cF6UjRZup4ukz0NpdG~dcrI6(Jk9vO=^DlwtTaA@s z9GgF-hiIDqZ=3mV4Cx?@$tdUZp@s3!XMU@VDJwOyW2ZcFfhD(wEsb9fOgzOOLY?v9 zv}ujy1*Nkg12HAMkMvmT-|lwim)48u+`ru&a#;MiCs6Xrq4DyHr@Ls}C)d%BZk|i? zMX&0X@+fA6y6${gkmUwBYh#OoDI$u3V;_Cd06&~ZJ7r%Oq8{MEEFCAj>!ak7?p4CX zJep3v^ov-cfpv#$WLTNIFQv+~EOU69EORGqzF_OqIZoOFAQG_V1TMBw$yIKRSK1kf z6*XC2!1eC!ApQdOz|$}E#5y+hB*DcjF;#7eh}7BOSS_`Y?$_taVqwFedOf1F$2nQzn!7r=OVPD_S5nv*O?4SHtOvgZF44o3Q%zrmW5lcAD>J{QCP{T>eoMv*Z(ZPf!ht;ITJ5KJiP)+ArrZMhyim%9%Zu{oa^hG zQnJtH($p2KY+b-KPDNqJ=)HoAJN|eiBT~1=*{|p0pI{w#Yg#?g8Aau;I#ajD9j~>S z0%py(UA37K%10*S*d+GDOJ{5T$QgSEa^ID;x`Y2|7R4{^C|(_&?3oaBtqs@a+6enON5y-$8PX z1mdYLelR98UzsJr6wjaf$E{a*(Ncpc{=U0{9c}L{juEH>0{4>-PwbufCbj(_RP#aIXr|N? zzy5_864|T#McDMNPV$@vYMkE0GbL#^8ZYdAIspo8-~)wiF=!Y-R*Fwn*n2LnhL zn>FuB6=)VR(T;XR(v^vM&mz<0J|qJ{;4ZV2ts|+vc8P^FMWANkZHA(B*Wq}6f2Lh)qk^ z-Cak&znuv21?c4I)5KCPoV6~2dpZmlJAriRL<*GN`H&$Pkhzie9IYl@K47rRMM_A=fmk~ z@5_#%m&EFaSJd1g{j0U~m-~8)pzd9RN@>C3ewrV-OK;X=1L|~YRuuCZ(Io(O-=DY{ zz8WG4RsUyi@5lAW;i$dy5zdnH;vjrP)xq}Jl|IwCEN=&Y+b~}cwFqj{b=#IqKallt&`EkrklkG8zP8`{@q)U2`3%?^@of)^CVyI z)(`K^AHQ!6>1w|hlibkWntXEy$1nUq3k2HFbJgwEk$n@C4nhs;<>` zZ%*7Ie(Tz!?_rQ4Tsl%U3-5C>3iRXGhW&jH z-C}d(yxU$-E61{|ge)~s=Lf~F06=gcToX-Ye1{X*2z!b1v!inSM~{Qe{sd08!=fBL zds{?a2JaGzS1dYDB+DTXZr9n{;9jfX7^{rWCGO0SYy9cv-;Rh6 z`N>ONNt@-q@iWvyYuL|aN<`wMXHf~8BTwY?Fjj!FOL-VnNHO?kSQJ^cbmF0&CQflk zPEEs~T*IAGRg%0f8|Dnmoo3p+aMJ-8T3F0d7gJ$L;gns`xcw*ou)EUk6ce|a-9g;A zbc`NLnrNd|7KeM*^v9Hk!6{70{ZEOcI1-@oLk>nv%Dc5f^a^^}*mt_7D7Av@(+tAo zc@Q$#{jf3Uy@30dzT!BUQ*gMz!&MBcNh*Exs#5ic$bIffr7>1^y?0#Eoz&w>I)U!~ zkqpeR`cJ_22uq_MGjJ0AaD9T`8th5C$}cdJb{H(^RyFf?7Vq#7pt6T)EK^SZe6X2r z+duX2>H7Cfzu7?7*#bv~?CROeC6=U*B}-V~Rjy67jZ4%Urm~8>!#bE_?{$|LlOgoXi%`o?o(B+|+&F%J>JQ7Q`&4$dRuOv<8w{0T&EIwn=q={$z^>AsQ8!b zhL1SBAkG5<4JmdM0nb?skdFz=dUU!IkNIbAxYZ+=A+binCAj**)_ zoCO1w%LBO>TsF>2$sfMvYq7iyV5KN&bDK6W4<+$Yx5eZzWxF^=HXZm?7UyaR#AyH3-3EP zU{jr6@$DH%)pT{qiExqq+%Pnx=HFiLtcqV%S%z0fP;eio6*of`8RC~Rt}f@ zKf+Ap-T$I^zSyblZ=fx==*lRqH*U<(e!o7j`|FSe#D#PX40T{)2j&gl-78gFP!J(u z4`0a_3~TneyF;>-3nTh)b75LwM@I<3PMvqIGQ;HtsQ>`c1yM%dO(!aRq=Nc?0!3ht z|BpbM=R=`PN%C%l_4ZX9gu%_?5qSib&Xz3Cbj8^{CQj_oU77;uHU5v<&OsB-p(a!C4Q&C$ zM7_H2+Ovoc&bRu zH+xK70GTA@l|zhK3_}*VmrwRa~9mO(LlN4|ClyHtGAh3m|DLtkVini$KyAa}q{x@IqYDl{Bkdrrpq*&HG!F zX4AL9hLU#Hz^8;H$w$XlFFW^J7{-r!N6xk(1+OGx5*4j24Eep&)aD=!p= zzmlq~S4}-?JHnjKkO-AK#KsMm(*`v~yxIX11|512EQ8(2JBRA1*P*zywY8>bD1vdh zaBtVcjz!I(TejT*@+0&#JT$)g(2m7>2UGdyhpPL06+gXLn?dNQz`qgnWZXR!XDl?h z*yF(bA;=);tY|)tE-W$V+&z2?BOOJ{ipl}q_oFCg~XvV;OpQn$PnA-#Xxh&1vGofCXz>`*fr?!`1hQW7@L z#Z2T+1B6$@I+GxiQEv4}n(460pe|@OLJq&xHV#yMgl7GBUP6Rftju?|4>%O$TDM#d zkpQ9FTxRW{r)S>r#m|HV@Y_&>)EeYV^O%dLU6WEGegm2*xEytM$xU@z@2=xS>ma;; zNu8M8U+4n5?Sfu|UIM|lkEJG&$@qP)53tT5!Zu=kqv;F?@#QjyZabs@LJQQTCjb%2 zzwaSuT(j7AD3tmnJ#$JNDy6h0*FRY}-UrPQhLGzC??xd6N>Zv5W&`$?er&e+WSr>B z(%`8nts?=eSv-$)9)=0enkzxH4*l!7Z!gTt|&1H-`dYS8W)9K1jj;FC|D_cyg zpd?fqlmSLiO&??aOqp*4y1{5%GrK|Oow-J!e(IBv-)pb+jEfqE4avx3f`dHqSHfBy zg0s9S+yUgW)uDNJ-gF^^+m>4V!C~G@U`>A+SxVW9Sq?qD;WJ9S^Py+@RMC^!v<@Qt z40Jr|5QW5bI#>^QL0>Ton;mf zQ-XoMB*m(yf{u02_myV}RYyeJ_6xn``xl1+m3X%iF zrw1UKiCbc`Nr_Obw^e8L*+XN?Be4rg<1vHlg6AqiAZo3gCC0ohP zM$ZQ@U8oE39B}aD$2LoT1PTJwmS(?!k-HG>E6iTg3uEGLM8R7#pfavt=o#jK@arNGufKu!p%%|4yuEr{7;LbHaRh;PgQp48v*e$k znwS1_s;ihMV9X__B)6G=o{&(HD@(HlIpb@=AexheGAmXT1Xf&3V8@{MTmFd44Bs)7 zp{E#jyeGN=njiOH!8G)66JuxECmw8MBe*P2#l=g32;HgIgGYFF3Nbvt! zK^@B7%Y+}BoOct@!}R|z0tOHy6aX5F!|ctH;|Z5Yxp!D+F=XHb z*;It2hIV$ScV=mdBxAM<;)I@!-pZs>UCqsIlw$rx6I#=#c@Ze#xE)d&KEm@-Wndpvi9Fi)fZSh@IF+L`)!Ar~rokhRF+0ilISR!{SL&}V zV;G#H9R$4gNmQ<)MxPH@v^GtT<7c06(zoqbpQ@|PpRuK`itQrh>O*eh8=1E2cIe$B zy8RI0iMA#5=lf^?2sL0h$35N-iHP;hmHNexWkV9>k)r-nZ*s@L|BrrSAWrFZ^Z)8M z;VCCv2B;bgD(1!k=Zlkh`Bjw@LffDz$GKH99Y0l_G;qOGS-WV3f+F63_d2IVW6|c| z!M|Vn=Nh7(nuc0fdD}O3G-)joB;1;(FL9eKG=ZGp&aY4|m5;Q9`Rx#{)^-rOR+G%R z7(Sd!vdv-d^=zL&LKOmFmXWIMxgnK1YXeveP0RR)`bU=}JFZ-lNmw3v@vC_q%JW8k z=gc}DEBH>hr{Enyh2FJ0#?Zj{p%KRCy$REOO`@nMO#EO9X0D}nVH9n2hHO^35E?9K zIt(4fh>yN)Q>Ko}J&go+7S1vI4+7;?UtkFHEg{Ha0=96~7Z$wzouCj})Bf>c1o_bW zABPbVn3zzWQ3!iJcaAl;y@z*FZdS?Wddl$0J2&?bn8i?iO5;kPIYaU&7f)^WQ)43! zo#wZ>a5Oyw5d?%a@Na{6fL|%HJNGxlLzsfN+t1~hapDXh$eP#10b8wC&;)@as+#tu zkakN5(Am(~VzRC?*;_zwzv9B#bc;7L|H4TeWhnvaik`||>C=UrZk$ugDOe{cbXUAM zH-jr!-4+zQyP3=EaljQJ2~ll--?0rR&?CLt$U_LkzGQ)1OWZ`n5b8*x6?%LWaAPZG zt!itZ8dS=ZT4@FeNv7b7x^EbVZ^)LbN6%@@y*)`gTRJvg(wI+Ke!Ms_ zA6wl1X*G{o%@xI8C9GsYI)pArm2e79>6?SQnB9vXODm^g%;m=i?G#U*(}&!=aWkrg zZdPfvJXC!Qi1(DB8@u7jc9i z72rj}0)f!nv8i#va&#DWKd}Bn`sJUHj9f=Z5@Xec+2=Z@AGKQjO}}4G(-za6(6qv3 z+dH!g+74P3VkAu$(y7j_?GA(}yl@z_VkM-akyC4!ER2`d8it72rsi;x93Qye39_G1 z))OK=g)`h&S1@&IphfsV?x>|gZ46%WKy@qsKf8RUO2JdV3W7D zd3HG#($vc&a-o^`^N7WcPY)E&a@tI6bH5$ z6h`bU4uGaJN})@lEaBMj$3FmlN#su3{xXINO}RsJJ`^Hxi}mBv7(wiwnK~@_X$+tJ zuWDyF-^&<&Z1Sujk)}=)EsdSu&$UsBiKkR1O*S8;^>FPg;(A@3-#f?>YpS2Z=(;4f=5`r5 zH?9EjCoK*);!ilDWWH`jG;K6n$o%ySLKYLhM|dU84##PF0`EYp^0wbbqi``-@Z5|Y zgTkAw3|OcJ1*?GO4kYQ-SXEIei|{2~%cnDcUz0`2WvVReI-1Tbh6#Z|SDJ4C?7M|< zzQ6u_!!%krzNYu6M3ko_oR1)?hvS=lhe{mVHicd4x&roX1V$}fXrTE5AJ4%ooV2pN z+xgrq8;CM+(lO%RWxN)u3SE|I|L-4~MQthAc>_Ult(FA78Wh2+WV%`4obj~Js_*e{ zxo2{R%DJZkTScQsdry1KruAZfG`yCIE^;?0ilS`;mE zxdf|_^UW7Mv$8$M1uwV04Lq4e4VYDIA0Jd7Us(z;l3Kwp3_YJXAm0`L1-3tY5q=e% zf3~jxUW6-Hl+NRr%a^5&C@p)R5V$diPQ#b~-*F#3W7@ zM-@oE!At1!+*Os`61D8=Z0sN(&!|SJ$}WorC+dFJpe?(UrmE~NqgEIH3{RBr8KW*L z>_Rj-Q8(~5ZCTRnyO%%6#}~~QxY_nORJuCB?_s=`A9C4i-WOhzWgiN4yDZSf-^%G}|6;k?N&<6MYp21DvNh5<`{9kCzjzXKw7&VJa; zM9h_d-iV(xwxip$+&t=-odfSRYHV)?NW%`+O|7y-M1D>U@K1oe7y ziBp**f1k`?r}`rnp2%|5m#6!~BM)pnNvJ7CgnCp0N_8Q*(DZ2TZx!Vu>IR~WQOq1&1@b09326;-o~&QT2yF&!19Rv3 z6#~0Pm(8vcu#Bv#&*nmL7Wj>AkrQx$^&fVRmjz~9Syyw95F*DkcUS@A2?VLC^AN~| zE5($|cMxzRG|-nDYx==QtMP@(bqg*DTTdt6-+1#skFey|S%;V!NrJi>>jXY!&>N}| zSmFBd zbra4L%n$TkMbMse(L{xqoD1mp(`TEQ6AN(jW7EXRquZJD8zWS$dq%3P*1bEIhB<&G zKZK=}7uXkPxb)qOWv9`a%6P_GsLQPAGEPWP;#@(0}OyE5uSqz9X4@AoJ@4texm!zTnh zK3mGsHO^tH1|~W3eu4V9@;>)o$wMGd0~ZP&UBBnr5ZGGM$NZjiVNVj^l3vthleg&{ z>|?Iv+`s#SLekKQYC62yp0pVSWC7Ly+Ttfnqd%*>o}R{kxWopb>L#RZ_IuTsebVBQ zk#_m|?`8KCZI`%eE4rEHIOWWG-lV&-+A(b7CZ6So-lyWNhnf7`jasaLS46#*dlr~p zpgVmghW-0nYm(%_#F9*K5u1%AThgKWBYJ*MA(j0q_E&y>OO?O2^_Z(aG+8eZYSe}9 zGD|(N+wU4y4Jo;rLYZ&oZG9IK;yalA-AJD!f$j`VQmZDe5^cV3Hp(x`3K{%5SIY-* z02w54$ZZ1rCYL~C1qDNr*!2cEIKi9>=lCC*ta1*t9C~ze_QR=f&7N~_;yS;#vs^k6 z#gg9J8jBX`&6IXot5Gn^z#+z;sJwFQofNO}tNL}W9YC7(EV_!=wx3PWcc%DXK^0M9 z{EG*?gt>$Wp@I8A7tqBW|RB5~bkvr6Q^S zYm&cHs}_|^z$BSE73TG2jb=KAewW9%CZo4Mwkbh50P;%{G&Jy|z= zwoPAG5iB};vf~orJYuRsx$6(>T|7Ns69I@y7nP3&LVwk@lLhpmSJiu92hScj9w#5Y z7n&~~dhj57Zc)_LY2`NC48J(A4S^cKl}9B$Yv#I0Thuh=p|XS`npNf ze$8?B+@))BO^eq!uqG#qJm8+3MuO$zG}L&@@GmuZ?&tn$11|9PhYqC8Jl6IJ-0BNGsrb#8D64KpHjI-6lhsY36K#nR2gwR7>d5*`s4m_ z5`_L4h$-dx5<|K9E6E_I5OisE{JJb*!=k}vCu;jiUWild>sEMpooR$TM;m6hAId||e$^wEcv-hB|s-x(VFn^KUmjK1@ycj!=99@;_|xp?$8g{O2b5VmnPEue4Uk#gu16LvJiwYR%{&5i8q| zH~j1U)t}Esj2o90MQyF-^1H3RW?}h7olh}DzX^T#1iSNu?luh%dmpW52)YjGRM;E> z@S%_|B_-p!(-O4~#+P@pH*qXrkjIW90f}-?sPik1Yx=H>Eg4OGkMZ`2^YJIDECm~Bhv@OLma1Si^$+(fJ`9qQ zKm1(jcHhtQ=FDVHxRzK7d3xSoC=o!xn<0W1iusTqk|09|IRjASktyR zBIzz?Wlh@=*Z0D5HXga-2ACOq4W)fYZiVrCB6{f*7YI1T<~RYACl29q+yZ(lfETmISmqI6B%T++&US^EL_FZ%SZwAJca zj7cw3)~VE()py(PQ@u>x1UTb9vD5d^qx6ytaRnQL&%l*CtaDxxXVk6yfESPlH+XG- zF7ySAdAH99NC3FKt*>9_LQwlN#yS!ZV3PohVv@hcWC$E978I7FB%2jA@*~$=noI&7*g@(>C@1d6zbDl80x?rxqCUD#+oDUdB6GlO}ee}Oo zgo^L5r<=bT4bb5G1jvBxFtjmecD<%)6)^(Ht}prCC$@NlYM0tGgdaLBb}SH6I#*^l z>Nd4CmjH&g9vPd(bKaQ-( zr)J;q9`4VTR{oJ}Z}6>A;vEyV6mpA?>((`X_B9jkh0RdnPn7jF7W&_@2ApCb(H%Hp}RcaPopf{sz<9H%o zZh`deP#HrX=IX3`45(+)^T&WtNbcJ7DCH%_i)A z68AJu9vX-`bs#b*Dm6E%BN9olJme2_^rURQ%>AUXUyZ|*6kTxJ8WD?s31C{$`tpVd ze58$-vV#TpMM-$Mfv$FIpY&ZvTyazH*066sn0by5P{xMFRY{T)|a-VaY6M>;E0*{(fV0 z-p1u|5*e!=^(r~)a?&Bi$pUKoYTR$;rD{ZcZkmM@=1Dj7f&5AbG=JI?6R2$foEa=Q zTFwv#7%6FCV`YiuIV&J(qUQZ4e+XPbbHXREMP_JrMveLdp{X%}`sxMOJ>V0Bn28yJ zgewr8*WX>_&R^vE4nvo;ElpF{{{YYvNKGNs>H!6?|B6CG_Dam(mtDmjZ??5kueBEC z7a631hX9p&_wtC_hwuuyZk-C*!PT_~mu?d?+p|p}0dma@mpb;O4B!md!{<(BuFfiN z$9JyI!38KdWX#oGqHTy=J$9X@uGaHg$R+$-D5*m~aV_V;p15`W z=cfW&;Z8D(6ft66W8g&V@I5w*)pjIyvjlGfX&1}yt&NR(8x-33b(xvO%!Nsa|JU_G zhYtAvgQE8TLD9uaC~8o|!~$q1z{!9#SiZcQ#Qo@(ymK-RU9BPfcDoAc|MWWRL*RhV zyLvC*Dh2f4-^zbyl3R3S?xhS6qln3D+*CQhYEzR8nyYL=QC58cjIs_s%Fgq@zU*~% zKDEWB5scz2P}AEyiuii>w=B5C(0+d; z!jxIN9^e_sQbccUEg>YXhBA4@A<)QeIbro0g`hx_(48xJ+A#k81 zaKG>K+Qw}AEz!8?i$!oK<9dt2itb2{N4nLMQUmYLv~>{+dEQ{C(_--uGE4H>Fc<>6s0v z4@rmuFDhS1d_*Nii8w49kD6zC8+36OrnpiC(Q*YeB>B(?njyDCD z^)e-!tmjt#V;_=Ga~4q_S+eaSc2 zznDjmfht@pLk7LvEOZ%o`EWRvl&zELie-Sh1~5i)@ZRvdhDP&4V$m7@)W;9Xl1T`S zY)N1Kq_iz>et)-M?wI+`*^1QKAY&IKf1^jWfDW{4?Rq;2&njV{N@47n9gY5JGydC} zLPMVMXy=<;&a%KmA~#W*)Ml1e2KR>#b|czslquJLX&dJQh$~3YBe*pp6tK>Yb8J?$ z>Ce_O`q4Lz^P3dA=F&+8Q8P!0K4_>=TlQD6L7ZjnKha-?+ta#{>T#Twjd<-;|9NJY zK6R898dvj2%^r~gYdPWx`%pRaO65vMhgMi|_SZo*{cnpkcc-%!=txR#(tUU2bH}zy z1ns^J8G1j*m=A<1`g;<+Hblsz9)PGR&gnHMnQoZABjMOoX-9Bd4uwwSXd->-%h0M2 z^2G1e`6CXKZM8$;)}(11@kPo5Z&SD6m z*L->2U3VXkuqFp$juSr{#dZwBaf`@*4~Lb2z~}u3bb>g>=CU3+YVM~{GO(lh$0n)V zh_QJNVlFY4xZm;(l_}$kr6E-l*w~eycSHibfTW2f1yF$k{wEe@y^_>Wx&10NH^RE$ z{bp@68?OuK8ch+Ik!EP5Orq!*OOX>h7-c>NWJ}%~%+EvwdoWyZO*DuqJNAs^WHd0k z2rRFcaR|)iHxr+}KQ3n6i=2NQfE84ts%vjbPgFNs9p3bu(FkDOiZx?nzx~kP z0EiXgyP2i-IrnoI z4DJqhx$Z|TyVCqh!h1?gmO|FI_MW54T{ulJ`p&c_o{@(kt`M$O z-2G80Hl^%C!-+vobwwyzG1iV(X^K(n?Xkw3%{8+&pr#MP-hja@x3G5)zxj5V#O-G` z)cr=p6Ax;cF}WNFM@8+Y!ppq>?PN;d(wh*%*1wXq0r$3y>su2)SblVr5ylw~B18rw z>(_Ji!C@ieUu}5*gIESkZD-9Z~;J0G0-6`HDJa zN&F)wfYW7YnL z8GpAKWdo=i!shL8(iv+8P}fh`VWagq9UxcXKy&i8R;Dc#=t__Uc;X0M6-+(jRmZIv zIXZ7A6yW5wKS_%rfacZ}oHuglDk!1E+>8p_Mwzxx2_v`m*t{9*&jf=f1BMI7kn7Hu zDMhGMf#QNm5}|N(2}F}HYwMtGV*{KBGky1^|8c+MeL%{Y&St?5={YBiV7OVZKX`upf-2X4loG2*(qbUrs_7% zP8qpII>k_kDO0w!vCWWMR_NM*axHGSfDJyiymxHKmR6z?WhuIUof25yqs=hJs|MhfxIzy%k@V|(jG-%?GGpjs zJSA3$07;k)8ZHFG)9bhtw)GtqTW@lAN_2M!ZKFD|Jr__y-s+J{?d0vPvbME1wn1c3 z{$m7$8ZL^WS?04DX3I>wV8caFh?#7%4l}`@Y?_LekMU<|i&z>xWs!1IB!3YI6d;l~ znL;H96DBT-U?~D3CCwR`1L%fAuBT)VWCFr)gvx{gA-lO78-ac5IY z%JP}1<7TXV;$#&_C35D}oygtjR{b922AW8=nWaacuGu)`kYm z`COMpqZTJAdwccV-UQ%)34fzkW)51wi+_6>hKx+w2z77di zqJv8iC{U)HZ~5CAUf#0EZYs}5b$IvQ11oeRHZ_$2H+zHz`%Lq_H;K) zKj8*~OdYu~{6Vnfko_bPI%V8iPq+1^&Ka}<+1w`+kkE}4oiK9Fl%cCZ4hR!WA#otU z5&=zw0u+N4)DFB|=zo%H!)*Z@qYF)Bo7jy2zJ7WGHxdoS+zDjSb7pIJAP3x9c+)og z$egvZexahx+vb_cD@ab++BTgt7m%py7zLmKz{->_R*FcOlH`e#FG-vjc>!-|jh9dfB~}$=Nrpj5dbj&Fe!7krppAJyj5@p4c(^G z6(HfM0Eieli+@DRC)5C$+Iaxr000y@Z^+acL)W#()iU{i4dpMF5myJ2Ke7@=E=?Q? z00;n}A}4IsDvS<50s`a+f~@~T`NL!oQ2SRc0U&`e+yd-{eSmdi4n6`HFyMd8k^f%U z_g^>WV3uYg!hu6~?f}*k58&s*4&OQh!6leTnZ5VtyTBqe#(RQVpen|mj|Nx zf#BXDgntczdzY9I&(C^*i~WJHaQ_!``U7C;?qf*)yoKJ0`N1B(pZMRJ8wBZ3$!+>m z6W7rzK`6;9$;f~3OBl=l-o4Qua1Vg}fOi1c2mE~xYYBLh+h4{0Am9%GB0eO2e^l2& ze)yLI!hazC2l9X5AN|4qJgm+B%6JHX;3EP51Cx%3K@cD|005mB008_c0049&1%i{` Wh$#$BMF0SqLI40hBw0_B6p13wbhG&Y diff --git a/support/interni/src/aga/declare.rul b/support/interni/src/aga/declare.rul index af9cf37b6..2bd629f04 100755 --- a/support/interni/src/aga/declare.rul +++ b/support/interni/src/aga/declare.rul @@ -14,6 +14,7 @@ declare NUMBER nSystemFileModified; // szAppPath e' la directory dove la applicazione verra' installata STRING szAppPath[ _MAX_LENGTH ]; + STRING szConfigPath[ _MAX_LENGTH ]; // szDataPath e' la directory dove risiederanno i dati STRING szDataPath[ _MAX_LENGTH ]; // nome della macchina server delle chiavi @@ -31,6 +32,9 @@ declare STRING szGroupName[ _MAX_LENGTH]; STRING szOSName; BOOL bSCREENSAVER; + // 29 maggio 1998: cancella Winsock.dll dal direttorio di installazione + // poiche' tale dll vale solo per Windows 3.11 + BOOL bIsWin95; #define STR_ERR_DLG "Errore di sistema. Impossibile visualizzare una finestra di dialogo." #define STR_ERR_STRING "Errore di sistema. Impossibile ultimare l'installazione.\n\nRimuovere la causa dell'errore e ripetere l'installazione." @@ -38,8 +42,8 @@ declare // #define STR_ERR_DLG "Errore di sistema. Impossibile visualizzare una finestra di dialogo." #define STR_INVALID_PATH "Il percorso indicato non e' valido.\nIndicare un altro percorso.\n" -#define STR_TEXT1 "I programmi PR.A.S.S.I. verranno installati nella directory :" -#define STR_TEXTSER1 "I programmi PR.A.S.S.I. sono installati nella directory :" +#define STR_TEXT1 "I programmi di EuroCAMPO verranno installati nella directory :" +#define STR_TEXTSER1 "I programmi di EuroCAMPO sono installati nella directory :" #define STR_DATATEXT1 "I dati verranno installati nella directory :" #define STR_ENT_DISK "Inserire il disco " #define STR_TAGDISK1 "BA" @@ -83,8 +87,8 @@ declare #define ZIP_DIRECTORY "ZIP" #define ZIPDEMO_DIRECTORY "ZIPDEMO" -#define DEFAULT_LOCALPATH "C:\\PRASSI" -#define DEFAULT_NETPATH "F:\\PRASSI" +#define DEFAULT_LOCALPATH "C:\\easy" +#define DEFAULT_NETPATH "F:\\easy" #define SELECTFOLDER_DIALOG 12008 // Prototipo delle funzioni @@ -110,11 +114,12 @@ prototype _ChooseDongleServer(BYREF NUMBER); prototype _ChiediDestDongleServer(BYREF NUMBER); prototype _InstallDongleServer(BYREF NUMBER); prototype _WhereIsDongleServer(BYREF NUMBER); +prototype _ChiediPrgSuRete(BYREF NUMBER ); +prototype _ConfirmInstallation(BYREF NUMBER ); // first level prototype _ExitOnConfirm( ); prototype _PerformSet(STRING); -prototype _TrovaPrgSuRete( ); prototype _DeleteFilesMinima(); prototype _InstallaFilesMinima(); prototype _UpdateRegistry( ); @@ -128,7 +133,7 @@ prototype _CambiaDirectory( ); prototype _CreateDLG( STRING, INT, LONG ); prototype _FineInstallazione( ); -prototype _RemoveHDLOCK( ); +prototype _RemoveUnusedFiles( ); prototype _UpdateSysFiles( ); prototype _SetPathpref(); @@ -149,6 +154,7 @@ prototype _Verifica( STRING ); prototype _Errore( STRING ); prototype _Attenzione( STRING ); prototype _DeSlash( STRING, BYREF STRING ); +prototype _TCPIPPresent( ); prototype _GetOSName( ); prototype _DisattivaScreenSaver( ); prototype _RiattivaScreenSaver( ); @@ -159,6 +165,7 @@ prototype _SettaModelessDialog( STRING ); prototype _NascondiModelessDialog( ); prototype _RichiediMemoria( NUMBER ); prototype _NToStringKB( NUMBER, BYREF STRING ); +prototype _ShowInfoList(STRING,STRING,LIST ); /* prototype _InstallaFiles( ); diff --git a/support/interni/src/aga/setup.lst b/support/interni/src/aga/setup.lst index b33a8ceb7..6a7bed187 100755 --- a/support/interni/src/aga/setup.lst +++ b/support/interni/src/aga/setup.lst @@ -1,11 +1,21 @@ 1; -sys.z -winsys.z -winsyscg.z -bademo.z -ba.z -std.z -com.z -cm770.z +2; datidemo.z +datiditt.z +3; datiauto.z +datiditt.z +4; +WINsys.Z +WINsysCG.Z +sys.z +5; +sys.z +6; +sys.z +7; +BA.z +8; +BADEMO.z +9; +BA.z diff --git a/support/interni/src/aga/setup.rul b/support/interni/src/aga/setup.rul index 175618a5d..279bc6458 100755 --- a/support/interni/src/aga/setup.rul +++ b/support/interni/src/aga/setup.rul @@ -1,11 +1,13 @@ -// File principale della installazione EASY CAMPO +// File principale della installazione EuroCAMPO declare + // Windows API + #include "WINSUB.H" +// #include "sddialog.h" // Dichiarazioni di costanti per questo script #include "DECLARE.RUL" - // Windows API - #include "WINSUB.H" // File di include con gli ID dei dialog usati in questo script #include "PRADIAGS.H" + NUMBER nHandle; NUMBER nTerminatedConv, nResult; STRING szSXTR1,szSXTR2, szDoMnu, szText, szModifiedPath, szBaCnv; @@ -18,6 +20,7 @@ declare + //---------------------------------- NUMBER nDirection; program @@ -31,11 +34,11 @@ Step_start: _ProgramPrologue(); #define SPACE_REQUIRED 3000 // Disk space in bytes. -#define APP_NAME "EasyCAMPO" -#define PROGRAM_FOLDER_NAME "PRASSI" +#define APP_NAME "EuroCAMPO" +#define PROGRAM_FOLDER_NAME "EuroCAMPO" #define APPBASE_PATH "\\" -#define COMPANY_NAME "A.G.A. Informatica" -#define PRODUCT_NAME "Easy Campo" +#define COMPANY_NAME "A.G.A. Informatica srl" +#define PRODUCT_NAME "Euro Campo" #define PRODUCT_VERSION "1.0 beta" #define DEINSTALL_KEY "SampleDeinstKey" #define PRODUCT_KEY "ba0.exe" @@ -54,17 +57,14 @@ Step_welcome: Welcome( "", 0 ); Enable( BACKBUTTON ); + _CopiaINSTALLINI(); + Step_chooseinst: // sceglie cosa installare _SelectInstall(nDirection); if (nDirection=BACK) then goto Step_welcome; endif ; - if nDirection=NEXT then - if bInstallNetWrk then - goto Step_installnet; - endif; - endif; Step_choosewhere: _ChiediDestinazione(nDirection); @@ -78,22 +78,29 @@ Step_choosecomp: goto Step_choosewhere; endif; -Step_choosewhereD: - _ChiediDestDati(nDirection); - if nDirection=BACK then +Step_netprg: + _ChiediPrgSuRete(nDirection); + if (nDirection =BACK) then goto Step_choosecomp; endif; Step_choosedata: _SelectDataType(nDirection); if nDirection=BACK then - goto Step_choosewhereD; + goto Step_netprg; endif; +Step_choosewhereD: + _ChiediDestDati(nDirection); + if nDirection=BACK then + goto Step_choosedata; + endif; + + Step_chooseDongleServer: _ChooseDongleServer(nDirection); if nDirection=BACK then - goto Step_choosedata; + goto Step_choosewhereD; endif; Step_whereDongleServer: @@ -103,16 +110,25 @@ Step_whereDongleServer: goto Step_chooseDongleServer; endif; -Step_fromnet: - _SettaFlagNet(nDirection); - if nDirection=BACK then - goto Step_whereDongleServer; + if nDirection=NEXT then + if bInstallNetWrk then + goto Step_installnet; + endif; endif; +// *********************************** +// * local installation + Step_newORupdate: _AddOrOverwrite(nDirection); if nDirection=BACK then - goto Step_fromnet; + goto Step_whereDongleServer; + endif; + +Step_confirm1: + _ConfirmInstallation(nDirection); + if nDirection=BACK then + goto Step_newORupdate; endif; Step_installData: @@ -148,19 +164,34 @@ Step_purchase: _ProgramEpilogue(); exit; - +// *********************************** +// * network installation Step_installnet: + _ConfirmInstallation(nDirection); + if nDirection=BACK then + goto Step_whereDongleServer; + endif; + +nStep_installData: + _InstallazioneDati(nDirection); + if (nDirection=BACK) then + goto Step_whereDongleServer; + endif; + +Step_installwrkst: _NewNetWorkPlace(nDirection); if (nDirection=BACK) then - goto Step_chooseinst; + goto Step_whereDongleServer; endif; _ProgramEpilogue(); exit; - #include "winsub.rul" #include "setup1.rul" #include "setup2.rul" #include "setup3.rul" #include "setup4.rul" + #include "winsub.rul" +// #include "sddialog.rul" + diff --git a/support/interni/src/aga/setup1.rul b/support/interni/src/aga/setup1.rul index 4c385fd45..c66822d41 100755 --- a/support/interni/src/aga/setup1.rul +++ b/support/interni/src/aga/setup1.rul @@ -3,19 +3,37 @@ // **** (programmi o postazione di rete) function _SelectInstall(nRetv ) STRING szMsg[512]; + BOOL zInstallEnv, zInstallDemo, zInstallNetWrk; begin + zInstallEnv= bInstallEnv; + zInstallDemo=bInstallDemo; + zInstallNetWrk=bInstallNetWrk; szMsg = "Setup puo' essere utilizzato per installare "; - szMsg=szMsg + "EasyCampo in versione normale o demo, oppure per installare "; + szMsg=szMsg + "EuroCampo in versione normale o demo, oppure "; szMsg=szMsg + "una postazione di lavoro che sfrutta una precedente intallazione su disco di rete"; nRetv = AskOptions(EXCLUSIVE,szMsg, - "&Installazione EasyCAMPO", + "&Installazione EuroCAMPO", bInstallEnv, - "Installazione EasyCAMPO &Demo", + "Installazione EuroCAMPO &Demo", bInstallDemo, "Installazione nuova postazione di lavoro in &rete", bInstallNetWrk ); + if (( zInstallDemo!=bInstallDemo) || (zInstallNetWrk!=bInstallNetWrk) ) then + // something changed ... + if bInstallDemo then + bInstallPrg = TRUE; + bInstallData=TRUE; + bInstallDemoData=TRUE; + elseif bInstallNetWrk then + bInstallPrg = FALSE; + bInstallData= FALSE; + bInstallDemoData=FALSE; + else + bInstallPrg = TRUE; + endif; + endif; end; //---------------------------------------------------------------------------- @@ -25,22 +43,31 @@ function _SelectComponents(nRetv) BOOL bJunk; STRING szMsg[512]; begin - if bInstallDemo then - bInstallPrg = TRUE; - bInstallData = TRUE; - bInstallDemoData=TRUE; - return; - endif; repeat if szOSName = "Windows" || bInstallDemo then + // Windows 3.XX platforms + if bInstallNetWrk then + szMsg= "Setup installerà la postazione di lavoro in rete.\nE' possibile installare anche l'area dati."; + nRetv = AskOptions(NONEXCLUSIVE,szMsg, + "Installa l'area dati", bInstallData + ); + else szMsg= "E' possibile installare i programmi (ambiente e moduli) oppure l'area dati. "; szMsg=szMsg + "\nSelezionare almeno una delle componenti"; nRetv = AskOptions(NONEXCLUSIVE,szMsg, "Installa i programmi", bInstallPrg, "Installa l'area dati", bInstallData ); - bInstallDongleServer = FALSE; + bInstallDongleServer = FALSE; + endif; else + // Windows 95 or NT platforms + if bInstallNetWrk then + szMsg= "Setup installerà la postazione di lavoro in rete.\nE' possibile installare anche l'area dati."; + nRetv = AskOptions(NONEXCLUSIVE,szMsg, + "Installa l'area dati", bInstallData + ); + else szMsg= "E' possibile installare i programmi (ambiente e moduli), l'area dati oppure il server di rete per le chiavi. "; szMsg=szMsg + "\nSelezionare almeno una delle componenti"; nRetv = AskOptions(NONEXCLUSIVE,szMsg, @@ -48,8 +75,9 @@ begin "Installa l'area dati", bInstallData , "Installa il server di chiavi", bInstallDongleServer ); + endif; endif; - until nRetv!=NEXT || bInstallData || bInstallPrg || bInstallDongleServer; + until nRetv!=NEXT || bInstallData || bInstallPrg || bInstallNetWrk || bInstallDongleServer; return ; end; @@ -97,43 +125,64 @@ begin // ricontrolla la presenza di una installazione // e determina la posizione della directory "DATI" - if szAppPath="" then - szAppPath= "c:\prassi"; - bNuovaInst = _FindExistingInst(szAppPath); - endif; - nRetv=AskDestPath( "", "", szAppPath, 0 ); - if (nRetv=BACK) then - return ; + if szConfigPath = "" then + bNuovaInst = _FindExistingInst(szConfigPath); + if szConfigPath = "" then + bInstallData=TRUE; + szConfigPath= DEFAULT_LOCALPATH; + if !ExistsDir(szConfigPath) then + CreateDir(szConfigPath); + endif; endif; - bNuovaInst = ! _CheckExistingInst(szAppPath); - szTmp = szAppPath ^ "PATHPREF.INI"; - if ( ! Is( FILE_EXISTS, szTmp ) ) then - szDataPath = szAppPath ^ "DATI\\"; - else - OpenFileMode( FILE_MODE_NORMAL ); - OpenFile( nTmp, szAppPath, "PATHPREF.INI"); - if GetLine( nTmp, szTmp ) = 0 then - StrSub( szTmp2, szTmp, 1, 1 ); - if ( szTmp2 = ":" ) then - szDataPath = szTmp; - else - StrSub( szTmp2, szTmp, 0, 1 ); - if ( szTmp2 = "." ) then + endif; + + nRetv=AskDestPath( "", "", szConfigPath, 0 ); + if (nRetv=BACK) then + return ; + endif; + bNuovaInst = ! _CheckExistingInst(szConfigPath); + + szTmp = szConfigPath ^ "Prawin.INI"; + if ( Is( FILE_EXISTS, szTmp ) ) then + GetProfString(szTmp, "Main", "Program",szAppPath ); + GetProfString(szTmp, "Main", "Study",szDataPath ); + else + szTmp = szConfigPath ^ "PATHPREF.INI"; + if ( Is( FILE_EXISTS, szTmp ) ) then + // no prawin.ini but pathpref.ini + OpenFileMode( FILE_MODE_NORMAL ); + OpenFile( nTmp, szConfigPath, "PATHPREF.INI"); + if GetLine( nTmp, szTmp ) = 0 then + StrSub( szTmp2, szTmp, 1, 1 ); + if ( szTmp2 = ":" ) then szDataPath = szTmp; else - if ( szTmp2 = "\\" ) then - szDataPath = szTmp; + StrSub( szTmp2, szTmp, 0, 1 ); + if ( szTmp2 = "." ) then + szDataPath = szTmp; else - szDataPath = szAppPath ^ szTmp; + if ( szTmp2 = "\\" ) then + szDataPath = szTmp; + else + szDataPath = szConfigPath ^ szTmp; + endif; endif; endif; + else + MessageBox( "Errore nel file PATHPREF.INI" ,SEVERE); + szDataPath = szConfigPath ^ "DATI\\"; endif; - else - MessageBox( "Errore nel file PATHPREF.INI" ,SEVERE); - szDataPath = szAppPath ^ "DATI\\"; + CloseFile( nTmp ); + else + // no pathpref.ini nor prawin.ini + if !bInstallNetWrk then + szDataPath = szConfigPath ^ "DATI\\"; endif; - CloseFile( nTmp ); endif; + endif; + if !bInstallNetWrk then + szAppPath = szConfigPath; + endif; return ; end; @@ -145,11 +194,11 @@ function _ChiediDestDati(nRetv) begin // ricontrolla la presenza di una installazione // e determina la posizione della directory "DATI" - if bInstallData || bInstallPrg then + if bInstallData || bInstallPrg || bInstallNetWrk then if bInstallData then - sMsg = "I dati verranno installati nel seguente direttorio."; + sMsg = "Setup installerà l'area dati nel seguente direttorio."; else - sMsg = "I dati sono installati nel seguente direttorio."; + sMsg = "Setup utilizzerà l'area dati che si trova nel seguente direttorio."; endif; sMsg = sMsg + "\nE' possibile cambiare il direttorio digitando il nuovo nome o scegliendo il pulsante "; repeat @@ -195,12 +244,12 @@ begin bPurchase ); else - szMsg= "Si sta aggiornando una precedente installazione. Si desidera aggiornare i moduli gia' acquistati "; - szMsg=szMsg + "o acquistarne e abilitarne dei nuovi prima di installarli ?"; + szMsg= "Si sta aggiornando una precedente installazione. Setup reinstallerà i programmi di ambiente. "; + szMsg=szMsg + "Se si desidera anche acquistare e abilitare nuovi moduli o aggiornare quelli già acquistati selezionare le caselle sottostanti"; nRet = AskOptions(NONEXCLUSIVE,szMsg, "&Acquisto e abilitazione nuovi moduli", bPurchase, - "Installazione o aggiornamento nuovi &moduli", + "Installazione o aggiornamento &moduli", bInstallModules ); endif; @@ -210,62 +259,62 @@ end; //----------------------------------------------------------------------------- // **** // **** -function _TrovaPrgSuRete( ) +function _ChiediPrgSuRete(nDirection ) STRING szText[ _MAX_LENGTH ], szModifiedPath[ _MAX_LENGTH ], szTemp[ _MAX_LENGTH ]; NUMBER nHandle; begin - szText = "E' stata scelta l'installazione di una postazione di lavoro."; - szText =szText + "\nInserire il nome del direttorio di rete che contiene l'installazione di EasyCAMPO"; - szAppPath = DEFAULT_NETPATH; + if !bInstallNetWrk then + return; + endif; + szText = "L'installazione di una postazione di lavoro deve basarsi su una precedente installazione dei programmi su disco di rete."; + szText =szText + "\nInserire il percorso completo del direttorio di rete che contiene l'installazione di EuroCAMPO."; + if (szAppPath = "") then + szAppPath = DEFAULT_NETPATH; + endif; while ( TRUE ) - if ( AskPath( szText , szAppPath, szModifiedPath ) = NEXT ) then + nDirection = AskPath( szText , szAppPath, szModifiedPath ); + if ( nDirection = NEXT ) then if ( _CheckExistingInst(szModifiedPath) ) then szAppPath = szModifiedPath; szTmp = szAppPath ^ "PATHPREF.INI"; if ( ! Is( FILE_EXISTS, szTmp ) ) then - szDataPath = szAppPath ^ "DATI\\"; + szModifiedPath = szAppPath ^ "DATI\\"; else OpenFileMode( FILE_MODE_NORMAL ); OpenFile( nTmp, szAppPath, "PATHPREF.INI"); if GetLine( nTmp, szTmp ) = 0 then StrSub( szTmp2, szTmp, 1, 1 ); if ( szTmp2 = ":" ) then - szDataPath = szTmp; + szModifiedPath = szTmp; else StrSub( szTmp2, szTmp, 0, 1 ); if ( szTmp2 = "." ) then - szDataPath = szTmp; + szModifiedPath = szTmp; else if ( szTmp2 = "\\" ) then - szDataPath = szTmp; + szModifiedPath = szTmp; else - szDataPath = szAppPath ^ szTmp; + szModifiedPath = szAppPath ^ szTmp; endif; endif; endif; else _Attenzione( "Errore nel file PATHPREF.INI" ); - szDataPath = szAppPath ^ "DATI\\"; + szModifiedPath = szAppPath ^ "DATI\\"; endif; CloseFile( nTmp ); endif; StrToUpper( szAppPath, szAppPath ); - StrToUpper( szDataPath, szDataPath ); + if szDataPath = "" then + StrToUpper(szDataPath ,szModifiedPath); + endif; bProgrammiServer = TRUE; - szTemp = DEFAULT_LOCALPATH ^ "\\PREFIX.TXT"; - if ( ! Is( FILE_EXISTS, szTemp ) ) then - CreateDir( DEFAULT_LOCALPATH ); - CreateFile( nHandle, DEFAULT_LOCALPATH, "PREFIX.TXT" ); - WriteLine( nHandle, "COM" ); - CloseFile( nHandle ); - endif; - _UpdateRegistry( ); - return NEXT; + return; else - _Attenzione( "Impossibile trovare i programmi di EasyCAMPO in " + szModifiedPath ); + _Attenzione( "Impossibile trovare i programmi di EuroCAMPO in " + szModifiedPath ); endif; else - return BACK; + return; endif; endwhile; end; @@ -275,14 +324,13 @@ end; function _NewNetWorkPlace(nDirection ) STRING szText[ _MAX_LENGTH ]; NUMBER nGoOut, nRet, nResult, nDisk; - BOOL bRet; + BOOL bInstWinCG; begin - nDirection = _TrovaPrgSuRete(); - if (nDirection =BACK) then - return ; - endif; + bInstWinCG = _Verifica("Installare anche le librerie di CG ? "); - bRet = _Verifica("Installare anche le librerie di CG ? "); + SetColor(STATUSBAR,BLUE); + Enable(FEEDBACK_OPERATION); + Enable(STATUS); FileSetBeginDefine ( "SYS"); SetColor(STATUSBAR,BLUE); @@ -295,30 +343,37 @@ begin szText = STR_ERR_DECOMPRESS + " la libreria WINSYS."; _Errore( szText ); endif; - if (bRet) then + if (bInstWinCG) then if ( CompressGet( "WINSYSCG.Z", "*.*", INCLUDE_SUBDIR ) < 0) then szText = STR_ERR_DECOMPRESS + " la libreria WINSYSCG."; _Errore( szText ); endif; - ChangeDirectory( szAppPath); - szText = szAppPath ^ "\\cgpostIN.EXE"; - LaunchAppAndWait( szText , szAppPath, WAIT ); endif; - FileSetEndDefine ( "SYS"); StatusUpdate( ON, 100 ); + FileSetEndDefine ( "SYS"); + + ChangeDirectory( szAppPath); repeat nRet=FileSetPerformEz ("SYS", nDisk ); until nRet = FS_DONE; Delay(1); FileSetEndPerform ( "SYS" ); - _UpdateSysFiles(); - _SetPathpref(); - ChangeDirectory( szAppPath); - _RemoveHDLOCK(); + if (bInstWinCG) then + ChangeDirectory( szConfigPath); + szText = szAppPath ^ "\\cgpostIN.EXE"; + LaunchAppAndWait( szText , szAppPath, WAIT ); + endif; Disable( FEEDBACK_FULL ); Disable(STATUS); + + _UpdateRegistry( ); + _UpdateSysFiles(); + _SetPathpref(); + ChangeDirectory( szAppPath); + _RemoveUnusedFiles(); + return ; end; @@ -377,22 +432,14 @@ begin // ******** installa dati iniziali ditte elseif bInstallFirm then szTitle = "Installazione dati comuni e standard su " + szDataPath; - SetStatusWindow( 0, szTitle ); FileSetBeginDefine ( "DATI"); - if ( CompressGet( "STD.Z", "*.*", INCLUDE_SUBDIR ) < 0) then - szText = STR_ERR_DECOMPRESS + " il modulo Dati standard."; + if ( CompressGet( "DATIDITT.Z", "*.*", INCLUDE_SUBDIR ) < 0) then + szText = STR_ERR_DECOMPRESS + " il modulo Dati ditta."; _Attenzione( szText ); endif; - if ( CompressGet( "COM.Z", "*.*", INCLUDE_SUBDIR ) < 0) then - szText = STR_ERR_DECOMPRESS + " il modulo Dati comuni."; - _Attenzione( szText ); - endif; - if ( CompressGet( "CM770.Z", "*.*", INCLUDE_SUBDIR ) < 0) then - szText = STR_ERR_DECOMPRESS + " il modulo Dati comuni (M770)."; - _Attenzione( szText ); - endif; - FileSetEndDefine ( "DATI"); + FileSetEndDefine ( "DATI"); + SetStatusWindow( 0, szTitle ); StatusUpdate( ON, 100 ); _PerformSet ( "DATI"); endif; @@ -441,7 +488,7 @@ begin _CopiaINSTALLINI( ); _CopiaRESETHL( ); - _RemoveHDLOCK( ); + _RemoveUnusedFiles( ); _SetPathpref(); @@ -464,18 +511,29 @@ function _ChooseDongleServer(nRetv) BOOL bJunk; begin - if bInstallPrg then + if bInstallPrg || bInstallNetWrk then if !bInstallDemo then - if bInstallDongleServer then + if (bInstallDongleServer) then bUseDongleServer=FALSE; + nRetv = AskOptions(EXCLUSIVE,"I programmi in versione non dimostrativa sono protetti da una chiave hardware. Sulla questa macchina sta per essere installato un server di autorizzazioni:", + "utilizza il server per il controllo delle autorizzazioni",bJunk); else - nRetv = AskOptions(EXCLUSIVE,"I programmi sono protetti da una chiave hardware.\nIl controllo delle autorizzazioni va effettuato:", - "tramite chiave locale", - bJunk, - "tramite un server di chiavi", - bUseDongleServer - ); - endif; + if (_TCPIPPresent() || bIsWin95=FALSE ) then + // e' installato il TCP IP O verr… installato; posso fare uso delle chiavi di rete + nRetv = AskOptions(EXCLUSIVE,"I programmi in versione non dimostrativa sono protetti \nda una chiave hardware. \nIl controllo delle autorizzazioni va effettuato:", + "tramite chiave locale", + bJunk, + "tramite un server di chiavi", + bUseDongleServer + ); + else + bUseDongleServer=FALSE; + nRetv = AskOptions(EXCLUSIVE,"I programmi in versione non dimostrativa sono protetti da una chiave hardware. Il protocollo di rete TCP-IP non e' stato trovato, per cui non e' possibile effettuare il controllo delle autorizzazione tramite chiave di rete:", + "effettua il controllo tramite chiave locale", + bJunk + ); + endif; + endif; else bUseDongleServer=FALSE; endif; @@ -495,7 +553,8 @@ begin return; endif; szTempore=szDongleServerName; - nDirection = AskText("L'installazione attuale sarà priva della chiave hardware locale e farà riferimento ad un server esterno. Inserire il nome della macchina (NON preceduto '\\') che fa da server per le chiavi hardware.\nSu questa macchina deve essere stato installato con Setup il server delle chiavi.",szTempore,szDongleServerName); + SetDialogTitle(DLG_ASK_TEXT,"Server di autorizzazioni"); + nDirection = AskText("L'installazione attuale sarà priva della chiave hardware locale e farà riferimento ad un server esterno. Inserire il nome della macchina (NON preceduto da '\\\\') che fa da server per le chiavi hardware.\nSu questa macchina deve essere stato installato con Setup il server delle chiavi.",szTempore,szDongleServerName); if nDirection=BACK then szDongleServerName=szTempore; endif; @@ -561,10 +620,87 @@ begin return; endif; - TARGETDIR = szAppPath; + TARGETDIR = szConfigPath; + if ( CreateDir( TARGETDIR ) < 0 ) then + _Errore( STR_DIR_NOTCREATED ); + else + if ( CompressGet( "BA.Z", "frontend.exe", INCLUDE_SUBDIR ) < 0) then + szTempore = STR_ERR_DECOMPRESS + " il server di autorizzazioni."; + _Errore( szTempore ); + return; + endif; + if ( CompressGet( "SYS.Z", "aga*.dll", INCLUDE_SUBDIR ) < 0) then + szTempore = STR_ERR_DECOMPRESS + " il server di autorizzazioni."; + _Errore( szTempore ); + return; + endif; + szTempore = szConfigPath ^ "\\frontend.exe"; + AddFolderIcon( szAutoRunFolder, "Frontend", szTempore, "", szTempore, 0, "", REPLACE ); + endif; - szTempore = szAppPath ^ "\\frontend.exe"; - AddFolderIcon( szAutoRunFolder, "Frontend", szTempore, "", szTempore, 0, "", REPLACE ); end; +function _ConfirmInstallation(nDirection) + STRING Msg,szInfo; + NUMBER listInfo; +begin + + //create list + listInfo = ListCreate(STRINGLIST); + + Msg = "Si è scelto di installare "; + if bInstallNetWrk then + Msg =Msg +"una postazione di rete"; + elseif bInstallPrg then + if bInstallDemo then + Msg =Msg +"EuroCAMPO Demo"; + else + Msg =Msg +"EuroCAMPO"; + endif; + else + Msg =Msg +"l'area dati"; + endif; + Msg = Msg + " con le opzioni seguenti"; + + // ************ + // destination + if bInstallNetWrk then + szInfo="Direttorio locale:" + szConfigPath; + ListAddString(listInfo, szInfo, AFTER); + szInfo="Direttorio dei programmi:" + szAppPath; + ListAddString(listInfo, szInfo, AFTER); + else + szInfo="Direttorio dei programmi:" + szAppPath; + ListAddString(listInfo, szInfo, AFTER); + endif; + // ************ + // data path + szInfo="Area dati "; + if bInstallData then + szInfo="pre-esistente"; + else + if bInstallFirm then + szInfo=szInfo + "di ditta"; + elseif bInstallDemoData then + szInfo=szInfo + "Demo"; + elseif bInstallAutoform then + szInfo=szInfo + "di Autoformazione"; + endif; + szInfo=szInfo + " da installare"; + endif; + szInfo=szInfo + ":" + szDataPath; + ListAddString(listInfo, szInfo, AFTER); + // ************ + // Now display the information + +// SdShowInfoList( "Conferma installazione", Msg, listInfo ); +// in attesa che il fottuto sistema di SDDIalogs di quei coglioni teste di cazzo +// della stirling funzioni, ecco una soluzione di merda: + if AskYesNo( "Procedo con l'installazione?", YES ) then + nDirection = NEXT; + else + nDirection = BACK; + endif; +end; + diff --git a/support/interni/src/aga/setup2.rul b/support/interni/src/aga/setup2.rul index 923e331af..811991509 100755 --- a/support/interni/src/aga/setup2.rul +++ b/support/interni/src/aga/setup2.rul @@ -1,34 +1,55 @@ function _SetPathpref( ) STRING szTmpPath[_MAX_LENGTH]; + STRING szPrgPath[_MAX_LENGTH]; begin + + if (bProgrammiServer) then + szPrgPath = szConfigPath; + else + szPrgPath = szAppPath; + endif; + // Setto il Pathpref in modo da poter eseguire BA1 o BACNV, // anche in prima installazione su rete (mancando set PREFPATH) - ChangeDirectory( szAppPath); + if ( CreateDir( szPrgPath ) < 0 ) then + _Errore( STR_DIR_NOTCREATED ); + endif; + + ChangeDirectory( szPrgPath); if (Is( FILE_EXISTS, "PATHPREF.INI" )) then DeleteFile("PATHPREF.INI" ); endif; - CreateFile( nHandle, szAppPath, "PATHPREF.INI" ); + CreateFile( nHandle, szPrgPath, "PATHPREF.INI" ); WriteLine( nHandle, szDataPath ); CloseFile( nHandle ); - - ChangeDirectory( szAppPath); + ChangeDirectory( szPrgPath); if ( Is( FILE_EXISTS, "PREFIX.TXT" )) then DeleteFile("PREFIX.TXT" ); endif; - CreateFile( nHandle, szAppPath, "PREFIX.TXT" ); + CreateFile( nHandle, szPrgPath, "PREFIX.TXT" ); WriteLine( nHandle, "COM" ); CloseFile( nHandle ); // scrive le stesse cose nel file unico prawin.ini , se esiste - szTmpPath=szAppPath ^ "PRAWIN.INI"; + szTmpPath=szPrgPath ^ "PRAWIN.INI"; + // paragrafo MAIN (AGA) WriteProfString(szTmpPath, "Main", "Program",szAppPath); WriteProfString(szTmpPath, "Main", "Study",szDataPath); WriteProfString(szTmpPath, "Main", "Firm","COM"); + // paragrafo DIRECTORIES (PRASSI) + WriteProfString(szTmpPath, "Directories", "Program",szAppPath); + WriteProfString(szTmpPath, "Directories", "Data",szDataPath); + if (bInstallPrg) then + // update the Dongle variable, but only if i am installing programs... if (bUseDongleServer) then + if (_TCPIPPresent() = FALSE) then + szDongleServerName=""; + _Attenzione("Impossibile utilizzare il server di rete delle autorizzazioni: \nprotocollo TCP-IP non rilevato"); + endif; WriteProfString(szTmpPath, "Server", "Dongle" , szDongleServerName); else - WriteProfString(szTmpPath, "Server", "Dongle" , ""); + WriteProfString(szTmpPath, "Server", "Dongle" ,""); endif; endif; end; @@ -40,10 +61,9 @@ function _UpdateSysFiles( ) NUMBER nNotModify, nGoOut, nRet, nInfo, nCurFiles, nLen, nNr; STRING szTemp[_MAX_LENGTH], szWin_Ini[_MAX_LENGTH], szSaveDir[_MAX_LENGTH]; begin - if !bNuovaInst then + if (!bNuovaInst) && (!bInstallNetWrk) then return; endif; - nSystemFileModified = TRUE; nNotModify = FALSE; nInfo = FALSE; @@ -54,6 +74,10 @@ begin SetDialogTitle(DLG_OK, "Conferma" ); while ! nGoOut + if !bNuovaInst then + nSystemFileModified=FALSE; + nNotModify=TRUE; + endif; nRet = AskOptions(EXCLUSIVE, STR_MODSYSFILES, STR_MODIFY, nSystemFileModified, STR_NOTMODIFY, nNotModify, STR_INFOMODIFY, nInfo ); if nInfo then // Mostra le informazioni @@ -68,7 +92,7 @@ begin // Modifiche per installare BAFAX & FAXMAN (30 settembre 1996) if (bProgrammiServer) then - szSaveDir = DEFAULT_LOCALPATH; + szSaveDir = szConfigPath; else szSaveDir = szAppPath; endif; @@ -100,8 +124,10 @@ begin EzBatchReplace( STR_SHARE ); endif; EzBatchReplace( STR_TEMP ); - if bProgrammiServer then - EzBatchReplace("SET PREFPATH=C:\\PRASSI\\PREFIX.TXT"); + if (bProgrammiServer) then + szTemp = szConfigPath ^ "PREFIX.TXT"; + szTemp ="SET PREFPATH=" + szTemp; + EzBatchReplace(szTemp); endif; szTemp = "C:\\RESET_HL.EXE"; EzBatchReplace( szTemp ); @@ -268,6 +294,7 @@ begin szTemp = szAppPath ^ "RECDESC"; CreateDir(szTemp); + Disable(STATUS); end; @@ -289,29 +316,29 @@ begin nDisk = 1; while ( !bDone ) - nRet = FileSetPerform ( sFileset, nDisk ); + nRet = FileSetPerformEz ( sFileset, 1); switch ( nRet ) case FS_TONEXTDISK: + // non usato da FileSetPerformEz if nDisk > 0 then NumToStr( szExt, nDisk ); - szTemp = szTemp + szExt ; - switch( nDisk ) - case 1 : szEntDisk = STR_INSERTDISK + STR_TAGDISK1; - szTemp = "diskid.1"; - endswitch; + szEntDisk = STR_INSERTDISK + STR_TAGDISK1 + szExt; + szTemp = "diskid" ^ szExt; + SetDialogTitle ( DLG_ENTER_DISK, "Cambio disco" ); SetDialogTitle ( DLG_CANCEL, "Uscita" ); Suppress( ENTERDISK_ERRMSG, DISABLE ); bRightDisk = FALSE; while( !bRightDisk ) - nRet = EnterDisk( szEntDisk, szTemp ); + + nRet = EnterDisk( szEntDisk, szTemp ); switch( nRet ) case DISKID: - _Attenzione( "Indicazione di unita' non valida." ); + _Attenzione( "L'unita' indicata non e' valida." ); case BADPATH: - _Attenzione( "Indicazione di sentiero non valida." ); + _Attenzione( "Il percorso indicato non e' valido." ); case DRIVEOPEN: - _Attenzione( "Inserire un dischetto nella unita' indicata!" ); + _Attenzione( "Inserire il disco nell'unita' indicata!" ); case BADTAGFILE: _Attenzione( "Il disco inserito non e' corretto. Inserire il disco richiesto." ); case CANCEL: @@ -364,16 +391,16 @@ begin // Mostra Program Manager AppCommand( PROGMAN, CMD_RESTORE ); // Aggiunge il gruppo di programmi ed i programmi - szFolder="EasyCAMPO"; + szFolder="EuroCAMPO"; ShowGroup (szFolder , SW_NORMAL ); if ( TRUE) then - // Aggiunge EasyCAMPO Program Manager + // Aggiunge EuroCAMPO Program Manager if bInstallDemo then - szItemName = "EasyCAMPO Demo"; + szItemName = "EuroCAMPO Demo"; elseif bInstallNetWrk then - szItemName = "EasyCAMPO WST"; + szItemName = "EuroCAMPO WST"; else - szItemName = "EasyCAMPO"; + szItemName = "EuroCAMPO"; endif; szCmdLine = szAppPath ^ "\\BA0.EXE"; szIconPath = szCmdLine; @@ -488,15 +515,31 @@ function _CopiaINSTALLINI( ) STRING szSrcPath[_MAX_LENGTH]; NUMBER nFlag, nFileOut, nLoop; begin - if bInstallDemo then - szSrcPath= SRCDIR ^ ZIPDEMO_DIRECTORY; - else - szSrcPath= SRCDIR ^ ZIP_DIRECTORY; + // corregge il path dei dati in base all'installazione da dischetto o CD + szSrcPath = SRCDIR ; + ParsePath(szPath,szSrcPath,DIRECTORY); + if (StrLength(szPath) >= 7) then + StrSub(szTmp , szPath, (StrLength(szPath) - 7) ,6 ); + // sono su un CD con immagini dei dischetti su DISK1, DISK2 ,... + nFileOut=StrFind(szTmp, "DISK"); + if nFileOut>=0 then + StrSub(szPath, szSrcPath ,0, StrLength(szSrcPath)- 7 + nFileOut); + szSrcPath = szPath; + endif; endif; - szFileName = SRCDIR ^ "INSTALL.INI"; + + + if bInstallDemo then + szSrcPath= szSrcPath ^ ZIPDEMO_DIRECTORY; + else + szSrcPath= szSrcPath ^ ZIP_DIRECTORY; + endif; + szFileName = szSrcPath ^ "INSTALL.INI"; szPath= szAppPath ^ "INSTALL.INI"; WriteProfString(szPath,"Main","DiskPath",szSrcPath); + GetProfString(szFileName,"Main","Producer",szTmp); + WriteProfString(szPath,"Main","Producer",szTmp); GetProfString(szFileName,"Main","DiskSize",szTmp); WriteProfString(szPath,"Main","DiskSize",szTmp); // ****** @@ -522,11 +565,12 @@ begin SetDialogTitle (DLG_ASK_OPTIONS, "Seleziona i componenti"); SetDialogTitle (DLG_ASK_TEXT, ""); SetDialogTitle (DLG_ASK_YESNO, "Domanda"); - SetDialogTitle (DLG_ENTER_DISK, "Setup ha bisogni del prossimo disco"); + SetDialogTitle (DLG_ENTER_DISK, "Setup ha bisogno del prossimo disco"); SetDialogTitle (DLG_MSG_INFORMATION, "Messaggio"); SetDialogTitle (DLG_MSG_SEVERE, "Errore fatale"); SetDialogTitle (DLG_MSG_WARNING, "Attenzione"); SetDialogTitle( DLG_ASK_PATH, "Scelta direttorio" ); + _DisattivaScreenSaver( ); end; diff --git a/support/interni/src/aga/setup3.rul b/support/interni/src/aga/setup3.rul index 54985a94e..582e8402e 100755 --- a/support/interni/src/aga/setup3.rul +++ b/support/interni/src/aga/setup3.rul @@ -84,7 +84,7 @@ end; function _SettaFlagNet( nDirection) begin - nDirection = AskOptions(EXCLUSIVE, "I programmi di EasyCAMPO possono essere installati localmente sul PC o utilizzare una precedente installazione su server di rete. \nSpecificare se i programmi ", + nDirection = AskOptions(EXCLUSIVE, "I programmi di EuroCAMPO possono essere installati localmente sul PC o utilizzare una precedente installazione su server di rete. \nSpecificare se i programmi ", "vanno installati sul disco locale", bProgrammiServer, "si trovano sul server di rete", bProgrammiServer ); end; @@ -155,7 +155,7 @@ begin szAuto = szAuto + STR_TEMP; szAuto = szAuto + "\n"; if bProgrammiServer then - szAuto = szAuto + "SET PREFPATH=" + DEFAULT_LOCALPATH + "\\PREFIX.TXT"; + szAuto = szAuto + "SET PREFPATH=" + szConfigPath + "\\PREFIX.TXT"; szAuto = szAuto + "\n"; endif; szTemp = "C:\RESET_HL.EXE"; @@ -253,13 +253,27 @@ begin VarRestore(SRCTARGETDIR); end; //----------------------------------------------------------------------------- -function _RemoveHDLOCK( ) +function _RemoveUnusedFiles( ) + STRING szTemp; begin - // HARDLOCK.VXD e' necessario solo su Win95, + // HARDLOCK.VXD e' necessario solo su Win95, // si è scoperto che è sempre necessario // if (szOSName != "Windows") then // DeleteFile("HARDLOCK.VXD"); // endif; + + // ANGELO 29 maggio 1998: cancella Winsock.dll dal direttorio di installazione + // poiche' tale dll funziona solo per Windows 3.11 + VarSave(SRCTARGETDIR); // save SRC & TARGET dirs + if (_TCPIPPresent()) then + // let's use W95's own DLL... + SRCDIR=szAppPath; + TARGETDIR=szAppPath; + szTemp = "WINSOCK.DLL"; + DeleteFile(szTemp); + endif; + VarRestore(SRCTARGETDIR); + end; //----------------------------------------------------------------------------- function _ForceAttrib4Dll( ) @@ -293,6 +307,8 @@ begin _Cambia_Attributi(szTmp); szTmp = szAppPath ^ "XBS200.DLL"; _Cambia_Attributi(szTmp); + szTmp = szAppPath ^ "WINSOCK.DLL"; + _Cambia_Attributi(szTmp); end; //----------------------------------------------------------------------------- @@ -386,3 +402,4 @@ begin return bRetv; end; + diff --git a/support/interni/src/aga/setup4.rul b/support/interni/src/aga/setup4.rul index e24642894..1afb325be 100755 --- a/support/interni/src/aga/setup4.rul +++ b/support/interni/src/aga/setup4.rul @@ -132,9 +132,18 @@ end; // Reperisce il nome del sistema operativo function _GetOSName( ) NUMBER nResult; + STRING szResult; begin VarSave(SRCTARGETDIR); TARGETDIR = WINDIR ^ "SYSTEM"; + // 29 maggio 1998: cancella Winsock.dll dal direttorio di installazione + // poiche' tale dll vale solo per Windows 3.11 + GetSystemInfo(WINMAJOR,nResult,szResult); + bIsWin95 = FALSE; + if (szResult = "3.95") then + bIsWin95 = TRUE; + endif; + GetSystemInfo(OS,nResult,szOSName); VarRestore(SRCTARGETDIR); end; @@ -161,3 +170,44 @@ begin endif; end; + +function _ShowInfoList(szTitle, szMsg, list ) +begin + // removed !!!!!!!! +end; + + +function _TCPIPPresent() + NUMBER nvResult; + STRING svResult,szTemp,szTemp2; +begin + szTemp = "WINSOCK.DLL"; + szTemp2 = "WINSOCK.DL_"; + + VarSave(SRCTARGETDIR); // save SRC & TARGET dirs + SRCDIR=szAppPath; + TARGETDIR=szAppPath; + if (DeleteFile(szTemp2)!=0) then +// _Attenzione("Non riesco a cancellare " + szTemp2); + endif; + if RenameFile(szTemp,szTemp2)!=0 then +// _Attenzione("Non riesco a rinominare " + SRCDIR + szTemp +// + " in " +TARGETDIR+szTemp2 ); + endif; + if (DeleteFile(szTemp)!=0) then +// _Attenzione("Non riesco a cancellare " + szTemp); + endif; + + if (UseDLL("winsock.dll")=0) then + UnUseDLL("winsock.dll"); + nvResult =TRUE; + else + nvResult =FALSE; + endif; + + RenameFile(szTemp2,szTemp); + + VarRestore(SRCTARGETDIR); + return nvResult; +end; +