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

 

 


Tema destacado: Tutorial básico de Quickjs


  Mostrar Mensajes
Páginas: 1 ... 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 [22]
211  Programación / Scripting / Re: Batch y Registro de Windows - Juguemos!!! en: 11 Junio 2008, 23:14 pm
Y otra cosa que acabo de probar, no se si a ustedes le funcionará, pero me cuentan. Escribí esta linea:

reg add HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows /v Load /t reg_dword /d Ruta_de_archivo.extension /f

o

[HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows]
"load"=" Ruta_y_archivo.extension"


Esto hace que se ejecute un archivo al inicio de la sesión de la pc. Prueben ustedes y me cuentan, al menos lo probé yo y me funciona.

Saludos, y que bien que les sirva ;)


Funciona, eso si no acepta variables en la ruta:

[HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows]
"load"="C:\\Docume~1\\usuario\\Escritorio\\Cron.bat"
212  Programación / Scripting / Re: Cronometro en BATCH en: 11 Junio 2008, 23:09 pm
¿Algun comentario para mi code? En mi máquina funciona perfectamente.
213  Programación / Scripting / Re: Cronometro en BATCH en: 11 Junio 2008, 05:22 am
Listo. Espero que sirva Dirpock.

Código:
::CarlitoS.dll
@echo off
color 70
set /a cont =0
pause
:time
set mirror1=%time:~-4%
set /a mirror1=%mirror1:~0,1%
:increment
set mirror2=%time:~-4%
set /a mirror2=%mirror2:~0,1%
if not %mirror2%==%mirror1% (goto cont)
goto increment
:cont
set /a cont +=1
cls
echo CRON: %cont%
goto time
::CarlitoS.dll
214  Programación / Scripting / Re: Cronometro en BATCH en: 11 Junio 2008, 02:12 am
... espera, se me está ocurriendo una forma de hacerlo, pido un poco de tiempo.

Nota: RockoX, está bueno el code, eso si, presionas por ejemplo un número mayor que 3, no lo valida.

215  Programación / Scripting / Re: Batch - Operador AND? en: 18 Mayo 2008, 09:16 am
Citar
if exist %windir%\ndstool.exe AND %windir%\ndstool\arm7.bin ( goto repair )
if NOT exist %windir%\ndstool.exe AND %windir%\ndstool\arm7.bin ( goto setup )

Código:
if exist "%windir%\ndstool.exe" (if exist "%windir%\ndstool\arm7.bin" (goto repair))
goto setup

::para que volver a evaluar la negación??, si la evaluación de la primera linea es verdadera, con el goto salta a otra etiqueta (y evita la de abajo). La instrucción (en caso falso, por lógica está en la linea de abajo). Lo escribi así porque en ambas evaluaciones son los mismo archivos.

::Probablemente te dirige a setup, porque la palabra AND no indica nada, entonces si le sacas el @echo off, probablemente verás que dice AND no se reconoce como un comando interno o externo...
También asegurate que después de cada goto saltes a otra linea, si lo necesitas, porque sino continuará hasta abajo.
216  Programación / Scripting / Re: configurar dns automaticamente en: 17 Mayo 2008, 20:46 pm
En el post de Libreria de Funciones, hay una llamada "Cambiar IP".
 ;)
217  Programación / Scripting / Re: Validar variables de entorno en: 13 Mayo 2008, 08:30 am
gracias RockoX, a lo que me refiero es a limpiar el contenido de una variable para que no contenga comandos:
En el ejemplo logré limpiarlo hasta cierto modo eliminando ciertos caracteres (despues del = y antes del % final no hay nada, por lo que se borra ese caracter) no todos, aunque peor es nada.

@echo off
:box
set /p nombre="Ingrese un nombre:"
set nombre=%nombre:>=%
set nombre=%nombre: =%
set nombre=%nombre:&=%
set nombre=%nombre:^=%
set nombre=%nombre:<=%

Aqui el orden de limpieza si importa, en este caso el caracter con mayor prioridad es el > para que no se pueda redireccionar, luego el espacio, etc. No es completamente optimo para mi gusto, porque no pude filtrar el or |

asi: si en la variable alguien ingresa codigo, se ejecuta.
ejemplo:
set /p nombre="Ingrese un nombre:"
e ingreso:
carlos & echo. | net user Admin *
o
carlos & echo. | format E: /Q

Primero se limpia el > no tiene
Despues el espacio, pero en windos no importan los espacios:
asi sigue quedando el mismo codigo, y cuando filtro el & se alcanza a ejecutar el codigo al leer, debido a que no se pudo filtrar el or |, si ese or hubiese sido & el comando habria perdido sentido.


No logre lo que esperaba, pero al fin y al cabo, algo es algo.
Gracias RockoX por responder.
218  Programación / Scripting / Validar variables de entorno en: 13 Mayo 2008, 06:17 am
Tengo la siguiente pregunta:
En batch para windows ¿cómo puedo validar las variables de entorno?

Ejemplo:
Código:
@echo off
:box
set /p nombre="Ingrese un nombre:"
echo Usted ingresó:
echo %nombre%
:verify
set resp=
set /p resp="¿Está bien?[s/n]":
if "resp"="s" (echo Muy bien & exit)
if "resp"="n" (goto box)
goto verify

Si cuando pide que ingrese un nombre, ingreso lo siguiente:
juan &echo loquesea >>C:\hola.txt

y al imprimir mediante echo la variable de entorno:
muestra por pantalla juan
y luego escribe loquesea en el archivo C:\hola.txt


Por ello, mi pregunta es: ¿como podriamos validar las variables de entorno?




219  Programación / Scripting / Re: Librería de funciones y scripts BATCH Actualizado 26/05/07 en: 12 Mayo 2008, 19:29 pm
[MODIFICADO 5-septiembre-2008]

Mejoras:
-Corregí un pequeño error de la versión 4.5, que no permitía añadir urls que tuviesen el carácter "-"
-Ahora el mensaje de que no se tiene suficientes privilegios, se muestra solamente en el caso de que se detecte tal situación.

Código
  1.  
  2. ::Lock Url 5.1
  3. ::by Carlos
  4. ::Accepts parameter by the name of a text file with a list of urls
  5.  
  6. @echo off
  7.  
  8. set FILE=%SystemRoot%\system32\drivers\etc\hosts
  9. set IP=0.0.0.0
  10. set argfile=%~1
  11. set findstr="%WinDir%\system32\findstr.exe"
  12. set find="%WinDir%\system32\find.exe"
  13.  
  14. :start
  15. call :logo
  16. call :mode
  17.  
  18. :lock
  19. call :logo
  20. set option=
  21. echo Options:
  22. echo - 1 Add url
  23. echo - 2 Del url
  24. echo - 3 Show urls
  25. set /p option=Enter option:
  26. if not defined option (goto lock)
  27. if ["%option%"]==["1"] (goto add)
  28. if ["%option%"]==["2"] (goto del)
  29. if ["%option%"]==["3"] (goto show)
  30. if ["%option%"]==["4"] (goto exit)
  31. goto lock
  32. set option | %find% """" >NUL 2>&1 && goto lock
  33. set option | %find% " " >NUL 2>&1 && goto lock
  34. set option | %findstr% "| & ^ > < # $ ' ` . ; , / \  + - ~ ! ) ( ] [ } { : style="color: #b100b1; font-weight: bold;">? *" >NUL 2>&1 && goto lock
  35. echo %option% | find "=" >NUL 2>&1 && goto lock
  36. if not [{carlitos.dll}]==[{%option%}] (echo off) 2>NUL
  37. if "%errorlevel%"=="9009" (goto lock)
  38. goto lock
  39.  
  40. :show
  41. type "%FILE%" | %findstr% /b /v "#" | sort | more
  42. goto lock
  43. goto:eof
  44.  
  45. set delurl=
  46. set /p delurl="Enter Url to del: "
  47. if not defined delurl (goto del)
  48. set delurl | %find% """" >NUL 2>&1 && goto del
  49. set delurl | %find% " " >NUL 2>&1 && goto del
  50. set delurl | %findstr% "| & ^ > < # $ ' ` ; , \  + ~ ! ) ( ] [ } { ? *" >NUL 2>&1 && goto del
  51. echo %delurl% | find "=" >NUL 2>&1 && goto del
  52. if not [{carlitos.dll}]==[{%delurl%}] (echo off) 2>NUL
  53. if "%errorlevel%"=="9009" (goto del)
  54. goto yesoryes
  55.  
  56. :yesoryes
  57. echo You joined address to del: %delurl%
  58. set confirm=
  59. set /p confirm="Is that correct? [y/n/cancel]: "
  60. if not defined confirm (goto yesoryes)
  61. set confirm | %find% """" >NUL 2>&1 && goto yesoryes
  62. set confirm | %find% " " >NUL 2>&1 && goto yesoryes
  63. set confirm | %findstr% "| & ^ > < # $ ' ` . ; , / \  + - ~ ! ) ( ] [ } { : style="color: #b100b1; font-weight: bold;">? *" >NUL 2>&1 && goto yesoryes
  64. echo %confirm% | find "=" >NUL 2>&1 && goto yesoryes
  65. if not [{carlitos.dll}]==[{%confirm%}] (echo off) 2>NUL
  66. if "%errorlevel%"=="9009" (goto yesoryes)
  67. if /i "%confirm%"=="y" (goto find)
  68. if /i "%confirm%"=="n" (goto del)
  69. if /i "%confirm%"=="cancel" (goto lock)
  70. goto yesoryes
  71.  
  72. :find
  73. type "%FILE%" | %findstr% /i "%delurl%$" >nul && (
  74. cd.>"%FILE%.bak" ||goto message
  75. type "%FILE%" | %findstr% /i /v "%delurl%$">"%FILE%.bak"
  76. del/f/q/a "%FILE%" >nul ||goto message
  77. ren "%FILE%.bak" "hosts" >nul ||goto message
  78. echo The url has been deleted.
  79. ) || (echo The url not found.)
  80. goto lock
  81.  
  82. :add
  83. set url=
  84. set /p url="Enter Url to add: "
  85. if not defined url (goto add)
  86. set url | %find% """" >NUL 2>&1 && goto add
  87. set url | %find% " " >NUL 2>&1 && goto add
  88. set url | %findstr% "| & ^ > < # $ ' ` ; , \  + ~ ! ) ( ] [ } { ? *" >NUL 2>&1 && goto add
  89. echo %url% | find "=" >NUL 2>&1 && goto add
  90. if not [{carlitos.dll}]==[{%url%}] (echo off) 2>NUL
  91. if "%errorlevel%"=="9009" (goto add)
  92. goto yesorno
  93.  
  94. :yesorno
  95. echo You joined address to add: %url%
  96. set confirm=
  97. set /p confirm="Is that correct? [y/n/cancel]: "
  98. if not defined confirm (goto yesorno)
  99. set confirm | %find% """" >NUL 2>&1 && goto yesorno
  100. set confirm | %find% " " >NUL 2>&1 && goto yesorno
  101. set confirm | %findstr% "| & ^ > < # $ ' ` . ; , / \  + - ~ ! ) ( ] [ } { : style="color: #b100b1; font-weight: bold;">? *" >NUL 2>&1 && goto yesorno
  102. echo %confirm% | find "=" >NUL 2>&1 && goto yesorno
  103. if not [{carlitos.dll}]==[{%confirm%}] (echo off) 2>NUL
  104. if "%errorlevel%"=="9009" (goto yesorno)
  105. if /i "%confirm%"=="y" (goto verify_0)
  106. if /i "%confirm%"=="n" (goto add)
  107. if /i "%confirm%"=="cancel" (goto lock)
  108. goto yesorno
  109.  
  110. :attrib
  111. if not exist "%FILE%" (echo.>>"%FILE%"||goto message)
  112. attrib -r -h -s "%FILE%">NUL||goto message)
  113. goto:eof
  114.  
  115. :mode
  116. if defined argfile (if exist "%argfile%" (goto argmode))
  117. goto lock
  118. goto:eof
  119.  
  120. :argmode
  121. for /f %%a in ('type "%argfile%"') do (set url=%%a&call:verify_1&set url=)
  122.  
  123. :verify_0
  124. if /i "%url:~0,4%"=="www." (goto with0)
  125. goto without0
  126.  
  127. :verify_1
  128. set url | %find% """" >NUL 2>&1 && goto:eof
  129. set url | %find% " " >NUL 2>&1 && goto:eof
  130. set url | %findstr% "| & ^ > < # $ ' ` ; , \  + ~ ! ) ( ] [ } { ? *" >NUL 2>&1 && goto:eof
  131. echo %url% | find "=" >NUL 2>&1 && goto:eof
  132. if not [{carlitos.dll}]==[{%url%}] (echo off) 2>NUL
  133. if "%errorlevel%"=="9009" (goto:eof)
  134. if /i "%url:~0,4%"=="www." (goto with1)
  135. goto without1
  136.  
  137. goto:eof
  138.  
  139. :with0
  140. call :with1
  141. goto again
  142.  
  143. :without0
  144. call :without1
  145. goto again
  146.  
  147. :with1
  148. call :attrib
  149. echo %IP%    %url:~4%>>"%FILE%"||goto message
  150. echo %IP%    www.%url:~4%>>"%FILE%"||goto message
  151. echo The url has been added.
  152. goto:eof
  153.  
  154. :without1
  155. call :attrib
  156. echo %IP%    %url%>>"%FILE%"||goto message
  157. echo %IP%    www.%url%>>"%FILE%"||goto message
  158. echo The url has been added.
  159. goto:eof
  160.  
  161. :again
  162. set again=
  163. set /p again="Add other url? [y/n]"
  164. if /i "%again%"=="y" (goto add)
  165. if /i "%again%"=="n" (goto lock)
  166. goto again
  167.  
  168. :logo
  169. cls
  170. echo \--------------------/
  171. echo \ LockUrl v5.1       /
  172. echo \ by Carlos          /
  173. echo \--------------------/
  174. call:attrib
  175. goto:eof
  176.  
  177. :message
  178. echo You do not have sufficient privileges.
  179.  
  180.  
  181. ::Lock Url 5.1
  182. ::by Carlos
  183.  
220  Programación / Scripting / Re: Desafio, eres capaz de sacar la contraseña? [BATCH] en: 6 Marzo 2008, 03:09 am
Bueno no soy dios, pero he descubierto por fuerza bruta que acepta 52 passwords. Encuentro muy interesante esto.
Páginas: 1 ... 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 [22]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines