Źródła

Skrypt robiący kopie plików konfiguracyjnych dbackup

Opublikowano 26 stycznia 2013, autor: admin

#!/bin/sh

konfig_system()
{
grep -v \#  << _CONF
######### Konfigi systemowe do skopiowania ###
#
/etc/rc.conf
/etc/rc.local
/etc/ppp/ppp.conf
/etc/ppp/ppp.linkup
/etc/resolv.conf
/etc/pf.conf
/etc/pf.blank
/etc/crontab
/etc/sysctl.conf
#
##############################################
_CONF
}

konfig_extra()
{
grep -v \#  << _CONF
######### Konfigi dodatkowe do skopiowania ###
#
/usr/local/etc/dhcpd.conf
/etc/he_tunnel_up
/etc/ret_if_ip
/usr/local/etc/cvs-supfile
/usr/local/etc/ddclient.conf
/usr/local/etc/mediatomb/
/usr/local/etc/nginx/
/usr/local/etc/openvpn/
/usr/local/etc/smb.conf
/usr/local/etc/sudoers
/usr/local/etc/samba34
/usr/local/etc/apcupsd/
/home/webs/kasumi/
/home/webs/komenda_spr_szyfr.txt
/home/webs/komendy
/home/webs/kopia_panelu_ssh
/home/webs/lista_paczek_po_sed.txt
/home/webs/make_dirs
/home/webs/internet_restart
/home/webs/net_restart.sh
/home/webs/pw_skladnia
/home/webs/rm_pl_chars
/home/webs/wywolania.cpp
/home/webs/WEBS
/home/webs/WEBS.old
/home/webs/dodaj.sh
/home/webs/pass.php
/home/webs/up.php
/home/webs/dbackup
/home/webs/.ssh/
#
##############################################
_CONF
}

lista_extra()
{
grep -v \# << _CONF
######### Oprogramowanie do instalacji #######
#
mc
apcupsd
screen
sudo
openvpn
bash
mediatomb
isc-dhcp42-server
alsa-lib
bmon
gdbm
gcc
cvsup-without-gui
ddclient
lynx
mysql-server
mysql-client
nginx-devel
perl
php5
php5-extensions
pypanel
python
samba
spawn-fcgi
unzip
unrar
xorg
xorg-server
xorg-drivers
xterm
zip
firefox
xfce
glib
iconv
hal
gtk
wget
#
##############################################
_CONF
}

konfig_all()
{
cat << _CONF
$(konfig_system)
$(konfig_extra)
_CONF
}

pause()
{
echo "Nacisnij [Enter], aby kontynuowac...";
read -r tocowcisnal;
menu;
}
taruj() ##argumenty: system extra all
{
nazwa="backup_"$1"_"$HOSTNAME"_"$(date +"%Y%m%d%H");
echo "Tworzenie archiwum $nazwa.tar.bz2...";
tar --bzip2 -Pcvf ${sciezka}$nazwa.tar.bz2 $(konfig_$1);
RETVAL=$?
[ $RETVAL -eq 0 ] &amp;&amp; echo "+++ Zakonczono z sukcesem! +++";
[ $RETVAL -ne 0 ] &amp;&amp; echo "*** BLAD! Zakonczono z bledem! ***";
pause;
}


odtaruj()
{
lista=<code>ls ${sciezka}backup*$1*.tar.bz2</code>;
	backup_list() #mozna prosciej, ale nie uzywamy tablic bo ich nie ma w borune shell
		{
		i=0;
		for var in ${lista} ; 
		do
			if [ $1 -lt 0 ] ; then #jesli funkcja wywolana z -1 to listuje wszystko
				echo "$i	"<code>basename $var | awk -F_ '{print $2 "-" $3 "-" $4 }' | awk -F. '{print $1"."$2"."$3}'</code>;
			elif [ $1 -eq $i ] ; then #jesli z liczba to tylko sciezka i nazwa pliku
				echo $var;
				break;
			fi	
			i=$(expr $i + 1);
		done
		}	
case $1 in
	"system") w="konfiguracji systemu";;
	"extra") w="konfiguracji dodatkowych";;
	"all") w="wszystkich konfiguracji";;  
esac

