KrisWillis.com » Web Development http://www.kriswillis.com Fri, 02 Jul 2010 13:10:08 +0000 en hourly 1 http://wordpress.org/?v=3.0.1 Shorten URLs and post to Twitter with PHP and cURL http://www.kriswillis.com/index.php/2009/10/09/shorten-urls-and-post-to-twitter-with-php-and-curl/ http://www.kriswillis.com/index.php/2009/10/09/shorten-urls-and-post-to-twitter-with-php-and-curl/#comments Fri, 09 Oct 2009 14:41:51 +0000 Kris http://kriswillis.com/?p=109 I recently had the task of automatically “tweeting” when a new article was posted to one of the websites I had built, it turns out to be a pretty simple operation thanks to both Twitter and Bit.ly providing a straight forward API. An account with Bit.ly does have to be opened to obtain an API key.

I decided to use the built-in cURL functionality of PHP for interacting with the APIs. This code uses some of the JSON functions introduced in PHP 5.2.0 so a recent install of PHP is required as the Bit.ly API responds with a JSON string. On to the code…

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53

function shorten_url($long_url) {
    $login = "username";
    $api   = "api key";
    if(!empty($long_url)) {
        $shortener = "http://api.bit.ly/shorten?version=2.0.1&longUrl={$long_url}&login={$login}&apiKey={$api}";
 
        $ch = curl_init();
        curl_setopt($ch, CURLOPT_URL, $shortener);
        curl_setopt($ch, CURLOPT_HEADER, 0);
        curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
        curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1);
        curl_setopt($ch, CURLOPT_TIMEOUT, 10);
        $x = curl_exec($ch);
        curl_close($ch);
 
        $json = json_decode($x,true);
        return ($json['statusCode'] == "OK") ? $json['results'][$long_url]['shortUrl'] : false;
    } else {
        return false;
    }
}
 
function twitter($status,$url) {
    $username = "username";
    $password = "password";
    if(!empty($status)) {
        $limit = 140;
        if($short = shorten_url($url)) {
            $length = ($limit - (strlen($short) + 4));
            $status = (strlen($status) > $length) ? substr($status,0,$length)."... ".$short : $status." ".$short;
 
            $ch = curl_init();
            curl_setopt($ch, CURLOPT_URL, "http://twitter.com/statuses/update.xml");
            curl_setopt($ch, CURLOPT_HEADER, 0);
            curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
            curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1);
            curl_setopt($ch, CURLOPT_TIMEOUT, 10);
            curl_setopt($ch, CURLOPT_USERPWD, "{$username}:{$password}");
            curl_setopt($ch, CURLOPT_POSTFIELDS, "status=".$status);
            $x = curl_exec($ch);
            curl_close($ch);
 
            $p = xml_parser_create();
            xml_parse_into_struct($p, $x, $vals, $index);
            xml_parser_free($p);
            return ($vals[0]['tag'] == "STATUS") ? true : false;
        } else {
            return false;
        }
    } else {
        return false;
    }
}
]]> http://www.kriswillis.com/index.php/2009/10/09/shorten-urls-and-post-to-twitter-with-php-and-curl/feed/ 0 IE6 Bug: H1 tags with background colours http://www.kriswillis.com/index.php/2008/03/28/ie6-bug-h1-tags-with-background-colours/ http://www.kriswillis.com/index.php/2008/03/28/ie6-bug-h1-tags-with-background-colours/#comments Fri, 28 Mar 2008 14:27:48 +0000 Kris http://kriswillis.com/index.php/2008/03/28/ie6-bug-h1-tags-with-background-colours/ No IE6I have just noticed an odd bug when viewing a H1 tag with a background colour under IE6 – There is no background colour until the H1 is taken out of view by scrolling it out of the viewport and then bringing it back again. Highlighting the text partially brings in some colour.

One solution for this issue is add relative positioning to the tags CSS class.

]]> http://www.kriswillis.com/index.php/2008/03/28/ie6-bug-h1-tags-with-background-colours/feed/ 0 Table joins in MySQL with no matches http://www.kriswillis.com/index.php/2008/02/17/table-joins-in-mysql-with-no-matches/ http://www.kriswillis.com/index.php/2008/02/17/table-joins-in-mysql-with-no-matches/#comments Sun, 17 Feb 2008 16:13:25 +0000 Kris http://kriswillis.com/index.php/2008/02/17/table-joins-in-mysql-with-no-matches/ MySQL LogoI consider my understanding of MySQL around the intermediate level, but when writing table joins in the past I have always used the ‘equi-join’ method:

SELECT t1.*, t2.`name` FROM t1, t2 WHERE t1.n = t2.n;

Now, when a record for t2.n doesn’t exist, a row will not be returned. To solve this problem in the past, I would have executed two separate queries and process the output with PHP – Not the most efficient solution.

Today I had to write a query on a relatively larger scale with a number of table joins. I knew for a fact that a few of these joins would not have matching data on all occasions and splitting one query into x queries and then processing the results would not be a good idea in the slightest.

