Monday, January 5, 2009
Tuesday, November 11, 2008
Sony-Ericsson K610i + HBH-DS970, a Linux users experience
Sony-Ericsson K610i + HBH-DS970, a Linux users experience
This isn't a full review of either the phone nor the stereo Bluetooth headset, for a detailed report with pictures and the works read: mobile-review.com k610i and bengalboy about the HBH-DS970 headset
The K610i is 3G candybar feature-phone (not smartphone) with Bluetooth 2.0 , 2 MegaPixel camera and a low-res. camera in the front for video calls.
The kind of phone I was looking for should have:
It came without headphones. I didn't bother buying a wired, and pretty expensive, Sony-Ericsson stereo headphone, but ordered the HBH-DS970 A2DP stereo Bluetooth headphones from Expansys.
The mediaplayer application on the K610i is definitely more geared towards music and doesn't support podcasts at all, neither does the windows software that came with it. You can create playlists on the phone but those are not saved as files.
In good Sony-Ericsson style the phone is fully standard compliant, supporting the OBEX Object Exchange protocol over Bluetooth, Infrared (IrDA) and USB connections. Among the supported OBEX methods is ObexFTP, obex push and SyncML over OBEX. This is good news for us Linux users since it insures compatibility with free and opensource software.
Browsing files on the phone can be done in 2 ways, Mass-storage device mode or OBEX transfer. Both have advantages and disadvantages.
The mass-storage mode is fast, using the phone as a USB2.0 card reader for the Memory Stick Micro inside. The biggest problem with this approach is that none of the phone functions are available while in mass-storage mode, so no phone-calls or listening to music. Also, on time of writing, the USB mass-storage driver in the ubuntu 6.06 shipped kernel fails to write all blocks to the MSMicro card, resulting a data loss and preventing safe unmounting. This will probably be fixed in more recent kernels.
I use a recent version of OpenObex to transfer podcast episodes to the phone with ObexFTP over USB2.0. This allows all phone functions to be used while transfering files. It is the same method used by the File Manager that's part of the windows software suit. Transfers over OBEX are slower though, just over 1 MB per second. Meaning a 30 MB file, quite common for a podcast would take almost half a minute. This is no problem for me because I use the USB cable to charge the phone and letting it transfer the files while doing other things. But I can imagine the frustration when you would like to quickly transfer a few files before leaving.
I automated the transfer of podcasts to the phone using a Python script [link to script]. In Amarok I copy the files to a temporary folder using the generic mediadevice plugin, after which the script is used as the post-disconnect command (see screenshot). Transfered files are deleted from the tmp folder.
On my todo list is a Java 2 Mobile Edition application for playing audio files that maintains a playlist and a supporting mediadevice plugin. The idea is that played files are removed from the playlist. The Amarok plugin can then delete the old episodes from the phone and mark the as listened in the database.
If anyone want to volunteer for writing the J2ME player, the mediadevice plugin or improving the transfer script, send me a mail at bart [.] cerneels [@] gmail [.] com.
Suggestions are welcome in the comments (moderated for SPAM reasons).
souce : http://amarok.kde.org/blog/archives/263-Sony-Ericsson-K610i-+-HBH-DS970,-a-Linux-users-experience.html
The K610i is 3G candybar feature-phone (not smartphone) with Bluetooth 2.0 , 2 MegaPixel camera and a low-res. camera in the front for video calls.
The kind of phone I was looking for should have:
- A2DP support for using a stereo Bluetooth headset.
- camera >= 2.0 MegaPixel
- media player application (guess that comes with the A2DP)
- preferably a smartphone for replacing the mediaplayer if necessary.
It came without headphones. I didn't bother buying a wired, and pretty expensive, Sony-Ericsson stereo headphone, but ordered the HBH-DS970 A2DP stereo Bluetooth headphones from Expansys.
A quick explanation about A2DP:I've been using both devices for over a month now, mostly for listening to podcasts. So far I'm very pleased with them. The headsets battery last a least a full day with about 3 hours of listening, half an hour of talking and the rest in stand-by. I wasn't expecting anything more of a small necklace like device weighing only 27 grams.
The Advance Audio Distribution Profile is a recent addition to the standardized Bluetooth profiles and is possible to implement on devices with Bluetooth 1.2 or higher. It allows CD quality stereo sound to be send from a A2DP source (the phone) to a A2DP sink (the stereo-headset). In addition to that most A2DP capable devices support the Audio/Video Remote Control Profile support (AVRCP) which allows the mediaplayer to be controlled using the headsets build in buttons.
The mediaplayer application on the K610i is definitely more geared towards music and doesn't support podcasts at all, neither does the windows software that came with it. You can create playlists on the phone but those are not saved as files.
In good Sony-Ericsson style the phone is fully standard compliant, supporting the OBEX Object Exchange protocol over Bluetooth, Infrared (IrDA) and USB connections. Among the supported OBEX methods is ObexFTP, obex push and SyncML over OBEX. This is good news for us Linux users since it insures compatibility with free and opensource software.
Browsing files on the phone can be done in 2 ways, Mass-storage device mode or OBEX transfer. Both have advantages and disadvantages.
The mass-storage mode is fast, using the phone as a USB2.0 card reader for the Memory Stick Micro inside. The biggest problem with this approach is that none of the phone functions are available while in mass-storage mode, so no phone-calls or listening to music. Also, on time of writing, the USB mass-storage driver in the ubuntu 6.06 shipped kernel fails to write all blocks to the MSMicro card, resulting a data loss and preventing safe unmounting. This will probably be fixed in more recent kernels.
I use a recent version of OpenObex to transfer podcast episodes to the phone with ObexFTP over USB2.0. This allows all phone functions to be used while transfering files. It is the same method used by the File Manager that's part of the windows software suit. Transfers over OBEX are slower though, just over 1 MB per second. Meaning a 30 MB file, quite common for a podcast would take almost half a minute. This is no problem for me because I use the USB cable to charge the phone and letting it transfer the files while doing other things. But I can imagine the frustration when you would like to quickly transfer a few files before leaving.
I automated the transfer of podcasts to the phone using a Python script [link to script]. In Amarok I copy the files to a temporary folder using the generic mediadevice plugin, after which the script is used as the post-disconnect command (see screenshot). Transfered files are deleted from the tmp folder.
On my todo list is a Java 2 Mobile Edition application for playing audio files that maintains a playlist and a supporting mediadevice plugin. The idea is that played files are removed from the playlist. The Amarok plugin can then delete the old episodes from the phone and mark the as listened in the database.
If anyone want to volunteer for writing the J2ME player, the mediadevice plugin or improving the transfer script, send me a mail at bart [.] cerneels [@] gmail [.] com.
Suggestions are welcome in the comments (moderated for SPAM reasons).
souce : http://amarok.kde.org/blog/archives/263-Sony-Ericsson-K610i-+-HBH-DS970,-a-Linux-users-experience.html
Thursday, September 25, 2008
Starting Mysql on Slackware 12
My first hurdle was getting mysql to start.. I kept getting a nohup error and it wasn’t allowed to connect to the mysql socket. First things first, permissions and users.. make sure the server isn’t running:
good luck
ps xa | grep mysql
You should only see your grep process in the list of processes and you’re good to move on.
sudo chown -R mysql:mysql /var/lib/mysql/
sudo chown -R mysql:mysql /var/run/mysql/
Next we need to get our config in place:
sudo mv /etc/my-small.cnf /etc/my.cnf
After that we can run the database installer:
sudo /usr/bin/mysql_install_db
Once that is complete, we can start up the server:
sudo /usr/share/mysql/mysql.server start
We’ll also want to move the mysql script to our rc.d folder so that it can be started upon boot:
sudo cp /usr/share/mysql/mysql.server /etc/rc.d/rc.mysql
sudo chmod 644 /etc/rc.d/rc.mysql
Lastly we’ll create a new password for the root user in mysql:
sudo /usr/bin/mysqladmin -u root password 'your password here'good luck
Tuesday, September 23, 2008
VB Object Printing
should be stated that there are several options for printing reports through a Visual Basic program – reports can be created through a "report designer" application such as Crystal Reports, the VB Data Report Designer, the MS-Access Reports feature, and third-party products such as Active Reports; the functionality of MS-Excel and MS-Word can also be harnessed to print from VB. Still, there are times when a basic plain-text printout will do just fine, and the overhead of the aforementioned products is not necessary. The native VB Printer object can be used to produce a basic plain-text printout with low processing overhead. While the Printer object can be used to produce "fancy" printouts with various graphics, lines, boxes, and a mixture of fonts, we're having none of that here.
This sample application produces an "old school" plain text report with one font, Courier New 10 point. With a monospaced font like Courier, we can determine the number of characters that will fit on one line and the number of lines that will fit on one page. By knowing the number of characters that can fit on one line, we can plan the format of the data to be presented. By knowing the number of lines that will fit on one page, we can use logic to perform page breaks and print headings when a page fills up with data. Assuming a standard page size of 8 ½ by 11, we can fit approximately 80 characters per line (with extra characters for a left margin), and 60 lines per page (with extra lines for a top margin).
The application reads in a comma-delimited text file of customer records. Each record contains the following fields: last name, first name, address, city, state, and zip code. The determination for how these fields are to be laid out on the printed line is as follows: 19 characters for the first and last name combined, 1 space separator, 26 characters for the address, 1 space separator, 23 characters for the city, 1 space separator, 2 characters for the state, 2 space separator, 5 characters for the zip code. Main headings with date, time, and page number as well as column headings will appear at the top of each page. An excerpt of the printed report is shown below:
Print Date: 04/13/05 THE VBPROGRAMMER.COM Page: 1
Print Time: 22:32:12 CUSTOMER LIST
CUSTOMER NAME ADDRESS CITY ST ZIP
------------- ------- ---- -- ---
Dorothy Durgan 900 Fergusson Fountain Fousmarck IL 94815
Liana Donnelly 210 Chapman Way Ontamden KY 76925
Carolyn Ullrich 310 Charm Gardens Camdeven LA 80590
Lavonne Hamill 520 Carnegy Circle Champacoma RI 13211
Brandi Davis 520 Esplanade Park Long Camderden ID 02841
Rocco Emard 520 Redmond Avenue Clevernton KS 04223
Lilliana Becker 430 Carnac Drive Norfowtucket AR 14962
Jaquelin King 340 Christmas Drive Evansvivis MI 41296
Emmy Walter 440 Chapman End Norwaron WI 84848
Abril Hahn 840 Library Close Bouldegas Plains KS 79763
Ashtyn Conn 940 Semantic Avenue Bristopeka Vista RI 10534
Reba Watsica 150 Portuguese Circle Councintation TX 93872
Michel Crooks 550 Old Stage Circle Coraston NE 39978
Wilda Bogisich 460 Marine Street Cloviple MI 19259
Bethel Mosciski 660 Sunset Hill Close Roanoma LA 66311
Wyman Spencer 670 Chichester View Loracisco TX 08508
Josiah Hettinger 770 Massen Lane Santa Fullesburg AL 13986
Felicia Jacobs 870 Military Fountain Renolsom AK 24264
Gladyce Conn 580 Gravel Pit Park Comptonix ND 66546
Donnie Auer 880 New Queens Way Washinnetonka HI 07913
Tito Hirthe 980 Bastion Road West Rialtodondo AK 36004
Ulises Satterfield 190 North Williston Park St.Huntsviswell ND 80783
Bailey Sauer 290 Carnac Avenue Austircester MD 94335
Liam Bednar 890 River Cove Fountain Ogdeson LA 69744
The user interface isn't much to speak of. There are two command buttons: "Print Customer List", which causes the above report to be printed, and an "Exit" button which ends the application.
The commented code for this application is shown below. A handful of techniques are introduced here which have not been covered in the previous tutorials, but will be in later tutorials.
Option Explicit
'-----------------------------------------------------------------------------
Private Sub cmdPrint_Click()
'-----------------------------------------------------------------------------
Dim intLineCtr As Integer
Dim intPageCtr As Integer
Dim intX As Integer
Dim strCustFileName As String
Dim strBackSlash As String
Dim intCustFileNbr As Integer
Dim strFirstName As String
Dim strLastName As String
Dim strAddr As String
Dim strCity As String
Dim strState As String
Dim strZip As String
Const intLINE_START_POS As Integer = 6
Const intLINES_PER_PAGE As Integer = 60
' Have the user make sure his/her printer is ready ...
If MsgBox("Make sure your printer is on-line and " _
& "loaded with paper.", vbOKCancel, "Check Printer") = vbCancel _
Then
Exit Sub
End If
' Set the printer font to Courier, if available (otherwise, we would be
' relying on the default font for the Windows printer, which may or
' may not be set to an appropriate font) ...
For intX = 0 To Printer.FontCount - 1
If Printer.Fonts(intX) Like "Courier*" Then
Printer.FontName = Printer.Fonts(intX)
Exit For
End If
Next
Printer.FontSize = 10
' initialize report variables ...
intPageCtr = 0
intLineCtr = 99 ' initialize line counter to an arbitrarily high number
' to force the first page break
' prepare file name & number
strBackSlash = IIf(Right$(App.Path, 1) = "\", "", "\")
strCustFileName = App.Path & strBackSlash & "customer.txt"
intCustFileNbr = FreeFile
' open the input file
Open strCustFileName For Input As #intCustFileNbr
' read and print all the records in the input file
Do Until EOF(intCustFileNbr)
' read a record from the input file and store the fields there into VB variables
Input #intCustFileNbr, strLastName, strFirstName, strAddr, strCity, strState, strZip
' if the number of lines printed so far exceeds the maximum number of lines
' allowed on a page, invoke the PrintHeadings subroutine to do a page break
If intLineCtr > intLINES_PER_PAGE Then
GoSub PrintHeadings
End If
' print a line of data
Printer.Print Tab(intLINE_START_POS); _
strFirstName & " " & strLastName; _
Tab(21 + intLINE_START_POS); _
strAddr; _
Tab(48 + intLINE_START_POS); _
strCity; _
Tab(72 + intLINE_START_POS); _
strState; _
Tab(76 + intLINE_START_POS); _
strZip
' increment the line count
intLineCtr = intLineCtr + 1
Loop
' close the input file
Close #intCustFileNbr
' Important! When done, the EndDoc method of the Printer object must be invoked.
' The EndDoc method terminates a print operation sent to the Printer object,
' releasing the document to the print device or spooler.
Printer.EndDoc
cmdExit.SetFocus
Exit Sub
' internal subroutine to print report headings
'------------
PrintHeadings:
'------------
' If we are about to print any page other than the first, invoke the NewPage
' method to perform a page break. The NewPage method advances to the next
' printer page and resets the print position to the upper-left corner of the
' new page.
If intPageCtr > 0 Then
Printer.NewPage
End If
' increment the page counter
intPageCtr = intPageCtr + 1
' Print 4 blank lines, which provides a for top margin. These four lines do NOT
' count toward the limit of 60 lines.
Printer.Print
Printer.Print
Printer.Print
Printer.Print
' Print the main headings
Printer.Print Tab(intLINE_START_POS); _
"Print Date: "; _
Format$(Date, "mm/dd/yy"); _
Tab(intLINE_START_POS + 31); _
"THE VBPROGRAMMER.COM"; _
Tab(intLINE_START_POS + 73); _
"Page:"; _
Format$(intPageCtr, "@@@")
Printer.Print Tab(intLINE_START_POS); _
"Print Time: "; _
Format$(Time, "hh:nn:ss"); _
Tab(intLINE_START_POS + 33); _
"CUSTOMER LIST"
Printer.Print
' Print the column headings
Printer.Print Tab(intLINE_START_POS); _
"CUSTOMER NAME"; _
Tab(21 + intLINE_START_POS); _
"ADDRESS"; _
Tab(48 + intLINE_START_POS); _
"CITY"; _
Tab(72 + intLINE_START_POS); _
"ST"; _
Tab(76 + intLINE_START_POS); _
"ZIP"
Printer.Print Tab(intLINE_START_POS); _
"-------------"; _
Tab(21 + intLINE_START_POS); _
"-------"; _
Tab(48 + intLINE_START_POS); _
"----"; _
Tab(72 + intLINE_START_POS); _
"--"; _
Tab(76 + intLINE_START_POS); _
"---"
Printer.Print
' reset the line counter to reflect the number of lines that have now
' been printed on the new page.
intLineCtr = 6
Return
End Sub
'-----------------------------------------------------------------------------
Private Sub cmdExit_Click()
'-----------------------------------------------------------------------------
End
End Sub
This sample application produces an "old school" plain text report with one font, Courier New 10 point. With a monospaced font like Courier, we can determine the number of characters that will fit on one line and the number of lines that will fit on one page. By knowing the number of characters that can fit on one line, we can plan the format of the data to be presented. By knowing the number of lines that will fit on one page, we can use logic to perform page breaks and print headings when a page fills up with data. Assuming a standard page size of 8 ½ by 11, we can fit approximately 80 characters per line (with extra characters for a left margin), and 60 lines per page (with extra lines for a top margin).
The application reads in a comma-delimited text file of customer records. Each record contains the following fields: last name, first name, address, city, state, and zip code. The determination for how these fields are to be laid out on the printed line is as follows: 19 characters for the first and last name combined, 1 space separator, 26 characters for the address, 1 space separator, 23 characters for the city, 1 space separator, 2 characters for the state, 2 space separator, 5 characters for the zip code. Main headings with date, time, and page number as well as column headings will appear at the top of each page. An excerpt of the printed report is shown below:
Print Date: 04/13/05 THE VBPROGRAMMER.COM Page: 1
Print Time: 22:32:12 CUSTOMER LIST
CUSTOMER NAME ADDRESS CITY ST ZIP
------------- ------- ---- -- ---
Dorothy Durgan 900 Fergusson Fountain Fousmarck IL 94815
Liana Donnelly 210 Chapman Way Ontamden KY 76925
Carolyn Ullrich 310 Charm Gardens Camdeven LA 80590
Lavonne Hamill 520 Carnegy Circle Champacoma RI 13211
Brandi Davis 520 Esplanade Park Long Camderden ID 02841
Rocco Emard 520 Redmond Avenue Clevernton KS 04223
Lilliana Becker 430 Carnac Drive Norfowtucket AR 14962
Jaquelin King 340 Christmas Drive Evansvivis MI 41296
Emmy Walter 440 Chapman End Norwaron WI 84848
Abril Hahn 840 Library Close Bouldegas Plains KS 79763
Ashtyn Conn 940 Semantic Avenue Bristopeka Vista RI 10534
Reba Watsica 150 Portuguese Circle Councintation TX 93872
Michel Crooks 550 Old Stage Circle Coraston NE 39978
Wilda Bogisich 460 Marine Street Cloviple MI 19259
Bethel Mosciski 660 Sunset Hill Close Roanoma LA 66311
Wyman Spencer 670 Chichester View Loracisco TX 08508
Josiah Hettinger 770 Massen Lane Santa Fullesburg AL 13986
Felicia Jacobs 870 Military Fountain Renolsom AK 24264
Gladyce Conn 580 Gravel Pit Park Comptonix ND 66546
Donnie Auer 880 New Queens Way Washinnetonka HI 07913
Tito Hirthe 980 Bastion Road West Rialtodondo AK 36004
Ulises Satterfield 190 North Williston Park St.Huntsviswell ND 80783
Bailey Sauer 290 Carnac Avenue Austircester MD 94335
Liam Bednar 890 River Cove Fountain Ogdeson LA 69744
The user interface isn't much to speak of. There are two command buttons: "Print Customer List", which causes the above report to be printed, and an "Exit" button which ends the application.
The commented code for this application is shown below. A handful of techniques are introduced here which have not been covered in the previous tutorials, but will be in later tutorials.
Option Explicit
'-----------------------------------------------------------------------------
Private Sub cmdPrint_Click()
'-----------------------------------------------------------------------------
Dim intLineCtr As Integer
Dim intPageCtr As Integer
Dim intX As Integer
Dim strCustFileName As String
Dim strBackSlash As String
Dim intCustFileNbr As Integer
Dim strFirstName As String
Dim strLastName As String
Dim strAddr As String
Dim strCity As String
Dim strState As String
Dim strZip As String
Const intLINE_START_POS As Integer = 6
Const intLINES_PER_PAGE As Integer = 60
' Have the user make sure his/her printer is ready ...
If MsgBox("Make sure your printer is on-line and " _
& "loaded with paper.", vbOKCancel, "Check Printer") = vbCancel _
Then
Exit Sub
End If
' Set the printer font to Courier, if available (otherwise, we would be
' relying on the default font for the Windows printer, which may or
' may not be set to an appropriate font) ...
For intX = 0 To Printer.FontCount - 1
If Printer.Fonts(intX) Like "Courier*" Then
Printer.FontName = Printer.Fonts(intX)
Exit For
End If
Next
Printer.FontSize = 10
' initialize report variables ...
intPageCtr = 0
intLineCtr = 99 ' initialize line counter to an arbitrarily high number
' to force the first page break
' prepare file name & number
strBackSlash = IIf(Right$(App.Path, 1) = "\", "", "\")
strCustFileName = App.Path & strBackSlash & "customer.txt"
intCustFileNbr = FreeFile
' open the input file
Open strCustFileName For Input As #intCustFileNbr
' read and print all the records in the input file
Do Until EOF(intCustFileNbr)
' read a record from the input file and store the fields there into VB variables
Input #intCustFileNbr, strLastName, strFirstName, strAddr, strCity, strState, strZip
' if the number of lines printed so far exceeds the maximum number of lines
' allowed on a page, invoke the PrintHeadings subroutine to do a page break
If intLineCtr > intLINES_PER_PAGE Then
GoSub PrintHeadings
End If
' print a line of data
Printer.Print Tab(intLINE_START_POS); _
strFirstName & " " & strLastName; _
Tab(21 + intLINE_START_POS); _
strAddr; _
Tab(48 + intLINE_START_POS); _
strCity; _
Tab(72 + intLINE_START_POS); _
strState; _
Tab(76 + intLINE_START_POS); _
strZip
' increment the line count
intLineCtr = intLineCtr + 1
Loop
' close the input file
Close #intCustFileNbr
' Important! When done, the EndDoc method of the Printer object must be invoked.
' The EndDoc method terminates a print operation sent to the Printer object,
' releasing the document to the print device or spooler.
Printer.EndDoc
cmdExit.SetFocus
Exit Sub
' internal subroutine to print report headings
'------------
PrintHeadings:
'------------
' If we are about to print any page other than the first, invoke the NewPage
' method to perform a page break. The NewPage method advances to the next
' printer page and resets the print position to the upper-left corner of the
' new page.
If intPageCtr > 0 Then
Printer.NewPage
End If
' increment the page counter
intPageCtr = intPageCtr + 1
' Print 4 blank lines, which provides a for top margin. These four lines do NOT
' count toward the limit of 60 lines.
Printer.Print
Printer.Print
Printer.Print
Printer.Print
' Print the main headings
Printer.Print Tab(intLINE_START_POS); _
"Print Date: "; _
Format$(Date, "mm/dd/yy"); _
Tab(intLINE_START_POS + 31); _
"THE VBPROGRAMMER.COM"; _
Tab(intLINE_START_POS + 73); _
"Page:"; _
Format$(intPageCtr, "@@@")
Printer.Print Tab(intLINE_START_POS); _
"Print Time: "; _
Format$(Time, "hh:nn:ss"); _
Tab(intLINE_START_POS + 33); _
"CUSTOMER LIST"
Printer.Print
' Print the column headings
Printer.Print Tab(intLINE_START_POS); _
"CUSTOMER NAME"; _
Tab(21 + intLINE_START_POS); _
"ADDRESS"; _
Tab(48 + intLINE_START_POS); _
"CITY"; _
Tab(72 + intLINE_START_POS); _
"ST"; _
Tab(76 + intLINE_START_POS); _
"ZIP"
Printer.Print Tab(intLINE_START_POS); _
"-------------"; _
Tab(21 + intLINE_START_POS); _
"-------"; _
Tab(48 + intLINE_START_POS); _
"----"; _
Tab(72 + intLINE_START_POS); _
"--"; _
Tab(76 + intLINE_START_POS); _
"---"
Printer.Print
' reset the line counter to reflect the number of lines that have now
' been printed on the new page.
intLineCtr = 6
Return
End Sub
'-----------------------------------------------------------------------------
Private Sub cmdExit_Click()
'-----------------------------------------------------------------------------
End
End Sub
Subscribe to:
Posts (Atom)