pozycja=<code>$DIALOG --stdout --title "Przywracanie $w" --menu "Wybierz kopie do przywrocenia:"  20 51 12 $(backup_list -1) </code>
retval=$?;
case $retval in
  0) 
	{
		archiwum=$(backup_list $pozycja);
		pwd=<code>pwd</code>;
		wypakuj_do=<code>$DIALOG --stdout --title "Przywracanie" --menu "Wybierz lokalizacje do przywrocenia: \n[Struktura podkatalogów w archiwum zostaje zachowana]"  20 51 12 "/" "katalog glowny" $pwd "bierzacy katalog" </code>
	
		retval=$?;
		case $retval in
 			 0) {
				clear;
				echo "Przywracanie "<code>basename $archiwum</code>"...";
				if [ "$wypakuj_do" = "/" ]; then
					tar -Pxvf $archiwum;
				else
					tar -xvf $archiwum;
				fi				
				RETVAL=$?
				[ $RETVAL -eq 0 ] &amp;&amp; echo "+++ Zakonczono z sukcesem! +++";
				[ $RETVAL -ne 0 ] &amp;&amp; echo "*** BLAD! Zakonczono z bledem! ***";
				pause;
			    } ;;
			 *) menu ;; 
		esac
	} ;;
  *) menu;;
esac

}

instaluj_extra()
{
if [ <code>pkg_info | grep portupgrade | wc -l</code> -eq 1 ]
then
	echo "+++ Odnaleziono portupgrade +++";
	echo "Aktualizacja drzewa portow...";
	sleep 1;
	portsnap fetch update;
	RETVAL=$?
	if [ $RETVAL -eq 0 ] 
	then 
		echo "+++ Aktualizacje zakonczono z sukcesem! +++";
		echo "Rozpoczynam instalacje oprogramowania dodatkowego...";
		sleep 1;
		portupgrade -NcvRr $(lista_extra);
		RETVAL=$?
		[ $RETVAL -eq 0 ] &amp;&amp; echo "+++ Instalacje zakonczono z sukcesem! +++"
		[ $RETVAL -ne 0 ] &amp;&amp; echo "*** BLAD! Zakonczono z bledem! ***";
	else
		echo "*** BLAD! Zakonczono z bledem! ***";
	fi
else
	echo "*** BLAD! Brak portupgrade! ***";
	echo "Pobieranie drzewa portow...";
	sleep 1;
	portsnap fetch extract;
	whereis portupgrade;
fi
pause;
}

menu()
{
choice=<code>$DIALOG --clear --stdout --title "$HOSTNAME" \
        --menu "Wybierz czynnosc:" 20 51 12 \
        "1"  "Backup konfigow systemowych" \
        "2"  "Backup konfigow dodatkowych" \
        "3"  "Backup wszystkiego" \
        "4"  "Przywroc konfigi systemu" \
        "5"  "Przywroc konfigi dodatkowe" \
	"6"  "Przywroc wszystko" \
	"7"  "Zainstaluj oprogramowanie dodatkowe" \
        "8"  "Zakoncz" </code>

retval=$?

case $retval in
  0)
       {
 case "$choice" in
	1)
		{
		clear;
    		echo "Rozpoczynam backup konfiguracji systemu...";
		taruj system;
		} ;;

	2)    		
		{
		clear;
    		echo "Rozpoczynam backup konfiguracji dodatkowych...";
		taruj extra;
		} ;;
	3)
		{
		clear;
    		echo "Rozpoczynam backup konfiguracji systemu i dodatkowych...";
		taruj all;
		} ;;
	4)
		{
		clear;
    		echo "Rozpoczynam przywracanie konfiguracji systemu...";
		odtaruj system;
		} ;;

	5)
		{
		clear;
    		echo "Rozpoczynam przywracanie konfiguracji dodatkowych...";
		odtaruj extra;
		} ;;
	6)
		{
		clear;
    		echo "Rozpoczynam przywracanie konfiguracji systemu i dodatkowych...";
		odtaruj all;
		} ;;	
	7)
		{
		clear;
    		echo "Rozpoczynam instalacje dodatkowego oprogramowania...";
		instaluj_extra;
		} ;;
	8)	
		{
		clear;
		echo "Zakończono";
		} ;;
	*) 
		echo "Zly wybor";;
	esac
	};;
  *)
    	clear;
	echo "Zakonczono";
	;;
esac


}
##### Main
if [ "$1" = "-v" ]; then 
	echo "**********************************************";
	echo "Skrypt archiwizacyjny dla FreeBSD - wersja 1.0";
	echo "autor: WebS - webs@k13.pl - czerwiec 2012";
	echo "**********************************************";	
	exit;
fi
if [ <code>/usr/bin/id -u</code> -ne 0 ]; then
    echo "*** Brak uprawnien roota by uruchomic ten program! ***";
    exit
fi

HOSTNAME=<code>hostname</code>;
sciezka=<code>dirname $0</code>"/";
if [ "<code>uname -r | cut -c1</code>" -lt "9" ] &amp;&amp; [ "<code>uname</code>" = "FreeBSD" ] ; then
	if [ <code>pkg_info | grep cdialog | wc -l</code> -eq 1 ]; then 
		DIALOG=${DIALOG=cdialog};
	else
		echo "Brak odpowiedniej wersji programu dialog, zainstaluj cdialog z portow:";
		whereis cdialog;
		exit;
	fi
else
DIALOG=${DIALOG=dialog};
fi
menu;

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

269

270

271

272

273

274

275

276

277

278

279

280

281

282

283

284

285

286

287

288

289

290

291

292

293

294

295

296

297

298

299

300

301

302

303

304

305

306

307

308

309

310

311

312

313

314

315

316

317

318

319

320

321

322

323

324

325

326

327

328

329

#!/bin/sh

konfig_system()

{

grep -v \# << _CONF

######### Konfigi systemowe do skopiowania ###

/etc/rc.conf

/etc/rc.local

/etc/ppp/ppp.conf

/etc/ppp/ppp.linkup

/etc/resolv.conf

/etc/pf.conf

/etc/pf.blank

/etc/crontab

/etc/sysctl.conf

##############################################

_CONF

}

konfig_extra()

{

grep -v \# << _CONF

######### Konfigi dodatkowe do skopiowania ###

/usr/local/etc/dhcpd.conf

/etc/he_tunnel_up

/etc/ret_if_ip

/usr/local/etc/cvs-supfile

/usr/local/etc/ddclient.conf

/usr/local/etc/mediatomb/

/usr/local/etc/nginx/

/usr/local/etc/openvpn/

/usr/local/etc/smb.conf

/usr/local/etc/sudoers

/usr/local/etc/samba34

/usr/local/etc/apcupsd/

/home/webs/kasumi/

/home/webs/komenda_spr_szyfr.txt

/home/webs/komendy

/home/webs/kopia_panelu_ssh

/home/webs/lista_paczek_po_sed.txt

/home/webs/make_dirs

/home/webs/internet_restart

/home/webs/net_restart.sh

/home/webs/pw_skladnia

/home/webs/rm_pl_chars

/home/webs/wywolania.cpp

/home/webs/WEBS

/home/webs/WEBS.old

/home/webs/dodaj.sh

/home/webs/pass.php

/home/webs/up.php

/home/webs/dbackup

/home/webs/.ssh/

##############################################

_CONF

}

lista_extra()

{

grep -v \# << _CONF

######### Oprogramowanie do instalacji #######

apcupsd

screen

sudo

openvpn

bash

mediatomb

isc-dhcp42-server

alsa-lib

bmon

gdbm

gcc

cvsup-without-gui

ddclient

lynx

mysql-server

mysql-client

nginx-devel

perl

php5

php5-extensions

pypanel

python

samba

spawn-fcgi

unzip

unrar

xorg

xorg-server

xorg-drivers

xterm

zip

firefox

xfce

glib

iconv

hal

gtk

wget

##############################################

_CONF

}

konfig_all()

{

cat << _CONF

$(konfig_system)

$(konfig_extra)

_CONF

}

pause()

{

echo "Nacisnij [Enter], aby kontynuowac...";

read -r tocowcisnal;

menu;

}

taruj() ##argumenty: system extra all

{

nazwa="backup_"$1"_"$HOSTNAME"_"$(date +"%Y%m%d%H");

echo "Tworzenie archiwum $nazwa.tar.bz2...";

tar --bzip2 -Pcvf ${sciezka}$nazwa.tar.bz2 $(konfig_$1);

RETVAL=$?

[ $RETVAL -eq 0 ] && echo "+++ Zakonczono z sukcesem! +++";

[ $RETVAL -ne 0 ] && echo "*** BLAD! Zakonczono z bledem! ***";

pause;

}

odtaruj()

{

lista=<code>ls ${sciezka}backup*$1*.tar.bz2</code>;

backup_list() #mozna prosciej, ale nie uzywamy tablic bo ich nie ma w borune shell

{

i=0;

for var in ${lista} ;

if [ $1 -lt 0 ] ; then #jesli funkcja wywolana z -1 to listuje wszystko

echo "$i "<code>basename $var | awk -F_ '{print $2 "-" $3 "-" $4 }' | awk -F. '{print $1"."$2"."$3}'</code>;

elif [ $1 -eq $i ] ; then #jesli z liczba to tylko sciezka i nazwa pliku

echo $var;

break;

i=$(expr $i + 1);

done

}

case $1 in

"system") w="konfiguracji systemu";;

"extra") w="konfiguracji dodatkowych";;

"all") w="wszystkich konfiguracji";;

esac

pozycja=<code>$DIALOG --stdout --title "Przywracanie $w" --menu "Wybierz kopie do przywrocenia:" 20 51 12 $(backup_list -1) </code>

retval=$?;

case $retval in

{

archiwum=$(backup_list $pozycja);

pwd=<code>pwd</code>;

wypakuj_do=<code>$DIALOG --stdout --title "Przywracanie" --menu "Wybierz lokalizacje do przywrocenia: \n[Struktura podkatalogów w archiwum zostaje zachowana]" 20 51 12 "/" "katalog glowny" $pwd "bierzacy katalog" </code>

retval=$?;

case $retval in

0) {

clear;

echo "Przywracanie "<code>basename $archiwum</code>"...";

if [ "$wypakuj_do" = "/" ]; then

tar -Pxvf $archiwum;

else

tar -xvf $archiwum;

RETVAL=$?

[ $RETVAL -eq 0 ] && echo "+++ Zakonczono z sukcesem! +++";

[ $RETVAL -ne 0 ] && echo "*** BLAD! Zakonczono z bledem! ***";

pause;

} ;;

*) menu ;;

esac

} ;;

*) menu;;

esac

}

instaluj_extra()

{

if [ <code>pkg_info | grep portupgrade | wc -l</code> -eq 1 ]

then

echo "+++ Odnaleziono portupgrade +++";

echo "Aktualizacja drzewa portow...";

sleep 1;

portsnap fetch update;

RETVAL=$?

if [ $RETVAL -eq 0 ]

then

echo "+++ Aktualizacje zakonczono z sukcesem! +++";

echo "Rozpoczynam instalacje oprogramowania dodatkowego...";

sleep 1;

portupgrade -NcvRr $(lista_extra);

RETVAL=$?

[ $RETVAL -eq 0 ] && echo "+++ Instalacje zakonczono z sukcesem! +++"

[ $RETVAL -ne 0 ] && echo "*** BLAD! Zakonczono z bledem! ***";

else

echo "*** BLAD! Zakonczono z bledem! ***";

else

echo "*** BLAD! Brak portupgrade! ***";

echo "Pobieranie drzewa portow...";

sleep 1;

portsnap fetch extract;

whereis portupgrade;

pause;

}

menu()

{

choice=<code>$DIALOG --clear --stdout --title "$HOSTNAME" \

--menu "Wybierz czynnosc:" 20 51 12 \

"1" "Backup konfigow systemowych" \

"2" "Backup konfigow dodatkowych" \

"3" "Backup wszystkiego" \

"4" "Przywroc konfigi systemu" \

"5" "Przywroc konfigi dodatkowe" \

"6" "Przywroc wszystko" \

"7" "Zainstaluj oprogramowanie dodatkowe" \

"8" "Zakoncz" </code>

retval=$?

case $retval in

{

case "$choice" in

{

clear;

echo "Rozpoczynam backup konfiguracji systemu...";

taruj system;

} ;;

{

clear;

echo "Rozpoczynam backup konfiguracji dodatkowych...";

taruj extra;

} ;;

{

clear;

echo "Rozpoczynam backup konfiguracji systemu i dodatkowych...";

taruj all;

} ;;

{

clear;

echo "Rozpoczynam przywracanie konfiguracji systemu...";

odtaruj system;

} ;;

{

clear;

echo "Rozpoczynam przywracanie konfiguracji dodatkowych...";

odtaruj extra;

} ;;

{

clear;

echo "Rozpoczynam przywracanie konfiguracji systemu i dodatkowych...";

odtaruj all;

} ;;

{

clear;

echo "Rozpoczynam instalacje dodatkowego oprogramowania...";

instaluj_extra;

} ;;

{

clear;

echo "Zakończono";

} ;;

echo "Zly wybor";;

esac

};;

clear;

echo "Zakonczono";

;;

esac

}

##### Main

if [ "$1" = "-v" ]; then

echo "**********************************************";

echo "Skrypt archiwizacyjny dla FreeBSD - wersja 1.0";

echo "autor: WebS - webs@k13.pl - czerwiec 2012";

echo "**********************************************";

exit;

if [ <code>/usr/bin/id -u</code> -ne 0 ]; then

echo "*** Brak uprawnien roota by uruchomic ten program! ***";

exit

HOSTNAME=<code>hostname</code>;

sciezka=<code>dirname $0</code>"/";

if [ "<code>uname -r | cut -c1</code>" -lt "9" ] && [ "<code>uname</code>" = "FreeBSD" ] ; then

if [ <code>pkg_info | grep cdialog | wc -l</code> -eq 1 ]; then

DIALOG=${DIALOG=cdialog};

else

echo "Brak odpowiedniej wersji programu dialog, zainstaluj cdialog z portow:";

whereis cdialog;

exit;

else

DIALOG=${DIALOG=dialog};

menu;

Opublikowano Skrypty, kody źródłowe | Skomentuj

JDownloader+MediaTomb+TV

Opublikowano 13 marca 2011, autor: admin

Parę screenów z połączenia serwera na FreeBSD z uruchomionymi: JDownloader + MediaTomb, a to połączone ethernetem z TV Samsung.

JDownloader na Javie Suna, DiabloJRE w tym wydaniu nie sprawdzało się, pobrania często przechodziły w stan deactivate z błędnym komunikatem, że jest problem z zapisem na dysku. MediaTomb z łatką dzięki której może zaserwować napisy, bo telewizory Samsunga wymagają paru dodatków których nie ma w standardzie DLNA.

Dodawanie linków przez www znacznie upraszcza sprawę.

W trakcie pobierania

Można zarządzać i dodawać linki także za pomocą telefonu komórkowego.

Odtwarzarka w TV – wideo, muzyka i obrazki 😉

Pobrane filmy JD od razu rozpakowuje i umieszcza w tym katalogu dostępnym na TV

🙂

Opublikowano Inne sprzęty | Skomentuj

Mądrzejszy wyłącznik czasowy

Opublikowano 13 marca 2011, autor: admin

Dla zaoszczędzenia paru złotych wyłączam serwer, acesspointa, modem i switcha na noc za pomocą wyłącznika czasowego. Zaprogramowany by w każdy dzień wyłączał prąd o danej godzinie i rano go włączał z powrotem, na serwerze cron odpowiednio wcześniej robił shutdown. W momencie, gdy trzeba było serwer zostawić włączony na noc wiązało się to z wycieczką do serwera i przestawianie wyłącznika, stąd ta mała modyfikacja: dodatkowy przekaźnik sterowany napięciem 12V z serwera – gdy ten jest włączony, napięcie idzie na cewkę przekaźnika który łączy fazę z pominięciem elektroniki wyłącznika czasowego. Dlatego wszystko zgaśnie dopiero, gdy serwer się wyłączy, a tym łatwo zarządzać przez ssh.

Dołożony przekaźnik jest tylko 10A, ale do tego zastosowania jest i tak z wielkim zapasem.

AKTUALIZACJA: to było dawno, teraz jestem mądrzejszy i wiem, że między piny cewki przekaźnika trzeba dać diodę (oczywiście zaporowo). Zapobiegnie ona bardzo dużym impulsom napięcia które się potrafi indukować. Co prawda przez kilka lat użytkowania nic się nie uszkodziło, ale lepiej nie ryzykować.

Opublikowano Inne sprzęty | Skomentuj

Patch do MediaTomb – SamsungTV & srt subtitles

Opublikowano 13 marca 2011, autor: admin

Patch do programu MediaTomb który umożliwia odtwarzanie napisów w formacie srt na telewizorach Samsung z użyciem standardu DLNA.

Pobrany z http://sourceforge.net a stworzony przez marcin1j.

