Skip to content

Instantly share code, notes, and snippets.

View sebug's full-sized avatar
🐒
trying to code his way out of it

Sebastian Gfeller sebug

🐒
trying to code his way out of it
View GitHub Profile
@sebug
sebug / Main
Created March 1, 2015 13:41 — forked from anonymous/Main
module Main where
import Debug.Trace
import Network.XHR
import qualified Thermite as T
import qualified Thermite.Html as T
import qualified Thermite.Html.Elements as T
import qualified Thermite.Action as T
import qualified Thermite.Types as T
@sebug
sebug / gist:ddd82f3a14d152404c46
Created May 11, 2015 19:14
Base 64 streamed in C#
using System;
using System.IO;
using System.Collections.Generic;
using System.Security.Cryptography;
namespace Base64
{
public class Base64Stream
{
public static int Main(string[] args)
import Foundation
struct APIService {
let baseUrl = "redacted"
let applicationId = "redacted"
let eventCode = "redacted"
let token: String?
func login(c: Credentials, andThen: APIService -> ()) -> () {
$AppliedGPOs = $(Get-WmiObject -Namespace 'ROOT\RSOP\Computer' -Class RSOP_GPLink -Filter "AppliedOrder <> 0" | Select @{n='GPO';e={$_.GPO.Replace("RSOP_GPO.","")}} | Select -ExpandProperty GPO)
Get-WmiObject -Namespace 'ROOT\RSOP\Computer' -Class 'RSOP_GPO' -Filter $AppliedGPOs[0]
@sebug
sebug / SmartArt.purs
Created July 8, 2016 18:07
Canvas schematic arrows
module SmartArt where
import Prelude (bind, ($), (+), (*), (-), (/), pure)
import Control.Monad.Eff (Eff)
import Graphics.Canvas (CANVAS, fillPath, setFillStyle, moveTo, lineTo, fillText, setFont, measureText, Context2D)
import Data.List (List(..))
drawArrows :: forall eff. Context2D -> Number -> Number -> Number -> List String -> Eff (canvas :: CANVAS | eff) Number
drawArrows ctx dx x y Nil = pure x
drawArrows ctx dx x y (Cons l ls) = do
apiVersion: apps/v1beta1
kind: Deployment
metadata:
name: sampleback
spec:
replicas: 1
template:
metadata:
labels:
app: sampleback
apiVersion: apps/v1beta1
kind: Deployment
metadata:
name: sampleback
spec:
replicas: 1
template:
metadata:
labels:
app: sampleback
FROM ubuntu:16.04
RUN apt-get update && apt-get install -y \
curl \
firefox \
python2.7 \
python-pip \
&& pip install selenium
RUN curl -L -O "https://github.com/mozilla/geckodriver/releases/download/v0.19.1/geckodriver-v0.19.1-linux64.tar.gz" && tar zxf geckodriver-v0.19.1-linux64.tar.gz
@sebug
sebug / Dockerfile
Created January 5, 2018 18:46
Pass connection string via docker -e to Entity Framework Core
FROM microsoft/aspnetcore-build:2.0.4-2.1.3-nanoserver-sac2016 AS build-env
WORKDIR /app
COPY *.sln ./
RUN mkdir Sample
COPY Sample/*.csproj ./Sample/
RUN dotnet restore
# Copy everything else and build
COPY . ./
Add-Type -AssemblyName "Microsoft.Office.Interop.Outlook"
$outlook = New-Object -ComObject Outlook.Application
$namespace = $outlook.GetNamespace("MAPI")
$inbox = $namespace.GetDefaultFolder([Microsoft.Office.Interop.Outlook.OlDefaultFolders]::olFolderInbox)
$inbox.Items($inbox.Items.Count)