Addon Release: FakeSQL Version 3.3

[bozoka45]

Another version of this very simple SQL addon.

Improvements:

-Newsitems are now updated on a submited, modified, or deleted basis. Before, the SQL database was rebuilt each time. This should improve speed greatly.
-SQL database is no longer purged. You can now use columns within the same table without worrying about them being affected.

Download Here

[bozoka45]

I have updated FakeSQL. There was a small bug which prevented some newsfields from being updated in the SQL database, so please upgrade from Version 3.

Download Place is the same.

[bozoka45]

I just fixed a pretty big bug in FakeSQL and am re-releasing it as version 3.4. The problem was that the SQL database was not sorted when transferring from SQL to the newsdat.txt. This caused newsitems to be sorted in an incorrect manner in both the Modify News screen and the building process.

The download link is the same.

If someone could add this to the Addons Page here at CTUS, that would be great. This version appears to be bug-free.

[dweiss]

FakeSQL
ClickCount SQL/PHP

Can I use both add-on without problem?

TNX
Regards,
Marry Chistmass
Daniel,

[bozoka45]

You should be able to. Clickcount was one of my first addons and its not written in Perl, although it should be. Go ahead and give it a try. You'll probalby have to add a column manually to your SQL database, though.

[dweiss]

HI!, I have some problems with FSQL.
I have Modified a news item with Coranto Modify Option. I've changed a CustomField that is a CheckBox.
But when I submit the modified news it saves OK in newsdat.txt but not in the MySQL Database ...

Any suggestion?

Regards,
Daniel,

[bozoka45]

Did you uncheck a checked checkbox?

[dweiss]

Did you uncheck a checked checkbox?

That's right ...

I've uncheck it using Coranto ...

TNX

[bozoka45]

Sorry for the late reply. I'll have to look into this, as I'm pretty sure I know whats causing the bug, I just need to figure out how to fix it.

[dweiss]

Sorry for the late reply. I'll have to look into this, as I'm pretty sure I know whats causing the bug, I just need to figure out how to fix it.

Bazooka, I know it's a minor bug, but I love this add-on, as I know a little PHP programing and none Perl.

But, if you can, and if you have the time, tell us when you get the new version!

TNX,
Daniel,

[bozoka45]

Around line 177, search for:

Code: Select all

   foreach my $i(@field) {
      $escaped = $dbh->quote(${$i}); #Escape Characters
      if($escaped ne NULL) {
         $values .= "`" . $i . "` = " . $escaped . ", ";
         
      }
   }


Change it to:

Code: Select all

   foreach my $i(@field) {
      $escaped = $dbh->quote(${$i}); #Escape Characters
      if($escaped ne NULL) {
         $values .= "`" . $i . "` = " . $escaped . ", ";
         
      } elsif ($fieldDB{$i}->{'FieldType'} == 4) {
            $values .= "`" . $i . "` = '', ";
      }
   }


Basically, if the field is NULL, IE, there's nothing there, then it doesn't put it in the SQL statement. It saves a little speed. Well, if its a checkbox, then its kinda important if its unchecked or not, so thats what the elsif statement is for.

[dweiss]

Code: Select all

   foreach my $i(@field) {
      $escaped = $dbh->quote(${$i}); #Escape Characters
      if($escaped ne NULL) {
         $values .= "`" . $i . "` = " . $escaped . ", ";
         
      } elsif ($fieldDB{$i}->{'FieldType'} == 4) {
            $values .= "`" . $i . "` = '', ";
      }
   }


Basically, if the field is NULL, IE, there's nothing there, then it doesn't put it in the SQL statement. It saves a little speed. Well, if its a checkbox, then its kinda important if its unchecked or not, so thats what the elsif statement is for.

Thanks!!! ...
Regards,
Daniel,

[dweiss]

Bozoka45, please, can I sugest an update to the add-on?

I have some problems when the Title (Subject) of the news I've post at Coranto has quotes ("). The title it's cut at de quotes.

In PHP it seems that if you add the addslashes() function it would be solved, and then, when you want to use the data, you shoud add the stripslashes() function.

But in Perl, I don't know how nor where to correct it.

Thanks, and sorry to bother ...

Regards,
Daniel,

[bozoka45]

This is a quick, untested fix that should work (let me know, please).

Around lind 152, find:

Code: Select all

$escaped = $dbh->quote(${$i});


After that, add:

Code: Select all

$escaped =~ s/\"/\\\"/;


Basically, that should find all double quotes and replace it with \", basically what add slashes does.

BTW, if you're doing an SQL query with PHP and use addslashes(), you don't need to use stripslashes() when using the data, the slashes are "removed" when inserted into the database.

[dweiss]

This is a quick, untested fix that should work (let me know, please).

Around lind 152, find:

Code: Select all

$escaped = $dbh->quote(${$i});


After that, add:

Code: Select all

$escaped =~ s/"/\\"/;


Basically, that should find all double quotes and replace it with ", basically what add slashes does.

BTW, if you're doing an SQL query with PHP and use addslashes(), you don't need to use stripslashes() when using the data, the slashes are "removed" when inserted into the database.

Thanks!, I'll try it and later let you know ...

Edit:

Arround line 176 there's another line with

Code: Select all

$escaped = $dbh->quote(${$i});


and I also added this:

Code: Select all

$escaped =~ s/"/\\"/;


Edit later:

Ok, thanks!, works great! ... write down this for any later version ... BTW, any Idea how to work with the new version of NewsCategory addon?

Regards,
Daniel,