Zamieszczam jakby tam “zezarło”

patch-samsung_video_subtitles

Opublikowano Inne sprzęty, Skrypty, kody źródłowe | Skomentuj

FreeBSD i portupgrade

Opublikowano 13 marca 2011, autor: admin

Świetna sprawa do aktualizacji wszystkich zainstalowanych portów. Sprawdzi co trzeba zaktualizować, sprawdzi zależności. Zrobi prawie wszystko i więcej z dobrymi przełącznikami o których nigdy nie pamiętam, dlatego tu zapiszę:

portsnap fetch update
portversion -l "<"
portupgrade -cavRr

Słowo objaśnienia:
portsnap – ściągnie i zaktualizuje drzewo portów
portversion – opcjonalne – pokaże co zostanie zaktualizowane
portupgrade – dokona aktualizacji, teraz przełączniki: c-wyświetli wszystkie opcje konfiguracyjne na początku, dzięki temu aktualizację można zostawić bez nadzoru, nie utknie w połowie (mała literka c sprawi, że menu konfiguracyjne pojawi się tylko dla portów jeszcze nie konfigurowanych lub takich gdzie są nowe opcje, duża literka C uruchomi dla wszystkich), a-aktualizuje wszystkie porty, v-gadatliwe informowanie o czynnościach, rR-zainstaluje zależności potrzebne do kompilacji portu i zależności potrzebne do działania portu

Opublikowano Skrypty, kody źródłowe | Skomentuj

Dreambox-Linbox 500s + chłodzenie

Opublikowano 9 października 2010, autor: admin

Grzał się IBMowski PowerPC i grzał się scalak w głowicy, stąd doklejone radiatorki z pastą Zalman ZM-STG1, mocowanie na SuperGlue :>
Po dłuższym oglądaniu zaczynał czasem wskakiwać BER, a przy słuchaniu mp3 potrafiło zacząć ścinać, więc może pomoże 😛

Opublikowano Inne sprzęty | Skomentuj

DirCzeker 2.0

Opublikowano 23 września 2010, autor: admin

folder = "c:\Intel"
sprawdz_co = "3000" 'w milisekundach - 30 sek
tryb_pracy = 1
'1=sprawdza czy sa zmiany w katalogu (ilosc plikow i ich nazwy)
'2=sprawdza czy pojawil sie jakis plik w katalogu

prev_content=-1
dim fNames()
Sub Message(tresc)
strMbox =MsgBox("W katalogu " & folder & " liczba plików " & tresc & vbCr & vbLf &"Kontynuować sprawdzanie?", 4 ,"Zmiany w katalogu")
If strMbox = 7 Then
WScript.Quit
End If

End sub

While true
if tryb_pracy = 1 then
content = ""
set fso = CreateObject("Scripting.fileSystemObject")
set fold = fso.getFolder(folder)
fileCount = fold.files.count
dirCount = fold.subfolders.count
allCount = fileCount+dirCount
redim fNames(allCount)
cFcount = 0

for each file in fold.files
cFcount = cFcount + 1
fNames(cFcount) = lcase(file.name)
next

for each dir in fold.subfolders
cFcount = cFcount + 1
fNames(cFcount) = lcase(dir.name)
next

for tName = 1 to allCount
for nName = (tName + 1) to allCount
if strComp(fNames(tName),fNames(nName),0)=1 then
buffer = fNames(nName)
fNames(nName) = fNames(tName)
fNames(tName) = buffer
end if
next
next

for i = 1 to allCount
content = content & fNames(i) & vbCr & vbLf
next
'MsgBox content

if prev_content<>-1 then
if allCount = prev_allCount then
if content <> prev_content then
Message("się zgadza, ale są inne nazwy.")
end if
elseIf allCount > prev_allCount then
Message("wzrosła.")
elseIf allCount < prev_allCount then
Message("zmalała.")
end if
end if

prev_content=content
prev_allCount=allCount

elseIf tryb_pracy = 2 then
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(folder)
Set fc = f.Files
Set ff = f.Subfolders
If 0 <> fc.Count or ff.Count Then
Message("różna od zera")
End If
else
Msgbox "Wybierz poprawny tryb pracy"
WScript.Quit
end if
WScript.Sleep(sprawdz_co)
Wend

folder = "c:\Intel"

sprawdz_co = "3000" 'w milisekundach - 30 sek

tryb_pracy = 1

'1=sprawdza czy sa zmiany w katalogu (ilosc plikow i ich nazwy)

'2=sprawdza czy pojawil sie jakis plik w katalogu

prev_content=-1

dim fNames()

Sub Message(tresc)

strMbox =MsgBox("W katalogu " & folder & " liczba plików " & tresc & vbCr & vbLf &"Kontynuować sprawdzanie?", 4 ,"Zmiany w katalogu")

If strMbox = 7 Then

WScript.Quit

End If

End sub

While true

if tryb_pracy = 1 then

content = ""

set fso = CreateObject("Scripting.fileSystemObject")

set fold = fso.getFolder(folder)

fileCount = fold.files.count

dirCount = fold.subfolders.count

allCount = fileCount+dirCount

redim fNames(allCount)

cFcount = 0

for each file in fold.files

cFcount = cFcount + 1

fNames(cFcount) = lcase(file.name)

for each dir in fold.subfolders

cFcount = cFcount + 1

fNames(cFcount) = lcase(dir.name)

for tName = 1 to allCount

for nName = (tName + 1) to allCount

if strComp(fNames(tName),fNames(nName),0)=1 then

buffer = fNames(nName)

fNames(nName) = fNames(tName)

fNames(tName) = buffer

end if

for i = 1 to allCount

content = content & fNames(i) & vbCr & vbLf

'MsgBox content

if prev_content<>-1 then

if allCount = prev_allCount then

if content <> prev_content then

Message("się zgadza, ale są inne nazwy.")

end if

elseIf allCount > prev_allCount then

Message("wzrosła.")

elseIf allCount < prev_allCount then

Message("zmalała.")

end if

prev_content=content

prev_allCount=allCount

elseIf tryb_pracy = 2 then

Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.GetFolder(folder)

Set fc = f.Files

Set ff = f.Subfolders

If 0 <> fc.Count or ff.Count Then

Message("różna od zera")

End If

else

Msgbox "Wybierz poprawny tryb pracy"

WScript.Quit

end if

WScript.Sleep(sprawdz_co)

Wend

Opublikowano Skrypty, kody źródłowe | Skomentuj

“Skarbeniek113” :P

Opublikowano 21 września 2010, autor: admin

Pochwalę się machiną moją, nową, cudną, miodną :>

AMD Phenom II x6 1090T @ 3.2GHz Black Edition
płytka Asus Crosshair IV Formula
960GB RAID 0 (2xSamsung 322HJ + Samsung 322GJ)
2x2GB Patriot G-series 1600MHz Gamer AMD Black Edition z CL7 (z listy QVL Asusa dla tego modelu płyty)
nagrywarka Asus DRW-24B1LT (bo ta płyta nie ma już gniazd IDE i musiałem zmienić na nagrywarkę SATA)

pozostałe elementy bez zmian 😉

Względem poprzedniej płyty (Asus M4N72-E) na nowej w 3Dmarku Vantage, procek ma trochę więcej punktów.

Chyba największy gadżet w tej płytce (zaraz po OC Station – szkoda, że w zestawie nie ma) to możliwość podglądu parametrów płyty i jej przetaktowywanie na zdalnym komputerze dzięki funkcji ROG Connect – podłączasz specjalnym USB w specjalne gniazdko i niezależnie od systemu operacyjnego to działa. Podczas włączania komputera po kolei wyświetla w jakiej fazie jest BIOS, np inicjalizacja cpu, sprawdzenie cpu, ładowanie vga bios, wykrycie dysku itp.

Cóż, co jak co, ale pudełko tu jest najlepsze! Po otwarciu są dwie tacki, na jednej sama płyta, a na drugiej w przegródkach wszystkie kable i inne cuda. Nawet roczna licencja na Kasperskiego…

W gablocie właśnie M4N72-E

Opublikowano Inne sprzęty | 5 komentarzy

Skrypt robiący kopie plików konfiguracyjnych dbackup

JDownloader+MediaTomb+TV

Mądrzejszy wyłącznik czasowy

Patch do MediaTomb – SamsungTV & srt subtitles

FreeBSD i portupgrade

Dreambox-Linbox 500s + chłodzenie

DirCzeker 2.0

“Skarbeniek113” :P

Archiwa

Meta