Snippet of the Day

[Baraka]

Ask and ye shall receive.

function saltGenerator($limitChars=8) {
    $saltv = '';
    for (; $limitChars; --$limitChars)
        $saltv .= chr(rand(33,126));
    return $saltv;
} 

Best I can think of, also includes a few more symbols in the calculation, see ascii table: http://www.asciitable.com/index/asciifull.gif

thanks for that, makes the function more usable

[AppDeveloper]

Delete duplicate lines anywhere

This regex matches a line if a duplicate of that line follows it, even if there are other lines between the matched line and the duplicate. Replacing all matches of this regex with nothing deletes all duplicate lines even if they are not adjacent.

$replaced_data = preg_replace('/^(.*)(\r?\n\1)+$/m', '\1', $original_data); 

[Gaurav]

Here's something trivial: generate random IDs using list comprehensions in Python

import random

source_set = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"

def random_id(length=7):
    return ''.join([random.choice(source_set) for i in range(length)])

EDIT: just realised, it can be used for generating salt as well.. silly me - why didn't I mention it before

[JmZ]

YEAAAAAAAAAAH LIST COMPREHENSIONS!

Gaurav goes up in my list of cool coders. lol

Can do some really crazy stuff with list comps, dirty stuff [eviljmz]

import sqlite3
c = sqlite3.connect('test.db').cursor()
print '%s has the following animals:\n%s' % c.execute('SELECT :name, GROUP_CONCAT(y,\'\n\') FROM (SELECT (:sone || a.name || :stwo || a.species) as y FROM animals a, keepers k WHERE a.keeper_id = k.id AND k.name = :name) a;', {'sone' : 'Name: ', 'stwo' : ', Species: ', 'name' : raw_input('Keeper Name: ').capitalize()}).fetchone(), '%s' % str(c.close()).replace('None', '')

Prompts for a zoo keeper's name and outputs the animals they look after, in one line pretty much (apart from the initial import/connect).

[SplitIce]

That almost makes me spew as much as.

Public Function Adler32$(data As StringReader, Optional InitL& = 1, Optional InitH& = 0)
   With data
            Dim L&, h&
            h = InitH: L = InitL
               
               Dim StrCharPos&, tmpBuff$
               tmpBuff = StrConv(.mvardata, vbFromUnicode, LocaleID_ENG)
                  'The largest prime less than 2^16
                  L = (AscB(MidB$(tmpBuff, StrCharPos, 1)) + L) ' Mod 65521 '&HFFF1
                  h = (h + L) ' Mod 65521 '&HFFF1

                  If (0 = (StrCharPos Mod 5552)) Or _
                           (StrCharPos = Len(.mvardata)) Then
                     L = L Mod 65521  '&HFFF1
                     h = h Mod 65521  '&HFFF1
                     myDoEvents
                  End If
                  
               Next

      Adler32 = H16(h) & H16(L)
   End With
End Function

which by the way is just

static public uint adler32(byte[] data, int len){
 	        ulong a = 17;
 	        ulong b = 0;
 	        ulong MOD_ADLER = 65521;
 	        for(int i = 0; i < len; ++i){
 		        a = (a + data[i]) % MOD_ADLER;
 		        b = (b + a) % MOD_ADLER;
 	        }
 	        return (uint)((b << 16) | a);
         }

[JmZ]

lol, well, that's a mess. Mine is just monstrous but if you split it up into separate statements (remove all the nesting and what not), it is well written

[Connor]

VB.NET snip:

Dim downloadcaptcha As New WebClient
downloadcaptcha.DownloadFile("http://rapidgator.net" & .ParseBetween(hr.Html, "id=""yw0"" src=""", """ alt="" />", "id=""yw0"" src=""".Length), CurDir() & "\captcha.png")
PictureBox1.Image = Image.FromFile(CurDir() & "\captcha.png")

a little piece of what I used to grab the captcha of rapidgator and put it in a picturebox. and btw I did not use web browsers for the other parts (I hate when people use those bloated pieces of shit).

[Baraka]

function rowcountGetter($tables, $puffix= '') {
    if ($puffix)
        $puffix = ' '.$puffix;
    ($rows = sql::query('SELECT COUNT(*) FROM '.sql::$db->escape_string($tables).$puffix)) or sql::error(__FILE__,__LINE__);
    ($alter = $rows->fetch_row()) or sql::error(__FILE__,__LINE__);
    $rows->free();
    return $alter[0];
} 

Basically it counts the table in which rowcountGetter() is executed with
say i wanted to get post or threads of the database i'll do

$forum_posts = rowcountGetter('posts'); 

how about if you need to get something off the database but need to classify where you can do

$something = rowcountGetter('snippet', ' WHERE (`KWWH` & '.sql::search('post').')'); 

if there is room for improvement, i'd like to see

[JmZ]

Seems interesting. Ideally though you should keep row counters in another table and update them on insertion of a new row. This way you simply select the appropriate counter rather than counting the rows each time (e.g. rowcounts(int key, int counter)).

My snippet, isn't a snippet today.
Rather a suggested logic you should implement.

Basically pagination. You reminded me of it just now.

Many, many people do the following:
- Select the rows (limited to rows_per_page from the page offset)
- Select count(*) of same query without a limit
- Use the count to display how many pages of results there are and to know how many page links to show

What people should do is this:
- Select the rows (limited to rows_per_page+1 from the page offset)
- If your result set is of size rows_per_page+1, display a 'next page' link and remove the last row from the set
- If your result set is of a size less than rows_per_page+1, show no 'next page' link
- If your current page is > 1, show a 'previous page' link

This way you never select a count(), you only use one query.

[soft2050]

Wrote this for someone needing help:

public static string[] grabProxy(string source)
        {
            var proxies = new List<string>();
            foreach (Match m in Regex.Matches(source, @"<td><span>([\s\S]*?)(\d+)</td>"))
            {
                string port = m.Groups[2].Value;
                string ip = m.Groups[1].Value;
                ip = Regex.Replace(ip, @"(<(div|span) style=""display:none"">\d+.*?>|<.*?>)", "").Trim();
                proxies.Add(string.Concat(ip, ":", port));
            }
            return proxies.ToArray();
        } 

Parses out proxies from http://hidemyass.com/proxy-list/, hma being a ass trying to obfuscate proxies

Sample Usage:

WebClient wc = new WebClient();

            string[] proxyList = grabProxy(wc.DownloadString("http://hidemyass.com/proxy-list/"));

            Array.ForEach(proxyList, s => Console.WriteLine(s));

            Console.ReadKey();