Searching Google yielded bugger all on the subject, though that could have been down to my search criteria. The MySQL manual was helpful as usual (that’s sarcasm, by the way – They should take a page out of PHPs book, their manual is great), but with a mixture of the two I found the solution. Left joins.

SELECT t1.*, t2.`name` FROM t1 LEFT JOIN t2 ON t1.n = t2.n;

The above will return a row, even if there isn’t a match for t1.n = t2.n. Learning every day…

]]> http://www.kriswillis.com/index.php/2008/02/17/table-joins-in-mysql-with-no-matches/feed/ 2 Recolouring images with PHP http://www.kriswillis.com/index.php/2007/12/12/recolouring-images-with-php/ http://www.kriswillis.com/index.php/2007/12/12/recolouring-images-with-php/#comments Wed, 12 Dec 2007 20:07:11 +0000 Kris http://kriswillis.com/index.php/2007/12/12/recolouring-images-with-php/ Blue roseAbout a year ago I was working on a project where one of its features allowed the user to upload an image, select a colour on the image with a colour picker tool, then select from a group of colours to replace the picked colour with. I had a somewhat stable build running where it simply replaced the hue of the picked colour – Introducing saturation and value changes invoked a number of ‘random’ glitches and odd colour effects. This feature was subsequently dropped from the project due to it costing too much to continue developing.

Skip forward about a year and I find this script knocking around on a back-up disc, so I decide to put some more development time in purely for my own satisfaction of enhancing it. I have made it work to a nearly passable level, it works nice on images with isolated high contrasting colours. I created a function to create a tiled pop-arty graphic from an inputted image too just for fun. For example, input this and it will spit out this. There is plenty of room for improvement: You can’t convert colours to or from white/black and it replaces all instances of a colour, not a flood-fill effect. So, on to the code…

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158

<?php
set_time_limit(0);
 
function rgbtohex($r,$g,$b) {
    return sprintf("%02X%02X%02X",$r,$g,$b);
}
 
function rgbtohsv($r,$g,$b) {
    $r /= 255;
    $g /= 255;
    $b /= 255;
 
    $min = min($r,$g,$b);
    $max = max($r,$g,$b);
 
    switch($max) {
        case 0:
            $h = $s = $v = 0;
            break;
        case $min:
            $h = $s = 0;
            $v = $max;
            break;
        default:
            $delta = $max - $min;
            if($r == $max) {
                $h = 0 + ($g - $b) / $delta;
            } elseif($g == $max) {
                $h = 2 + ($b - $r) / $delta;
            } else {
                $h = 4 + ($r - $g) / $delta;
            }
            $h *= 60;
            if($h < 0 ) $h += 360;
            $s = $delta / $max;
            $v = $max;
    }
    return array((integer)$h,(integer)($s*100),(integer)($v*100));
}
 
function hsvtorgb($h,$s,$v) {
    $s /= 100;
    $v /= 100;
    if($s == 0) {
        $r = $g = $b = $v;
    } else {
        $h /= 60.0;
        $hi = floor($h);
        $f = $h - $hi;
        $p = ($v * (1.0 - $s));
        $q = ($v * (1.0 - ($f * $s)));
        $t = ($v * (1.0 - ((1.0 - $f) * $s)));
        switch($hi) {
            case 0: $r = $v; $g = $t; $b = $p; break;
            case 1: $r = $q; $g = $v; $b = $p; break;
            case 2: $r = $p; $g = $v; $b = $t; break;
            case 3: $r = $p; $g = $q; $b = $v; break;
            case 4: $r = $t; $g = $p; $b = $v; break;
            default: $r = $v; $g = $p; $b = $q; break;
        }
    }
    return array(
        (integer) ($r * 255 + 0.5),
        (integer) ($g * 255 + 0.5),
        (integer) ($b * 255 + 0.5)
    );
}
 
function recolor($file,$colorToChange,$newColor) {
    $threshold = 40;
    $image  = imagecreatefrompng($file);
    $width  = imagesx($image);
    $height = imagesy($image);
    $coords = explode(",",$colorToChange);
    $rgb    = imagecolorat($image,$coords[0],$coords[1]);
    $c1[0]  = ($rgb >> 16) & 0xFF;
    $c1[1]  = ($rgb >> 8)  & 0xFF;
    $c1[2]  = $rgb & 0xFF;
 
    list($hueToReplace,$satToReplace,$valToReplace) = rgbtohsv($c1[0],$c1[1],$c1[2]);
    $c2 = sscanf($newColor,"%2x%2x%2x");
    list($newHue,$newSat,$newVal) = rgbtohsv($c2[0],$c2[1],$c2[2]);
 
    $c = array();
    $n = array();
 
    for($y=0; $y<$height; $y++) {
        for($x=0; $x<$width; $x++) {
            $rgb = imagecolorat($image,$x,$y);
            $a   = ($rgb >> 24) & 0xFF;
            $r   = ($rgb >> 16) & 0xFF;
            $g   = ($rgb >> 8)  & 0xFF;
            $b   = $rgb & 0xFF;
            list($h,$s,$v) = rgbtohsv($r,$g,$b);
 
            $angle = ($h >= $hueToReplace) ? 360 - ($h - $hueToReplace) : 360 - ($hueToReplace - $h);
            $angle = ($angle > 180) ? 360 - $angle : $angle;
            if($angle <= $threshold && ($s > 10 && $v < 90)) {
                $h = $newHue + ($h - $hueToReplace);
                if($h < 0) $h += 360;
                if($h > 360) $h -= 360;
 
                $s = ($satToReplace > $s) ? $newSat - ($satToReplace - $s) : $newSat - ($s - $satToReplace);
                if($s < 0) $s += 100;
                if($s > 100) $s -= 100;
 
                $v = ($valToReplace > $v) ? $newVal - ($valToReplace - $v) : $newVal - ($v - $valToReplace);
                if($v < 0) $v += 100;
                if($v > 100) $v -= 100;
 
                list($r,$g,$b) = hsvtorgb($h,$s,$v);
                $color = imagecolorallocatealpha($image,$r,$g,$b,$a);
                imagesetpixel($image,$x,$y,$color);
            }
        }
    }
    return $image;
}
 
function popart($in,$out,$coords) {
    @unlink("test.png");
    //Requires ImageMagick
    exec("convert $in temp.png");
    $in = "temp.png";
 
    list($width,$height,$type,$attr) = getimagesize($in);
    $w  = $width  * 6;
    $h  = $height * 6;
    $im = imagecreatetruecolor($w,$h);
    $x  = 0;
    $y  = 0;
    $s  = 80;
    $v  = 90;
 
    for($h=0; $h<=360; $h+=10) {
        list($r,$g,$b) = hsvtorgb($h,$s,$v);
        $hex = rgbtohex($r,$g,$b);
        $c = recolor($in,$coords,$hex);
        imagecopymerge($im,$c,$x,$y,0,0,$width,$height,100);
        if($h != 0) {
            if($h % 60 > 0) {
                $x += $width;
            } else {
                $x = 0;
                $y += $height;
            }
        }
        echo "XY: $x,$y | HSV: $h,$s,$v | RGB: $r,$g,$b | HEX: $hex\r\n";
    }
    imagepng($im,$out);
    unlink($in);
}
 
$start = time();
popart("test.jpg","test.png","230,160");
$end = time();
echo (($end - $start)/60)." minutes execution time.\r\n";
?>

Feel free to suggest enhancements – I know it handles a few things a bit inefficient, but it’s more of a prototype / proof-of-concept kinda thing at this stage.

]]> http://www.kriswillis.com/index.php/2007/12/12/recolouring-images-with-php/feed/ 0 Developing for the desktop with web technology http://www.kriswillis.com/index.php/2007/03/26/developing-for-the-desktop-with-web-technology/ http://www.kriswillis.com/index.php/2007/03/26/developing-for-the-desktop-with-web-technology/#comments Mon, 26 Mar 2007 14:39:34 +0000 Kris http://wp.kriswillis.com/index.php/2007/03/26/developing-for-the-desktop-with-web-technology/ Adobe ApolloApollo is the code name for a cross-operating system runtime being developed by Adobe that allows web developers to use their existing skills to build and deploy Internet applications to the desktop that combine the benefits of web applications – network and user connectivity, rich media content, ease of development, and broad reach – with the strengths of desktop applications – application interactions, local resource access, personal settings, powerful functionality, and rich interactive experiences.

Apollo is currently in alpha with support for HTML, JavaScript and Flash – There is basic support for AJAX with more coming in v1.0 no doubt. The alpha currently is only supported on Windows and OS X although Linux will be supported shortly after the release of 1.0, this has something to do with the latest Flash player not being finished for Linux, or something.

So I guess this works in a similar way to Java in that it’s machine-independent, although less powerful no doubt but with a smaller resource footprint one would hope. This looks like one to keep an eye on. Check it out here.

]]> http://www.kriswillis.com/index.php/2007/03/26/developing-for-the-desktop-with-web-technology/feed/ 0 Running multiple versions of MSIE on Linux http://www.kriswillis.com/index.php/2007/03/25/running-multiple-versions-of-msie-on-linux/ http://www.kriswillis.com/index.php/2007/03/25/running-multiple-versions-of-msie-on-linux/#comments Sun, 25 Mar 2007 14:37:02 +0000 Kris http://wp.kriswillis.com/index.php/2007/03/25/running-multiple-versions-of-msie-on-linux/ For those of us that are developing web projects on a Linux box that are fed up with jumping over onto a Windows machine to test their code in Internet Explorer there is a nice and easy script called IEs4Linux that makes the process of installing MSIE 5, 5.5 and 6 onto a Linux box a breeze.

Although IEs4Linux doesn’t fully support IE7 yet, there is enough support in their latest beta for testing code on – It pretty much loads up the IE7 rendering engine into an IE6 GUI, although there are still bugs, it should work well enough for testing.

Check out IEs4Linux here.

]]> http://www.kriswillis.com/index.php/2007/03/25/running-multiple-versions-of-msie-on-linux/feed/ 0