elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Trabajando con las ramas de git (tercera parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [BATCH] Password BAS 0.1
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [BATCH] Password BAS 0.1  (Leído 3,405 veces)
ËrîC#

Desconectado Desconectado

Mensajes: 35


Ver Perfil
[BATCH] Password BAS 0.1
« en: 7 Diciembre 2007, 17:20 pm »

Código:
:inicio
@echo off
color f4
md c:\passwordbas
cd c:\passwordbas
title PASSWORD BAS 0.1 ~ Creado por Eric
echo Bienvenido a password BAS! En este programa podras almacenar tus passwords
echo aunque vaya contra mis principios,es muy util,para almacenar las passwords.
pause>nul
goto passwords
cls
:passwords
echo Hola que deseas,mirar o almacenar
echo 1.Mirar
echo 2.Almacenar
echo 3.Salir
set /p kacer=
if %kacer%==1 goto mirar
if %kacer%==2 goto almacenar
if %kacer%==3 exit
:almacenar
cls
echo Escribe el nombre para la password (Se utilizara cuando se busque)
set /p name=
echo Ahora escribe la password
set /p contrasave=
cls
echo %contrasave%>>%name%.txt
pause
cls
goto passwords
:mirar
cls
echo Escribe el nombre de la password que deseas mirar
set /p passmir=
if exist %name%.txt goto lol
if not exist %name%.txt goto passwords
:lol
more %name%.txt
pause>nul
goto passwords

Bueno pues esto es un almacenador de contraseñas que hice hace muchísimo, si tiene algun bug me avisais.


En línea

MK-Ultra


Desconectado Desconectado

Mensajes: 435


~ Nevermind ~


Ver Perfil WWW
Re: [BATCH] Password BAS 0.1
« Respuesta #1 en: 10 Diciembre 2007, 01:21 am »

Dos cosas:

Código:
echo Escribe el nombre de la password que deseas mirar
set /p passmir=
if exist %name%.txt goto lol
if not exist %name%.txt goto passwords

esto devería ir asi:
Código:
set /p passmir=Escribe el nombre de la password que deseas mirar
if exist %passmir%.txt goto lol
if not exist %passmir%.txt goto passwords

y otra cosa:
Código:
echo Escribe el nombre para la password (Se utilizara cuando se busque)
set /p name=
echo Ahora escribe la password
set /p contrasave=

Esto lo pondes poner asi para ahorrar texto:

Código:
set /p name=Escribe el nombre para la password (Se utilizara cuando se busque)
set /p contrasave=Ahora escribe la password

Espero qeu te haya sido util  ;)


En línea

Agradecer no cuesta nada (al menos no mucho)

BTC: 1DHKsWE6wGkUiHbKkwBDaF8DEGwn9n6nxQ
zhynar_X


Desconectado Desconectado

Mensajes: 515


Use linux my friend...


Ver Perfil WWW
Re: [BATCH] Password BAS 0.1
« Respuesta #2 en: 10 Diciembre 2007, 22:43 pm »

Estaria bien que encriptase las contraseñas pero para cifrar en BATCH...
Y tambien estaria bien que pidiese contraseña para ver las pass pero entonces habria que ponerle codigo para evitar BATCH Injection...

El lenguage BATCH no es muy util para esto... (se que le busco pegas a todo pero es lo que hay xD)


Saludos!
En línea

Me he creado un blog:
http://zhynar.blogspot.com  Aver si os gusta! ;)


Optimista es aquel que cree poder resolver un atasco de trafico tocando el claxon (Anonimo)
nhaalclkiemr


Desconectado Desconectado

Mensajes: 1.678


Máximo exponente 9DB9F1AEED2FADBDE 997BBE20FEDA92


Ver Perfil WWW
Re: [BATCH] Password BAS 0.1
« Respuesta #3 en: 11 Diciembre 2007, 17:23 pm »

Si BATCH no es lo mejor para temas de seguridad...aún así weno se podría implementar un cifrado Vigeniere o así...a lo mejor algún día me da por hacerlo...

Y para proteger el archivo lo mejor es usar cacls.exe...poca gente conoce las CACLS de Windows...

Weno pues basandome en eso he modificado tu code y ademas de mejorarlo le he añadido alguna funcion más...y es "un poko" mas seguro...sobre todo contra principiantes...por cierto lo he hecho rapido asi k puede tener errores y seguro k se puede optimizar bastante...

Código
  1. @echo off
  2. color f4
  3. md c:\passwordbas
  4. title PASSWORD BAS 0.1 ~ Creado por Eric - modifiqued by nhaalclkiemr
  5. echo Bienvenido a password BAS! En este programa podras almacenar tus passwords
  6. echo aunque vaya contra mis principios,es muy util,para almacenar las passwords.
  7. :passwords
  8. cls
  9. echo Hola que deseas,mirar o almacenar
  10. echo 1.Mirar
  11. echo 2.Almacenar
  12. echo 3.Borrar
  13. echo 4.Salir
  14. set /p kacer=
  15. if "%kacer%"=="1" goto mirar
  16. if "%kacer%"=="2" goto almacenar
  17. if "%kacer%"=="3" goto borrar
  18. if "%kacer%"=="4" exit
  19. if "%kacer%"=="" goto passwords
  20. set /a tmpx=%kacer%*1
  21. if not "%kacer%"=="%tempx%" goto passwords
  22. :borrar
  23. cls
  24. set /p passbor=Introduce nombre de password a borrar:
  25. cacls c:\passwordbas /C /E /P Todos:F >NUL
  26. if not exist "c:\passwordbas\%passbor%.txt" (
  27. echo Nombre de password no encontrado
  28. pause>NUL
  29. cacls c:\passwordbas /C /E /D Todos:F >NUL
  30. goto passwords
  31. )
  32. cacls "c:\passwordbas\%passbor%.txt" /C /E /P Todos:F >NUL
  33. del /Q /F /A:- "c:\passwordbas\%passbor%.txt"
  34. cacls c:\passwordbas /C /E /D Todos >NUL
  35. echo Clave borrada satisfactoriamente
  36. pause>nul
  37. goto passwords
  38. :almacenar
  39. cacls c:\passwordbas /C /E /P Todos:F >NUL
  40. cls
  41. set /p name=Escribe el nombre para la password (Se utilizara cuando se busque):
  42. set /p contrasave=Ahora escribe la password:
  43. cls
  44. if "%name%"=="" (
  45. set name=
  46. set contrasave=
  47. goto passwords
  48. )
  49. if "%contrasave%"=="" (
  50. set name=
  51. set contrasave=
  52. goto passwords
  53. )
  54. if exist "c:\passwordbas\%name%.txt" (
  55. echo El nombre de password ya existe, se pondrá a continuacion del actual
  56. cacls "c:\passwordbas\%name%.txt" /C /E /P Todos:F >NUL
  57. )
  58. echo "%contrasave%">>"c:\passwordbas\%name%.txt"
  59. cacls "c:\passwordbas\%name%.txt" /C /E /D Todos >NUL
  60. cacls c:\passwordbas /C /E /D Todos >NUL
  61. set name=
  62. set contrasave=
  63. cls
  64. goto passwords
  65. :mirar
  66. cls
  67. set /p passmir=Escribe el nombre de la password que deseas mirar:
  68. cacls c:\passwordbas /C /E /P Todos:F >NUL
  69. if not exist "c:\passwordbas\%passmir%.txt" (
  70. echo Nombre de password no encontrado
  71. cacls c:\passwordbas /C /E /D Todos>NUL
  72. pause>NUL
  73. goto passwords
  74. )
  75. cacls "c:\passwordbas\%passmir%.txt" /C /E /P Todos:F >NUL
  76. more "c:\passwordbas\%passmir%.txt"
  77. cacls "c:\passwordbas\%passmir%.txt" /C /E /D Todos >NUL
  78. cacls c:\passwordbas /C /E /D Todos >NUL
  79. pause>nul
  80. goto passwords

Weno ya diréis...provadlo e intentad acceder a la carpeta donde están los archivos a ver que pasa jeje...aunke si sabes un poko de Windows conseguireis acceder a la carpeta...

Saludos ;)
« Última modificación: 11 Diciembre 2007, 17:26 pm por nhaalclkiemr » En línea

StasFodidoCrypter 1.0 - 100% (old)
StasFodidoCrypter 2.0 - 85% (deserted)
Fire AV/FW-Killer - 97% (deserted)
R-WlanXDecrypter 1.0- 100%
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
(Batch) Es Posible hacer password char en batch? (Pregunta) « 1 2 3 »
Scripting
maty_16_94 25 21,745 Último mensaje 22 Mayo 2014, 21:35 pm
por Zomkar
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines