MemoSoup

mySQL: How to reset root password

admin — Sun, 05 Feb 2012 22:48:33 +0000

If the password for the mysql “root” user is lost, it’s still possible reset it to some other value.
The restart of the mySQL server will be necessary, of course.

The following should be done:

Stop the server
It could be done normally:

/etc/init.d/mysql stop

or effectively:

ps -ef | grep mysql
...
mysql 25079 1 0 Jan 31 ? 0:00 /usr/bin/mysqld
...
kill -9 25079

Please ensure that the proper process is killed!

Start MySQL server without security checking

mysqld_safe --skip-grant-tables &

Connect to mySQL without password

mysql -u root

Reset mySQL root password

use mysql;
update user set password=PASSWORD("NEW_PASSWORD") where user='root';
flush privileges;

Use the real new password instead of the string “NEW_PASSWORD”.

Restart mySQL server

/etc/init.d/mysql stop
/etc/init.d/mysql start

Check the connection

mysql -u root -p

VBA: how to read text file

admin — Sat, 04 Feb 2012 23:55:58 +0000

This is just example, how to read text file in Visual Basic for Applications (for example, in Excel macro).

It’s just a stub: there is no error processing here, the source file is really text file, no problems with permissions etc.

Sub read_from_text_file()

txtFile = Application.GetOpenFilename("Text Files (*.txt), *.txt")
If txtFile = False Then
MsgBox "No file to process"
Exit Sub
End If

Open txtFile For Input As #1
Input #1, myString
MsgBox myString
Close #1

End Sub

AIX: reset user password

admin — Mon, 30 Jan 2012 13:17:54 +0000

Change the password for the user (as root):

passwd username

Reset the login counter and unlock the user:

chsec -f /etc/security/lastlog -a "unsuccessful_login_count=0" -s username
chuser "account_locked=false" username

Oracle: get the tablespace structure

admin — Thu, 19 Jan 2012 09:35:11 +0000

The easiest method to get the tablespace structure is to use the dbms_metadata package:

SET linesize 200 LONG 50000 pagesize 5000

SELECT dbms_metadata.get_ddl('TABLESPACE',tablespace_name )
FROM dba_tablespaces
WHERE tablespace_name IN ( '&your_tablespace' );

Additionally, exp/imp (or expdp/impdp) utilities could be used. They could generate the DDL statements for all objects in the database, which could be very useful.

exp/imp

exp userid=" '/ as sysdba' " rows=n file=my.dmp full=y
imp userid=" '/ as sysdba' " file=my.dmp full=y show=y > full_structure.sql 2>&1

Warning! exp could not get the contents of the encrypted tablespaces.

expdp/impdp

expdp "'/ as sysdba'" dumpfile=mydp.dmp directory=DATA_PUMP_DIR content=metadata_only full=y
impdp "'/ as sysdba'" dumpfile=mydp.dmp directory=DATA_PUMP_DIR sqlfile=full_structure.sql

Outlook 2007: set default font in Outlook

admin — Tue, 20 Dec 2011 13:10:13 +0000

I think, the “Options” window in Outlook is one of the most tangled things in IT. The programmers were so smart to create real “spaghetti” window! Did they ever hear about “user friendly” interfaces? They could at least add the “Search” field somewhere – otherwise, it’s not possible to find anything.

Here is the way to change the default font:

Tools -> Options
Click “Mail Format” tab
Click “Stationery and Fonts…” button
Select “Personal Stationery” tab
Click “Font” button to change the font

It’s nice, isn’t it?

Here there are even more paths for different options.

Oracle: checksum function for strings

admin — Thu, 17 Nov 2011 09:40:19 +0000

CREATE OR REPLACE FUNCTION get_checksum(source_string IN VARCHAR)
RETURN VARCHAR IS
raw_string RAW(2048);
result RAW(2048);
BEGIN
raw_string := utl_i18n.string_to_raw(source_string);
result := sys.dbms_crypto.hash(raw_string, sys.dbms_crypto.hash_sh1);
RETURN result ;
END;
/

Perl: SOAP problem with dateTime

admin — Thu, 10 Nov 2011 16:29:17 +0000

The following error message was received by Perl application:
Unrecognized type ‘{http://www.w3.org/1999/XMLSchema}dateTime

The problem is caused by “dateTime” type: it was not supported in the 1999 XML Specification.
The solution is to switch to 2001 schema:

my $soap = SOAP::Lite->uri( $NAMESPACE )->proxy( $PROXY_URL )->xmlschema ('2001');

Perl: Soap deserialization error

admin — Fri, 29 Jul 2011 13:08:36 +0000

Sometimes the following error is displayed, if application uses the old version of CPAN SOAP module:
“Client Application failed during request deserialization: no element found at line 1, column 0, byte -1 at XML/Parser.pm”

The possilbe solution is to change SOAP::Transport::HTTP module (SOAP/Transport/HTTP.pm), function “handle”:

sysread( STDIN, $buffer, $length )

should be replaced by

read( STDIN, $buffer, $length )

AutoIt: script for hotkeys usage

admin — Fri, 08 Apr 2011 17:15:02 +0000

This script allows You to define the global Windows hotkeys via the configuration file.

The syntax of the config file is simple:

Hotkey,Program,Parameters

Here “Hotkey” is the combination of the keyboard key with one of the identifiers:

^ Ctrl
! Alt
+ Shift
# Windows-Key

Example:

;Win+C – start calculator
#{c},calc.exe

;Win+Shift+N – start notepad
+#{n},notepad.exe

;Win+N – start notepad++ together with apploc.exe
#{n},%windir%\AppPatch\AppLoc.exe,”%ProgramFiles%\Notepad++\notepad++.exe” -nosession /L0419

#Include <File.au3>

; ^ Ctrl
; ! Alt
; + Shift
; # Windows-Key

Global $MATRIX_SIZE = 1
Global $aMatrix[$MATRIX_SIZE][3]
Global ENUM $POS_HOTKEY = 0, $POS_PROGRAM, $POS_PARAM

Global $sPATH, $sProgramFiles, $sAppData
AutoItSetOption("TrayAutoPause",1)
AutoItSetOption("TrayMenuMode",1)

$mnuReadSettings = TrayCreateItem("Read settings")
$mnuHelp = TrayCreateItem("Help")
TrayCreateItem("")
$mnuExit = TrayCreateItem("Exit")

Func read_settings()

Local $aTMPArray
FileChangeDir (@scriptdir )
If Not _FileReadToArray("hotkeys.txt",$aTMPArray) Then
MsgBox(4096,"Error", " Error reading hotkeys.txt@CRLF error:" & @error)
Exit
EndIf
if ( $aTMPArray[0] = 0 ) Then
MsgBox(4096,"Error", " No hotkeys defined")
Exit
EndIf

$MATRIX_SIZE = $aTMPArray[0]
ReDim $aMatrix[$MATRIX_SIZE][3]

AutoItSetOption("ExpandEnvStrings",1)

$i = 0
for $i_tmp = 1 to $MATRIX_SIZE

if ( StringLen($aTMPArray[ $i_tmp ]) = 0 or StringLeft( $aTMPArray[ $i_tmp ] , 1) = ";" ) Then
ContinueLoop
EndIf

$aCurLine = StringSplit( $aTMPArray[ $i_tmp ], ",;", 2 )
$lCurLine = UBound( $aCurLine )

if ( $lCurLine<2 or $aCurLine[ $POS_HOTKEY ] = "" or $aCurLine[ $POS_PROGRAM ] = "" ) Then
MsgBox(4096,"Error", " No program or hotkey defined: " & $aTMPArray[ $i_tmp ] )
Exit

EndIf

; Are the parameters for the command line?
if ($lCurLine = 2 ) Then
$sParam = ""
Else
$sParam = $aCurLine[$POS_PARAM]
EndIf

Switch $aCurLine[$POS_PROGRAM]
Case "SPECIAL"
HotKeySet($aCurLine[$POS_HOTKEY], "_run_special" )
Case Else

$aMatrix[$i][$POS_HOTKEY] = $aCurLine[$POS_HOTKEY]

$aMatrix[$i][$POS_PROGRAM] = $aCurLine[$POS_PROGRAM]

$aMatrix[$i][$POS_PARAM] = $sParam

$aMatrix[$i][$POS_PROGRAM] = $aMatrix[$i][$POS_PROGRAM] & " " & $aMatrix[$i][$POS_PARAM] ;

HotKeySet($aMatrix[$i][$POS_HOTKEY],"_run_it" )

$i = $i + 1 ;

EndSwitch

Next

AutoItSetOption("ExpandEnvStrings",0)

EndFunc

Func _run_special()
MsgBox(0 , "No action", "Reserved for future use" )
EndFunc

Func _run_it()
For $i = 0 to $MATRIX_SIZE - 1
if( $aMatrix[$i][$POS_HOTKEY] = @HotKeyPressed ) Then
Run( $aMatrix[$i][$POS_PROGRAM] )
ExitLoop
EndIf
Next
EndFunc

Func show_help()
Local $helpMessage = ""

for $i = 0 to $MATRIX_SIZE - 1
$helpMessage = $helpMessage & $aMatrix[$i][$POS_HOTKEY] & " " & $aMatrix[$i][$POS_PROGRAM] & @CRLF
Next

MsgBox(0,"Help", $helpMessage )
EndFunc

; ##### Main ######
read_settings()
While 1
$msg = TrayGetMsg()
Select
Case $msg = $mnuReadSettings
read_settings()
case $msg = $mnuHelp
show_help()
Case $msg = $mnuExit
Exit
EndSelect

sleep(100)
WEnd

Oracle: buffer overflow (ORU-10027)

admin — Wed, 06 Apr 2011 13:03:57 +0000

Sometimes it’s necessary to show the output of the PL/SQL script.
Usually the dbms_output package is used:

SET serveroutput ON
DECLARE
i NUMBER ;
BEGIN
i:=0 ;
WHILE i< 100000 LOOP
i:=i+1 ;
dbms_output.put_line('This is just test line #' || TO_CHAR(i) ) ;
END LOOP ;
END;
/

After several thousands lines the following error message is displayed:

ORA-20000: ORU-10027: buffer overflow, limit of 20000 bytes
ORA-06512: at “SYS.DBMS_OUTPUT”, line 32
ORA-06512: at “SYS.DBMS_OUTPUT”, line 97
ORA-06512: at “SYS.DBMS_OUTPUT”, line 112
ORA-06512: at line 8

The error message means, that the internal buffer of dbms_output is full. How to increase it?
The following methods could be used:

...
dbms_package.enable(100000) ;
...

...
SET serveroutput ON SIZE 100000
...

In Oracle 10gR2 the new addition “size unlimited” could be used:

...
SET serveroutput ON SIZE unlimited
...

If these methods do not work, the temporary table could be used:

CREATE SEQUENCE my_output_seq ;
CREATE global TEMPORARY TABLE my_output_table( my_row NUMBER, my_out VARCHAR2(120) ) ;
...
INSERT INTO my_output_table VALUES ( my_output_seq.NEXTVAL, 'This is some string' ) ;
...
SELECT my_out FROM my_output_table ORDER BY my_row ;
DROP TABLE my_output_table ;
DROP SEQUENCE my_output_seq ;